From 532b92688e6b1136028ed7a4633811111243592e Mon Sep 17 00:00:00 2001
From: Justine Tunney <jtunney@gmail.com>
Date: Tue, 16 Nov 2021 00:00:08 -0800
Subject: [PATCH] Fix regression in C code for PrintList()

Fixes #11
---
 lisp.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp.c b/lisp.c
index 99c1d33..6c792b7 100644
--- a/lisp.c
+++ b/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));