--- a/JavaByteCodeDisassembler.st Fri Feb 20 19:52:09 2015 +0100
+++ b/JavaByteCodeDisassembler.st Mon Mar 02 17:50:49 2015 +0100
@@ -20,6 +20,8 @@
"
"{ Package: 'stx:libjava' }"
+"{ NameSpace: Smalltalk }"
+
JavaByteCodeProcessor subclass:#JavaByteCodeDisassembler
instanceVariableNames:'outStream placeholders format lastLno'
classVariableNames:'StandardFormat ExtendedFormat'
@@ -1345,6 +1347,19 @@
"Modified: / 20-03-2011 / 20:29:20 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
!
+invdynamic
+ | index |
+
+ index := self fetchIndex2.
+ pc := pc + 2.
+ self
+ writeInstructionWithArgs: (self prettyPrintIndex: index)
+ stackBefore: self objRef , self sep , self varArgs
+ after: self whatever.
+
+ "Created: / 25-02-2015 / 19:37:57 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+!
+
invinterface
self
writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2) , self sep , ( self prettyPrintByte: self fetchByte) , self sep , 0 printString
@@ -1355,13 +1370,13 @@
!
invnonvirt
-self
- writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2)
-
+ self
+ writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2)
stackBefore: self objRef , self sep , self varArgs
after: self whatever.
"Modified: / 20-03-2011 / 21:17:35 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
+ "Modified (format): / 25-02-2015 / 19:36:37 / Jan Vrany <jan.vrany@fit.cvut.cz>"
!
invstatic
@@ -1852,7 +1867,7 @@
!JavaByteCodeDisassembler class methodsFor:'documentation'!
version_CVS
- ^ '$Header: /cvs/stx/stx/libjava/JavaByteCodeDisassembler.st,v 1.7 2015-01-28 02:10:49 vrany Exp $'
+ ^ '$Header: /cvs/stx/stx/libjava/JavaByteCodeDisassembler.st,v 1.8 2015-03-02 16:50:49 vrany Exp $'
!
version_HG