--- a/JavaClassReader.st Wed Oct 14 16:26:43 1998 +0000
+++ b/JavaClassReader.st Thu Oct 15 13:44:07 1998 +0000
@@ -1582,17 +1582,17 @@
field := JavaField new.
field setAccessFlags:access_flags.
- field setName:(constants at:name_index).
- field setSignature:(constants at:signature_index).
+ field setName:(constants at:name_index) asSymbol.
+ field setSignature:(constants at:signature_index) asSymbol.
attributes_count := inStream nextUnsignedShortMSB:msb.
Verbose ifTrue:[Transcript show:' field name: '; show:(constants at:name_index);
- show:' access: '; show:access_flags;
- show:' attrib_cnt: '; showCR:attributes_count].
+ show:' access: '; show:access_flags;
+ show:' attrib_cnt: '; showCR:attributes_count].
1 to:attributes_count do:[:i |
- self readAttributeFor:field.
+ self readAttributeFor:field.
].
^ field
@@ -1601,8 +1601,8 @@
JavaClassReader readFile:'/phys/ibm3/hotjava/classes/browser/AddButton.class'
"
- "Modified: 15.4.1996 / 15:33:28 / cg"
- "Created: 15.4.1996 / 15:38:43 / cg"
+ "Created: / 15.4.1996 / 15:38:43 / cg"
+ "Modified: / 15.10.1998 / 10:38:01 / cg"
!
readFieldInfofields
@@ -2002,6 +2002,6 @@
!JavaClassReader class methodsFor:'documentation'!
version
- ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaClassReader.st,v 1.71 1998/09/18 14:34:43 cg Exp $'
+ ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaClassReader.st,v 1.72 1998/10/15 13:44:07 cg Exp $'
! !
JavaClassReader initialize!