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

[Alessio Stalla]

Author: astalla
Date: Mon May 25 16:53:53 2009
New Revision: 11951

Log:
Fixed javaInstance() from r11834: the arguments for isAssignableFrom were in
the wrong order. (obj.javaInstance(class) is used by abcl to check whether
"obj" is an instance of "class").


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	Mon May 25 16:53:53 2009
@@ -106,7 +106,7 @@
 
   public Object javaInstance(Class c) throws ConditionThrowable
   {
-      if (getClass().isAssignableFrom(c))
+      if (c.isAssignableFrom(getClass()))
 	  return this;
       return error(new LispError("The value " + writeToString() +
 				 " is not of class " + c.getName()));