JavaClass.st
branchdevelopment
changeset 2476 d24ce8174195
parent 2434 4b586f7ba6e5
child 2504 08bdd02727cf
--- 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