JavaByteCodeDisassembler.st
author Jan Vrany <jan.vrany@fit.cvut.cz>
Wed, 11 Sep 2013 11:36:27 +0100
branchdevelopment
changeset 2727 0d4d725cc712
parent 2726 6971720de5a4
child 2732 7d1a1fb5b01a
permissions -rw-r--r--
Initial support for selector highlighting.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     1
"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     2
 COPYRIGHT (c) 1996-2011 by Claus Gittinger
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
     3
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
     4
 New code and modifications done at SWING Research Group [1]:
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
     5
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     6
 COPYRIGHT (c) 2010-2011 by Jan Vrany, Jan Kurs and Marcel Hlopko
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     7
                            SWING Research Group, Czech Technical University in Prague
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     8
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
     9
 This software is furnished under a license and may be used
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    10
 only in accordance with the terms of that license and with the
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    11
 inclusion of the above copyright notice.   This software may not
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    12
 be provided or otherwise made available to, or used by, any
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    13
 other person.  No title to or ownership of the software is
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    14
 hereby transferred.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    15
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
    16
 [1] Code written at SWING Research Group contains a signature
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
    17
     of one of the above copright owners. For exact set of such code,
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
    18
     see the differences between this version and version stx:libjava
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
    19
     as of 1.9.2010
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    20
"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    21
"{ Package: 'stx:libjava' }"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    22
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    23
JavaByteCodeProcessor subclass:#JavaByteCodeDisassembler
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    24
	instanceVariableNames:'outStream placeholders format lastLno'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    25
	classVariableNames:'StandardFormat ExtendedFormat'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    26
	poolDictionaries:''
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    27
	category:'Languages-Java-Bytecode'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    28
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    29
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    30
!JavaByteCodeDisassembler class methodsFor:'documentation'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    31
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    32
copyright
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    33
"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    34
 COPYRIGHT (c) 1996-2011 by Claus Gittinger
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
    35
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
    36
 New code and modifications done at SWING Research Group [1]:
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
    37
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    38
 COPYRIGHT (c) 2010-2011 by Jan Vrany, Jan Kurs and Marcel Hlopko
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    39
                            SWING Research Group, Czech Technical University in Prague
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    40
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    41
 This software is furnished under a license and may be used
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    42
 only in accordance with the terms of that license and with the
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    43
 inclusion of the above copyright notice.   This software may not
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    44
 be provided or otherwise made available to, or used by, any
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    45
 other person.  No title to or ownership of the software is
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    46
 hereby transferred.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    47
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
    48
 [1] Code written at SWING Research Group contains a signature
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
    49
     of one of the above copright owners. For exact set of such code,
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
    50
     see the differences between this version and version stx:libjava
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
    51
     as of 1.9.2010
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    52
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    53
"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    54
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    55
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    56
!JavaByteCodeDisassembler class methodsFor:'initialization'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    57
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    58
initialize
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    59
    super initialize.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    60
    Verbose := false.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    61
    StandardFormat := '  %(PC) %(ISN) %(OPERANDS)'.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    62
    ExtendedFormat := '  %(PC) [%(OPCODE)] %(ISN) %(OPERANDS) %(STACK)'.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    63
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    64
    "Modified: / 22-03-2011 / 17:07:20 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    65
    "Modified: / 22-03-2011 / 20:53:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    66
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    67
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    68
!JavaByteCodeDisassembler class methodsFor:'instance creation'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    69
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    70
new
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    71
    "return an initialized instance"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    72
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    73
    ^ self basicNew initialize.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    74
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    75
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    76
!JavaByteCodeDisassembler class methodsFor:'disassembling'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    77
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    78
diassemble:aMethod 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    79
    ^ self new diassemble:aMethod.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    80
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    81
    "Created: / 17-03-2011 / 17:41:17 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    82
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    83
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    84
diassemble:aMethod to: aStream 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    85
    ^ self new diassemble:aMethod to: aStream
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    86
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    87
    "Created: / 22-03-2011 / 21:13:06 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    88
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    89
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    90
!JavaByteCodeDisassembler methodsFor:'disassembling'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    91
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    92
diassemble:aJavaMethod 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    93
    self diassemble:aJavaMethod to:Transcript.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    94
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    95
    "Created: / 17-03-2011 / 17:42:38 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    96
    "Modified: / 20-03-2011 / 22:43:54 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    97
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    98
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
    99
