Changeset 13328


Ignore:
Timestamp:
06/14/11 10:05:04 (12 years ago)
Author:
Mark Evenson
Message:

Fix JNEW-ARRAY-FROM-ARRAY to create byte[] arrays.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/Java.java

    r13282 r13328  
    710710                for (int i = 2; i<args.length - 1; i++)
    711711                    a = Array.get(a, ((Integer)args[i].javaInstance()).intValue());
    712                 Array.set(a, ((Integer)args[args.length - 1].javaInstance()).intValue(), v.javaInstance());
     712                Object value = v.javaInstance();
     713                int index = ((Integer)args[args.length - 1].javaInstance()).intValue();
     714                if (value instanceof java.lang.Number
     715                    && a.getClass().getComponentType().equals(Byte.TYPE)) {
     716                    Array.setByte(a, index, ((java.lang.Number)value).byteValue());
     717                } else {
     718                    Array.set(a, index, value);
     719                }
    713720                return v;
    714721            }
Note: See TracChangeset for help on using the changeset viewer.