[armedbear-cvs] r12044 - trunk/abcl/src/org/armedbear/lisp

[Alessio Stalla]

Author: astalla
Date: Mon Jul 13 16:21:41 2009
New Revision: 12044

Log:
Reverted FaslReadtable to UPCASE behavior (was PRESERVE to get around a bug
in how symbols were printed in fasls).


Modified:
   trunk/abcl/src/org/armedbear/lisp/FaslReadtable.java

Modified: trunk/abcl/src/org/armedbear/lisp/FaslReadtable.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/FaslReadtable.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/FaslReadtable.java	Mon Jul 13 16:21:41 2009
@@ -99,7 +99,7 @@
         dt.functions[13]   = FaslReader.FASL_SHARP_ILLEGAL; // return
         dispatchTables['#'] = dt;
 
-        readtableCase = Keyword.PRESERVE;
+        readtableCase = Keyword.UPCASE;
     }
 
     private static final FaslReadtable instance = new FaslReadtable();