--- a/src/JavaVM.st Thu May 19 08:40:24 2011 +0000
+++ b/src/JavaVM.st Thu May 19 08:51:37 2011 +0000
@@ -15215,6 +15215,44 @@
"Modified: / 8.1.1999 / 18:47:08 / cg"
!
+_MULTINEW2: classRef _: dim1
+ | arr |
+ classRef isJavaClassRef ifFalse: [self halt: 'expected only classRefs'].
+ arr := classRef resolve new: dim1.
+ ^ arr.
+
+ "Created: / 19-05-2011 / 10:46:28 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
+!
+
+_MULTINEW2: classRef _: dim1 _: dim2
+ | arr |
+
+ arr := classRef resolve new: dim2.
+ 1 to: dim2
+ do: [:idx | arr at: idx put: (self _MULTINEW2: classRef _: dim1) ].
+ ^ arr.
+
+ "Created: / 19-05-2011 / 10:47:42 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
+!
+
+_MULTINEW2: classRef _: dim1 _: dim2 _: dim3
+ | arr |
+
+ 1 to: dim3
+ do:
+ [:idx |
+ arr at: idx
+ put: (self
+ _MULTINEW2: classRef
+ _: dim1
+ _: dim2) ].
+
+
+ ^ arr.
+
+ "Created: / 19-05-2011 / 10:47:50 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
+!
+
_MULTINEW:typeRef _:dim1
|arr|
@@ -15228,16 +15266,12 @@
"Modified: / 16-03-2011 / 16:20:18 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
-_MULTINEW:typeRef _:dim1 _:dim2
-
+_MULTINEW: typeRef _: dim1 _: dim2
| arr |
- arr := typeRef new:dim2.
-
- 1 to:dim2 do:[:idx |
- arr at:idx put:(self _MULTINEW:typeRef javaComponentClass _:dim1)
- ].
-
+ arr := typeRef new: dim2.
+ 1 to: dim2
+ do: [:idx | arr at: idx put: (self _MULTINEW: typeRef javaComponentClass _: dim1) ].
^ arr
"Created: / 08-01-1999 / 14:15:46 / cg"
--- a/src/stx_libjava.st Thu May 19 08:40:24 2011 +0000
+++ b/src/stx_libjava.st Thu May 19 08:51:37 2011 +0000
@@ -366,7 +366,7 @@
"Return a SVN revision number of myself.
This number is updated after a commit"
- ^ "$SVN-Revision:"'1146'"$"
+ ^ "$SVN-Revision:"'1147'"$"
! !
!stx_libjava class methodsFor:'file generation'!