[Wisp-cvs] wisp/src/builtin tostring.wisp,1.83,1.84

[<di...@us...>]

Update of /cvsroot/wisp/wisp/src/builtin
In directory sc8-pr-cvs1:/tmp/cvs-serv30889/src/builtin

Modified Files:
	tostring.wisp 
Log Message:
cosmetical fix

Index: tostring.wisp
===================================================================
RCS file: /cvsroot/wisp/wisp/src/builtin/tostring.wisp,v
retrieving revision 1.83
retrieving revision 1.84
diff -u -d -r1.83 -r1.84
--- tostring.wisp	28 Feb 2003 22:40:56 -0000	1.83
+++ tostring.wisp	28 Feb 2003 22:55:51 -0000	1.84
@@ -114,7 +114,7 @@
                 ((null? s) (emit "()"))
                 ((eq? s #t) (emit "#t"))
                 ((eq? s #f) (emit "#f"))
-                ((eq? s '#u) (emit "#u"))
+                ((eq? s #u) (emit "#u"))
                 ((symbol? s) (emit (symbol->string s)))
                 ((vector? s) (if (not (check-duplicity s))
                                (begin