Index: /trunk/ccl/level-1/l1-reader.lisp
===================================================================
--- /trunk/ccl/level-1/l1-reader.lisp	(revision 4926)
+++ /trunk/ccl/level-1/l1-reader.lisp	(revision 4927)
@@ -1092,6 +1092,5 @@
 
 
-(defresource *parse-string-resource*
-  :constructor (make-string 255 :element-type 'base-char))
+
 
 ;;;arg=0 : read form, error if eof
