--- a/Java.st	Sun Jan 10 17:18:24 1999 +0000
+++ b/Java.st	Sun Jan 10 17:21:20 1999 +0000
@@ -112,6 +112,12 @@
     "Created: 1.8.1997 / 10:37:57 / cg"
 !
 
+systemPropertyAt:key put:something
+    JavaVM systemProperties at:key put:something
+
+    "Created: / 9.1.1999 / 14:49:35 / cg"
+!
+
 threads
     Threads isNil ifTrue:[
 	Threads := WeakIdentityDictionary new.
@@ -1334,6 +1340,6 @@
 !Java class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/Java.st,v 1.87 1999/01/08 16:50:40 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/Java.st,v 1.88 1999/01/10 17:21:20 cg Exp $'
 ! !
 Java initialize!

--- a/JavaUnresolvedClassConstant.st	Sun Jan 10 17:18:24 1999 +0000
+++ b/JavaUnresolvedClassConstant.st	Sun Jan 10 17:21:20 1999 +0000
@@ -308,12 +308,12 @@
             ^ ref
         ].
         fullName = '[D' ifTrue:[     "/ double[]
-            ref := JavaBuiltInClassPointerRef class:Array nameandType:fullName.
+            ref := JavaBuiltInClassPointerRef class:DoubleArray nameandType:fullName.
             constantPool at:constantPoolIndex put:ref.
             ^ ref
         ].
         fullName = '[[D' ifTrue:[    "/ double[][]
-            ref := JavaBuiltInClassPointerRef class:DoubleArray nameandType:fullName.
+            ref := JavaBuiltInClassPointerRef class:Array nameandType:fullName.
             constantPool at:constantPoolIndex put:ref.
             ^ ref
         ].
@@ -327,9 +327,16 @@
             constantPool at:constantPoolIndex put:ref.
             ^ ref
         ].
+        fullName = '[[Z' ifTrue:[    "/ bool[][]
+            ref := JavaBuiltInClassPointerRef class:Array nameandType:fullName.
+            constantPool at:constantPoolIndex put:ref.
+            ^ ref
+        ].
         (fullName startsWith:'[L') ifFalse:[
-            ('JAVA: oops - unresolvable funny class: ' , fullName) errorPrintCR.
-            self halt.
+            (fullName startsWith:'[[L') ifFalse:[
+                ('JAVA: oops - unresolvable funny class: ' , fullName) errorPrintCR.
+                self halt.
+            ]
         ]
     ] ifFalse:[
         nm := self className.
@@ -339,11 +346,11 @@
     ^ self
 
     "Created: / 15.4.1996 / 15:51:42 / cg"
-    "Modified: / 11.12.1998 / 15:20:41 / cg"
+    "Modified: / 9.1.1999 / 15:00:30 / cg"
 ! !
 
 !JavaUnresolvedClassConstant class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaUnresolvedClassConstant.st,v 1.35 1998/12/11 15:39:34 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaUnresolvedClassConstant.st,v 1.36 1999/01/10 17:20:37 cg Exp $'
 ! !