--- a/JavaField.st	Tue May 12 20:25:02 1998 +0000
+++ b/JavaField.st	Wed May 13 12:51:50 1998 +0000
@@ -1,11 +1,44 @@
 JavaRef subclass:#JavaField
 	instanceVariableNames:'accessFlags name signature constantValue'
-	classVariableNames:''
+	classVariableNames:'A_FINAL A_PRIVATE A_PROTECTED A_PUBLIC A_STATIC A_TRANSIENT
+		A_VOLATILE A_SMALLTALK'
 	poolDictionaries:''
 	category:'Java-Reader-Support'
 !
 
 
+!JavaField class methodsFor:'class initialization'!
+
+initialize
+    A_PUBLIC    := 16r0001. "/ JavaClass A_PUBLIC
+    A_PRIVATE   := 16r0002.
+    A_PROTECTED := 16r0004.
+    A_STATIC    := 16r0008.
+    A_FINAL     := 16r0010. "/ JavaClass A_FINAL
+    A_VOLATILE  := 16r0040.
+    A_TRANSIENT := 16r0080.
+
+    "
+     self initialize
+    "
+
+    "Modified: / 13.5.1998 / 14:44:43 / cg"
+! !
+
+!JavaField class methodsFor:'constants'!
+
+A_PROTECTED
+    ^ A_PROTECTED
+
+    "Created: / 13.5.1998 / 13:03:51 / cg"
+!
+
+A_STATIC
+    ^ A_STATIC
+
+    "Created: / 13.5.1998 / 13:03:55 / cg"
+! !
+
 !JavaField methodsFor:'accessing'!
 
 constantValue
@@ -63,36 +96,45 @@
 !
 
 isFinal
-    ^ (accessFlags bitAnd:16r0010) ~~ 0
+    ^ (accessFlags bitAnd:A_FINAL) ~~ 0
 
+    "Modified: / 13.5.1998 / 12:59:26 / cg"
 !
 
 isPrivate
-    ^ (accessFlags bitAnd:16r0002) ~~ 0
+    ^ (accessFlags bitAnd:A_PRIVATE) ~~ 0
 
+    "Modified: / 13.5.1998 / 12:59:30 / cg"
 !
 
 isProtected
-    ^ (accessFlags bitAnd:16r0004) ~~ 0
+    ^ (accessFlags bitAnd:A_PROTECTED) ~~ 0
 
+    "Modified: / 13.5.1998 / 12:59:35 / cg"
 !
 
 isPublic
-    ^ (accessFlags bitAnd:16r0001) ~~ 0
+    ^ (accessFlags bitAnd:A_PUBLIC) ~~ 0
 
+    "Modified: / 13.5.1998 / 12:59:40 / cg"
 !
 
 isStatic
-    ^ (accessFlags bitAnd:16r0008) ~~ 0
+    ^ (accessFlags bitAnd:A_STATIC) ~~ 0
 
+    "Modified: / 13.5.1998 / 12:59:43 / cg"
 !
 
 isTransient
-    ^ (accessFlags bitAnd:16r0080) ~~ 0
+    ^ (accessFlags bitAnd:A_TRANSIENT) ~~ 0
+
+    "Modified: / 13.5.1998 / 12:59:51 / cg"
 !
 
 isVolatile
-    ^ (accessFlags bitAnd:16r0040) ~~ 0
+    ^ (accessFlags bitAnd:A_VOLATILE) ~~ 0
+
+    "Modified: / 13.5.1998 / 12:59:56 / cg"
 !
 
 type
@@ -104,5 +146,6 @@
 !JavaField class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaField.st,v 1.11 1998/01/17 14:43:45 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaField.st,v 1.12 1998/05/13 12:51:50 cg Exp $'
 ! !
+JavaField initialize!