[armedbear-cvs] r12110 - trunk/abcl/src/org/armedbear/lisp

Erik Huelsmann ehuelsmann at common-lisp.net
Sun Aug 23 08:32:29 UTC 2009


Author: ehuelsmann
Date: Sun Aug 23 04:32:26 2009
New Revision: 12110

Log:
Eliminate (a few) "unchecked" warnings.

Modified:
   trunk/abcl/src/org/armedbear/lisp/Lisp.java
   trunk/abcl/src/org/armedbear/lisp/LispObject.java

Modified: trunk/abcl/src/org/armedbear/lisp/Lisp.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/Lisp.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/Lisp.java	Sun Aug 23 04:32:26 2009
@@ -1220,10 +1220,12 @@
   }
 
     public static final LispObject loadCompiledFunction(byte[] bytes) throws Throwable {
-        Class c = (new JavaClassLoader()).loadClassFromByteArray(null, bytes, 0, bytes.length);
+        Class<Object> c = (new JavaClassLoader())
+            .loadClassFromByteArray(null, bytes, 0, bytes.length);
         if (c != null) {
             Constructor constructor = c.getConstructor((Class[])null);
-            LispObject obj = (LispObject) constructor.newInstance((Object[])null);
+            LispObject obj = (LispObject)constructor
+                .newInstance((Object[])null);
             if (obj instanceof Function) {
               ((Function)obj).setClassBytes(bytes);
             }

Modified: trunk/abcl/src/org/armedbear/lisp/LispObject.java
==============================================================================
--- trunk/abcl/src/org/armedbear/lisp/LispObject.java	(original)
+++ trunk/abcl/src/org/armedbear/lisp/LispObject.java	Sun Aug 23 04:32:26 2009
@@ -104,7 +104,7 @@
         return this;
   }
 
-  public Object javaInstance(Class c) throws ConditionThrowable
+  public Object javaInstance(Class<Object> c) throws ConditionThrowable
   {
       if (c.isAssignableFrom(getClass()))
 	  return this;




More information about the armedbear-cvs mailing list