--- a/JavaClass.st Fri Mar 29 23:37:04 2013 +0000
+++ b/JavaClass.st Sun Mar 31 19:25:00 2013 +0100
@@ -21,7 +21,7 @@
"{ Package: 'stx:libjava' }"
JavaBehavior subclass:#JavaClass
- instanceVariableNames:'classLoader fullName sourceFile sourceString binaryFilePath
+ instanceVariableNames:'classLoader fullName sourceFile sourceString classfileBytes
fields staticFields annotations protectionDomain signatureJ'
classVariableNames:'ArgumentConversionErrorSignal OrderOfClassInits'
poolDictionaries:'JavaConstants'
@@ -588,10 +588,6 @@
annotations := something.
!
-binaryFile
- ^ binaryFilePath
-!
-
classLoader
^ classLoader
!
@@ -602,6 +598,10 @@
"Modified: / 18-02-2012 / 20:21:03 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
+classfileBytes
+ ^ classfileBytes
+!
+
compiledMethodAt:name
"redefined to find the constructor"
@@ -2079,8 +2079,11 @@
"Created: 15.4.1996 / 16:42:52 / cg"
!
-setBinaryFilePath:aPathName
- binaryFilePath := aPathName
+setClassfileBytes: aByteArray
+ self assert: aByteArray isByteArray.
+ classfileBytes := aByteArray
+
+ "Created: / 29-03-2013 / 23:57:24 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
setFields:f