Changeset 13772

Timestamp:

01/12/12 20:18:19 (12 years ago)

Author:

Mark Evenson

Message:

backport r13768 to fix #193 for the abcl-1.0.2 release.

File:

• branches/1.0.x/abcl/src/org/armedbear/lisp/Stream.java (modified) (1 diff)

branches/1.0.x/abcl/src/org/armedbear/lisp/Stream.java

@@ -1137 +1137 @@
                                                  this));
             }
-        }
-        return error(new ReaderError("Can't intern zero-length symbol.", this));
+        } else {                // token.length == 0
+            Package pkg = (Package)Symbol._PACKAGE_.symbolValue(thread);
+            return pkg.intern("");
+        }
     }