Changeset 11762

Timestamp:

04/17/09 20:00:18 (14 years ago)

Author:

ehuelsmann

Message:

Fix JCLASS null return value; signal a lisp error instead.

Found by: Russell McManus? (russel_mcmanus at yahoo com)

File:

• trunk/abcl/src/org/armedbear/lisp/Java.java (modified) (1 diff)

trunk/abcl/src/org/armedbear/lisp/Java.java

@@ -852 +852 @@
                 return Double.TYPE;
             // Not a primitive Java type.
-            return classForName(s);
+            Class c = classForName(s);
+            if (c == null)
+                error(new LispError(s + " does not designate a Java class."));
+
+            return c;
         }
         // It's not a string, so it must be a JavaObject.