|
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: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2
└─⟦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 5800 |X | .CONST 0x5800 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0061 | a | .CONST 0x0061 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0022 | " | .CONST 0x0022 ; Number of locals
000b INIT_0008:
000b 4800 |H | Short_Literal 0x0
000c 4808 |H | Short_Literal 0x8
000d 029f 006b | k| Declare_Subprogram INIT_0068,For_Call
000f 03fe | | Declare_Type Discrete,Defined,Visible
0010 00e8 | | Load_Encached Character_Cache
0011 0266 | f | Execute Discrete,Bounds
0012 00da | | Load_Top At_Offset_2
0013 02a0 | | Declare_Subprogram Null_Subprogram
0014 4801 |H | Short_Literal 0x1
0015 035e | ^ | Declare_Type Array,Defined,Visible
0016 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d 00c4 | | Action Make_Default
001e 00c4 | | Action Make_Default
001f 00c4 | | Action Make_Default
0020 00c4 | | Action Make_Default
0021 00c4 | | Action Make_Default
0022 00c4 | | Action Make_Default
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 00c4 | | Action Make_Default
0026 00c4 | | Action Make_Default
0027 00c4 | | Action Make_Default
0028 00c4 | | Action Make_Default
0029 00c4 | | Action Make_Default
002a 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated
002c c21b | | Store 0x1,0x1b
002d 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated
002f c21c | | Store 0x1,0x1c
0030 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated
0032 c21d | | Store 0x1,0x1d
0033 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated
0035 c213 | | Store 0x1,0x13
0036 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated
0038 c21e | | Store 0x1,0x1e
0039 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated
003b c215 | | Store 0x1,0x15
003c 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated
003e c221 | ! | Store 0x1,0x21
003f 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated
0041 c217 | | Store 0x1,0x17
0042 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated
0044 c218 | | Store 0x1,0x18
0045 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated
0047 c219 | | Store 0x1,0x19
0048 00bf | | Action Accept_Activation
0049 029d 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call
004b 1d0f | | Execute_Immediate Reference_Lex_1,0xf
004c 00c7 | | Action Elaborate_Subprogram
004d 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
004e 00c7 | | Action Elaborate_Subprogram
004f 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0050 00c7 | | Action Elaborate_Subprogram
0051 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0052 00c7 | | Action Elaborate_Subprogram
0053 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0054 00c7 | | Action Elaborate_Subprogram
0055 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0056 00c7 | | Action Elaborate_Subprogram
0057 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0058 00c7 | | Action Elaborate_Subprogram
0059 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
005a 00c7 | | Action Elaborate_Subprogram
005b 1d17 | | Execute_Immediate Reference_Lex_1,0x17
005c 00c7 | | Action Elaborate_Subprogram
005d 1d18 | | Execute_Immediate Reference_Lex_1,0x18
005e 00c7 | | Action Elaborate_Subprogram
005f 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0060 00c7 | | Action Elaborate_Subprogram
0061 BODY_0008:
0061 00bc | | Action Signal_Activated
0062 00bb | | Action Signal_Completion
0063 0000 0000 | | .BLANK 0000[0x5]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b 4603 |F | Jump_Case 0x4
006c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
006d 7802 |x | Jump 0x70 ; case 0x1
006e 7805 |x | Jump 0x74 ; case 0x2
006f 7809 |x | Jump 0x79 ; case 0x3
0070 00da | | Load_Top At_Offset_2
0071 0091 0352 | R| Action Push_String_Extended_Indexed,0x352 ; "SA_TRANSFER"
0073 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0074 00db | | Load_Top At_Offset_3
0075 00db | | Load_Top At_Offset_3
0076 00e0 | | Load_Encached Standard_Cache
0077 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0078 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0079 00da | | Load_Top At_Offset_2
007a 00e0 | | Load_Encached Standard_Cache
007b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
007c 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
007d 0000 0000 | | .XXX[0x3]
007f 0000 | |
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0083 | | .CONST 0x0083 ; Address of begin
0081 0004 | | .CONST 0x0004 ; Address of exception handler
0082 0001 | | .CONST 0x0001 ; Number of locals
0083 BODY_0080:
0083 INIT_0080:
0083 00e8 | | Load_Encached Character_Cache
0084 e5fd | | Load 0x2,-0x3
0085 e5fe | | Load 0x2,-0x2
0086 e5ff | | Load 0x2,-0x1
0087 4800 |H | Short_Literal 0x0
0088 8222 | " | Call 0x1,0x22
0089 00d2 | | Pop_Control Pop_Count_2
008a c5fc | | Store 0x2,-0x4
008b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
008c 0000 0000 | | .BLANK 0000[0x4]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093 | | .CONST 0x0093 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0001 | | .CONST 0x0001 ; Number of locals
0093 BODY_0090:
0093 INIT_0090:
0093 00e8 | | Load_Encached Character_Cache
0094 00db | | Load_Top At_Offset_3
0095 0229 | ) | Execute Access,All_Read
0096 e5fd | | Load 0x2,-0x3
0097 e5fe | | Load 0x2,-0x2
0098 4800 |H | Short_Literal 0x0
0099 8222 | " | Call 0x1,0x22
009a 00d2 | | Pop_Control Pop_Count_2
009b c5fc | | Store 0x2,-0x4
009c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
009d 0000 0000 | | .XXX[0x3]
009f 0000 | |
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3 | | .CONST 0x00a3 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0001 | | .CONST 0x0001 ; Number of locals
00a3 BODY_00a0:
00a3 INIT_00a0:
00a3 00e8 | | Load_Encached Character_Cache
00a4 e5fd | | Load 0x2,-0x3
00a5 e5ff | | Load 0x2,-0x1
00a6 0229 | ) | Execute Access,All_Read
00a7 e5fe | | Load 0x2,-0x2
00a8 4800 |H | Short_Literal 0x0
00a9 8222 | " | Call 0x1,0x22
00aa 00d2 | | Pop_Control Pop_Count_2
00ab c5fc | | Store 0x2,-0x4
00ac 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00ad 0000 0000 | | .XXX[0x3]
00af 0000 | |
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 00e8 | | Load_Encached Character_Cache
00b4 e5fe | | Load 0x2,-0x2
00b5 0229 | ) | Execute Access,All_Read
00b6 e5ff | | Load 0x2,-0x1
00b7 0229 | ) | Execute Access,All_Read
00b8 e5fd | | Load 0x2,-0x3
00b9 4800 |H | Short_Literal 0x0
00ba 8222 | " | Call 0x1,0x22
00bb 00d2 | | Pop_Control Pop_Count_2
00bc c5fc | | Store 0x2,-0x4
00bd 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00be 0000 0000 | | .XXX[0x2]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3 | | .CONST 0x00c3 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0001 | | .CONST 0x0001 ; Number of locals
00c3 BODY_00c0:
00c3 INIT_00c0:
00c3 00e8 | | Load_Encached Character_Cache
00c4 e5fd | | Load 0x2,-0x3
00c5 e5fe | | Load 0x2,-0x2
00c6 e5ff | | Load 0x2,-0x1
00c7 e5fe | | Load 0x2,-0x2
00c8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00c9 8222 | " | Call 0x1,0x22
00ca 00d2 | | Pop_Control Pop_Count_2
00cb c5fc | | Store 0x2,-0x4
00cc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00cd 0000 0000 | | .XXX[0x3]
00cf 0000 | |
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3 | | .CONST 0x00d3 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0001 | | .CONST 0x0001 ; Number of locals
00d3 BODY_00d0:
00d3 INIT_00d0:
00d3 00e8 | | Load_Encached Character_Cache
00d4 00db | | Load_Top At_Offset_3
00d5 0229 | ) | Execute Access,All_Read
00d6 e5fd | | Load 0x2,-0x3
00d7 e5fe | | Load 0x2,-0x2
00d8 e5fd | | Load 0x2,-0x3
00d9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00da 8222 | " | Call 0x1,0x22
00db 00d2 | | Pop_Control Pop_Count_2
00dc c5fc | | Store 0x2,-0x4
00dd 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00de 0000 0000 | | .XXX[0x2]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 00db | | Load_Top At_Offset_3
00e4 0229 | ) | Execute Access,All_Read
00e5 00e8 | | Load_Encached Character_Cache
00e6 e5fd | | Load 0x2,-0x3
00e7 00da | | Load_Top At_Offset_2
00e8 e5ff | | Load 0x2,-0x1
00e9 e5fe | | Load 0x2,-0x2
00ea 0227 | ' | Execute Access,All_Reference
00eb 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00ec 8222 | " | Call 0x1,0x22
00ed 00d2 | | Pop_Control Pop_Count_2
00ee c5fc | | Store 0x2,-0x4
00ef 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3 | | .CONST 0x00f3 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0001 | | .CONST 0x0001 ; Number of locals
00f3 BODY_00f0:
00f3 INIT_00f0:
00f3 e5fd | | Load 0x2,-0x3
00f4 0229 | ) | Execute Access,All_Read
00f5 00e8 | | Load_Encached Character_Cache
00f6 e5ff | | Load 0x2,-0x1
00f7 0229 | ) | Execute Access,All_Read
00f8 00da | | Load_Top At_Offset_2
00f9 e5fe | | Load 0x2,-0x2
00fa e5fd | | Load 0x2,-0x3
00fb 0227 | ' | Execute Access,All_Reference
00fc 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00fd 8222 | " | Call 0x1,0x22
00fe 00d2 | | Pop_Control Pop_Count_2
00ff c5fc | | Store 0x2,-0x4
0100 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0101 0000 0000 | | .BLANK 0000[0x7]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0111 | | .CONST 0x0111 ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0003 | | .CONST 0x0003 ; Number of locals
010b INIT_0108:
010b 00e3 | | Load_Encached Natural_Cache
010c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
010d e5fe | | Load 0x2,-0x2
010e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
010f 00e3 | | Load_Encached Natural_Cache
0110 03f1 | | Declare_Variable Discrete,With_Value
0111 BODY_0108:
0111 4800 |H | Short_Literal 0x0
0112 a5fd | | Store_Unchecked 0x2,-0x3
0113 00cf | | Action Mark_Auxiliary
0114 783e |x> | Jump 0x153
0115 00da | | Load_Top At_Offset_2
0116 e5fe | | Load 0x2,-0x2
0117 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0118 01d7 | | Execute Vector,Field_Read
0119 e5ff | | Load 0x2,-0x1
011a 01d7 | | Execute Vector,Field_Read
011b 4608 |F | Jump_Case 0x9
011c 7832 |x2 | Jump 0x14f ; case 0x0
011d 7831 |x1 | Jump 0x14f ; case 0x1
011e 7830 |x0 | Jump 0x14f ; case 0x2
011f 782f |x/ | Jump 0x14f ; case 0x3
0120 7804 |x | Jump 0x125 ; case 0x4
0121 780c |x | Jump 0x12e ; case 0x5
0122 7814 |x | Jump 0x137 ; case 0x6
0123 781c |x | Jump 0x140 ; case 0x7
0124 7824 |x$ | Jump 0x149 ; case 0x8
0125 00da | | Load_Top At_Offset_2
0126 e5fe | | Load 0x2,-0x2
0127 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0128 01d7 | | Execute Vector,Field_Read
0129 a5fd | | Store_Unchecked 0x2,-0x3
012a 00da | | Load_Top At_Offset_2
012b 0a01 | | Execute_Immediate Plus,0x1
012c 005b | [ | Store_Top Discrete,At_Offset_3
012d 7829 |x) | Jump 0x157
012e 00da | | Load_Top At_Offset_2
012f e5fe | | Load 0x2,-0x2
0130 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0131 01d7 | | Execute Vector,Field_Read
0132 a5fd | | Store_Unchecked 0x2,-0x3
0133 00da | | Load_Top At_Offset_2
0134 0a01 | | Execute_Immediate Plus,0x1
0135 005b | [ | Store_Top Discrete,At_Offset_3
0136 7820 |x | Jump 0x157
0137 00da | | Load_Top At_Offset_2
0138 e5fe | | Load 0x2,-0x2
0139 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
013a 01d7 | | Execute Vector,Field_Read
013b a5fd | | Store_Unchecked 0x2,-0x3
013c 00da | | Load_Top At_Offset_2
013d 0a01 | | Execute_Immediate Plus,0x1
013e 005b | [ | Store_Top Discrete,At_Offset_3
013f 7817 |x | Jump 0x157
0140 00da | | Load_Top At_Offset_2
0141 e5fe | | Load 0x2,-0x2
0142 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0143 01d7 | | Execute Vector,Field_Read
0144 a5fd | | Store_Unchecked 0x2,-0x3
0145 00da | | Load_Top At_Offset_2
0146 0a01 | | Execute_Immediate Plus,0x1
0147 005b | [ | Store_Top Discrete,At_Offset_3
0148 780e |x | Jump 0x157
0149 00da | | Load_Top At_Offset_2
014a e5fe | | Load 0x2,-0x2
014b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
014c 01d7 | | Execute Vector,Field_Read
014d a5fd | | Store_Unchecked 0x2,-0x3
014e 7808 |x | Jump 0x157
014f 00da | | Load_Top At_Offset_2
0150 0a01 | | Execute_Immediate Plus,0x1
0151 005b | [ | Store_Top Discrete,At_Offset_3
0152 00c9 | | Action Pop_Auxiliary_Loop
0153 00da | | Load_Top At_Offset_2
0154 00da | | Load_Top At_Offset_2
0155 027a | z | Execute Discrete,Less_Equal
0156 77be |w | Jump_Nonzero 0x115
0157 00ce | | Action Pop_Auxiliary
0158 00d8 | | Load_Top At_Offset_0
0159 00da | | Load_Top At_Offset_2
015a 0272 | r | Execute Discrete,Minus
015b 0a01 | | Execute_Immediate Plus,0x1
015c e5fe | | Load 0x2,-0x2
015d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
015e 00d9 | | Load_Top At_Offset_1
015f 00d9 | | Load_Top At_Offset_1
0160 e5fe | | Load 0x2,-0x2
0161 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0162 01cf | | Execute Vector,Slice_Read
0163 4801 |H | Short_Literal 0x1
0164 e5fe | | Load 0x2,-0x2
0165 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0166 e5fe | | Load 0x2,-0x2
0167 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0168 01ce | | Execute Vector,Slice_Write
0169 4502 |E | Exit_Suprogram New_Top_Offset 0x2
016a 0000 0000 | | .BLANK 0000[0x6]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173 | s | .CONST 0x0173 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0001 | | .CONST 0x0001 ; Number of locals
0173 BODY_0170:
0173 INIT_0170:
0173 00e8 | | Load_Encached Character_Cache
0174 00db | | Load_Top At_Offset_3
0175 0229 | ) | Execute Access,All_Read
0176 e5fe | | Load 0x2,-0x2
0177 8217 | | Call 0x1,0x17
0178 00d1 | | Pop_Control Pop_Count_1
0179 c5fd | | Store 0x2,-0x3
017a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
017b 0000 0000 | | .BLANK 0000[0x5]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0189 | | .CONST 0x0189 ; Address of begin
0181 0004 | | .CONST 0x0004 ; Address of exception handler
0182 0004 | | .CONST 0x0004 ; Number of locals
0183 INIT_0180:
0183 e20d | | Load 0x1,0xd
0184 0607 | | Execute_Immediate Set_Value_Unchecked,0x7
0185 e20d | | Load 0x1,0xd
0186 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0187 00e1 | | Load_Encached Boolean_Cache
0188 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0189 BODY_0180:
0189 00cf | | Action Mark_Auxiliary
018a e5fd | | Load 0x2,-0x3
018b 01d9 | | Execute Vector,Reverse_Bounds
018c 0263 | c | Execute Discrete,Above_Bound
018d 7059 |pY | Jump_Nonzero 0x1e7
018e 00d8 | | Load_Top At_Offset_0
018f e5fd | | Load 0x2,-0x3
0190 01d7 | | Execute Vector,Field_Read
0191 0b49 | I | Execute_Immediate Case_Compare,0x49
0192 701c |p | Jump_Nonzero 0x1af
0193 0b69 | i | Execute_Immediate Case_Compare,0x69
0194 701a |p | Jump_Nonzero 0x1af
0195 0b58 | X | Execute_Immediate Case_Compare,0x58
0196 701b |p | Jump_Nonzero 0x1b2
0197 0b78 | x | Execute_Immediate Case_Compare,0x78
0198 7019 |p | Jump_Nonzero 0x1b2
0199 0b41 | A | Execute_Immediate Case_Compare,0x41
019a 701a |p | Jump_Nonzero 0x1b5
019b 0b61 | a | Execute_Immediate Case_Compare,0x61
019c 7018 |p | Jump_Nonzero 0x1b5
019d 0b52 | R | Execute_Immediate Case_Compare,0x52
019e 702a |p* | Jump_Nonzero 0x1c9
019f 0b72 | r | Execute_Immediate Case_Compare,0x72
01a0 7028 |p( | Jump_Nonzero 0x1c9
01a1 0b53 | S | Execute_Immediate Case_Compare,0x53
01a2 7029 |p) | Jump_Nonzero 0x1cc
01a3 0b73 | s | Execute_Immediate Case_Compare,0x73
01a4 7027 |p' | Jump_Nonzero 0x1cc
01a5 0b55 | U | Execute_Immediate Case_Compare,0x55
01a6 7028 |p( | Jump_Nonzero 0x1cf
01a7 0b75 | u | Execute_Immediate Case_Compare,0x75
01a8 7026 |p& | Jump_Nonzero 0x1cf
01a9 0b4c | L | Execute_Immediate Case_Compare,0x4c
01aa 702f |p/ | Jump_Nonzero 0x1da
01ab 0b6c | l | Execute_Immediate Case_Compare,0x6c
01ac 702d |p- | Jump_Nonzero 0x1da
01ad 08e2 | | Execute_Immediate Raise,0xe2
01ae 7835 |x5 | .XXX[0x1]
01af 4801 |H | Short_Literal 0x1
01b0 a404 | | Store_Unchecked 0x2,0x4
01b1 7832 |x2 | Jump 0x1e4
01b2 4800 |H | Short_Literal 0x0
01b3 a404 | | Store_Unchecked 0x2,0x4
01b4 782f |x/ | Jump 0x1e4
01b5 e403 | | Load 0x2,0x3
01b6 4608 |F | Jump_Case 0x9
01b7 7808 |x | Jump 0x1c0 ; case 0x0
01b8 782b |x+ | Jump 0x1e4 ; case 0x1
01b9 7809 |x | Jump 0x1c3 ; case 0x2
01ba 780b |x | Jump 0x1c6 ; case 0x3
01bb 7828 |x( | Jump 0x1e4 ; case 0x4
01bc 7827 |x' | Jump 0x1e4 ; case 0x5
01bd 7826 |x& | Jump 0x1e4 ; case 0x6
01be 7825 |x% | Jump 0x1e4 ; case 0x7
01bf 7824 |x$ | Jump 0x1e4 ; case 0x8
01c0 4804 |H | Short_Literal 0x4
01c1 a402 | | Store_Unchecked 0x2,0x2
01c2 7821 |x! | Jump 0x1e4
01c3 4805 |H | Short_Literal 0x5
01c4 a402 | | Store_Unchecked 0x2,0x2
01c5 781e |x | Jump 0x1e4
01c6 4806 |H | Short_Literal 0x6
01c7 a402 | | Store_Unchecked 0x2,0x2
01c8 781b |x | Jump 0x1e4
01c9 4808 |H | Short_Literal 0x8
01ca a402 | | Store_Unchecked 0x2,0x2
01cb 7818 |x | Jump 0x1e4
01cc 4807 |H | Short_Literal 0x7
01cd a402 | | Store_Unchecked 0x2,0x2
01ce 7815 |x | Jump 0x1e4
01cf 4802 |H | Short_Literal 0x2
01d0 a403 | | Store_Unchecked 0x2,0x3
01d1 e402 | | Load 0x2,0x2
01d2 0e08 | | Execute_Immediate Not_Equal,0x8
01d3 6810 |h | Jump_Zero 0x1e4
01d4 e402 | | Load 0x2,0x2
01d5 0e07 | | Execute_Immediate Not_Equal,0x7
01d6 680d |h | Jump_Zero 0x1e4
01d7 4805 |H | Short_Literal 0x5
01d8 a402 | | Store_Unchecked 0x2,0x2
01d9 780a |x | Jump 0x1e4
01da 4803 |H | Short_Literal 0x3
01db a403 | | Store_Unchecked 0x2,0x3
01dc e402 | | Load 0x2,0x2
01dd 0e08 | | Execute_Immediate Not_Equal,0x8
01de 6805 |h | Jump_Zero 0x1e4
01df e402 | | Load 0x2,0x2
01e0 0e07 | | Execute_Immediate Not_Equal,0x7
01e1 6802 |h | Jump_Zero 0x1e4
01e2 4806 |H | Short_Literal 0x6
01e3 a402 | | Store_Unchecked 0x2,0x2
01e4 00d1 | | Pop_Control Pop_Count_1
01e5 00c8 | | Action Pop_Auxiliary_Range
01e6 3fa7 |? | Loop_Increasing 0x18e
01e7 00ce | | Action Pop_Auxiliary
01e8 00d8 | | Load_Top At_Offset_0
01e9 6811 |h | Jump_Zero 0x1fb
01ea e5fc | | Load 0x2,-0x4
01eb 00d8 | | Load_Top At_Offset_0
01ec 0335 | 5 | Declare_Variable Array,Duplicate
01ed 00d0 | | Action Swap_Control
01ee 00d1 | | Pop_Control Pop_Count_1
01ef 487f |H | Short_Literal 0x7f
01f0 4800 |H | Short_Literal 0x0
01f1 e403 | | Load 0x2,0x3
01f2 00d9 | | Load_Top At_Offset_1
01f3 e406 | | Load 0x2,0x6
01f4 01d6 | | Execute Vector,Field_Write
01f5 3ffb |? | Loop_Increasing 0x1f1
01f6 00d0 | | Action Swap_Control
01f7 00d1 | | Pop_Control Pop_Count_1
01f8 e5fc | | Load 0x2,-0x4
01f9 01d4 | | Execute Vector,Structure_Write
01fa 7810 |x | Jump 0x20b
01fb e5fc | | Load 0x2,-0x4
01fc 00d8 | | Load_Top At_Offset_0
01fd 0335 | 5 | Declare_Variable Array,Duplicate
01fe 00d0 | | Action Swap_Control
01ff 00d1 | | Pop_Control Pop_Count_1
0200 487f |H | Short_Literal 0x7f
0201 4800 |H | Short_Literal 0x0
0202 e402 | | Load 0x2,0x2
0203 00d9 | | Load_Top At_Offset_1
0204 e406 | | Load 0x2,0x6
0205 01d6 | | Execute Vector,Field_Write
0206 3ffb |? | Loop_Increasing 0x202
0207 00d0 | | Action Swap_Control
0208 00d1 | | Pop_Control Pop_Count_1
0209 e5fc | | Load 0x2,-0x4
020a 01d4 | | Execute Vector,Structure_Write
020b 00cf | | Action Mark_Auxiliary
020c e5fe | | Load 0x2,-0x2
020d 01d9 | | Execute Vector,Reverse_Bounds
020e 0263 | c | Execute Discrete,Above_Bound
020f 7008 |p | Jump_Nonzero 0x218
0210 4801 |H | Short_Literal 0x1
0211 00d9 | | Load_Top At_Offset_1
0212 e5fe | | Load 0x2,-0x2
0213 01d7 | | Execute Vector,Field_Read
0214 e5fc | | Load 0x2,-0x4
0215 01d6 | | Execute Vector,Field_Write
0216 00c8 | | Action Pop_Auxiliary_Range
0217 3ff8 |? | Loop_Increasing 0x210
0218 00ce | | Action Pop_Auxiliary
0219 00d8 | | Load_Top At_Offset_0
021a 680f |h | Jump_Zero 0x22a
021b 00cf | | Action Mark_Auxiliary
021c e5ff | | Load 0x2,-0x1
021d 01d9 | | Execute Vector,Reverse_Bounds
021e 0263 | c | Execute Discrete,Above_Bound
021f 7008 |p | Jump_Nonzero 0x228
0220 e402 | | Load 0x2,0x2
0221 00d9 | | Load_Top At_Offset_1
0222 e5ff | | Load 0x2,-0x1
0223 01d7 | | Execute Vector,Field_Read
0224 e5fc | | Load 0x2,-0x4
0225 01d6 | | Execute Vector,Field_Write
0226 00c8 | | Action Pop_Auxiliary_Range
0227 3ff8 |? | Loop_Increasing 0x220
0228 00ce | | Action Pop_Auxiliary
0229 4504 |E | Exit_Suprogram New_Top_Offset 0x4
022a 00cf | | Action Mark_Auxiliary
022b e5ff | | Load 0x2,-0x1
022c 01d9 | | Execute Vector,Reverse_Bounds
022d 0263 | c | Execute Discrete,Above_Bound
022e 7008 |p | Jump_Nonzero 0x237
022f e403 | | Load 0x2,0x3
0230 00d9 | | Load_Top At_Offset_1
0231 e5ff | | Load 0x2,-0x1
0232 01d7 | | Execute Vector,Field_Read
0233 e5fc | | Load 0x2,-0x4
0234 01d6 | | Execute Vector,Field_Write
0235 00c8 | | Action Pop_Auxiliary_Range
0236 3ff8 |? | Loop_Increasing 0x22f
0237 00ce | | Action Pop_Auxiliary
0238 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0239 0000 0000 | | .BLANK 0000[0x7]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 024c | L | .CONST 0x024c ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0004 | | .CONST 0x0004 ; Number of locals
0243 INIT_0240:
0243 00da | | Load_Top At_Offset_2
0244 00e3 | | Load_Encached Natural_Cache
0245 03f1 | | Declare_Variable Discrete,With_Value
0246 00e3 | | Load_Encached Natural_Cache
0247 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
0248 e5fc | | Load 0x2,-0x4
0249 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
024a 00e3 | | Load_Encached Natural_Cache
024b 03f1 | | Declare_Variable Discrete,With_Value
024c BODY_0240:
024c 4800 |H | Short_Literal 0x0
024d a5fb | | Store_Unchecked 0x2,-0x5
024e 00d8 | | Load_Top At_Offset_0
024f e5fd | | Load 0x2,-0x3
0250 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0251 027d | } | Execute Discrete,Greater
0252 6803 |h | Jump_Zero 0x256
0253 e5fd | | Load 0x2,-0x3
0254 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0255 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0256 00cf | | Action Mark_Auxiliary
0257 7894 |x | Jump 0x2ec
0258 00da | | Load_Top At_Offset_2
0259 e5fc | | Load 0x2,-0x4
025a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
025b 01d7 | | Execute Vector,Field_Read
025c e5fe | | Load 0x2,-0x2
025d 01d7 | | Execute Vector,Field_Read
025e 4608 |F | Jump_Case 0x9
025f 7808 |x | Jump 0x268 ; case 0x0
0260 7887 |x | Jump 0x2e8 ; case 0x1
0261 7812 |x | Jump 0x274 ; case 0x2
0262 7820 |x | Jump 0x283 ; case 0x3
0263 782e |x. | Jump 0x292 ; case 0x4
0264 7842 |xB | Jump 0x2a7 ; case 0x5
0265 7859 |xY | Jump 0x2bf ; case 0x6
0266 7870 |xp | Jump 0x2d7 ; case 0x7
0267 7879 |xy | Jump 0x2e1 ; case 0x8
0268 00db | | Load_Top At_Offset_3
0269 0a01 | | Execute_Immediate Plus,0x1
026a c402 | | Store 0x2,0x2
026b 00da | | Load_Top At_Offset_2
026c e5fc | | Load 0x2,-0x4
026d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
026e 01d7 | | Execute Vector,Field_Read
026f e402 | | Load 0x2,0x2
0270 e5fd | | Load 0x2,-0x3
0271 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0272 01d6 | | Execute Vector,Field_Write
0273 7874 |xt | Jump 0x2e8
0274 00db | | Load_Top At_Offset_3
0275 0a01 | | Execute_Immediate Plus,0x1
0276 c402 | | Store 0x2,0x2
0277 00da | | Load_Top At_Offset_2
0278 e5fc | | Load 0x2,-0x4
0279 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
027a 01d7 | | Execute Vector,Field_Read
027b e001 | | Load 0x0,0x1
027c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
027d 01d7 | | Execute Vector,Field_Read
027e e402 | | Load 0x2,0x2
027f e5fd | | Load 0x2,-0x3
0280 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0281 01d6 | | Execute Vector,Field_Write
0282 7865 |xe | Jump 0x2e8
0283 00db | | Load_Top At_Offset_3
0284 0a01 | | Execute_Immediate Plus,0x1
0285 c402 | | Store 0x2,0x2
0286 00da | | Load_Top At_Offset_2
0287 e5fc | | Load 0x2,-0x4
0288 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0289 01d7 | | Execute Vector,Field_Read
028a e001 | | Load 0x0,0x1
028b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
028c 01d7 | | Execute Vector,Field_Read
028d e402 | | Load 0x2,0x2
028e e5fd | | Load 0x2,-0x3
028f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0290 01d6 | | Execute Vector,Field_Write
0291 7856 |xV | Jump 0x2e8
0292 00db | | Load_Top At_Offset_3
0293 0a01 | | Execute_Immediate Plus,0x1
0294 c402 | | Store 0x2,0x2
0295 00da | | Load_Top At_Offset_2
0296 e5fc | | Load 0x2,-0x4
0297 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0298 01d7 | | Execute Vector,Field_Read
0299 e402 | | Load 0x2,0x2
029a e5fd | | Load 0x2,-0x3
029b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
029c 01d6 | | Execute Vector,Field_Write
029d 00da | | Load_Top At_Offset_2
029e e5fc | | Load 0x2,-0x4
029f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02a0 01d7 | | Execute Vector,Field_Read
02a1 a5fb | | Store_Unchecked 0x2,-0x5
02a2 00da | | Load_Top At_Offset_2
02a3 0a01 | | Execute_Immediate Plus,0x1
02a4 005b | [ | Store_Top Discrete,At_Offset_3
02a5 00ce | | Action Pop_Auxiliary
02a6 7893 |x | Jump 0x33a
02a7 00db | | Load_Top At_Offset_3
02a8 0a01 | | Execute_Immediate Plus,0x1
02a9 c402 | | Store 0x2,0x2
02aa 00da | | Load_Top At_Offset_2
02ab e5fc | | Load 0x2,-0x4
02ac 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02ad 01d7 | | Execute Vector,Field_Read
02ae e001 | | Load 0x0,0x1
02af 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02b0 01d7 | | Execute Vector,Field_Read
02b1 e402 | | Load 0x2,0x2
02b2 e5fd | | Load 0x2,-0x3
02b3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02b4 01d6 | | Execute Vector,Field_Write
02b5 00da | | Load_Top At_Offset_2
02b6 e5fc | | Load 0x2,-0x4
02b7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02b8 01d7 | | Execute Vector,Field_Read
02b9 a5fb | | Store_Unchecked 0x2,-0x5
02ba 00da | | Load_Top At_Offset_2
02bb 0a01 | | Execute_Immediate Plus,0x1
02bc 005b | [ | Store_Top Discrete,At_Offset_3
02bd 00ce | | Action Pop_Auxiliary
02be 787b |x{ | Jump 0x33a
02bf 00db | | Load_Top At_Offset_3
02c0 0a01 | | Execute_Immediate Plus,0x1
02c1 c402 | | Store 0x2,0x2
02c2 00da | | Load_Top At_Offset_2
02c3 e5fc | | Load 0x2,-0x4
02c4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02c5 01d7 | | Execute Vector,Field_Read
02c6 e001 | | Load 0x0,0x1
02c7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02c8 01d7 | | Execute Vector,Field_Read
02c9 e402 | | Load 0x2,0x2
02ca e5fd | | Load 0x2,-0x3
02cb 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02cc 01d6 | | Execute Vector,Field_Write
02cd 00da | | Load_Top At_Offset_2
02ce e5fc | | Load 0x2,-0x4
02cf 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02d0 01d7 | | Execute Vector,Field_Read
02d1 a5fb | | Store_Unchecked 0x2,-0x5
02d2 00da | | Load_Top At_Offset_2
02d3 0a01 | | Execute_Immediate Plus,0x1
02d4 005b | [ | Store_Top Discrete,At_Offset_3
02d5 00ce | | Action Pop_Auxiliary
02d6 7863 |xc | Jump 0x33a
02d7 00da | | Load_Top At_Offset_2
02d8 e5fc | | Load 0x2,-0x4
02d9 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02da 01d7 | | Execute Vector,Field_Read
02db a5fb | | Store_Unchecked 0x2,-0x5
02dc 00da | | Load_Top At_Offset_2
02dd 0a01 | | Execute_Immediate Plus,0x1
02de 005b | [ | Store_Top Discrete,At_Offset_3
02df 00ce | | Action Pop_Auxiliary
02e0 7859 |xY | Jump 0x33a
02e1 00da | | Load_Top At_Offset_2
02e2 e5fc | | Load 0x2,-0x4
02e3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02e4 01d7 | | Execute Vector,Field_Read
02e5 a5fb | | Store_Unchecked 0x2,-0x5
02e6 00ce | | Action Pop_Auxiliary
02e7 7852 |xR | Jump 0x33a
02e8 00da | | Load_Top At_Offset_2
02e9 0a01 | | Execute_Immediate Plus,0x1
02ea 005b | [ | Store_Top Discrete,At_Offset_3
02eb 00c9 | | Action Pop_Auxiliary_Loop
02ec 00da | | Load_Top At_Offset_2
02ed 00da | | Load_Top At_Offset_2
02ee 027a | z | Execute Discrete,Less_Equal
02ef 7768 |wh | Jump_Nonzero 0x258
02f0 00ce | | Action Pop_Auxiliary
02f1 e5fc | | Load 0x2,-0x4
02f2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02f3 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
02f4 00cf | | Action Mark_Auxiliary
02f5 783e |x> | Jump 0x334
02f6 00da | | Load_Top At_Offset_2
02f7 e5fc | | Load 0x2,-0x4
02f8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02f9 01d7 | | Execute Vector,Field_Read
02fa e5fe | | Load 0x2,-0x2
02fb 01d7 | | Execute Vector,Field_Read
02fc 4608 |F | Jump_Case 0x9
02fd 7832 |x2 | Jump 0x330 ; case 0x0
02fe 7831 |x1 | Jump 0x330 ; case 0x1
02ff 7830 |x0 | Jump 0x330 ; case 0x2
0300 782f |x/ | Jump 0x330 ; case 0x3
0301 7804 |x | Jump 0x306 ; case 0x4
0302 780c |x | Jump 0x30f ; case 0x5
0303 7814 |x | Jump 0x318 ; case 0x6
0304 781c |x | Jump 0x321 ; case 0x7
0305 7824 |x$ | Jump 0x32a ; case 0x8
0306 00da | | Load_Top At_Offset_2
0307 e5fc | | Load 0x2,-0x4
0308 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0309 01d7 | | Execute Vector,Field_Read
030a a5fb | | Store_Unchecked 0x2,-0x5
030b 00da | | Load_Top At_Offset_2
030c 0a01 | | Execute_Immediate Plus,0x1
030d 005b | [ | Store_Top Discrete,At_Offset_3
030e 7829 |x) | Jump 0x338
030f 00da | | Load_Top At_Offset_2
0310 e5fc | | Load 0x2,-0x4
0311 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0312 01d7 | | Execute Vector,Field_Read
0313 a5fb | | Store_Unchecked 0x2,-0x5
0314 00da | | Load_Top At_Offset_2
0315 0a01 | | Execute_Immediate Plus,0x1
0316 005b | [ | Store_Top Discrete,At_Offset_3
0317 7820 |x | Jump 0x338
0318 00da | | Load_Top At_Offset_2
0319 e5fc | | Load 0x2,-0x4
031a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
031b 01d7 | | Execute Vector,Field_Read
031c a5fb | | Store_Unchecked 0x2,-0x5
031d 00da | | Load_Top At_Offset_2
031e 0a01 | | Execute_Immediate Plus,0x1
031f 005b | [ | Store_Top Discrete,At_Offset_3
0320 7817 |x | Jump 0x338
0321 00da | | Load_Top At_Offset_2
0322 e5fc | | Load 0x2,-0x4
0323 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0324 01d7 | | Execute Vector,Field_Read
0325 a5fb | | Store_Unchecked 0x2,-0x5
0326 00da | | Load_Top At_Offset_2
0327 0a01 | | Execute_Immediate Plus,0x1
0328 005b | [ | Store_Top Discrete,At_Offset_3
0329 780e |x | Jump 0x338
032a 00da | | Load_Top At_Offset_2
032b e5fc | | Load 0x2,-0x4
032c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
032d 01d7 | | Execute Vector,Field_Read
032e a5fb | | Store_Unchecked 0x2,-0x5
032f 7808 |x | Jump 0x338
0330 00da | | Load_Top At_Offset_2
0331 0a01 | | Execute_Immediate Plus,0x1
0332 005b | [ | Store_Top Discrete,At_Offset_3
0333 00c9 | | Action Pop_Auxiliary_Loop
0334 00da | | Load_Top At_Offset_2
0335 00da | | Load_Top At_Offset_2
0336 027a | z | Execute Discrete,Less_Equal
0337 77be |w | Jump_Nonzero 0x2f6
0338 00ce | | Action Pop_Auxiliary
0339 0007 | | Action Break_Optional
033a e5fc | | Load 0x2,-0x4
033b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
033c 00da | | Load_Top At_Offset_2
033d 0272 | r | Execute Discrete,Minus
033e 0a01 | | Execute_Immediate Plus,0x1
033f 0059 | Y | Store_Top Discrete,At_Offset_1
0340 00d9 | | Load_Top At_Offset_1
0341 e5fc | | Load 0x2,-0x4
0342 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0343 e5fc | | Load 0x2,-0x4
0344 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0345 01cf | | Execute Vector,Slice_Read
0346 4801 |H | Short_Literal 0x1
0347 00da | | Load_Top At_Offset_2
0348 e5fc | | Load 0x2,-0x4
0349 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
034a 01ce | | Execute Vector,Slice_Write
034b 00d8 | | Load_Top At_Offset_0
034c e5fc | | Load 0x2,-0x4
034d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
034e 00da | | Load_Top At_Offset_2
034f e5fd | | Load 0x2,-0x3
0350 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0351 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0352 ; --------------------------------------------------------------------------------------
0352 ; STRING TABLE
0352 ; --------------------------------------------------------------------------------------
0352 0014 | | .STRTAB 0x0014->0x035c ; "SA_TRANSFER"
0353 001d | | .STRTAB 0x001d->0x0361 ; "SA_SKIP"
0354 0022 | " | .STRTAB 0x0022->0x0365 ; "SA_TRANSFER_UC"
0355 002e | . | .STRTAB 0x002e->0x036c ; "SA_TRANSFER_LC"
0356 003a | : | .STRTAB 0x003a->0x0373 ; "SA_TRANSFER_BREAK"
0357 0049 | I | .STRTAB 0x0049->0x037b ; "SA_TRANSFER_UC_BREAK"
0358 005b | [ | .STRTAB 0x005b->0x0385 ; "SA_TRANSFER_LC_BREAK"
0359 006d | m | .STRTAB 0x006d->0x038f ; "SA_SKIP_BREAK"
035a 0078 | x | .STRTAB 0x0078->0x0396 ; "SA_RETAIN_BREAK"
035b 0085 | | .STREND 0x0085->0x039d
035c 5341 5f54 |SA_T| .STRTAB_STRINGS
039e 0000 0000 | | .XXX[0x2]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; Debug Table
03a0 ; --------------------------------------------------------------------------------------
03a0 0004 0004 | | .DEBUG4 0x0004,0x0004,0xa8ed,0x0000,0x0001,0x0000
03a6 8080 8080 | | .BLANK 8080[0x8]
03ae 8081 3d89 | = | .XXX[0x20]
03b0 a995 8dd1 | |
03b2 cd7d 51bd | }Q |
03b4 7d41 c9a5 |}A |
03b6 b9d0 a4a4 | |
03b8 ec28 8080 | ( |
03ba 8081 8995 | |
03bc 9da5 b828 | (|
03be 8080 8080 | |
03c0 8080 8081 | |
03c2 8d85 cd94 | |
03c4 8115 c9c9 | |
03c6 bdc9 7d0d | } |
03c8 85d1 959d | |
03ca bdc9 e481 | |
03cc a5cc 2828 | ((|
03ce 8080 8080 | | .BLANK 8080[0x5]
03d3 8081 dda1 | | .XXX[0xf]
03d5 95b8 813d | =|
03d7 89a9 958d | |
03d9 d0b9 4dd5 | M |
03db 8d8d 95cd | |
03dd cd99 d5b0 | |
03df 81f0 8080 | |
03e1 2880 |( |
03e2 8080 8080 | | .BLANK 8080[0x7]
03e9 8081 3d89 | = | .XXX[0xb]
03eb a995 8dd0 | |
03ed b95d 85c9 | ] |
03ef b9a5 b99c | |
03f1 80f4 f828 | (|
03f3 2880 |( |
03f4 8080 8080 | | .BLANK 8080[0x7]
03fb 811d 95d1 | | .XXX[0x5]
03fd 7d45 d595 |}E |
03ff d595 | |