Changeset 13768


Ignore:
Timestamp:
01/12/12 19:13:53 (9 years ago)
Author:
rschlatte
Message:
Allow zero-length symbols (written as
).

Fixes #193 (reported by Anton Vodonosov).

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/Stream.java

    r13706 r13768  
    11371137                                                 this));
    11381138            }
    1139         }
    1140         return error(new ReaderError("Can't intern zero-length symbol.", this));
     1139        } else {                // token.length == 0
     1140            Package pkg = (Package)Symbol._PACKAGE_.symbolValue(thread);
     1141            return pkg.intern("");
     1142        }
    11411143    }
    11421144
Note: See TracChangeset for help on using the changeset viewer.