Changeset 13327

Timestamp:

06/14/11 09:20:56 (12 years ago)

Author:

Mark Evenson

Message:

Allow JCOERCE to convert any number to java.lang.Byte.

Maps any number passed to to its two's complement 8bit byte
representation, meaning that it will which may not be what one would
wish.

File:

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

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

@@ -69 +69 @@
             intendedClass = Java.maybeBoxClass(intendedClass);
             if(!intendedClass.isInstance(obj)) {
+                if (intendedClass.equals(java.lang.Byte.class)
+                    && obj instanceof java.lang.Number) {
+                    // Maps any number to two's complement 8bit byte representation
+                    // ??? Is this a reasonable thing?
+                    this.obj = ((java.lang.Number)obj).byteValue();
+                    this.intendedClass = intendedClass;
+                    return;
+                }
                 throw new ClassCastException(obj + " can not be cast to " + intendedClass);
             }