Changeset 4648


Ignore:
Timestamp:
11/04/03 22:26:36 (18 years ago)
Author:
asimon
Message:

JNEW uses javaInstance for automatic type conversion

File:
1 edited

Legend:

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

    r4574 r4648  
    33 *
    44 * Copyright (C) 2002-2003 Peter Graves
    5  * $Id: Java.java,v 1.16 2003-10-30 08:16:11 asimon Exp $
     5 * $Id: Java.java,v 1.17 2003-11-04 22:26:36 asimon Exp $
    66 *
    77 * This program is free software; you can redistribute it and/or
     
    317317                Object[] initargs = new Object[args.length-1];
    318318                for (int i = 1; i < args.length; i++) {
    319                     LispObject arg = args[i];
    320                     if (arg instanceof LispString)
    321                         initargs[i-1] = ((LispString)arg).getValue();
    322                     else if (arg instanceof Fixnum)
    323                         initargs[i-1] = new Integer(((Fixnum)arg).getValue());
    324                     else if (arg instanceof LispFloat)
    325                         initargs[i-1] = new Double(((LispFloat)arg).getValue());
    326                     else if (arg instanceof JavaObject)
    327                         initargs[i-1] = ((JavaObject)arg).getObject();
     319        initargs[i-1] = args[i].javaInstance();
    328320                }
    329321                return new JavaObject(constructor.newInstance(initargs));
Note: See TracChangeset for help on using the changeset viewer.