JavaMethod.st
changeset 651 c4f8130fb962
parent 637 d2e91e3e97c5
child 654 da8d060a3150
equal deleted inserted replaced
650:5021904ddd3c 651:c4f8130fb962
   781     "/ must deparse the byteCode in order to do this.
   781     "/ must deparse the byteCode in order to do this.
   782 
   782 
   783     |walker|
   783     |walker|
   784 
   784 
   785     walker := JavaByteCodeEnumerator new.
   785     walker := JavaByteCodeEnumerator new.
   786     walker literalAction:[:pc :slotIndex :const | Transcript showCR:const].
   786     walker literalAction:[:pc :slotIndex :const | 
       
   787         const isJavaMethodRef ifTrue:[
       
   788             aBlock value:(const name).
       
   789         ] ifFalse:[
       
   790             const isJavaClassRef ifTrue:[
       
   791                 aBlock value:(const name).
       
   792             ]
       
   793         ]
       
   794     ].
   787     walker decompile:self to:nil.
   795     walker decompile:self to:nil.
   788     self halt.
       
   789 
   796 
   790     "Created: / 9.11.1999 / 15:21:40 / cg"
   797     "Created: / 9.11.1999 / 15:21:40 / cg"
   791     "Modified: / 9.11.1999 / 15:36:02 / cg"
   798     "Modified: / 24.12.1999 / 01:58:17 / cg"
   792 !
   799 !
   793 
   800 
   794 localVariableTable
   801 localVariableTable
   795     ^ localVariableTable
   802     ^ localVariableTable
   796 
   803 
  1808 ! !
  1815 ! !
  1809 
  1816 
  1810 !JavaMethod class methodsFor:'documentation'!
  1817 !JavaMethod class methodsFor:'documentation'!
  1811 
  1818 
  1812 version
  1819 version
  1813     ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaMethod.st,v 1.91 1999/12/21 13:29:18 cg Exp $'
  1820     ^ '$Header: /home/jv/Projects/SmalltalkX/repositories/cvs/stx/libjava/JavaMethod.st,v 1.92 1999/12/24 01:03:26 cg Exp $'
  1814 ! !
  1821 ! !
  1815 JavaMethod initialize!
  1822 JavaMethod initialize!