--- a/JavaDecompiler.st Mon Dec 18 15:43:46 2000 +0000
+++ b/JavaDecompiler.st Mon Dec 18 16:43:45 2000 +0000
@@ -11,6 +11,8 @@
"
+"{ Package: 'stx:libjava' }"
+
Object subclass:#JavaDecompiler
instanceVariableNames:'code pc javaMethod outStream classToCompileFor isStaticMethod
lastConstIndex lastConstant accessedInstvars modifiedInstvars
@@ -849,16 +851,23 @@
!
constIndexShort
+ |s|
+
lastConstIndex := code wordAt:pc MSB:true.
pc := pc + 2.
lastConstant := javaMethod constantPool at:lastConstIndex ifAbsent:nil.
-
outStream notNil ifTrue:[
+ s := (lastConstant ? '??') displayString.
+ s isString ifTrue:[
+ s bitsPerCharacter > 8 ifTrue:[
+ s := '...a 2-byte string...'
+ ]
+ ].
outStream
show:lastConstIndex;
show:' [';
- show:(lastConstant ? '??') displayString;
+ show:s;
show:'] '
]
@@ -1235,6 +1244,6 @@
!JavaDecompiler class methodsFor:'documentation'!
version
- ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaDecompiler.st,v 1.47 1999/11/09 14:56:42 cg Exp $'
+ ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaDecompiler.st,v 1.48 2000/12/18 16:43:45 cg Exp $'
! !
JavaDecompiler initialize!