diassemble:aJavaMethod to:aStream 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   100
    |fakeArgArray size|
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   101
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   102
    outStream := aStream.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   103
    size := aJavaMethod javaNumArgs.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   104
    fakeArgArray := Array new:size.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   105
    1 to:size
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   106
        do:[:index | fakeArgArray at:index put:('Arg ' , index printString) ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   107
    self prettyPrintHeaderFor:aJavaMethod.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   108
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   109
        process:aJavaMethod
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   110
        receiver:aJavaMethod javaClass
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   111
        arguments:fakeArgArray.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   112
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   113
    "Created: / 17-03-2011 / 22:21:49 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   114
    "Modified: / 22-03-2011 / 15:59:50 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   115
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   116
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   117
!JavaByteCodeDisassembler methodsFor:'helpers - constants'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   118
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   119
address
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   120
^ 'address'.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   121
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   122
    "Created: / 20-03-2011 / 21:20:36 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   123
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   124
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   125
arrayLength
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   126
    ^ 'arrayLength'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   127
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   128
    "Created: / 20-03-2011 / 18:31:17 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   129
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   130
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   131
arrayRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   132
    ^ 'arrayRef'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   133
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   134
    "Created: / 20-03-2011 / 18:24:42 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   135
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   136
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   137
dimensions
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   138
^'count1, [count2,...]'.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   139
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   140
    "Created: / 20-03-2011 / 21:26:27 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   141
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   142
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   143
empty
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   144
    ^ 'EMPTY'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   145
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   146
    "Created: / 20-03-2011 / 18:30:47 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   147
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   148
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   149
excRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   150
    ^ 'exceptionRef'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   151
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   152
    "Created: / 20-03-2011 / 18:36:48 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   153
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   154
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   155
index
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   156
    ^ 'index'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   157
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   158
    "Created: / 20-03-2011 / 18:28:44 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   159
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   160
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   161
key
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   162
^'key'.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   163
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   164
    "Created: / 20-03-2011 / 21:24:18 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   165
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   166
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   167
nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   168
    ^ ''
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   169
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   170
    "Created: / 20-03-2011 / 18:31:44 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   171
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   172
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   173
null
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   174
    ^ 'null'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   175
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   176
    "Created: / 20-03-2011 / 18:29:45 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   177
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   178
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   179
objRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   180
^ 'objectRef'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   181
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   182
    "Created: / 20-03-2011 / 18:24:35 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   183
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   184
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   185
result
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   186
    ^ 'result'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   187
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   188
    "Created: / 20-03-2011 / 18:40:13 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   189
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   190
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   191
sep
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   192
^ ', '.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   193
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   194
    "Created: / 20-03-2011 / 18:28:24 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   195
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   196
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   197
size
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   198
    ^ 'size'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   199
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   200
    "Created: / 20-03-2011 / 18:30:17 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   201
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   202
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   203
stackGroupClose
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   204
    ^ '}'.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   205
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   206
    "Created: / 20-03-2011 / 21:02:42 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   207
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   208
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   209
stackGroupOpen
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   210
^'{'.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   211
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   212
    "Created: / 20-03-2011 / 21:02:36 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   213
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   214
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   215
value
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   216
    ^ 'value'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   217
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   218
    "Created: / 20-03-2011 / 18:24:52 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   219
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   220
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   221
valueMarked
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   222
    ^ 'valueX'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   223
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   224
    "Created: / 20-03-2011 / 20:58:23 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   225
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   226
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   227
valueMarked2
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   228
    ^ 'valueY'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   229
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   230
    "Created: / 20-03-2011 / 21:33:53 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   231
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   232
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   233
varArgs
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   234
^'[arg1, arg2, ...] '.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   235
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   236
    "Created: / 20-03-2011 / 21:16:15 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   237
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   238
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   239
whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   240
    ^ '..'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   241
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   242
    "Created: / 20-03-2011 / 18:31:56 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   243
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   244
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   245
!JavaByteCodeDisassembler methodsFor:'helpers - instruction groups'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   246
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   247
arrayValueLoader    
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   248
self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   249
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   250
        stackBefore: self arrayRef , self sep , self index
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   251
        after: self value.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   252
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   253
    "Created: / 20-03-2011 / 19:58:50 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   254
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   255
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   256
arrayValueStorer
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   257
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   258
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   259
        stackBefore: self arrayRef , self sep , self index , self sep , self value
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   260
        after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   261
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   262
    "Created: / 20-03-2011 / 20:01:05 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   263
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   264
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   265
constPusher: const
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   266
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   267
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   268
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   269
        after: const.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   270
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   271
    "Created: / 20-03-2011 / 20:39:01 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   272
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   273
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   274
fieldLoader: index 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   275
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   276
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   277
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   278
        after: (self prettyPrintField: index).
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   279
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   280
    "Created: / 20-03-2011 / 20:43:24 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   281
    "Modified: / 21-03-2011 / 15:23:17 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   282
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   283
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   284
fieldStorer: index 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   285
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   286
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   287
        stackBefore: (self prettyPrintField: index)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   288
        after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   289
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   290
    "Created: / 20-03-2011 / 20:53:33 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   291
    "Modified: / 21-03-2011 / 15:23:22 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   292
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   293
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   294
indexedFieldLoader
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   295
    | index |
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   296
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   297
    wide 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   298
        ifTrue: 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   299
            [ index := self fetchIndex2.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   300
            wide := false. ]
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   301
        ifFalse: [ index := self fetchIndex ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   302
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   303
        writeInstructionWithArgs: (self prettyPrintField: index)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   304
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   305
        after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   306
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   307
    "Created: / 20-03-2011 / 20:44:01 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   308
    "Modified: / 19-05-2011 / 10:38:23 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   309
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   310
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   311
indexedFieldStorer
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   312
    | index |
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   313
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   314
    wide 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   315
        ifTrue: 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   316
            [ index := self fetchIndex2.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   317
            wide := false. ]
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   318
        ifFalse: [ index := self fetchIndex ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   319
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   320
        writeInstructionWithArgs: (self prettyPrintField: index)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   321
        stackBefore: (self prettyPrintValue:'newVal')
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   322
        after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   323
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   324
    "Created: / 20-03-2011 / 20:53:41 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   325
    "Modified: / 19-05-2011 / 13:04:05 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   326
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   327
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   328
returnIfFinished
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   329
    (pc >= byteCode size) ifTrue: [ self leaveProcessorWith: nil ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   330
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   331
    "Created: / 21-03-2011 / 14:54:52 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   332
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   333
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   334
twoValuesBasedJumper
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   335
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   336
        writeInstructionWithArgs: (self prettyPrintJump: self fetchBytes2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   337
        stackBefore: self value , self sep , self value
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   338
        after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   339
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   340
    "Created: / 20-03-2011 / 21:10:07 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   341
    "Modified: / 20-03-2011 / 23:03:02 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   342
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   343
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   344
twoValuesManipulator
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   345
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   346
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   347
        stackBefore: self value , self sep , self value         after: self result.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   348
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   349
    "Created: / 20-03-2011 / 20:31:01 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   350
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   351
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   352
valueBasedJumper
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   353
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   354
        writeInstructionWithArgs: (self prettyPrintJump: self fetchBytes2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   355
        stackBefore: self value
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   356
        after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   357
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   358
    "Created: / 20-03-2011 / 21:09:54 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   359
    "Modified: / 21-03-2011 / 13:03:34 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   360
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   361
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   362
valueLoader
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   363
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   364
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   365
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   366
        after: self value.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   367
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   368
    "Created: / 20-03-2011 / 20:25:16 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   369
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   370
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   371
valueManipulator
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   372
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   373
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   374
        stackBefore: self value
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   375
        after: self result.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   376
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   377
    "Created: / 20-03-2011 / 20:27:42 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   378
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   379
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   380
valueReturner
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   381
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   382
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   383
        stackBefore: self value
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   384
        after: self empty.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   385
    self returnIfFinished.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   386
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   387
    "Created: / 20-03-2011 / 20:48:07 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   388
    "Modified: / 21-03-2011 / 14:55:06 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   389
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   390
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   391
!JavaByteCodeDisassembler methodsFor:'helpers - printing'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   392
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   393
prettyPrintArgs: argsString 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   394
    ^argsString printString
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   395
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   396
    "Created: / 20-03-2011 / 17:30:41 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   397
    "Modified: / 21-03-2011 / 20:42:14 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   398
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   399
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   400
prettyPrintByte: val 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   401
    ^ self prettyPrintValue: val.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   402
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   403
    "Created: / 20-03-2011 / 21:46:42 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   404
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   405
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   406
prettyPrintExceptionTable: table 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   407
    table isNil ifTrue: [ ^ '' ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   408
    ^ 'Throws:' 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   409
        , (table inject: '' into: [:acc :each | acc , ' ' , each name ]).
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   410
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   411
    "Created: / 22-03-2011 / 16:16:34 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   412
    "Modified: / 22-03-2011 / 20:59:39 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   413
    "Modified: / 04-06-2011 / 17:19:17 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   414
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   415
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   416
prettyPrintField: fieldIndex 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   417
    ^ 'FIELD ' , fieldIndex printString , ': ' 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   418
        , (context at: fieldIndex + 1) displayString.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   419
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   420
    "Created: / 20-03-2011 / 17:31:06 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   421
    "Modified: / 21-03-2011 / 15:57:04 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   422
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   423
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   424
prettyPrintHeaderFor: javaMethod 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   425
    outStream
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   426
        cr;
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   427
        print: (javaMethod signatureNameWithModifiers);
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   428
        cr;
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   429
        print: ('defined in: ' , javaMethod javaClass printString);
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   430
        cr;
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
   431
        print: '# arg slots: ' , javaMethod numArgs printString , ', ';
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
   432
        print: '# var slots: ' , javaMethod numVars printString , ', ';
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
   433
        print: '# stack slots: ', javaMethod stackSize printString , ' ';
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   434
        cr;
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   435
        print: (self prettyPrintExceptionTable: javaMethod exceptionTable);
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   436
        cr.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   437
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   438
    "Created: / 22-03-2011 / 15:59:50 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
   439
    "Modified: / 12-10-2012 / 11:58:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   440
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   441
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   442
prettyPrintIndex: index 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   443
    ^ (constantPool at: index) displayString , ' [' , index printString 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   444
        , '@CP]'.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   445
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   446
    "Created: / 20-03-2011 / 17:20:34 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   447
    "Modified: / 22-03-2011 / 16:48:32 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   448
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   449
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   450
prettyPrintJump: jmpNum 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   451
    ^ 'JMP to: ' , (instrPointer + jmpNum ) printString.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   452
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   453
    "Modified: / 21-03-2011 / 14:25:52 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   454
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   455
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   456
prettyPrintLineNumber
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   457
    |lineNumber|
2726
6971720de5a4 More support for method's source only.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   458
    lineNumber := method lineNumberForPC0: instrPointer.
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   459
    lineNumber isNil ifTrue: [^''].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   460
    ^ (lineNumber printString leftPaddedTo: 4
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   461
        with: Character space)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   462
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   463
    "Modified: / 22-03-2011 / 17:04:16 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
2726
6971720de5a4 More support for method's source only.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
   464
    "Modified: / 11-09-2013 / 03:42:19 / Jan Vrany <jan.vrany@fit.cvut.cz>"
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   465
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   466
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   467
prettyPrintLookupSwitchMadness
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   468
    | paddingSize  default  npairs  result |
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   469
    result := TextStream on: ''.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   470
    paddingSize := self skipPadding.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   471
    default := self fetchBytes4.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   472
    npairs := self fetchBytes4.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   473
    result
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   474
        print: 'PADDING: ';
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   475
        print: paddingSize printString;
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   476
        print: ' NPAIRS: ';
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   477
        print: npairs printString;
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   478
        cr.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   479
    result
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   480
        print: ('      [ ');
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   481
        cr.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   482
    npairs timesRepeat:
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   483
        
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   484
            [ result
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   485
                print: '      ';
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   486
                print: (self fetchBytes4 printString);
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   487
                print: ': ';
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   488
                print: (self prettyPrintJump: self fetchBytes4);
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   489
                cr. ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   490
    result
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   491
        print: ('      default');
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   492
        print: ': ';
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   493
        print: (self prettyPrintJump: default);
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   494
        cr.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   495
    result
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   496
        print: ('   ]');
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   497
        cr.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   498
    ^ result stringContents.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   499
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   500
    "Created: / 20-03-2011 / 21:23:29 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   501
    "Modified: / 22-03-2011 / 15:03:57 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   502
    "Modified: / 08-08-2011 / 17:31:25 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   503
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   504
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   505
prettyPrintRef: ref
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   506
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   507
    ^ ref prettyPrintString.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   508
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   509
    "Created: / 20-03-2011 / 17:20:25 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   510
    "Modified: / 14-08-2011 / 21:12:43 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   511
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   512
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   513
prettyPrintStackBefore: beforeString after: afterString 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   514
    ^ 'STACK: [' , beforeString printString , ' -> ' , afterString printString , ']'.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   515
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   516
    "Created: / 20-03-2011 / 17:24:47 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   517
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   518
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   519
prettyPrintTableSwitchMadness
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   520
    | paddingSize  default  low  high  result |
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   521
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   522
    result := TextStream on: ''.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   523
    paddingSize := self skipPadding.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   524
    default := self fetchBytes4.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   525
    low := self fetchBytes4.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   526
    high := self fetchBytes4.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   527
    result
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   528
        print: 'PADDING: ';
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   529
        print: paddingSize printString;
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   530
        print: ' LOW: ';
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   531
        print: low printString;
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   532
        print: ' HIGH: ';
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   533
        print: high printString;
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   534
        cr.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   535
    result
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   536
        print: ('   [ ');
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   537
        cr.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   538
    low to: high
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   539
        do: 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   540
            [:index | 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   541
            result
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   542
                nextPutAll:'  '; print: (index printString);
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   543
                print: ': ';
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   544
                print: (self prettyPrintJump: self fetchBytes4);
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   545
                cr. ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   546
                result
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   547
                print: ('   default');
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   548
                print: ': ';
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   549
                print: (self prettyPrintJump: default);
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   550
                                cr. 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   551
    result
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   552
        print: ('   ]');
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   553
        cr.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   554
    ^ result stringContents.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   555
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   556
    "Created: / 20-03-2011 / 21:34:31 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   557
    "Modified: / 21-03-2011 / 15:01:50 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   558
    "Modified: / 08-08-2011 / 17:29:09 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   559
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   560
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   561
prettyPrintType: type
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   562
    type = 4 ifTrue: [ ^ 'boolean'].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   563
    type = 5 ifTrue: [ ^'char'].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   564
    type = 6 ifTrue: [ ^  'float'  ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   565
    type = 7 ifTrue: [ ^'double' ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   566
    type = 8 ifTrue: [ ^  'byte'  ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   567
    type = 9 ifTrue: [ ^ 'short'  ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   568
    type = 10 ifTrue: [ ^'int'  ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   569
    type = 11 ifTrue: [ ^ 'long'  ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   570
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   571
    "Created: / 20-03-2011 / 20:12:08 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   572
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   573
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   574
prettyPrintValue: val 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   575
    ^ val printString.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   576
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   577
    "Created: / 20-03-2011 / 18:16:20 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   578
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   579
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   580
writeInstructionWithArgs: argsString stackBefore: stackBefore after: stackAfter 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   581
    placeholders
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   582
        at: 'PC'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   583
            put: (instrPointer printString leftPaddedTo: 3 with: Character space);
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   584
        at: 'LINENUMBER' put: self prettyPrintLineNumber;
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   585
        at: 'OPCODE' put: (op printString leftPaddedTo: 3 with: Character space);
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   586
        at: 'ISN'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   587
            put: ((OpSwitchTable at: op + 1) asUppercase printString paddedTo: 10);
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   588
        at: 'OPERANDS' put: ((self prettyPrintArgs: argsString) paddedTo: 25);
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   589
        at: 'STACK'
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   590
            put: (self prettyPrintStackBefore: stackBefore after: stackAfter).
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   591
    format expandPlaceholdersWith: placeholders on: outStream.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   592
    outStream cr.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   593
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   594
    "Created: / 20-03-2011 / 19:56:39 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   595
    "Modified: / 21-03-2011 / 20:56:40 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   596
    "Modified: / 22-03-2011 / 17:00:33 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   597
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   598
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   599
writeLine: lno
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   600
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   601
    outStream nextPutAll: 'LINE '.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   602
    lno printOn: outStream.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   603
    outStream cr.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   604
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   605
    "Modified: / 22-03-2011 / 17:00:33 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   606
    "Created: / 22-03-2011 / 20:53:29 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   607
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   608
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   609
!JavaByteCodeDisassembler methodsFor:'initialization'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   610
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   611
initialize
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   612
    "Invoked when a new instance is created."
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   613
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   614
    "/ please change as required (and remove this comment)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   615
    "/ outStream := nil.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   616
    placeholders := Dictionary new.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   617
    format := StandardFormat.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   618
              "/ExtendedFormat.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   619
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   620
    "/ super initialize.   -- commented since inherited method does nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   621
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   622
    "Modified: / 22-03-2011 / 20:53:50 / Jan Vrany <jan.vrany@fit.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   623
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   624
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   625
!JavaByteCodeDisassembler methodsFor:'instructions'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   626
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   627
aaload
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   628
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   629
        arrayValueLoader.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   630
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   631
    "Modified: / 20-03-2011 / 19:59:04 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   632
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   633
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   634
aastore
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   635
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   636
        arrayValueStorer.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   637
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   638
    "Modified: / 20-03-2011 / 20:01:39 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   639
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   640
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   641
aconst_null
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   642
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   643
        constPusher: 'null'.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   644
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   645
    "Modified: / 20-03-2011 / 20:39:18 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   646
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   647
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   648
aload
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   649
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   650
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   651
        writeInstructionWithArgs: (self prettyPrintField: self fetchIndex)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   652
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   653
        after: self objRef.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   654
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   655
    "Modified: / 21-03-2011 / 15:45:49 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   656
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   657
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   658
aload: arg 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   659
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   660
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   661
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   662
        after: (self prettyPrintField: arg).
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   663
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   664
    "Modified: / 21-03-2011 / 16:30:53 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   665
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   666
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   667
anewarray
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   668
self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   669
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   670
        stackBefore: self size 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   671
        after: self arrayRef.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   672
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   673
    "Modified: / 20-03-2011 / 20:09:12 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   674
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   675
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   676
areturn
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   677
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   678
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   679
        stackBefore: self objRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   680
        after: self empty.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   681
    self returnIfFinished.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   682
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   683
    "Modified: / 21-03-2011 / 14:55:20 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   684
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   685
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   686
arraylength
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   687
 self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   688
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   689
        stackBefore: self arrayRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   690
         after: self arrayLength.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   691
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   692
    "Modified: / 20-03-2011 / 20:16:07 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   693
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   694
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   695
astore
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   696
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   697
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   698
        stackBefore: self objRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   699
            after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   700
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   701
    "Modified: / 20-03-2011 / 20:19:20 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   702
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   703
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   704
astore: arg 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   705
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   706
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   707
        stackBefore: self objRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   708
            after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   709
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   710
    "Modified: / 20-03-2011 / 20:19:50 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   711
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   712
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   713
athrow
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   714
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   715
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   716
        stackBefore: self objRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   717
        after: self empty , self sep , self excRef.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   718
        self returnIfFinished.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   719
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   720
    "Modified: / 22-03-2011 / 14:24:36 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   721
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   722
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   723
baload
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   724
self arrayValueLoader.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   725
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   726
    "Modified: / 20-03-2011 / 19:59:31 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   727
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   728
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   729
bastore
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   730
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   731
        arrayValueStorer.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   732
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   733
    "Modified: / 20-03-2011 / 20:01:46 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   734
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   735
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   736
bipush
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   737
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   738
        writeInstructionWithArgs: (self prettyPrintByte: self fetchByte)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   739
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   740
        after: self value.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   741
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   742
    "Modified: / 20-03-2011 / 21:32:39 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   743
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   744
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   745
breakpoint
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   746
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   747
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   748
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   749
            after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   750
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   751
    "Modified: / 20-03-2011 / 20:26:43 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   752
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   753
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   754
caload
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   755
self arrayValueLoader.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   756
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   757
    "Modified: / 20-03-2011 / 19:59:42 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   758
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   759
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   760
castore
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   761
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   762
        arrayValueStorer.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   763
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   764
    "Modified: / 20-03-2011 / 20:02:15 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   765
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   766
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   767
checkcast
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   768
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   769
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   770
        stackBefore: self objRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   771
            after: self objRef.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   772
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   773
    "Modified: / 20-03-2011 / 20:23:33 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   774
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   775
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   776
d2f
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   777
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   778
        valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   779
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   780
    "Modified: / 20-03-2011 / 20:27:50 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   781
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   782
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   783
d2i
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   784
  self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   785
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   786
    "Modified: / 20-03-2011 / 20:27:55 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   787
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   788
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   789
d2l
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   790
 self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   791
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   792
    "Modified: / 20-03-2011 / 20:28:03 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   793
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   794
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   795
dadd
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   796
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   797
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   798
    "Modified: / 20-03-2011 / 20:31:17 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   799
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   800
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   801
daload
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   802
self arrayValueLoader.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   803
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   804
    "Modified: / 20-03-2011 / 19:59:53 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   805
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   806
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   807
dastore
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   808
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   809
        arrayValueStorer.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   810
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   811
    "Modified: / 20-03-2011 / 20:01:50 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   812
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   813
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   814
dcmpg
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   815
 self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   816
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   817
    "Modified: / 20-03-2011 / 20:31:28 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   818
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   819
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   820
dcmpl
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   821
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   822
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   823
    "Modified: / 20-03-2011 / 20:31:31 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   824
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   825
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   826
dconst: arg 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   827
    self constPusher: arg.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   828
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   829
    "Modified: / 20-03-2011 / 20:39:35 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   830
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   831
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   832
ddiv
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   833
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   834
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   835
    "Modified: / 20-03-2011 / 20:31:37 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   836
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   837
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   838
dload
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   839
    self indexedFieldLoader.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   840
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   841
    "Modified: / 20-03-2011 / 20:44:20 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   842
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   843
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   844
dload: arg 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   845
self fieldLoader: arg.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   846
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   847
    "Modified: / 20-03-2011 / 20:45:59 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   848
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   849
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   850
dmul
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   851
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   852
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   853
    "Modified: / 20-03-2011 / 20:31:44 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   854
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   855
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   856
dneg
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   857
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   858
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   859
    "Modified: / 20-03-2011 / 20:28:42 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   860
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   861
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   862
drem
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   863
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   864
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   865
    "Modified: / 20-03-2011 / 20:31:46 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   866
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   867
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   868
dreturn
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   869
    self valueReturner.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   870
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   871
    "Modified: / 20-03-2011 / 20:47:47 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   872
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   873
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   874
dstore
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   875
    self indexedFieldStorer.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   876
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   877
    "Modified: / 20-03-2011 / 20:54:05 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   878
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   879
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   880
dstore: arg 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   881
self fieldStorer: arg.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   882
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   883
    "Modified: / 20-03-2011 / 20:55:25 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   884
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   885
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   886
dsub
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   887
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   888
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   889
    "Modified: / 20-03-2011 / 20:32:00 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   890
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   891
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   892
dup
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   893
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   894
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   895
        stackBefore: self value
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   896
        after: self valueMarked , self sep , self valueMarked.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   897
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   898
    "Modified: / 20-03-2011 / 20:58:59 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   899
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   900
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   901
dup2
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   902
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   903
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   904
        stackBefore: self stackGroupOpen , self value , self sep , self value , self stackGroupClose
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   905
            after: self stackGroupOpen , self value , self sep , self value , self stackGroupClose , self sep , self stackGroupOpen , self value , self sep , self value , self stackGroupClose.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   906
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   907
    "Modified: / 20-03-2011 / 21:03:25 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   908
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   909
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   910
dup2_x1
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   911
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   912
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   913
        stackBefore: self stackGroupOpen , self value , self sep , self value 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   914
                , self stackGroupClose
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   915
        after: self stackGroupOpen , self value , self sep , self value 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   916
                , self stackGroupClose , self sep 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   917
                , self stackGroupOpen , self value 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   918
                , self sep , self value 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   919
                    , self stackGroupClose.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   920
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   921
    "Modified: / 20-03-2011 / 21:06:03 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   922
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   923
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   924
dup2_x2
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   925
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   926
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   927
        stackBefore: self stackGroupOpen , self value , self sep , self value 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   928
                , self stackGroupClose , self sep , self stackGroupOpen , self valueMarked , self sep , self valueMarked 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   929
                                , self stackGroupClose
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   930
        after: self stackGroupOpen , self valueMarked , self sep , self valueMarked 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   931
                , self stackGroupClose , self sep 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   932
                , self stackGroupOpen , self value 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   933
                , self sep , self value 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   934
                        , self stackGroupClose , self sep ,  self stackGroupOpen , self valueMarked , self sep , self valueMarked 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   935
                , self stackGroupClose.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   936
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   937
    "Modified: / 20-03-2011 / 21:07:26 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   938
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   939
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   940
dup_x1
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   941
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   942
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   943
        stackBefore: self value , self sep , self valueMarked
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   944
        after: self valueMarked , self sep , self value , self sep 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   945
                    , self valueMarked.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   946
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   947
    "Modified: / 20-03-2011 / 21:00:46 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   948
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   949
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   950
dup_x2
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   951
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   952
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   953
        stackBefore: self value , self sep , self value , self sep , self valueMarked
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   954
        after: self valueMarked , self sep , self value , self sep , self value , self sep ,
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   955
                     self valueMarked.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   956
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   957
    "Modified: / 20-03-2011 / 21:01:46 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   958
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   959
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   960
f2d
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   961
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   962
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   963
    "Modified: / 20-03-2011 / 20:28:25 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   964
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   965
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   966
f2i
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   967
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   968
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   969
    "Modified: / 20-03-2011 / 20:28:28 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   970
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   971
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   972
f2l
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   973
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   974
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   975
    "Modified: / 20-03-2011 / 20:28:31 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   976
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   977
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   978
fadd
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   979
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   980
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   981
    "Modified: / 20-03-2011 / 20:32:28 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   982
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   983
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   984
faload
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   985
self arrayValueLoader.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   986
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   987
    "Modified: / 20-03-2011 / 20:00:06 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   988
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   989
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   990
fastore
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   991
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   992
        arrayValueStorer.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   993
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   994
    "Modified: / 20-03-2011 / 20:01:56 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   995
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   996
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   997
fcmpg
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   998
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
   999
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1000
    "Modified: / 20-03-2011 / 20:32:32 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1001
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1002
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1003
fcmpl
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1004
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1005
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1006
    "Modified: / 20-03-2011 / 20:32:35 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1007
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1008
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1009
fconst: arg 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1010
    self constPusher: arg.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1011
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1012
    "Modified: / 20-03-2011 / 20:39:50 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1013
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1014
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1015
fdiv
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1016
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1017
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1018
    "Modified: / 20-03-2011 / 20:32:42 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1019
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1020
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1021
fload
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1022
self indexedFieldLoader.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1023
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1024
    "Modified: / 20-03-2011 / 20:44:31 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1025
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1026
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1027
fload: arg 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1028
self fieldLoader: arg.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1029
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1030
    "Modified: / 20-03-2011 / 20:45:53 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1031
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1032
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1033
fmul
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1034
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1035
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1036
    "Modified: / 20-03-2011 / 20:32:46 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1037
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1038
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1039
fneg
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1040
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1041
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1042
    "Modified: / 20-03-2011 / 20:28:53 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1043
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1044
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1045
frem
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1046
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1047
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1048
    "Modified: / 20-03-2011 / 20:32:50 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1049
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1050
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1051
freturn
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1052
    self valueReturner.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1053
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1054
    "Modified: / 20-03-2011 / 20:48:20 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1055
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1056
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1057
fstore
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1058
self indexedFieldStorer.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1059
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1060
    "Modified: / 20-03-2011 / 20:54:15 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1061
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1062
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1063
fstore: arg 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1064
   self fieldStorer: arg.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1065
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1066
    "Modified: / 20-03-2011 / 20:55:18 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1067
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1068
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1069
fsub
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1070
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1071
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1072
    "Modified: / 20-03-2011 / 20:32:56 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1073
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1074
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1075
getfield
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1076
    | index |
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1077
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1078
    index := self fetchIndex2.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1079
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1080
        writeInstructionWithArgs: (self prettyPrintIndex: index)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1081
        stackBefore: self objRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1082
        after: self objRef.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1083
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1084
    "Modified: / 21-03-2011 / 16:25:15 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1085
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1086
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1087
getstatic
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1088
    | index |
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1089
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1090
    index := self fetchIndex2.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1091
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1092
        writeInstructionWithArgs: (self prettyPrintIndex: index)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1093
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1094
        after: self objRef.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1095
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1096
    "Modified: / 21-03-2011 / 16:25:29 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1097
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1098
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1099
goto
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1100
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1101
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1102
        writeInstructionWithArgs: (self prettyPrintJump: self fetchBytes2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1103
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1104
        after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1105
        self returnIfFinished.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1106
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1107
    "Modified: / 22-03-2011 / 14:30:01 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1108
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1109
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1110
goto_w
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1111
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1112
        writeInstructionWithArgs: (self prettyPrintJump: self fetchBytes4)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1113
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1114
        after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1115
        self returnIfFinished.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1116
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1117
    "Modified: / 22-03-2011 / 14:30:08 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1118
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1119
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1120
i2d
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1121
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1122
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1123
    "Modified: / 20-03-2011 / 20:28:58 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1124
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1125
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1126
i2f
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1127
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1128
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1129
    "Modified: / 20-03-2011 / 20:29:02 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1130
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1131
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1132
i2l
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1133
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1134
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1135
    "Modified: / 20-03-2011 / 20:29:06 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1136
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1137
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1138
i_dup
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1139
    "raise an error: must be redefined in concrete subclass(es)"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1140
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1141
    ^ self shouldImplement
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1142
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1143
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1144
iadd
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1145
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1146
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1147
    "Modified: / 20-03-2011 / 20:33:02 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1148
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1149
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1150
iaload
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1151
self arrayValueLoader.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1152
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1153
    "Modified: / 20-03-2011 / 20:00:18 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1154
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1155
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1156
iand
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1157
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1158
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1159
    "Modified: / 20-03-2011 / 20:33:14 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1160
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1161
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1162
iastore
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1163
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1164
        arrayValueStorer.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1165
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1166
    "Modified: / 20-03-2011 / 20:02:05 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1167
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1168
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1169
iconst: arg
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1170
self constPusher: arg.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1171
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1172
    "Created: / 20-03-2011 / 20:41:17 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1173
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1174
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1175
idiv
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1176
self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1177
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1178
    "Modified: / 20-03-2011 / 20:33:19 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1179
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1180
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1181
ifacmpeq
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1182
   self twoValuesBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1183
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1184
    "Modified: / 20-03-2011 / 21:11:01 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1185
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1186
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1187
ifacmpne
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1188
    self twoValuesBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1189
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1190
    "Modified: / 20-03-2011 / 21:11:04 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1191
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1192
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1193
ifeq
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1194
self valueBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1195
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1196
    "Modified: / 20-03-2011 / 21:11:33 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1197
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1198
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1199
ifge
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1200
self valueBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1201
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1202
    "Modified: / 20-03-2011 / 21:11:37 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1203
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1204
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1205
ifgt
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1206
self valueBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1207
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1208
    "Modified: / 20-03-2011 / 21:11:42 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1209
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1210
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1211
ificmpeq
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1212
    self twoValuesBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1213
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1214
    "Modified: / 20-03-2011 / 21:10:56 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1215
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1216
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1217
ificmpge
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1218
self twoValuesBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1219
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1220
    "Modified: / 20-03-2011 / 21:11:09 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1221
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1222
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1223
ificmpgt
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1224
self twoValuesBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1225
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1226
    "Modified: / 20-03-2011 / 21:11:12 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1227
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1228
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1229
ificmple
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1230
self twoValuesBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1231
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1232
    "Modified: / 20-03-2011 / 21:11:15 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1233
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1234
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1235
ificmplt
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1236
self twoValuesBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1237
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1238
    "Modified: / 20-03-2011 / 21:11:18 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1239
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1240
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1241
ificmpne
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1242
self twoValuesBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1243
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1244
    "Modified: / 20-03-2011 / 21:11:21 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1245
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1246
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1247
ifle
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1248
self valueBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1249
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1250
    "Modified: / 20-03-2011 / 21:11:46 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1251
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1252
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1253
iflt
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1254
self valueBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1255
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1256
    "Modified: / 20-03-2011 / 21:11:49 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1257
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1258
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1259
ifne
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1260
self valueBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1261
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1262
    "Modified: / 20-03-2011 / 21:11:51 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1263
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1264
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1265
ifnonnull
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1266
self valueBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1267
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1268
    "Modified: / 20-03-2011 / 21:11:56 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1269
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1270
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1271
ifnull
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1272
self valueBasedJumper.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1273
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1274
    "Modified: / 20-03-2011 / 21:12:03 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1275
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1276
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1277
iinc
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1278
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1279
    wide 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1280
        ifTrue: 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1281
            [ self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1282
                writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2) 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1283
                        , self sep , (self prettyPrintByte: self fetchBytes2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1284
                stackBefore: self objRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1285
                after: self result.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1286
            wide := false. ]
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1287
        ifFalse: 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1288
            [ self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1289
                writeInstructionWithArgs: (self prettyPrintField: self fetchIndex) 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1290
                        , self sep , (self prettyPrintByte: self fetchByte)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1291
                stackBefore: self objRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1292
                after: self result. ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1293
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1294
    "Modified: / 21-03-2011 / 16:23:39 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1295
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1296
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1297
iload
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1298
self indexedFieldLoader.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1299
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1300
    "Modified: / 20-03-2011 / 20:44:43 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1301
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1302
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1303
iload: index 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1304
    self fieldLoader: index.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1305
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1306
    "Modified: / 20-03-2011 / 20:45:45 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1307
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1308
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1309
imul
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1310
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1311
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1312
    "Modified: / 20-03-2011 / 20:33:45 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1313
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1314
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1315
ineg
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1316
     self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1317
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1318
    "Modified: / 20-03-2011 / 20:30:11 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1319
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1320
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1321
instanceof
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1322
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1323
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1324
        stackBefore: self objRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1325
            after: self result.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1326
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1327
    "Modified: / 20-03-2011 / 20:21:38 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1328
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1329
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1330
int2byte
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1331
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1332
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1333
    "Modified: / 20-03-2011 / 20:29:13 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1334
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1335
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1336
int2char
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1337
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1338
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1339
    "Modified: / 20-03-2011 / 20:29:16 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1340
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1341
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1342
int2short
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1343
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1344
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1345
    "Modified: / 20-03-2011 / 20:29:20 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1346
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1347
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1348
invinterface
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1349
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1350
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2) , self sep , ( self prettyPrintByte: self fetchByte) , self sep , 0 printString
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1351
        stackBefore: self objRef , self sep , self varArgs
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1352
        after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1353
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1354
    "Modified: / 20-03-2011 / 21:15:49 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1355
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1356
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1357
invnonvirt
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1358
self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1359
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2) 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1360
                
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1361
        stackBefore: self objRef , self sep , self varArgs
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1362
        after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1363
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1364
    "Modified: / 20-03-2011 / 21:17:35 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1365
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1366
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1367
invstatic
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1368
   self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1369
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1370
        stackBefore: self varArgs
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1371
           after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1372
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1373
    "Modified: / 20-03-2011 / 21:17:55 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1374
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1375
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1376
invvirt
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1377
     self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1378
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1379
        stackBefore: self objRef , self sep , self varArgs
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1380
             after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1381
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1382
    "Modified: / 20-03-2011 / 21:18:18 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1383
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1384
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1385
ior
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1386
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1387
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1388
    "Modified: / 20-03-2011 / 20:33:52 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1389
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1390
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1391
irem
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1392
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1393
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1394
    "Modified: / 20-03-2011 / 20:33:56 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1395
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1396
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1397
ireturn
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1398
   self valueReturner.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1399
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1400
    "Modified: / 20-03-2011 / 20:48:30 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1401
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1402
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1403
ishl
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1404
   self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1405
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1406
    "Modified: / 20-03-2011 / 20:34:07 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1407
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1408
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1409
ishr
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1410
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1411
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1412
    "Modified: / 20-03-2011 / 20:34:11 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1413
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1414
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1415
istore
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1416
self indexedFieldStorer.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1417
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1418
    "Modified: / 20-03-2011 / 20:54:23 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1419
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1420
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1421
istore: arg 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1422
self fieldStorer: arg.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1423
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1424
    "Modified: / 20-03-2011 / 20:55:10 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1425
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1426
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1427
isub
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1428
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1429
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1430
    "Modified: / 20-03-2011 / 20:34:19 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1431
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1432
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1433
iushr
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1434
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1435
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1436
    "Modified: / 20-03-2011 / 20:34:23 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1437
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1438
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1439
ixor
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1440
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1441
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1442
    "Modified: / 20-03-2011 / 20:34:27 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1443
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1444
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1445
jsr
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1446
      self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1447
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1448
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1449
              after: self address.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1450
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1451
    "Modified: / 20-03-2011 / 21:20:24 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1452
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1453
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1454
jsr_w
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1455
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1456
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchBytes4)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1457
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1458
        after: self address.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1459
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1460
    "Modified: / 21-03-2011 / 13:03:29 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1461
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1462
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1463
l2d
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1464
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1465
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1466
    "Modified: / 20-03-2011 / 20:29:50 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1467
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1468
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1469
l2f
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1470
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1471
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1472
    "Modified: / 20-03-2011 / 20:29:54 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1473
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1474
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1475
l2i
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1476
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1477
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1478
    "Modified: / 20-03-2011 / 20:29:57 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1479
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1480
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1481
ladd
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1482
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1483
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1484
    "Modified: / 20-03-2011 / 20:35:33 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1485
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1486
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1487
laload
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1488
self arrayValueLoader.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1489
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1490
    "Modified: / 20-03-2011 / 20:00:29 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1491
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1492
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1493
land
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1494
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1495
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1496
    "Modified: / 20-03-2011 / 20:35:41 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1497
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1498
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1499
lastore
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1500
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1501
        arrayValueStorer.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1502
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1503
    "Modified: / 20-03-2011 / 20:02:47 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1504
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1505
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1506
lcmp
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1507
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1508
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1509
    "Modified: / 20-03-2011 / 20:35:45 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1510
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1511
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1512
lconst: arg 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1513
    self constPusher: arg.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1514
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1515
    "Modified: / 20-03-2011 / 20:41:30 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1516
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1517
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1518
ldc1
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1519
self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1520
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1521
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1522
        after: self value.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1523
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1524
    "Modified: / 20-03-2011 / 21:21:33 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1525
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1526
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1527
ldc2
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1528
   self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1529
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1530
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1531
           after: self value.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1532
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1533
    "Modified: / 20-03-2011 / 21:21:55 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1534
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1535
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1536
ldc2w
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1537
self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1538
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1539
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1540
        after: self value.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1541
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1542
    "Modified: / 22-03-2011 / 14:18:54 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1543
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1544
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1545
ldiv
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1546
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1547
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1548
    "Modified: / 20-03-2011 / 20:36:05 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1549
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1550
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1551
lload
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1552
self indexedFieldLoader.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1553
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1554
    "Modified: / 20-03-2011 / 20:44:52 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1555
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1556
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1557
lload: arg 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1558
self fieldLoader: arg.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1559
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1560
    "Modified: / 20-03-2011 / 20:45:28 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1561
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1562
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1563
lmul
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1564
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1565
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1566
    "Modified: / 20-03-2011 / 20:36:10 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1567
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1568
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1569
lneg
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1570
   self valueManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1571
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1572
    "Modified: / 20-03-2011 / 20:29:38 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1573
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1574
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1575
lookupswtch
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1576
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1577
        writeInstructionWithArgs: (self prettyPrintLookupSwitchMadness)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1578
        stackBefore: self key
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1579
            after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1580
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1581
    "Modified: / 20-03-2011 / 21:24:10 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1582
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1583
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1584
lor
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1585
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1586
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1587
    "Modified: / 20-03-2011 / 20:36:15 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1588
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1589
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1590
lrem
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1591
   self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1592
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1593
    "Modified: / 20-03-2011 / 20:36:18 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1594
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1595
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1596
lreturn
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1597
    self valueReturner.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1598
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1599
    "Modified: / 20-03-2011 / 20:48:38 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1600
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1601
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1602
lshl
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1603
  self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1604
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1605
    "Modified: / 20-03-2011 / 20:36:22 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1606
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1607
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1608
lshr
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1609
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1610
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1611
    "Modified: / 20-03-2011 / 20:36:27 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1612
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1613
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1614
lstore
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1615
self indexedFieldStorer.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1616
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1617
    "Modified: / 20-03-2011 / 20:54:29 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1618
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1619
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1620
lstore: arg 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1621
    self fieldStorer: arg.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1622
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1623
    "Modified: / 20-03-2011 / 20:55:04 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1624
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1625
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1626
lsub
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1627
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1628
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1629
    "Modified: / 20-03-2011 / 20:36:33 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1630
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1631
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1632
lushr
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1633
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1634
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1635
    "Modified: / 20-03-2011 / 20:36:37 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1636
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1637
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1638
lxor
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1639
    self twoValuesManipulator.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1640
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1641
    "Modified: / 20-03-2011 / 20:36:41 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1642
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1643
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1644
monenter
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1645
  self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1646
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1647
        stackBefore: self objRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1648
        after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1649
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1650
    "Modified: / 20-03-2011 / 20:20:44 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1651
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1652
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1653
monexit
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1654
self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1655
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1656
        stackBefore: self objRef
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1657
        after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1658
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1659
    "Modified: / 20-03-2011 / 20:20:51 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1660
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1661
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1662
multianewarray
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1663
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1664
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2) 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1665
                , self sep , (self prettyPrintByte: self fetchByte)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1666
        stackBefore: self dimensions
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1667
        after: self arrayRef.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1668
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1669
    "Modified: / 20-03-2011 / 21:25:57 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1670
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1671
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1672
new
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1673
self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1674
        writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1675
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1676
        after: self objRef.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1677
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1678
    "Modified: / 20-03-2011 / 20:07:28 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1679
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1680
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1681
newarray
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1682
self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1683
        writeInstructionWithArgs: (self prettyPrintType: self fetchByte)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1684
        stackBefore: self size 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1685
        after: self arrayRef.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1686
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1687
    "Modified: / 20-03-2011 / 20:10:52 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1688
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1689
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1690
nop
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1691
   self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1692
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1693
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1694
           after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1695
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1696
    "Modified: / 20-03-2011 / 21:26:58 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1697
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1698
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1699
pop1
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1700
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1701
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1702
        stackBefore: self value
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1703
            after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1704
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1705
    "Modified: / 20-03-2011 / 21:27:33 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1706
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1707
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1708
pop2
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1709
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1710
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1711
        stackBefore: self value , self sep , self value
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1712
            after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1713
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1714
    "Modified: / 20-03-2011 / 21:27:48 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1715
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1716
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1717
putfield
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1718
    | index |
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1719
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1720
    index := self fetchIndex2.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1721
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1722
        writeInstructionWithArgs: (self prettyPrintIndex: index)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1723
        stackBefore: self objRef , self sep , self value
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1724
        after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1725
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1726
    "Modified: / 21-03-2011 / 16:26:14 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1727
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1728
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1729
putstatic
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1730
    | index |
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1731
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1732
    index := self fetchIndex2.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1733
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1734
        writeInstructionWithArgs: (self prettyPrintIndex: index)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1735
        stackBefore: self value
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1736
        after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1737
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1738
    "Modified: / 21-03-2011 / 16:26:19 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1739
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1740
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1741
ret
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1742
    wide 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1743
        ifTrue: 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1744
            [ self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1745
                writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1746
                stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1747
                after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1748
            wide := false. ]
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1749
        ifFalse: 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1750
            [ self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1751
                writeInstructionWithArgs: (self prettyPrintIndex: self fetchIndex)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1752
                stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1753
                after: self whatever. ].
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1754
                self returnIfFinished.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1755
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1756
    "Modified: / 21-03-2011 / 14:57:04 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1757
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1758
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1759
ret_w
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1760
    self halt: 'spec doesnt know about me, what shall I do?'.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1761
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1762
    "Modified: / 20-03-2011 / 21:31:41 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1763
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1764
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1765
return
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1766
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1767
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1768
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1769
        after: self empty.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1770
    self returnIfFinished.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1771
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1772
    "Modified: / 21-03-2011 / 14:56:54 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1773
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1774
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1775
saload
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1776
self arrayValueLoader.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1777
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1778
    "Modified: / 20-03-2011 / 20:00:41 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1779
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1780
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1781
sastore
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1782
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1783
        arrayValueStorer.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1784
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1785
    "Modified: / 20-03-2011 / 20:03:05 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1786
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1787
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1788
sipush
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1789
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1790
        writeInstructionWithArgs: (self prettyPrintByte: self fetchBytes2)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1791
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1792
            after: self value.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1793
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1794
    "Modified: / 20-03-2011 / 21:33:01 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1795
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1796
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1797
swap
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1798
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1799
        writeInstructionWithArgs: (self prettyPrintByte: self fetchByte)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1800
        stackBefore: self valueMarked , self sep , self valueMarked2
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1801
            after: self valueMarked2 , self sep , self valueMarked.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1802
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1803
    "Modified: / 20-03-2011 / 21:33:42 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1804
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1805
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1806
tableswtch
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1807
    self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1808
        writeInstructionWithArgs: (self prettyPrintTableSwitchMadness)
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1809
        stackBefore: self index
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1810
            after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1811
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1812
    "Modified: / 20-03-2011 / 21:34:57 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1813
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1814
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1815
wide
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1816
    wide := true.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1817
     self 
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1818
        writeInstructionWithArgs: self nothing
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1819
        stackBefore: self whatever
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1820
             after: self whatever.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1821
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1822
    "Modified: / 20-03-2011 / 21:48:20 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1823
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1824
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1825
!JavaByteCodeDisassembler methodsFor:'processing loop'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1826
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1827
handleAbstractMethod
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1828
^nil.
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1829
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1830
    "Created: / 22-03-2011 / 14:51:13 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1831
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1832
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1833
initializeContextVars
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1834
    1 to: numVars
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1835
        do: [:idx | context at: (numArgs + idx) put: 'Var ' , idx printString. ]
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1836
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1837
    "Modified: / 21-03-2011 / 15:28:12 / Marcel Hlopko <hlopkmar@fel.cvut.cz>"
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1838
!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1839
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
  1840
switch: opcode
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1841
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1842
    | lno |
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
  1843
    "bytecode positions in line number table starts with 0, not 1"
2726
6971720de5a4 More support for method's source only.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
  1844
    lno := method lineNumberForPC0: instrPointer - 1.
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1845
    lastLno ~~ lno ifTrue:[self writeLine: (lastLno := lno)].
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
  1846
    ^super switch: opcode
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1847
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1848
    "Created: / 22-03-2011 / 20:57:42 / Jan Vrany <jan.vrany@fit.cvut.cz>"
2726
6971720de5a4 More support for method's source only.
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2429
diff changeset
  1849
    "Modified: / 11-09-2013 / 03:22:21 / Jan Vrany <jan.vrany@fit.cvut.cz>"
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1850
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1851
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1852
!JavaByteCodeDisassembler class methodsFor:'documentation'!
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1853
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
  1854
version_CVS
2396
fadc6d7a2f5b Updated to rev 009a0df3afce
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2353
diff changeset
  1855
    ^ '$Header: /cvs/stx/stx/libjava/JavaByteCodeDisassembler.st,v 1.5 2013-02-25 11:15:31 vrany Exp $'
2313
23e9c0bdcf57 fixed: #version_SVN ($ to §)
Claus Gittinger <cg@exept.de>
parents: 2187
diff changeset
  1856
!
23e9c0bdcf57 fixed: #version_SVN ($ to §)
Claus Gittinger <cg@exept.de>
parents: 2187
diff changeset
  1857
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
  1858
version_HG
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
  1859
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
  1860
    ^ '$Changeset: <not expanded> $'
2187
b74cfdd604fc added: #version_CVS
Claus Gittinger <cg@exept.de>
parents: 2152
diff changeset
  1861
!
b74cfdd604fc added: #version_CVS
Claus Gittinger <cg@exept.de>
parents: 2152
diff changeset
  1862
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1863
version_SVN
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
  1864
    ^ '§Id§'
749
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1865
! !
e898eaeff091 Synchronized with CVS repository at:
vranyj1
parents:
diff changeset
  1866
2353
fa7400d022a0 Updated to https://swing.fit.cvut.cz/hg/stx.libjava/rev/31f8b995905e
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 2313
diff changeset
  1867
2152
1cbdfbcc685c Jan's version
Jan Vrany <jan.vrany@fit.cvut.cz>
parents: 749
diff changeset
  1868
JavaByteCodeDisassembler initialize!