mirror of
https://github.com/samsonjs/sectorlisp.git
synced 2026-03-25 09:05:48 +00:00
parent
522f0a16fd
commit
532b92688e
1 changed files with 1 additions and 1 deletions
2
lisp.c
2
lisp.c
|
|
@ -241,7 +241,7 @@ void PrintList(int x) {
|
|||
#endif
|
||||
PrintChar('(');
|
||||
PrintObject(Car(x));
|
||||
while ((x = Cdr(x))) {
|
||||
while ((x = Cdr(x)) != NIL) {
|
||||
if (!ISATOM(x)) {
|
||||
PrintChar(' ');
|
||||
PrintObject(Car(x));
|
||||
|
|
|
|||
Loading…
Reference in a new issue