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

[Ville Voutilainen]

Author: vvoutilainen
Date: Tue Apr 27 16:30:16 2010
New Revision: 12637

Log:
Make unreadableString() variants in LispObject final.


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

Modified: trunk/abcl/src/org/armedbear/lisp/LispObject.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/LispObject.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/LispObject.java	Tue Apr 27 16:30:16 2010
@@ -719,14 +719,14 @@
     return toString();
   }
 
-  public String unreadableString(String s) {
+  public final String unreadableString(String s) {
      return unreadableString(s, true);
   }
-  public String unreadableString(Symbol sym) {
+  public final String unreadableString(Symbol sym) {
      return unreadableString(sym, true);
   }
 
-  public String unreadableString(String s, boolean identity)
+  public final String unreadableString(String s, boolean identity)
   {
     StringBuilder sb = new StringBuilder("#<");
     sb.append(s);
@@ -739,7 +739,7 @@
     return sb.toString();
   }
 
-  public String unreadableString(Symbol symbol, boolean identity) 
+  public final String unreadableString(Symbol symbol, boolean identity) 
 
   {
     return unreadableString(symbol.writeToString(), identity);