JavaField.st
changeset 35 040fd1fca7ec
parent 27 4560bb77bb36
child 52 1dc41619b6f8
--- a/JavaField.st	Thu May 02 17:08:58 1996 +0000
+++ b/JavaField.st	Thu May 02 20:45:09 1996 +0000
@@ -46,8 +46,43 @@
     "Created: 16.4.1996 / 13:04:43 / cg"
 ! !
 
+!JavaField methodsFor:'queries'!
+
+isFinal
+    ^ (accessFlags bitAnd:16r0010) ~~ 0
+
+!
+
+isPrivate
+    ^ (accessFlags bitAnd:16r0002) ~~ 0
+
+!
+
+isProtected
+    ^ (accessFlags bitAnd:16r0004) ~~ 0
+
+!
+
+isPublic
+    ^ (accessFlags bitAnd:16r0001) ~~ 0
+
+!
+
+isStatic
+    ^ (accessFlags bitAnd:16r0008) ~~ 0
+
+!
+
+isThreadsafe
+    ^ (accessFlags bitAnd:16r0040) ~~ 0
+!
+
+isTransient
+    ^ (accessFlags bitAnd:16r0080) ~~ 0
+! !
+
 !JavaField class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaField.st,v 1.4 1996/04/30 23:24:08 cg Exp $'
+    ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaField.st,v 1.5 1996/05/02 20:45:09 cg Exp $'
 ! !