--- a/Cons.st	Thu Jul 25 20:10:54 2002 +0200
+++ b/Cons.st	Wed Jul 31 21:24:45 2002 +0200
@@ -208,7 +208,7 @@
         car printOn:aStream.
     ].
 
-    aStream nextPutAll:'#'.
+    aStream nextPutAll:'!!'.
 
     (cdr isLazyValue not and:[ cdr isCons ]) ifTrue:[
         aStream nextPutAll:'('.
@@ -246,5 +246,5 @@
 !Cons class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic2/Cons.st,v 1.1 2002-06-07 15:27:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic2/Cons.st,v 1.2 2002-07-31 19:24:45 cg Exp $'
 ! !