--- a/Cons.st	Sat Dec 31 01:05:21 2016 +0100
+++ b/Cons.st	Tue Jan 03 14:45:08 2017 +0100
@@ -179,7 +179,7 @@
         aStream peek ~= $)
     ] whileTrue:[
         element := self readLispFrom:aStream.
-        this := Cons car:element cdr:nil.
+        this := self car:element cdr:nil.
         prev isNil ifTrue:[
             first := this
         ] ifFalse:[