sjs/sectorlisp
1
0
Fork 0
mirror of https://github.com/samsonjs/sectorlisp.git synced 2026-04-27 14:57:41 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Fix regression in C code for PrintList()

Browse source 
Fixes #11
This commit is contained in:
Justine Tunney 2021-11-16 00:00:08 -08:00
parent 522f0a16fd
commit 532b92688e
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp.c
View file

@ -241,7 +241,7 @@ void PrintList(int x) {
#endif #endif
PrintChar('('); PrintChar('(');
PrintObject(Car(x)); PrintObject(Car(x));
while ((x = Cdr(x))) { while ((x = Cdr(x)) != NIL) {
if (!ISATOM(x)) { if (!ISATOM(x)) {
PrintChar(' '); PrintChar(' ');
PrintObject(Car(x)); PrintObject(Car(x));