--- a/JavaFieldDescriptor.st Fri Mar 27 08:51:08 2015 +0000
+++ b/JavaFieldDescriptor.st Mon Mar 30 11:27:32 2015 +0100
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
"
COPYRIGHT (c) 1996-2015 by Claus Gittinger
@@ -20,6 +22,8 @@
"
"{ Package: 'stx:libjava' }"
+"{ NameSpace: Smalltalk }"
+
JavaDescriptor subclass:#JavaFieldDescriptor
instanceVariableNames:'javaClassName javaClass dimensions'
classVariableNames:''
@@ -77,10 +81,6 @@
"Modified: / 16-08-2012 / 13:29:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
-dimensions:something
- dimensions := something.
-!
-
javaClass
javaClass isNil ifTrue: [
javaClass := JavaVM classForName: self javaClassName.
@@ -167,6 +167,17 @@
"Modified: / 06-12-2011 / 21:41:10 / Jan Vrany <jan.vrany@fit.cvut.cz>"
! !
+!JavaFieldDescriptor methodsFor:'private'!
+
+beArrayType
+ dimensions := (dimensions ? 0) + 1.
+ javaClass notNil ifTrue:[
+ javaClass := javaClass javaArrayClass.
+ ].
+
+ "Created: / 30-03-2015 / 10:08:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
!JavaFieldDescriptor methodsFor:'queries'!
slots