--- a/JavaPackage.st	Wed Sep 25 10:27:55 2013 +0100
+++ b/JavaPackage.st	Wed Sep 25 16:11:39 2013 +0100
@@ -203,6 +203,28 @@
     "Created: / 28-02-2012 / 19:29:58 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 ! !
 
+!JavaPackage class methodsFor:'accessing'!
+
+compiler
+    ^ self == JavaPackage ifTrue:[
+         super compiler
+    ] ifFalse:[
+         JavaPackage class basicNew setName: (self name , '::compiler') asSymbol  
+    ].
+
+    "Created: / 24-09-2013 / 02:33:53 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
+source
+    ^ self == JavaPackage ifTrue:[
+         super source
+    ] ifFalse:[
+         JavaPackage class basicNew setName: (self name , '::source') asSymbol  
+    ].
+
+    "Created: / 24-09-2013 / 02:34:04 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+! !
+
 !JavaPackage class methodsFor:'error handling'!
 
 doesNotUnderstand: aMessage