--- a/src/JavaField.st	Tue Jul 26 17:32:51 2011 +0000
+++ b/src/JavaField.st	Wed Jul 27 09:13:15 2011 +0000
@@ -41,8 +41,8 @@
 "
 "{ Package: 'stx:libjava' }"
 
-JavaRef subclass:#JavaField
-	instanceVariableNames:'accessFlags index name signature constantValue annotations
+Object subclass:#JavaField
+	instanceVariableNames:'accessFlags class name signature index constantValue annotations
 		constantPool'
 	classVariableNames:'A_FINAL A_PRIVATE A_PROTECTED A_PUBLIC A_STATIC A_TRANSIENT
 		A_VOLATILE A_SMALLTALK A_SYBTHETIC A_ENUM FieldTypeClasses'
@@ -208,15 +208,11 @@
 !
 
 constantPool
-^ constantPool.
+
+    ^ constantPool
 
     "Created: / 17-12-2010 / 18:40:23 / Marcel Hlopko <hlopik@gmail.com>"
-!
-
-constantPool:something
-constantPool := something.
-
-    "Created: / 17-12-2010 / 18:41:59 / Marcel Hlopko <hlopik@gmail.com>"
+    "Modified: / 27-07-2011 / 09:38:08 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 constantValue
@@ -239,6 +235,13 @@
     ^ index
 !
 
+javaClass
+
+    ^ class
+
+    "Created: / 27-07-2011 / 09:17:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
 name
     ^ name
 !
@@ -273,11 +276,19 @@
     "Created: 16.4.1996 / 13:04:25 / cg"
 !
 
-setClass:aClass
-    
-    class := aClass.
+setClass: aClass
+
+    class := aClass
+
+    "Created: / 27-07-2011 / 09:27:47 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
 
-    "Created: / 22-11-2010 / 17:12:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+setConstantPool:aJavaContantPool
+
+    constantPool := aJavaContantPool.
+
+    "Created: / 17-12-2010 / 18:41:59 / Marcel Hlopko <hlopik@gmail.com>"
+    "Created: / 27-07-2011 / 09:30:41 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 setConstantValue:something