|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0340e4
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 03a0 | | .CONST 0x03a0 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 003d | = | .CONST 0x003d ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0019 | | .CONST 0x0019 ; Number of locals
000b INIT_0008:
000b 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated
000d 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated
000f 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated
0011 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated
0013 e001 | | Load 0x0,0x1
0014 0129 | ) | Execute Any,Make_Visible
0015 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 4800 |H | Short_Literal 0x0
001c 4808 |H | Short_Literal 0x8
001d 029f 025b | [| Declare_Subprogram INIT_0258,For_Call
001f 03fe | | Declare_Type Discrete,Defined,Visible
0020 c216 | | Store 0x1,0x16
0021 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated
0023 c217 | | Store 0x1,0x17
0024 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated
0026 c214 | | Store 0x1,0x14
0027 029a 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Visible,Unelaborated
0029 c215 | | Store 0x1,0x15
002a 00bf | | Action Accept_Activation
002b 029d 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call
002d 1d0e | | Execute_Immediate Reference_Lex_1,0xe
002e 00c7 | | Action Elaborate_Subprogram
002f 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0030 00c7 | | Action Elaborate_Subprogram
0031 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0032 00c7 | | Action Elaborate_Subprogram
0033 029d 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call
0035 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0036 00c7 | | Action Elaborate_Subprogram
0037 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0038 00c7 | | Action Elaborate_Subprogram
0039 1d15 | | Execute_Immediate Reference_Lex_1,0x15
003a 00c7 | | Action Elaborate_Subprogram
003b 1d0d | | Execute_Immediate Reference_Lex_1,0xd
003c 00c7 | | Action Elaborate_Subprogram
003d BODY_0008:
003d 00bc | | Action Signal_Activated
003e 00bb | | Action Signal_Completion
003f 0000 | | .XXX[0x1]
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0043 | C | .CONST 0x0043 ; Address of begin
0041 0004 | | .CONST 0x0004 ; Address of exception handler
0042 0001 | | .CONST 0x0001 ; Number of locals
0043 BODY_0040:
0043 INIT_0040:
0043 00da | | Load_Top At_Offset_2
0044 e002 | | Load 0x0,0x2
0045 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0046 4800 |H | Short_Literal 0x0
0047 4811 |H | Short_Literal 0x11
0048 0262 | b | Execute Discrete,In_Range
0049 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
004a 0000 0000 | | .BLANK 0000[0x6]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 005c | \ | .CONST 0x005c ; Address of begin
0051 0112 | | .CONST 0x0112 ; Address of exception handler
0052 0005 | | .CONST 0x0005 ; Number of locals
0053 INIT_0050:
0053 e003 | | Load 0x0,0x3
0054 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0055 02c7 | | Declare_Variable Any
0056 00d8 | | Load_Top At_Offset_0
0057 1c00 | | Execute_Immediate Run_Utility,0x0
0058 e216 | | Load 0x1,0x16
0059 0007 | | Action Break_Optional
005a 00e5 | | Load_Encached Long_Integer_Cache
005b 00e1 | | Load_Encached Boolean_Cache
005c BODY_0050:
005c e5fd | | Load 0x2,-0x3
005d e002 | | Load 0x0,0x2
005e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
005f 4612 |F | Jump_Case 0x13
0060 7818 |x | Jump 0x79 ; case 0x0
0061 7811 |x | Jump 0x73 ; case 0x1
0062 7810 |x | Jump 0x73 ; case 0x2
0063 780f |x | Jump 0x73 ; case 0x3
0064 7814 |x | Jump 0x79 ; case 0x4
0065 780d |x | Jump 0x73 ; case 0x5
0066 780c |x | Jump 0x73 ; case 0x6
0067 780d |x | Jump 0x75 ; case 0x7
0068 780a |x | Jump 0x73 ; case 0x8
0069 7809 |x | Jump 0x73 ; case 0x9
006a 7808 |x | Jump 0x73 ; case 0xa
006b 7807 |x | Jump 0x73 ; case 0xb
006c 7806 |x | Jump 0x73 ; case 0xc
006d 7805 |x | Jump 0x73 ; case 0xd
006e 7804 |x | Jump 0x73 ; case 0xe
006f 7803 |x | Jump 0x73 ; case 0xf
0070 7802 |x | Jump 0x73 ; case 0x10
0071 782b |x+ | Jump 0x9d ; case 0x11
0072 7800 |x | Jump 0x73 ; case 0x12
0073 e211 | | Load 0x1,0x11
0074 0257 | W | Execute Discrete,Raise
0075 e5fd | | Load 0x2,-0x3
0076 e002 | | Load 0x0,0x2
0077 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0078 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0079 4801 |H | Short_Literal 0x1
007a e5fd | | Load 0x2,-0x3
007b e003 | | Load 0x0,0x3
007c 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
007d c402 | | Store 0x2,0x2
007e 00db | | Load_Top At_Offset_3
007f e004 | | Load 0x0,0x4
0080 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0081 0b01 | | Execute_Immediate Case_Compare,0x1
0082 700e |p | Jump_Nonzero 0x91
0083 0f03 | | Execute_Immediate Equal,0x3
0084 700d |p | Jump_Nonzero 0x92
0085 00e1 | | Load_Encached Boolean_Cache
0086 00e5 | | Load_Encached Long_Integer_Cache
0087 e5fd | | Load 0x2,-0x3
0088 85fe | | Call 0x2,-0x2
0089 005b | [ | Store_Top Discrete,At_Offset_3
008a 0059 | Y | Store_Top Discrete,At_Offset_1
008b 00d8 | | Load_Top At_Offset_0
008c 6802 |h | Jump_Zero 0x8f
008d 00d9 | | Load_Top At_Offset_1
008e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
008f e211 | | Load 0x1,0x11
0090 0257 | W | Execute Discrete,Raise
0091 00d1 | | Pop_Control Pop_Count_1
0092 00db | | Load_Top At_Offset_3
0093 e004 | | Load 0x0,0x4
0094 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0095 4ffe |O | Short_Literal -0x2
0096 4802 |H | Short_Literal 0x2
0097 0099 | | Action Reference_Dynamic
0098 4fff |O | Short_Literal -0x1
0099 4802 |H | Short_Literal 0x2
009a 0099 | | Action Reference_Dynamic
009b 820e | | Call 0x1,0xe
009c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
009d e5fd | | Load 0x2,-0x3
009e 8217 | | Call 0x1,0x17
009f 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
00a0 00da | | Load_Top At_Offset_2
00a1 4608 |F | Jump_Case 0x9
00a2 7808 |x | Jump 0xab ; case 0x0
00a3 781e |x | Jump 0xc2 ; case 0x1
00a4 7831 |x1 | Jump 0xd6 ; case 0x2
00a5 7844 |xD | Jump 0xea ; case 0x3
00a6 7857 |xW | Jump 0xfe ; case 0x4
00a7 7805 |x | Jump 0xad ; case 0x5
00a8 780f |x | Jump 0xb8 ; case 0x6
00a9 7801 |x | Jump 0xab ; case 0x7
00aa 7800 |x | Jump 0xab ; case 0x8
00ab e211 | | Load 0x1,0x11
00ac 0257 | W | Execute Discrete,Raise
00ad e5fd | | Load 0x2,-0x3
00ae 8214 | | Call 0x1,0x14
00af 4ffe |O | Short_Literal -0x2
00b0 4802 |H | Short_Literal 0x2
00b1 0099 | | Action Reference_Dynamic
00b2 4fff |O | Short_Literal -0x1
00b3 4802 |H | Short_Literal 0x2
00b4 0099 | | Action Reference_Dynamic
00b5 820e | | Call 0x1,0xe
00b6 0275 | u | Execute Discrete,Unary_Minus
00b7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
00b8 e5fd | | Load 0x2,-0x3
00b9 8214 | | Call 0x1,0x14
00ba 4ffe |O | Short_Literal -0x2
00bb 4802 |H | Short_Literal 0x2
00bc 0099 | | Action Reference_Dynamic
00bd 4fff |O | Short_Literal -0x1
00be 4802 |H | Short_Literal 0x2
00bf 0099 | | Action Reference_Dynamic
00c0 820e | | Call 0x1,0xe
00c1 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
00c2 e5fd | | Load 0x2,-0x3
00c3 8214 | | Call 0x1,0x14
00c4 4ffe |O | Short_Literal -0x2
00c5 4802 |H | Short_Literal 0x2
00c6 0099 | | Action Reference_Dynamic
00c7 4fff |O | Short_Literal -0x1
00c8 4802 |H | Short_Literal 0x2
00c9 0099 | | Action Reference_Dynamic
00ca 820e | | Call 0x1,0xe
00cb e5fd | | Load 0x2,-0x3
00cc 8215 | | Call 0x1,0x15
00cd 4ffe |O | Short_Literal -0x2
00ce 4802 |H | Short_Literal 0x2
00cf 0099 | | Action Reference_Dynamic
00d0 4fff |O | Short_Literal -0x1
00d1 4802 |H | Short_Literal 0x2
00d2 0099 | | Action Reference_Dynamic
00d3 820e | | Call 0x1,0xe
00d4 0273 | s | Execute Discrete,Plus
00d5 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
00d6 e5fd | | Load 0x2,-0x3
00d7 8214 | | Call 0x1,0x14
00d8 4ffe |O | Short_Literal -0x2
00d9 4802 |H | Short_Literal 0x2
00da 0099 | | Action Reference_Dynamic
00db 4fff |O | Short_Literal -0x1
00dc 4802 |H | Short_Literal 0x2
00dd 0099 | | Action Reference_Dynamic
00de 820e | | Call 0x1,0xe
00df e5fd | | Load 0x2,-0x3
00e0 8215 | | Call 0x1,0x15
00e1 4ffe |O | Short_Literal -0x2
00e2 4802 |H | Short_Literal 0x2
00e3 0099 | | Action Reference_Dynamic
00e4 4fff |O | Short_Literal -0x1
00e5 4802 |H | Short_Literal 0x2
00e6 0099 | | Action Reference_Dynamic
00e7 820e | | Call 0x1,0xe
00e8 0272 | r | Execute Discrete,Minus
00e9 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
00ea e5fd | | Load 0x2,-0x3
00eb 8214 | | Call 0x1,0x14
00ec 4ffe |O | Short_Literal -0x2
00ed 4802 |H | Short_Literal 0x2
00ee 0099 | | Action Reference_Dynamic
00ef 4fff |O | Short_Literal -0x1
00f0 4802 |H | Short_Literal 0x2
00f1 0099 | | Action Reference_Dynamic
00f2 820e | | Call 0x1,0xe
00f3 e5fd | | Load 0x2,-0x3
00f4 8215 | | Call 0x1,0x15
00f5 4ffe |O | Short_Literal -0x2
00f6 4802 |H | Short_Literal 0x2
00f7 0099 | | Action Reference_Dynamic
00f8 4fff |O | Short_Literal -0x1
00f9 4802 |H | Short_Literal 0x2
00fa 0099 | | Action Reference_Dynamic
00fb 820e | | Call 0x1,0xe
00fc 0271 | q | Execute Discrete,Times
00fd 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
00fe e5fd | | Load 0x2,-0x3
00ff 8214 | | Call 0x1,0x14
0100 4ffe |O | Short_Literal -0x2
0101 4802 |H | Short_Literal 0x2
0102 0099 | | Action Reference_Dynamic
0103 4fff |O | Short_Literal -0x1
0104 4802 |H | Short_Literal 0x2
0105 0099 | | Action Reference_Dynamic
0106 820e | | Call 0x1,0xe
0107 e5fd | | Load 0x2,-0x3
0108 8215 | | Call 0x1,0x15
0109 4ffe |O | Short_Literal -0x2
010a 4802 |H | Short_Literal 0x2
010b 0099 | | Action Reference_Dynamic
010c 4fff |O | Short_Literal -0x1
010d 4802 |H | Short_Literal 0x2
010e 0099 | | Action Reference_Dynamic
010f 820e | | Call 0x1,0xe
0110 0270 | p | Execute Discrete,Divide
0111 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0112 TRAP_0050:
0112 0007 | | Action Break_Optional
0113 e211 | | Load 0x1,0x11
0114 0257 | W | Execute Discrete,Raise
0115 0000 0000 | | .XXX[0x3]
0117 0000 | |
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 0124 | $ | .CONST 0x0124 ; Address of begin
0119 01da | | .CONST 0x01da ; Address of exception handler
011a 0005 | | .CONST 0x0005 ; Number of locals
011b INIT_0118:
011b e003 | | Load 0x0,0x3
011c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011d 02c7 | | Declare_Variable Any
011e 00d8 | | Load_Top At_Offset_0
011f 1c00 | | Execute_Immediate Run_Utility,0x0
0120 e216 | | Load 0x1,0x16
0121 0007 | | Action Break_Optional
0122 00e6 | | Load_Encached Float_Cache
0123 00e1 | | Load_Encached Boolean_Cache
0124 BODY_0118:
0124 e5fd | | Load 0x2,-0x3
0125 e002 | | Load 0x0,0x2
0126 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0127 4612 |F | Jump_Case 0x13
0128 7818 |x | Jump 0x141 ; case 0x0
0129 7811 |x | Jump 0x13b ; case 0x1
012a 7810 |x | Jump 0x13b ; case 0x2
012b 780f |x | Jump 0x13b ; case 0x3
012c 7814 |x | Jump 0x141 ; case 0x4
012d 780d |x | Jump 0x13b ; case 0x5
012e 780c |x | Jump 0x13b ; case 0x6
012f 780b |x | Jump 0x13b ; case 0x7
0130 780c |x | Jump 0x13d ; case 0x8
0131 7809 |x | Jump 0x13b ; case 0x9
0132 7808 |x | Jump 0x13b ; case 0xa
0133 7807 |x | Jump 0x13b ; case 0xb
0134 7806 |x | Jump 0x13b ; case 0xc
0135 7805 |x | Jump 0x13b ; case 0xd
0136 7804 |x | Jump 0x13b ; case 0xe
0137 7803 |x | Jump 0x13b ; case 0xf
0138 7802 |x | Jump 0x13b ; case 0x10
0139 782b |x+ | Jump 0x165 ; case 0x11
013a 7800 |x | Jump 0x13b ; case 0x12
013b e211 | | Load 0x1,0x11
013c 0257 | W | Execute Discrete,Raise
013d e5fd | | Load 0x2,-0x3
013e e002 | | Load 0x0,0x2
013f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0140 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0141 4801 |H | Short_Literal 0x1
0142 e5fd | | Load 0x2,-0x3
0143 e003 | | Load 0x0,0x3
0144 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0145 c402 | | Store 0x2,0x2
0146 00db | | Load_Top At_Offset_3
0147 e004 | | Load 0x0,0x4
0148 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0149 0b01 | | Execute_Immediate Case_Compare,0x1
014a 700e |p | Jump_Nonzero 0x159
014b 0f04 | | Execute_Immediate Equal,0x4
014c 700d |p | Jump_Nonzero 0x15a
014d 00e1 | | Load_Encached Boolean_Cache
014e 00e6 | | Load_Encached Float_Cache
014f e5fd | | Load 0x2,-0x3
0150 85fe | | Call 0x2,-0x2
0151 004b | K | Store_Top Float,At_Offset_3
0152 0059 | Y | Store_Top Discrete,At_Offset_1
0153 00d8 | | Load_Top At_Offset_0
0154 6802 |h | Jump_Zero 0x157
0155 00d9 | | Load_Top At_Offset_1
0156 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0157 e211 | | Load 0x1,0x11
0158 0257 | W | Execute Discrete,Raise
0159 00d1 | | Pop_Control Pop_Count_1
015a 00db | | Load_Top At_Offset_3
015b e004 | | Load 0x0,0x4
015c 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
015d 4ffe |O | Short_Literal -0x2
015e 4802 |H | Short_Literal 0x2
015f 0099 | | Action Reference_Dynamic
0160 4fff |O | Short_Literal -0x1
0161 4802 |H | Short_Literal 0x2
0162 0099 | | Action Reference_Dynamic
0163 820f | | Call 0x1,0xf
0164 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0165 e5fd | | Load 0x2,-0x3
0166 8217 | | Call 0x1,0x17
0167 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0168 00da | | Load_Top At_Offset_2
0169 4608 |F | Jump_Case 0x9
016a 7808 |x | Jump 0x173 ; case 0x0
016b 781e |x | Jump 0x18a ; case 0x1
016c 7831 |x1 | Jump 0x19e ; case 0x2
016d 7844 |xD | Jump 0x1b2 ; case 0x3
016e 7857 |xW | Jump 0x1c6 ; case 0x4
016f 7805 |x | Jump 0x175 ; case 0x5
0170 780f |x | Jump 0x180 ; case 0x6
0171 7801 |x | Jump 0x173 ; case 0x7
0172 7800 |x | Jump 0x173 ; case 0x8
0173 e211 | | Load 0x1,0x11
0174 0257 | W | Execute Discrete,Raise
0175 e5fd | | Load 0x2,-0x3
0176 8214 | | Call 0x1,0x14
0177 4ffe |O | Short_Literal -0x2
0178 4802 |H | Short_Literal 0x2
0179 0099 | | Action Reference_Dynamic
017a 4fff |O | Short_Literal -0x1
017b 4802 |H | Short_Literal 0x2
017c 0099 | | Action Reference_Dynamic
017d 820f | | Call 0x1,0xf
017e 023f | ? | Execute Float,Unary_Minus
017f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0180 e5fd | | Load 0x2,-0x3
0181 8214 | | Call 0x1,0x14
0182 4ffe |O | Short_Literal -0x2
0183 4802 |H | Short_Literal 0x2
0184 0099 | | Action Reference_Dynamic
0185 4fff |O | Short_Literal -0x1
0186 4802 |H | Short_Literal 0x2
0187 0099 | | Action Reference_Dynamic
0188 820f | | Call 0x1,0xf
0189 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
018a e5fd | | Load 0x2,-0x3
018b 8214 | | Call 0x1,0x14
018c 4ffe |O | Short_Literal -0x2
018d 4802 |H | Short_Literal 0x2
018e 0099 | | Action Reference_Dynamic
018f 4fff |O | Short_Literal -0x1
0190 4802 |H | Short_Literal 0x2
0191 0099 | | Action Reference_Dynamic
0192 820f | | Call 0x1,0xf
0193 e5fd | | Load 0x2,-0x3
0194 8215 | | Call 0x1,0x15
0195 4ffe |O | Short_Literal -0x2
0196 4802 |H | Short_Literal 0x2
0197 0099 | | Action Reference_Dynamic
0198 4fff |O | Short_Literal -0x1
0199 4802 |H | Short_Literal 0x2
019a 0099 | | Action Reference_Dynamic
019b 820f | | Call 0x1,0xf
019c 023d | = | Execute Float,Plus
019d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
019e e5fd | | Load 0x2,-0x3
019f 8214 | | Call 0x1,0x14
01a0 4ffe |O | Short_Literal -0x2
01a1 4802 |H | Short_Literal 0x2
01a2 0099 | | Action Reference_Dynamic
01a3 4fff |O | Short_Literal -0x1
01a4 4802 |H | Short_Literal 0x2
01a5 0099 | | Action Reference_Dynamic
01a6 820f | | Call 0x1,0xf
01a7 e5fd | | Load 0x2,-0x3
01a8 8215 | | Call 0x1,0x15
01a9 4ffe |O | Short_Literal -0x2
01aa 4802 |H | Short_Literal 0x2
01ab 0099 | | Action Reference_Dynamic
01ac 4fff |O | Short_Literal -0x1
01ad 4802 |H | Short_Literal 0x2
01ae 0099 | | Action Reference_Dynamic
01af 820f | | Call 0x1,0xf
01b0 023c | < | Execute Float,Minus
01b1 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01b2 e5fd | | Load 0x2,-0x3
01b3 8214 | | Call 0x1,0x14
01b4 4ffe |O | Short_Literal -0x2
01b5 4802 |H | Short_Literal 0x2
01b6 0099 | | Action Reference_Dynamic
01b7 4fff |O | Short_Literal -0x1
01b8 4802 |H | Short_Literal 0x2
01b9 0099 | | Action Reference_Dynamic
01ba 820f | | Call 0x1,0xf
01bb e5fd | | Load 0x2,-0x3
01bc 8215 | | Call 0x1,0x15
01bd 4ffe |O | Short_Literal -0x2
01be 4802 |H | Short_Literal 0x2
01bf 0099 | | Action Reference_Dynamic
01c0 4fff |O | Short_Literal -0x1
01c1 4802 |H | Short_Literal 0x2
01c2 0099 | | Action Reference_Dynamic
01c3 820f | | Call 0x1,0xf
01c4 023b | ; | Execute Float,Times
01c5 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01c6 e5fd | | Load 0x2,-0x3
01c7 8214 | | Call 0x1,0x14
01c8 4ffe |O | Short_Literal -0x2
01c9 4802 |H | Short_Literal 0x2
01ca 0099 | | Action Reference_Dynamic
01cb 4fff |O | Short_Literal -0x1
01cc 4802 |H | Short_Literal 0x2
01cd 0099 | | Action Reference_Dynamic
01ce 820f | | Call 0x1,0xf
01cf e5fd | | Load 0x2,-0x3
01d0 8215 | | Call 0x1,0x15
01d1 4ffe |O | Short_Literal -0x2
01d2 4802 |H | Short_Literal 0x2
01d3 0099 | | Action Reference_Dynamic
01d4 4fff |O | Short_Literal -0x1
01d5 4802 |H | Short_Literal 0x2
01d6 0099 | | Action Reference_Dynamic
01d7 820f | | Call 0x1,0xf
01d8 023a | : | Execute Float,Divide
01d9 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01da TRAP_0118:
01da 0007 | | Action Break_Optional
01db e211 | | Load 0x1,0x11
01dc 0257 | W | Execute Discrete,Raise
01dd 0000 0000 | | .XXX[0x3]
01df 0000 | |
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01f1 | | .CONST 0x01f1 ; Address of begin
01e1 0251 | Q | .CONST 0x0251 ; Address of exception handler
01e2 0006 | | .CONST 0x0006 ; Number of locals
01e3 INIT_01e0:
01e3 e003 | | Load 0x0,0x3
01e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01e5 02c7 | | Declare_Variable Any
01e6 00d8 | | Load_Top At_Offset_0
01e7 1c00 | | Execute_Immediate Run_Utility,0x0
01e8 e216 | | Load 0x1,0x16
01e9 0007 | | Action Break_Optional
01ea 4801 |H | Short_Literal 0x1
01eb 6068 |`h | Indirect_Literal Discrete,0x254,{0x00000000, 0x00000400}
01ec 00e9 | | Load_Encached String_Cache
01ed 035b | [ | Declare_Type Array,Constrained
01ee 0337 | 7 | Declare_Variable Array
01ef 00e4 | | Load_Encached Positive_Cache
01f0 00e1 | | Load_Encached Boolean_Cache
01f1 BODY_01e0:
01f1 e5fd | | Load 0x2,-0x3
01f2 e002 | | Load 0x0,0x2
01f3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01f4 4612 |F | Jump_Case 0x13
01f5 7818 |x | Jump 0x20e ; case 0x0
01f6 7811 |x | Jump 0x208 ; case 0x1
01f7 7810 |x | Jump 0x208 ; case 0x2
01f8 780f |x | Jump 0x208 ; case 0x3
01f9 7814 |x | Jump 0x20e ; case 0x4
01fa 780d |x | Jump 0x208 ; case 0x5
01fb 780c |x | Jump 0x208 ; case 0x6
01fc 780b |x | Jump 0x208 ; case 0x7
01fd 780a |x | Jump 0x208 ; case 0x8
01fe 7809 |x | Jump 0x208 ; case 0x9
01ff 7808 |x | Jump 0x208 ; case 0xa
0200 7809 |x | Jump 0x20a ; case 0xb
0201 7806 |x | Jump 0x208 ; case 0xc
0202 7805 |x | Jump 0x208 ; case 0xd
0203 7804 |x | Jump 0x208 ; case 0xe
0204 7803 |x | Jump 0x208 ; case 0xf
0205 7802 |x | Jump 0x208 ; case 0x10
0206 782f |x/ | Jump 0x236 ; case 0x11
0207 7800 |x | Jump 0x208 ; case 0x12
0208 e211 | | Load 0x1,0x11
0209 0257 | W | Execute Discrete,Raise
020a e5fd | | Load 0x2,-0x3
020b e002 | | Load 0x0,0x2
020c 181e | | Execute Package,Field_Execute,Field_Number 0x1e
020d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
020e 4801 |H | Short_Literal 0x1
020f e5fd | | Load 0x2,-0x3
0210 e003 | | Load 0x0,0x3
0211 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0212 c402 | | Store 0x2,0x2
0213 e402 | | Load 0x2,0x2
0214 e004 | | Load 0x0,0x4
0215 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0216 0f01 | | Execute_Immediate Equal,0x1
0217 7013 |p | Jump_Nonzero 0x22b
0218 00e1 | | Load_Encached Boolean_Cache
0219 00e4 | | Load_Encached Positive_Cache
021a e404 | | Load 0x2,0x4
021b e5fd | | Load 0x2,-0x3
021c 85fe | | Call 0x2,-0x2
021d 00d1 | | Pop_Control Pop_Count_1
021e 005b | [ | Store_Top Discrete,At_Offset_3
021f 0059 | Y | Store_Top Discrete,At_Offset_1
0220 00d8 | | Load_Top At_Offset_0
0221 6807 |h | Jump_Zero 0x229
0222 4801 |H | Short_Literal 0x1
0223 00da | | Load_Top At_Offset_2
0224 e404 | | Load 0x2,0x4
0225 01cf | | Execute Vector,Slice_Read
0226 00e9 | | Load_Encached String_Cache
0227 01c6 | | Execute Vector,Convert_To_Formal
0228 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0229 e211 | | Load 0x1,0x11
022a 0257 | W | Execute Discrete,Raise
022b e402 | | Load 0x2,0x2
022c e004 | | Load 0x0,0x4
022d 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
022e 4ffe |O | Short_Literal -0x2
022f 4802 |H | Short_Literal 0x2
0230 0099 | | Action Reference_Dynamic
0231 4fff |O | Short_Literal -0x1
0232 4802 |H | Short_Literal 0x2
0233 0099 | | Action Reference_Dynamic
0234 8210 | | Call 0x1,0x10
0235 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0236 e5fd | | Load 0x2,-0x3
0237 8217 | | Call 0x1,0x17
0238 a403 | | Store_Unchecked 0x2,0x3
0239 00db | | Load_Top At_Offset_3
023a 6802 |h | Jump_Zero 0x23d
023b e211 | | Load 0x1,0x11
023c 0257 | W | Execute Discrete,Raise
023d e5fd | | Load 0x2,-0x3
023e 8214 | | Call 0x1,0x14
023f 4ffe |O | Short_Literal -0x2
0240 4802 |H | Short_Literal 0x2
0241 0099 | | Action Reference_Dynamic
0242 4fff |O | Short_Literal -0x1
0243 4802 |H | Short_Literal 0x2
0244 0099 | | Action Reference_Dynamic
0245 8210 | | Call 0x1,0x10
0246 e5fd | | Load 0x2,-0x3
0247 8215 | | Call 0x1,0x15
0248 4ffe |O | Short_Literal -0x2
0249 4802 |H | Short_Literal 0x2
024a 0099 | | Action Reference_Dynamic
024b 4fff |O | Short_Literal -0x1
024c 4802 |H | Short_Literal 0x2
024d 0099 | | Action Reference_Dynamic
024e 8210 | | Call 0x1,0x10
024f 01cc | | Execute Vector,Catenate
0250 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0251 TRAP_01e0:
0251 0007 | | Action Break_Optional
0252 e211 | | Load 0x1,0x11
0253 0257 | W | Execute Discrete,Raise
0254 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b | [ | .CONST 0x025b ; Address of begin
0259 0004 | | .CONST 0x0004 ; Address of exception handler
025a 0001 | | .CONST 0x0001 ; Number of locals
025b BODY_0258:
025b INIT_0258:
025b 4607 |F | Jump_Case 0x8
025c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
025d 7806 |x | Jump 0x264 ; case 0x1
025e 7809 |x | Jump 0x268 ; case 0x2
025f 780d |x | Jump 0x26d ; case 0x3
0260 7810 |x | Jump 0x271 ; case 0x4
0261 7811 |x | Jump 0x273 ; case 0x5
0262 7812 |x | Jump 0x275 ; case 0x6
0263 7815 |x | Jump 0x279 ; case 0x7
0264 00da | | Load_Top At_Offset_2
0265 0091 035f | _| Action Push_String_Extended_Indexed,0x35f ; "CONCATENATE"
0267 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0268 00db | | Load_Top At_Offset_3
0269 00db | | Load_Top At_Offset_3
026a 00e0 | | Load_Encached Standard_Cache
026b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
026c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
026d 00da | | Load_Top At_Offset_2
026e 00e0 | | Load_Encached Standard_Cache
026f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0270 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0271 00db | | Load_Top At_Offset_3
0272 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0273 00db | | Load_Top At_Offset_3
0274 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0275 e216 | | Load 0x1,0x16
0276 00dc | | Load_Top At_Offset_4
0277 0267 | g | Execute Discrete,Predecessor
0278 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0279 e216 | | Load 0x1,0x16
027a 00dc | | Load_Top At_Offset_4
027b 0268 | h | Execute Discrete,Successor
027c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
027d 0000 0000 | | .XXX[0x3]
027f 0000 | |
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0290 | | .CONST 0x0290 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0004 | | .CONST 0x0004 ; Number of locals
0283 INIT_0280:
0283 00ec | | Load_Encached Diana_Tree_Cache
0284 02c7 | | Declare_Variable Any
0285 00db | | Load_Top At_Offset_3
0286 e003 | | Load 0x0,0x3
0287 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
0288 180f | | Execute Package,Field_Execute,Field_Number 0xf
0289 a402 | | Store_Unchecked 0x2,0x2
028a 00d8 | | Load_Top At_Offset_0
028b 8219 | | Call 0x1,0x19
028c 00e3 | | Load_Encached Natural_Cache
028d 03f1 | | Declare_Variable Discrete,With_Value
028e 029f 0323 | #| Declare_Subprogram INIT_0320,For_Call
0290 BODY_0280:
0290 00d9 | | Load_Top At_Offset_1
0291 7002 |p | Jump_Nonzero 0x294
0292 4808 |H | Short_Literal 0x8
0293 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0294 00cf | | Action Mark_Auxiliary
0295 00db | | Load_Top At_Offset_3
0296 00eb | | Load_Encached Diana_Cache
0297 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0298 0b10 | | Execute_Immediate Case_Compare,0x10
0299 7004 |p | Jump_Nonzero 0x29e
029a 0f15 | | Execute_Immediate Equal,0x15
029b 7008 |p | Jump_Nonzero 0x2a4
029c 4808 |H | Short_Literal 0x8
029d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
029e 00d1 | | Pop_Control Pop_Count_1
029f 00db | | Load_Top At_Offset_3
02a0 00eb | | Load_Encached Diana_Cache
02a1 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4
02a2 c402 | | Store 0x2,0x2
02a3 7801 |x | Jump 0x2a5
02a4 8404 | | Call 0x2,0x4
02a5 00c9 | | Action Pop_Auxiliary_Loop
02a6 7fee | | Jump 0x295
02a7 0000 | | .XXX[0x1]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02b6 | | .CONST 0x02b6 ; Address of begin
02a9 0004 | | .CONST 0x0004 ; Address of exception handler
02aa 0002 | | .CONST 0x0002 ; Number of locals
02ab INIT_02a8:
02ab 00ee | | Load_Encached Diana_Seq_Type_Cache
02ac 02c7 | | Declare_Variable Any
02ad 00db | | Load_Top At_Offset_3
02ae e003 | | Load 0x0,0x3
02af 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
02b0 180f | | Execute Package,Field_Execute,Field_Number 0xf
02b1 00eb | | Load_Encached Diana_Cache
02b2 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9
02b3 00eb | | Load_Encached Diana_Cache
02b4 1889 | | Execute Package,Field_Execute,Field_Number 0x89
02b5 a402 | | Store_Unchecked 0x2,0x2
02b6 BODY_02a8:
02b6 00d8 | | Load_Top At_Offset_0
02b7 00eb | | Load_Encached Diana_Cache
02b8 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
02b9 e003 | | Load 0x0,0x3
02ba 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
02bb 180e | | Execute Package,Field_Execute,Field_Number 0xe
02bc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02bd 0000 0000 | | .XXX[0x3]
02bf 0000 | |
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02ce | | .CONST 0x02ce ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 0002 | | .CONST 0x0002 ; Number of locals
02c3 INIT_02c0:
02c3 00ee | | Load_Encached Diana_Seq_Type_Cache
02c4 02c7 | | Declare_Variable Any
02c5 00db | | Load_Top At_Offset_3
02c6 e003 | | Load 0x0,0x3
02c7 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
02c8 180f | | Execute Package,Field_Execute,Field_Number 0xf
02c9 00eb | | Load_Encached Diana_Cache
02ca 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9
02cb 00eb | | Load_Encached Diana_Cache
02cc 1889 | | Execute Package,Field_Execute,Field_Number 0x89
02cd a402 | | Store_Unchecked 0x2,0x2
02ce BODY_02c0:
02ce 00d8 | | Load_Top At_Offset_0
02cf 00eb | | Load_Encached Diana_Cache
02d0 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
02d1 00eb | | Load_Encached Diana_Cache
02d2 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
02d3 e003 | | Load 0x0,0x3
02d4 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
02d5 180e | | Execute Package,Field_Execute,Field_Number 0xe
02d6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02d7 0000 | | .XXX[0x1]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02e3 | | .CONST 0x02e3 ; Address of begin
02d9 02f5 | | .CONST 0x02f5 ; Address of exception handler
02da 0003 | | .CONST 0x0003 ; Number of locals
02db INIT_02d8:
02db 00ec | | Load_Encached Diana_Tree_Cache
02dc 02c7 | | Declare_Variable Any
02dd 00db | | Load_Top At_Offset_3
02de e003 | | Load 0x0,0x3
02df 1b58 | X | Execute Package,Field_Read,Field_Number 0x58
02e0 180f | | Execute Package,Field_Execute,Field_Number 0xf
02e1 a402 | | Store_Unchecked 0x2,0x2
02e2 00e5 | | Load_Encached Long_Integer_Cache
02e3 BODY_02d8:
02e3 00d9 | | Load_Top At_Offset_1
02e4 00eb | | Load_Encached Diana_Cache
02e5 18f5 | | Execute Package,Field_Execute,Field_Number 0xf5
02e6 00eb | | Load_Encached Diana_Cache
02e7 1898 | | Execute Package,Field_Execute,Field_Number 0x98
02e8 6802 |h | Jump_Zero 0x2eb
02e9 e211 | | Load 0x1,0x11
02ea 0257 | W | Execute Discrete,Raise
02eb 00d9 | | Load_Top At_Offset_1
02ec 00eb | | Load_Encached Diana_Cache
02ed 18f5 | | Execute Package,Field_Execute,Field_Number 0xf5
02ee 00eb | | Load_Encached Diana_Cache
02ef 189f | | Execute Package,Field_Execute,Field_Number 0x9f
02f0 e005 | | Load 0x0,0x5
02f1 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
02f2 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
02f3 00d8 | | Load_Top At_Offset_0
02f4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02f5 TRAP_02d8:
02f5 0007 | | Action Break_Optional
02f6 e211 | | Load 0x1,0x11
02f7 0257 | W | Execute Discrete,Raise
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 0301 | | .CONST 0x0301 ; Address of begin
02f9 031a | | .CONST 0x031a ; Address of exception handler
02fa 0003 | | .CONST 0x0003 ; Number of locals
02fb INIT_02f8:
02fb 00e3 | | Load_Encached Natural_Cache
02fc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02fd 00ee | | Load_Encached Diana_Seq_Type_Cache
02fe 02c7 | | Declare_Variable Any
02ff 00d8 | | Load_Top At_Offset_0
0300 1c00 | | Execute_Immediate Run_Utility,0x0
0301 BODY_02f8:
0301 e5ff | | Load 0x2,-0x1
0302 00eb | | Load_Encached Diana_Cache
0303 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9
0304 00eb | | Load_Encached Diana_Cache
0305 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0306 c403 | | Store 0x2,0x3
0307 00cf | | Action Mark_Auxiliary
0308 7808 |x | Jump 0x311
0309 00da | | Load_Top At_Offset_2
030a 0a01 | | Execute_Immediate Plus,0x1
030b 005b | [ | Store_Top Discrete,At_Offset_3
030c 00d9 | | Load_Top At_Offset_1
030d 00eb | | Load_Encached Diana_Cache
030e 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
030f c403 | | Store 0x2,0x3
0310 00c9 | | Action Pop_Auxiliary_Loop
0311 00d9 | | Load_Top At_Offset_1
0312 00eb | | Load_Encached Diana_Cache
0313 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
0314 00eb | | Load_Encached Diana_Cache
0315 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0316 6ff2 |o | Jump_Zero 0x309
0317 00ce | | Action Pop_Auxiliary
0318 00d9 | | Load_Top At_Offset_1
0319 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
031a TRAP_02f8:
031a 0007 | | Action Break_Optional
031b 4800 |H | Short_Literal 0x0
031c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
031d 0000 0000 | | .XXX[0x3]
031f 0000 | |
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0328 | ( | .CONST 0x0328 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0002 | | .CONST 0x0002 ; Number of locals
0323 INIT_0320:
0323 e402 | | Load 0x2,0x2
0324 00eb | | Load_Encached Diana_Cache
0325 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0326 00eb | | Load_Encached Diana_Cache
0327 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0328 BODY_0320:
0328 00d8 | | Load_Top At_Offset_0
0329 0092 0368 | h| Action Push_String_Extended,0x368 ; "&"
032b 01df | | Execute Vector,Equal
032c 6803 |h | Jump_Zero 0x330
032d 4800 |H | Short_Literal 0x0
032e 00cb | | Action Pop_Block_With_Result
032f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0330 00d8 | | Load_Top At_Offset_0
0331 0092 0369 | i| Action Push_String_Extended,0x369 ; "+"
0333 01df | | Execute Vector,Equal
0334 6809 |h | Jump_Zero 0x33e
0335 e403 | | Load 0x2,0x3
0336 0f01 | | Execute_Immediate Equal,0x1
0337 6803 |h | Jump_Zero 0x33b
0338 4806 |H | Short_Literal 0x6
0339 00cb | | Action Pop_Block_With_Result
033a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
033b 4801 |H | Short_Literal 0x1
033c 00cb | | Action Pop_Block_With_Result
033d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
033e 00d8 | | Load_Top At_Offset_0
033f 0092 036a | j| Action Push_String_Extended,0x36a ; "-"
0341 01df | | Execute Vector,Equal
0342 6809 |h | Jump_Zero 0x34c
0343 e403 | | Load 0x2,0x3
0344 0f01 | | Execute_Immediate Equal,0x1
0345 6803 |h | Jump_Zero 0x349
0346 4805 |H | Short_Literal 0x5
0347 00cb | | Action Pop_Block_With_Result
0348 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0349 4802 |H | Short_Literal 0x2
034a 00cb | | Action Pop_Block_With_Result
034b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
034c 00d8 | | Load_Top At_Offset_0
034d 0092 036b | k| Action Push_String_Extended,0x36b ; "*"
034f 01df | | Execute Vector,Equal
0350 6803 |h | Jump_Zero 0x354
0351 4803 |H | Short_Literal 0x3
0352 00cb | | Action Pop_Block_With_Result
0353 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0354 00d8 | | Load_Top At_Offset_0
0355 0092 036c | l| Action Push_String_Extended,0x36c ; "/"
0357 01df | | Execute Vector,Equal
0358 6803 |h | Jump_Zero 0x35c
0359 4804 |H | Short_Literal 0x4
035a 00cb | | Action Pop_Block_With_Result
035b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
035c 4807 |H | Short_Literal 0x7
035d 00cb | | Action Pop_Block_With_Result
035e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
035f ; --------------------------------------------------------------------------------------
035f ; STRING TABLE
035f ; --------------------------------------------------------------------------------------
035f 001e | | .STRTAB 0x001e->0x036e ; "CONCATENATE"
0360 0027 | ' | .STRTAB 0x0027->0x0373 ; "PLUS"
0361 0029 | ) | .STRTAB 0x0029->0x0375 ; "MINUS"
0362 002c | , | .STRTAB 0x002c->0x0378 ; "TIMES"
0363 002f | / | .STRTAB 0x002f->0x037a ; "DIVIDE"
0364 0033 | 3 | .STRTAB 0x0033->0x037d ; "UNARY_MINUS"
0365 003c | < | .STRTAB 0x003c->0x0383 ; "UNARY_PLUS"
0366 0044 | D | .STRTAB 0x0044->0x0388 ; "OTHER_OPERATOR"
0367 0050 | P | .STRTAB 0x0050->0x038f ; "NOT_AN_OPERATOR_EXPRESSION"
0368 0068 | h | .STRTAB 0x0068->0x039c ; "&"
0369 0067 | g | .STRTAB 0x0067->0x039c ; "+"
036a 0066 | f | .STRTAB 0x0066->0x039d ; "-"
036b 0065 | e | .STRTAB 0x0065->0x039d ; "*"
036c 0064 | d | .STRTAB 0x0064->0x039e ; "/"
036d 0063 | c | .STREND 0x0063->0x039e
036e 434f 4e43 |CONC| .STRTAB_STRINGS
039f 0000 | | .XXX[0x1]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; Debug Table
03a0 ; --------------------------------------------------------------------------------------
03a0 0004 0004 | | .DEBUG4 0x0004,0x0004,0x2ec6,0x0000,0x0001,0x000d
03a6 000b 03da | | .DBG4T 0x000b,0x03da,0x8000,0x0000
03aa 002b 03e5 | + | .DBG4T 0x002b,0x03e5,0x8000,0x8000
03ae 0043 03f9 | C | .DBG4T 0x0043,0x03f9,0x0002,0x0000
03b2 0053 03fc | S | .DBG4T 0x0053,0x03fc,0x2802,0x4002
03b6 011b 042a | *| .DBG4T 0x011b,0x042a,0x2802,0x4002
03ba 01e3 0458 | X| .DBG4T 0x01e3,0x0458,0x2802,0x4002
03be 025b 0000 | [ | .DBG4T 0x025b,0x0000,0x0005,0x0000
03c2 0283 047d | }| .DBG4T 0x0283,0x047d,0x0002,0x4000
03c6 02ab 048d | | .DBG4T 0x02ab,0x048d,0x0002,0x0000
03ca 02c3 0491 | | .DBG4T 0x02c3,0x0491,0x0002,0x0000
03ce 02db 0495 | | .DBG4T 0x02db,0x0495,0x0002,0x4000
03d2 02fb 04a3 | | .DBG4T 0x02fb,0x04a3,0x0002,0x4000
03d6 0323 04b3 | # | .DBG4T 0x0323,0x04b3,0x0004,0x0000
03da ; --------------------------------------------------------------------------------------
03da ; Debug chain
03da ; --------------------------------------------------------------------------------------
03da 0009 0000 | | .DBGLEN 0x0009,0x0000
03dc 000b 000d | | .DBGLNO 0x000b,0x000d,0x000f,0x0011,0x0013,0x001b,0x0021,0x0024,0x0027
03e5 ; --------------------------------------------------------------------------------------
03e5 ; Debug chain
03e5 ; --------------------------------------------------------------------------------------
03e5 0009 0000 | | .DBGLEN 0x0009,0x0000
03e7 002b 002d | + -| .DBGLNO 0x002b,0x002d,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b
03f0 0002 0003 | | .XXX[0x9]
03f2 0004 0005 | |
03f4 0006 0007 | |
03f6 0008 0009 | |
03f8 000a | |
03f9 ; --------------------------------------------------------------------------------------
03f9 ; Debug chain
03f9 ; --------------------------------------------------------------------------------------
03f9 0000 0001 | | .DBGLEN 0x0000,0x0001
03fb 0043 | C | .DBGLNO 0x0043
03fc ; --------------------------------------------------------------------------------------
03fc ; Debug chain
03fc ; --------------------------------------------------------------------------------------
03fc 0004 0014 | | .DBGLEN 0x0004,0x0014
03fe 0053 0058 | S X| .DBGLNO 0x0053,0x0058,0x005a,0x005b,0x005c,0x0073,0x0075,0x0079,0x007e,0x0085,0x008b,0x008d,0x008f,0x0092,0x009d,0x00a0,0x00ab,0x00ad,0x00b8,0x00c2,0x00d6,0x00ea,0x00fe,0x0113
0416 0001 0013 | | .XXX[0x14]
0418 0002 0003 | |
041a 0004 0006 | |
041c 0007 0008 | |
041e 0009 0005 | |
0420 000a 000b | |
0422 0012 000c | |
0424 000d 000e | |
0426 000f 0010 | |
0428 0011 0014 | |
042a ; --------------------------------------------------------------------------------------
042a ; Debug chain
042a ; --------------------------------------------------------------------------------------
042a 0004 0014 | | .DBGLEN 0x0004,0x0014
042c 011b 0120 | | .DBGLNO 0x011b,0x0120,0x0122,0x0123,0x0124,0x013b,0x013d,0x0141,0x0146,0x014d,0x0153,0x0155,0x0157,0x015a,0x0165,0x0168,0x0173,0x0175,0x0180,0x018a,0x019e,0x01b2,0x01c6,0x01db
0444 0001 0013 | | .XXX[0x14]
0446 0002 0003 | |
0448 0004 0006 | |
044a 0007 0008 | |
044c 0009 0005 | |
044e 000a 000b | |
0450 0012 000c | |
0452 000d 000e | |
0454 000f 0010 | |
0456 0011 0014 | |
0458 ; --------------------------------------------------------------------------------------
0458 ; Debug chain
0458 ; --------------------------------------------------------------------------------------
0458 0005 000f | | .DBGLEN 0x0005,0x000f
045a 01e3 01e8 | | .DBGLNO 0x01e3,0x01e8,0x01ea,0x01ef,0x01f0,0x01f1,0x0208,0x020a,0x020e,0x0213,0x0218,0x0220,0x0222,0x0229,0x022b,0x0236,0x0239,0x023b,0x023d,0x0252
046e 0001 000e | | .XXX[0xf]
0470 0002 0003 | |
0472 0004 0006 | |
0474 0007 0008 | |
0476 0009 0005 | |
0478 000a 000b | |
047a 000d 000c | |
047c 000f | |
047d ; --------------------------------------------------------------------------------------
047d ; Debug chain
047d ; --------------------------------------------------------------------------------------
047d 0002 0006 | | .DBGLEN 0x0002,0x0006
047f 0283 028a | | .DBGLNO 0x0283,0x028a,0x0290,0x0292,0x0295,0x029c,0x029f,0x02a4
0487 0001 0002 | | .XXX[0x6]
0489 0004 0007 | |
048b 0005 0006 | |
048d ; --------------------------------------------------------------------------------------
048d ; Debug chain
048d ; --------------------------------------------------------------------------------------
048d 0001 0001 | | .DBGLEN 0x0001,0x0001
048f 02ab 02b6 | | .DBGLNO 0x02ab,0x02b6
0491 ; --------------------------------------------------------------------------------------
0491 ; Debug chain
0491 ; --------------------------------------------------------------------------------------
0491 0001 0001 | | .DBGLEN 0x0001,0x0001
0493 02c3 02ce | | .DBGLNO 0x02c3,0x02ce
0495 ; --------------------------------------------------------------------------------------
0495 ; Debug chain
0495 ; --------------------------------------------------------------------------------------
0495 0002 0005 | | .DBGLEN 0x0002,0x0005
0497 02db 02e2 | | .DBGLNO 0x02db,0x02e2,0x02e3,0x02e9,0x02eb,0x02f3,0x02f6
049e 0001 0004 | | .XXX[0x5]
04a0 0002 0003 | |
04a2 0005 | |
04a3 ; --------------------------------------------------------------------------------------
04a3 ; Debug chain
04a3 ; --------------------------------------------------------------------------------------
04a3 0002 0006 | | .DBGLEN 0x0002,0x0006
04a5 02fb 02fd | | .DBGLNO 0x02fb,0x02fd,0x0301,0x0309,0x030c,0x0311,0x0318,0x031b
04ad 0001 0003 | | .XXX[0x6]
04af 0004 0002 | |
04b1 0005 0006 | |
04b3 ; --------------------------------------------------------------------------------------
04b3 ; Debug chain
04b3 ; --------------------------------------------------------------------------------------
04b3 0001 000f | | .DBGLEN 0x0001,0x000f
04b5 0323 0328 | # (| .DBGLNO 0x0323,0x0328,0x032d,0x0330,0x0335,0x0338,0x033b,0x033e,0x0343,0x0346,0x0349,0x034c,0x0351,0x0354,0x0359,0x035c
04c5 0000 0000 | | .BLANK 0000[0x13b]