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

[Erik Huelsmann]

Author: ehuelsmann
Date: Wed Jan 13 17:01:14 2010
New Revision: 12375

Log:
Harmonize Symbol printing with what stream already does;
  same for packages.

Modified:
   trunk/abcl/src/org/armedbear/lisp/Package.java
   trunk/abcl/src/org/armedbear/lisp/Symbol.java

Modified: trunk/abcl/src/org/armedbear/lisp/Package.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/Package.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/Package.java	Wed Jan 13 17:01:14 2010
@@ -829,7 +829,13 @@
             sb.append(name);
             sb.append("\")");
             return sb.toString();
-        } else if (name != null) {
+        } else
+            return toString();
+    }
+    
+    @Override
+    public String toString() {
+         if (name != null) {
             FastStringBuffer sb = new FastStringBuffer("#<PACKAGE \"");
             sb.append(name);
             sb.append("\">");

Modified: trunk/abcl/src/org/armedbear/lisp/Symbol.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/Symbol.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/Symbol.java	Wed Jan 13 17:01:14 2010
@@ -268,7 +268,7 @@
 
   @Override
   public String toString() {
-      return "(Symbol)" + getQualifiedName();
+      return getQualifiedName();
   }
 
   /** Gets the value associated with the symbol