JavaNativeMethodImpl_OpenJDK6.st
changeset 3196 d617b4590431
parent 3176 243dcc6b3220
child 3205 4284af836b5d
--- a/JavaNativeMethodImpl_OpenJDK6.st	Mon Aug 04 15:43:51 2014 +0100
+++ b/JavaNativeMethodImpl_OpenJDK6.st	Mon Aug 04 16:13:14 2014 +0100
@@ -10168,53 +10168,52 @@
     "Modified: / 28-01-2011 / 15:19:24 / Marcel Hlopko <hlopik@gmail.com>"
 !
 
-_java_lang_Class_isAssignableFrom: this _:a1
-
+_java_lang_Class_isAssignableFrom:this _:a1 
     <javanative: 'java/lang/Class' name: 'isAssignableFrom(Ljava/lang/Class;)Z'>
-
-        "
-    /**
-     * Determines if the class or interface represented by this
-     * {@code Class} object is either the same as, or is a superclass or
-     * superinterface of, the class or interface represented by the specified
-     * {@code Class} parameter. It returns {@code true} if so;
-     * otherwise it returns {@code false}. If this {@code Class}
-     * object represents a primitive type, this method returns
-     * {@code true} if the specified {@code Class} parameter is
-     * exactly this {@code Class} object; otherwise it returns
-     * {@code false}.
-     *
-     * <p> Specifically, this method tests whether the type represented by the
-     * specified {@code Class} parameter can be converted to the type
-     * represented by this {@code Class} object via an identity conversion
-     * or via a widening reference conversion. See <em>The Java Language
-     * Specification</em>, sections 5.1.1 and 5.1.4 , for details.
-     *
-     * @param cls the {@code Class} object to be checked
-     * @return the {@code boolean} value indicating whether objects of the
-     * type {@code cls} can be assigned to objects of this class
-     * @exception NullPointerException if the specified Class parameter is
-     *            null.
-     * @since JDK1.1
-     */
-    "
-    | clsObj me other |
+    "
+/**
+ * Determines if the class or interface represented by this
+ * {@code Class} object is either the same as, or is a superclass or
+ * superinterface of, the class or interface represented by the specified
+ * {@code Class} parameter. It returns {@code true} if so;
+ * otherwise it returns {@code false}. If this {@code Class}
+ * object represents a primitive type, this method returns
+ * {@code true} if the specified {@code Class} parameter is
+ * exactly this {@code Class} object; otherwise it returns
+ * {@code false}.
+ *
+ * <p> Specifically, this method tests whether the type represented by the
+ * specified {@code Class} parameter can be converted to the type
+ * represented by this {@code Class} object via an identity conversion
+ * or via a widening reference conversion. See <em>The Java Language
+ * Specification</em>, sections 5.1.1 and 5.1.4 , for details.
+ *
+ * @param cls the {@code Class} object to be checked
+ * @return the {@code boolean} value indicating whether objects of the
+ * type {@code cls} can be assigned to objects of this class
+ * @exception NullPointerException if the specified Class parameter is
+ *            null.
+ * @since JDK1.1
+ */"
+    
+    | clsObj  me  other |
+
     clsObj := a1.
-    clsObj ifNil:[^JavaVM throwNullPointerException].
-    me := Reflection classForJavaClassObject: this.
-    other := Reflection classForJavaClassObject: clsObj.
-
+    clsObj isNil ifTrue:[
+        ^ JavaVM throwNullPointerException
+    ].
+    me := Reflection classForJavaClassObject:this.
+    other := Reflection classForJavaClassObject:clsObj.
+    
     "/    Determines if the class or interface represented by this
     "/    @code Class} object is either the same as, or is a superclass or
     "/    superinterface of, the class or interface represented by the specified
     "/    {@code Class} parameter.
-
-    ^(other includesBehavior: me)
-        ifTrue:[1]
-        ifFalse:[0]
+    
+    ^ (other includesBehavior:me) ifTrue:[ 1 ] ifFalse:[ 0 ]
 
     "Created: / 12-11-1998 / 18:54:16 / cg"
-    "Modified: / 05-02-2011 / 23:38:15 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 04-08-2014 / 15:55:20 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 _java_lang_Class_isInstance: this _:a1
@@ -13948,28 +13947,25 @@
     ^ JavaVM unimplementedNativeMethodSignal raise
 !
 
-_java_util_zip_ZipEntry_initFields: this _:a1 _: a2
-
+_java_util_zip_ZipEntry_initFields:this _:a1 _:a2 
     <javanative: 'java/util/zip/ZipEntry' name: 'initFields(J)V'>
-
-        | entry jzentry zmember |
+    | entry  jzentry  zmember |
 
     entry := this.
     jzentry := a1.
-    zmember := ZipEntryCache at: jzentry.
-
+    zmember := ZipEntryCache at:jzentry.
     entry
-        instVarNamed: #name     put: (Java as_String: zmember fileName);
-        instVarNamed: #time     put: -1"zmember lastModFileTime";
-        instVarNamed: #crc      put: zmember crc32;
-        instVarNamed: #size     put: zmember uncompressedSize;
-        instVarNamed: #csize    put: zmember compressedSize;
-        instVarNamed: #method   put: zmember compressionMethod;
-        instVarNamed: #extra    put: zmember extraField;
-        instVarNamed: #comment  put: (zmember fileComment ifNotNil:[Java as_String: zmember fileComment]).
+        instVarNamed:#name put:(Java as_String:zmember fileName);
+        instVarNamed:#time put:-1;
+        instVarNamed:#crc put:zmember crc32;
+        instVarNamed:#size put:zmember uncompressedSize;
+        instVarNamed:#csize put:zmember compressedSize;
+        instVarNamed:#method put:zmember compressionMethod;
+        instVarNamed:#extra put:zmember extraField;
+        instVarNamed:#comment put:(zmember fileComment notNil ifTrue:[ Java as_String:zmember fileComment ]).
 
     "Created: / 01-04-2011 / 13:04:24 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
-    "Modified: / 05-12-2011 / 23:42:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 04-08-2014 / 15:52:16 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 _java_util_zip_ZipEntry_initIDs: this