Changeset 4648

Timestamp:

11/04/03 22:26:36 (19 years ago)

Author:

asimon

Message:

JNEW uses javaInstance for automatic type conversion

File:

• trunk/j/src/org/armedbear/lisp/Java.java (modified) (2 diffs)

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

@@ -3 +3 @@
  *
  * Copyright (C) 2002-2003 Peter Graves
- * $Id: Java.java,v 1.16 2003-10-30 08:16:11 asimon Exp $
+ * $Id: Java.java,v 1.17 2003-11-04 22:26:36 asimon Exp $
  *
  * This program is free software; you can redistribute it and/or
@@ -317 +317 @@
                 Object[] initargs = new Object[args.length-1];
                 for (int i = 1; i < args.length; i++) {
-                    LispObject arg = args[i];
-                    if (arg instanceof LispString)
-                        initargs[i-1] = ((LispString)arg).getValue();
-                    else if (arg instanceof Fixnum)
-                        initargs[i-1] = new Integer(((Fixnum)arg).getValue());
-                    else if (arg instanceof LispFloat)
-                        initargs[i-1] = new Double(((LispFloat)arg).getValue());
-                    else if (arg instanceof JavaObject)
-                        initargs[i-1] = ((JavaObject)arg).getObject();
+        initargs[i-1] = args[i].javaInstance();
                 }
                 return new JavaObject(constructor.newInstance(initargs));