Changeset 488 for abuse/trunk/src/lcache.cppTweet

Timestamp:

Apr 17, 2011, 10:28:36 AM (11 years ago)

Author:

Sam Hocevar

Message:

lisp: implement LispString::Create.

File:

• abuse/trunk/src/lcache.cpp (modified) (1 diff)

abuse/trunk/src/lcache.cpp

@@ -108 +108 @@
     case L_STRING :
     { long l=fp->read_uint32();
-      LispString *s=new_lisp_string(l);
+      LispString *s = LispString::Create(l);
       fp->read(lstring_value(s),l);
       return s;