|
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, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0534f8
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 0408 | | .CONST 0x0408 ; 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 0093 | | Declare_Subprogram INIT_0090,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 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated 002c c21b | | Store 0x1,0x1b 002d 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated 002f c21c | | Store 0x1,0x1c 0030 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated 0032 c21d | | Store 0x1,0x1d 0033 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated 0035 c213 | | Store 0x1,0x13 0036 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated 0038 c21e | | Store 0x1,0x1e 0039 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated 003b c215 | | Store 0x1,0x15 003c 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated 003e c221 | ! | Store 0x1,0x21 003f 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated 0041 c217 | | Store 0x1,0x17 0042 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated 0044 c218 | | Store 0x1,0x18 0045 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated 0047 c219 | | Store 0x1,0x19 0048 00bf | | Action Accept_Activation 0049 029d 02ab | | Declare_Subprogram INIT_02a8,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 4607 |F | Jump_Case 0x8 006c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 006d 7806 |x | Jump 0x74 ; case 0x1 006e 7809 |x | Jump 0x78 ; case 0x2 006f 780d |x | Jump 0x7d ; case 0x3 0070 7810 |x | Jump 0x81 ; case 0x4 0071 7811 |x | Jump 0x83 ; case 0x5 0072 7812 |x | Jump 0x85 ; case 0x6 0073 7815 |x | Jump 0x89 ; case 0x7 0074 00da | | Load_Top At_Offset_2 0075 0091 03b9 | | Action Push_String_Extended_Indexed,0x3b9 ; "SA_TRANSFER" 0077 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0078 00db | | Load_Top At_Offset_3 0079 00db | | Load_Top At_Offset_3 007a 00e0 | | Load_Encached Standard_Cache 007b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 007c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 007d 00da | | Load_Top At_Offset_2 007e 00e0 | | Load_Encached Standard_Cache 007f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0080 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0081 00db | | Load_Top At_Offset_3 0082 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0083 00db | | Load_Top At_Offset_3 0084 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0085 e20d | | Load 0x1,0xd 0086 00dc | | Load_Top At_Offset_4 0087 0267 | g | Execute Discrete,Predecessor 0088 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0089 e20d | | Load 0x1,0xd 008a 00dc | | Load_Top At_Offset_4 008b 0268 | h | Execute Discrete,Successor 008c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 008d 0000 0000 | | .XXX[0x3] 008f 0000 | | 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 e5fd | | Load 0x2,-0x3 0095 e5fe | | Load 0x2,-0x2 0096 e5ff | | Load 0x2,-0x1 0097 4800 |H | Short_Literal 0x0 0098 8222 | " | Call 0x1,0x22 0099 00d2 | | Pop_Control Pop_Count_2 009a c5fc | | Store 0x2,-0x4 009b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 009c 0000 0000 | | .BLANK 0000[0x4] 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 00db | | Load_Top At_Offset_3 00a5 0229 | ) | Execute Access,All_Read 00a6 e5fd | | Load 0x2,-0x3 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 e5fd | | Load 0x2,-0x3 00b5 e5ff | | Load 0x2,-0x1 00b6 0229 | ) | Execute Access,All_Read 00b7 e5fe | | Load 0x2,-0x2 00b8 4800 |H | Short_Literal 0x0 00b9 8222 | " | Call 0x1,0x22 00ba 00d2 | | Pop_Control Pop_Count_2 00bb c5fc | | Store 0x2,-0x4 00bc 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00bd 0000 0000 | | .XXX[0x3] 00bf 0000 | | 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 e5fe | | Load 0x2,-0x2 00c5 0229 | ) | Execute Access,All_Read 00c6 e5ff | | Load 0x2,-0x1 00c7 0229 | ) | Execute Access,All_Read 00c8 e5fd | | Load 0x2,-0x3 00c9 4800 |H | Short_Literal 0x0 00ca 8222 | " | Call 0x1,0x22 00cb 00d2 | | Pop_Control Pop_Count_2 00cc c5fc | | Store 0x2,-0x4 00cd 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00ce 0000 0000 | | .XXX[0x2] 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 e5fd | | Load 0x2,-0x3 00d5 e5fe | | Load 0x2,-0x2 00d6 e5ff | | Load 0x2,-0x1 00d7 e5fe | | Load 0x2,-0x2 00d8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 00d9 8222 | " | Call 0x1,0x22 00da 00d2 | | Pop_Control Pop_Count_2 00db c5fc | | Store 0x2,-0x4 00dc 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00dd 0000 0000 | | .XXX[0x3] 00df 0000 | | 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 00e8 | | Load_Encached Character_Cache 00e4 00db | | Load_Top At_Offset_3 00e5 0229 | ) | Execute Access,All_Read 00e6 e5fd | | Load 0x2,-0x3 00e7 e5fe | | Load 0x2,-0x2 00e8 e5fd | | Load 0x2,-0x3 00e9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 00ea 8222 | " | Call 0x1,0x22 00eb 00d2 | | Pop_Control Pop_Count_2 00ec c5fc | | Store 0x2,-0x4 00ed 4503 |E | Exit_Suprogram New_Top_Offset 0x3 00ee 0000 0000 | | .XXX[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 00db | | Load_Top At_Offset_3 00f4 0229 | ) | Execute Access,All_Read 00f5 00e8 | | Load_Encached Character_Cache 00f6 e5fd | | Load 0x2,-0x3 00f7 00da | | Load_Top At_Offset_2 00f8 e5ff | | Load 0x2,-0x1 00f9 e5fe | | Load 0x2,-0x2 00fa 0227 | ' | Execute Access,All_Reference 00fb 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 00fc 8222 | " | Call 0x1,0x22 00fd 00d2 | | Pop_Control Pop_Count_2 00fe c5fc | | Store 0x2,-0x4 00ff 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 0103 | | .CONST 0x0103 ; Address of begin 0101 0004 | | .CONST 0x0004 ; Address of exception handler 0102 0001 | | .CONST 0x0001 ; Number of locals 0103 BODY_0100: 0103 INIT_0100: 0103 e5fd | | Load 0x2,-0x3 0104 0229 | ) | Execute Access,All_Read 0105 00e8 | | Load_Encached Character_Cache 0106 e5ff | | Load 0x2,-0x1 0107 0229 | ) | Execute Access,All_Read 0108 00da | | Load_Top At_Offset_2 0109 e5fe | | Load 0x2,-0x2 010a e5fd | | Load 0x2,-0x3 010b 0227 | ' | Execute Access,All_Reference 010c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 010d 8222 | " | Call 0x1,0x22 010e 00d2 | | Pop_Control Pop_Count_2 010f c5fc | | Store 0x2,-0x4 0110 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0111 0000 0000 | | .BLANK 0000[0x7] 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 0121 | ! | .CONST 0x0121 ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0003 | | .CONST 0x0003 ; Number of locals 011b INIT_0118: 011b 00e3 | | Load_Encached Natural_Cache 011c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 011d e5fe | | Load 0x2,-0x2 011e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 011f 00e3 | | Load_Encached Natural_Cache 0120 03f1 | | Declare_Variable Discrete,With_Value 0121 BODY_0118: 0121 4800 |H | Short_Literal 0x0 0122 a5fd | | Store_Unchecked 0x2,-0x3 0123 00cf | | Action Mark_Auxiliary 0124 783e |x> | Jump 0x163 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 e5ff | | Load 0x2,-0x1 012a 01d7 | | Execute Vector,Field_Read 012b 4608 |F | Jump_Case 0x9 012c 7832 |x2 | Jump 0x15f ; case 0x0 012d 7831 |x1 | Jump 0x15f ; case 0x1 012e 7830 |x0 | Jump 0x15f ; case 0x2 012f 782f |x/ | Jump 0x15f ; case 0x3 0130 780a |x | Jump 0x13b ; case 0x4 0131 7812 |x | Jump 0x144 ; case 0x5 0132 781a |x | Jump 0x14d ; case 0x6 0133 7822 |x" | Jump 0x156 ; case 0x7 0134 7800 |x | Jump 0x135 ; case 0x8 0135 00da | | Load_Top At_Offset_2 0136 e5fe | | Load 0x2,-0x2 0137 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0138 01d7 | | Execute Vector,Field_Read 0139 a5fd | | Store_Unchecked 0x2,-0x3 013a 782c |x, | Jump 0x167 013b 00da | | Load_Top At_Offset_2 013c e5fe | | Load 0x2,-0x2 013d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 013e 01d7 | | Execute Vector,Field_Read 013f a5fd | | Store_Unchecked 0x2,-0x3 0140 00da | | Load_Top At_Offset_2 0141 0a01 | | Execute_Immediate Plus,0x1 0142 005b | [ | Store_Top Discrete,At_Offset_3 0143 7823 |x# | Jump 0x167 0144 00da | | Load_Top At_Offset_2 0145 e5fe | | Load 0x2,-0x2 0146 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0147 01d7 | | Execute Vector,Field_Read 0148 a5fd | | Store_Unchecked 0x2,-0x3 0149 00da | | Load_Top At_Offset_2 014a 0a01 | | Execute_Immediate Plus,0x1 014b 005b | [ | Store_Top Discrete,At_Offset_3 014c 781a |x | Jump 0x167 014d 00da | | Load_Top At_Offset_2 014e e5fe | | Load 0x2,-0x2 014f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0150 01d7 | | Execute Vector,Field_Read 0151 a5fd | | Store_Unchecked 0x2,-0x3 0152 00da | | Load_Top At_Offset_2 0153 0a01 | | Execute_Immediate Plus,0x1 0154 005b | [ | Store_Top Discrete,At_Offset_3 0155 7811 |x | Jump 0x167 0156 00da | | Load_Top At_Offset_2 0157 e5fe | | Load 0x2,-0x2 0158 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0159 01d7 | | Execute Vector,Field_Read 015a a5fd | | Store_Unchecked 0x2,-0x3 015b 00da | | Load_Top At_Offset_2 015c 0a01 | | Execute_Immediate Plus,0x1 015d 005b | [ | Store_Top Discrete,At_Offset_3 015e 7808 |x | Jump 0x167 015f 00da | | Load_Top At_Offset_2 0160 0a01 | | Execute_Immediate Plus,0x1 0161 005b | [ | Store_Top Discrete,At_Offset_3 0162 00c9 | | Action Pop_Auxiliary_Loop 0163 00da | | Load_Top At_Offset_2 0164 00da | | Load_Top At_Offset_2 0165 027a | z | Execute Discrete,Less_Equal 0166 77be |w | Jump_Nonzero 0x125 0167 00ce | | Action Pop_Auxiliary 0168 00d8 | | Load_Top At_Offset_0 0169 00da | | Load_Top At_Offset_2 016a 0272 | r | Execute Discrete,Minus 016b 0a01 | | Execute_Immediate Plus,0x1 016c e5fe | | Load 0x2,-0x2 016d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 016e 00d9 | | Load_Top At_Offset_1 016f 00d9 | | Load_Top At_Offset_1 0170 e5fe | | Load 0x2,-0x2 0171 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0172 01cf | | Execute Vector,Slice_Read 0173 4801 |H | Short_Literal 0x1 0174 e5fe | | Load 0x2,-0x2 0175 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0176 e5fe | | Load 0x2,-0x2 0177 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0178 01ce | | Execute Vector,Slice_Write 0179 4502 |E | Exit_Suprogram New_Top_Offset 0x2 017a 0000 0000 | | .BLANK 0000[0x6] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0183 | | .CONST 0x0183 ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0001 | | .CONST 0x0001 ; Number of locals 0183 BODY_0180: 0183 INIT_0180: 0183 00e8 | | Load_Encached Character_Cache 0184 00db | | Load_Top At_Offset_3 0185 0229 | ) | Execute Access,All_Read 0186 e5fe | | Load 0x2,-0x2 0187 8217 | | Call 0x1,0x17 0188 00d1 | | Pop_Control Pop_Count_1 0189 c5fd | | Store 0x2,-0x3 018a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 018b 0000 0000 | | .BLANK 0000[0x5] 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0199 | | .CONST 0x0199 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0004 | | .CONST 0x0004 ; Number of locals 0193 INIT_0190: 0193 e20d | | Load 0x1,0xd 0194 0607 | | Execute_Immediate Set_Value_Unchecked,0x7 0195 e20d | | Load 0x1,0xd 0196 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0197 00e1 | | Load_Encached Boolean_Cache 0198 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0199 BODY_0190: 0199 00cf | | Action Mark_Auxiliary 019a e5fd | | Load 0x2,-0x3 019b 01d9 | | Execute Vector,Reverse_Bounds 019c 0263 | c | Execute Discrete,Above_Bound 019d 70bc |p | Jump_Nonzero 0x25a 019e 00d8 | | Load_Top At_Offset_0 019f e5fd | | Load 0x2,-0x3 01a0 01d7 | | Execute Vector,Field_Read 01a1 467f |F | Jump_Case 0x80 01a2 787f |x | Jump 0x222 ; case 0x0 01a3 787e |x~ | Jump 0x222 ; case 0x1 01a4 787d |x} | Jump 0x222 ; case 0x2 01a5 787c |x| | Jump 0x222 ; case 0x3 01a6 787b |x{ | Jump 0x222 ; case 0x4 01a7 787a |xz | Jump 0x222 ; case 0x5 01a8 7879 |xy | Jump 0x222 ; case 0x6 01a9 7878 |xx | Jump 0x222 ; case 0x7 01aa 7877 |xw | Jump 0x222 ; case 0x8 01ab 7876 |xv | Jump 0x222 ; case 0x9 01ac 7875 |xu | Jump 0x222 ; case 0xa 01ad 7874 |xt | Jump 0x222 ; case 0xb 01ae 7873 |xs | Jump 0x222 ; case 0xc 01af 7872 |xr | Jump 0x222 ; case 0xd 01b0 7871 |xq | Jump 0x222 ; case 0xe 01b1 7870 |xp | Jump 0x222 ; case 0xf 01b2 786f |xo | Jump 0x222 ; case 0x10 01b3 786e |xn | Jump 0x222 ; case 0x11 01b4 786d |xm | Jump 0x222 ; case 0x12 01b5 786c |xl | Jump 0x222 ; case 0x13 01b6 786b |xk | Jump 0x222 ; case 0x14 01b7 786a |xj | Jump 0x222 ; case 0x15 01b8 7869 |xi | Jump 0x222 ; case 0x16 01b9 7868 |xh | Jump 0x222 ; case 0x17 01ba 7867 |xg | Jump 0x222 ; case 0x18 01bb 7866 |xf | Jump 0x222 ; case 0x19 01bc 7865 |xe | Jump 0x222 ; case 0x1a 01bd 7864 |xd | Jump 0x222 ; case 0x1b 01be 7863 |xc | Jump 0x222 ; case 0x1c 01bf 7862 |xb | Jump 0x222 ; case 0x1d 01c0 7861 |xa | Jump 0x222 ; case 0x1e 01c1 7860 |x` | Jump 0x222 ; case 0x1f 01c2 785f |x_ | Jump 0x222 ; case 0x20 01c3 785e |x^ | Jump 0x222 ; case 0x21 01c4 785d |x] | Jump 0x222 ; case 0x22 01c5 785c |x\ | Jump 0x222 ; case 0x23 01c6 785b |x[ | Jump 0x222 ; case 0x24 01c7 785a |xZ | Jump 0x222 ; case 0x25 01c8 7859 |xY | Jump 0x222 ; case 0x26 01c9 7858 |xX | Jump 0x222 ; case 0x27 01ca 7857 |xW | Jump 0x222 ; case 0x28 01cb 7856 |xV | Jump 0x222 ; case 0x29 01cc 7855 |xU | Jump 0x222 ; case 0x2a 01cd 7854 |xT | Jump 0x222 ; case 0x2b 01ce 7853 |xS | Jump 0x222 ; case 0x2c 01cf 7852 |xR | Jump 0x222 ; case 0x2d 01d0 7851 |xQ | Jump 0x222 ; case 0x2e 01d1 7850 |xP | Jump 0x222 ; case 0x2f 01d2 784f |xO | Jump 0x222 ; case 0x30 01d3 784e |xN | Jump 0x222 ; case 0x31 01d4 784d |xM | Jump 0x222 ; case 0x32 01d5 784c |xL | Jump 0x222 ; case 0x33 01d6 784b |xK | Jump 0x222 ; case 0x34 01d7 784a |xJ | Jump 0x222 ; case 0x35 01d8 7849 |xI | Jump 0x222 ; case 0x36 01d9 7848 |xH | Jump 0x222 ; case 0x37 01da 7847 |xG | Jump 0x222 ; case 0x38 01db 7846 |xF | Jump 0x222 ; case 0x39 01dc 7845 |xE | Jump 0x222 ; case 0x3a 01dd 7844 |xD | Jump 0x222 ; case 0x3b 01de 7843 |xC | Jump 0x222 ; case 0x3c 01df 7842 |xB | Jump 0x222 ; case 0x3d 01e0 7841 |xA | Jump 0x222 ; case 0x3e 01e1 7840 |x@ | Jump 0x222 ; case 0x3f 01e2 783f |x? | Jump 0x222 ; case 0x40 01e3 7845 |xE | Jump 0x229 ; case 0x41 01e4 783d |x= | Jump 0x222 ; case 0x42 01e5 783c |x< | Jump 0x222 ; case 0x43 01e6 783b |x; | Jump 0x222 ; case 0x44 01e7 783a |x: | Jump 0x222 ; case 0x45 01e8 7839 |x9 | Jump 0x222 ; case 0x46 01e9 7838 |x8 | Jump 0x222 ; case 0x47 01ea 7837 |x7 | Jump 0x222 ; case 0x48 01eb 7837 |x7 | Jump 0x223 ; case 0x49 01ec 7835 |x5 | Jump 0x222 ; case 0x4a 01ed 7834 |x4 | Jump 0x222 ; case 0x4b 01ee 785f |x_ | Jump 0x24e ; case 0x4c 01ef 7832 |x2 | Jump 0x222 ; case 0x4d 01f0 7831 |x1 | Jump 0x222 ; case 0x4e 01f1 7830 |x0 | Jump 0x222 ; case 0x4f 01f2 782f |x/ | Jump 0x222 ; case 0x50 01f3 782e |x. | Jump 0x222 ; case 0x51 01f4 7848 |xH | Jump 0x23d ; case 0x52 01f5 784a |xJ | Jump 0x240 ; case 0x53 01f6 782b |x+ | Jump 0x222 ; case 0x54 01f7 784b |xK | Jump 0x243 ; case 0x55 01f8 7829 |x) | Jump 0x222 ; case 0x56 01f9 7828 |x( | Jump 0x222 ; case 0x57 01fa 782b |x+ | Jump 0x226 ; case 0x58 01fb 7826 |x& | Jump 0x222 ; case 0x59 01fc 7825 |x% | Jump 0x222 ; case 0x5a 01fd 7824 |x$ | Jump 0x222 ; case 0x5b 01fe 7823 |x# | Jump 0x222 ; case 0x5c 01ff 7822 |x" | Jump 0x222 ; case 0x5d 0200 7821 |x! | Jump 0x222 ; case 0x5e 0201 7820 |x | Jump 0x222 ; case 0x5f 0202 781f |x | Jump 0x222 ; case 0x60 0203 7825 |x% | Jump 0x229 ; case 0x61 0204 781d |x | Jump 0x222 ; case 0x62 0205 781c |x | Jump 0x222 ; case 0x63 0206 781b |x | Jump 0x222 ; case 0x64 0207 781a |x | Jump 0x222 ; case 0x65 0208 7819 |x | Jump 0x222 ; case 0x66 0209 7818 |x | Jump 0x222 ; case 0x67 020a 7817 |x | Jump 0x222 ; case 0x68 020b 7817 |x | Jump 0x223 ; case 0x69 020c 7815 |x | Jump 0x222 ; case 0x6a 020d 7814 |x | Jump 0x222 ; case 0x6b 020e 783f |x? | Jump 0x24e ; case 0x6c 020f 7812 |x | Jump 0x222 ; case 0x6d 0210 7811 |x | Jump 0x222 ; case 0x6e 0211 7810 |x | Jump 0x222 ; case 0x6f 0212 780f |x | Jump 0x222 ; case 0x70 0213 780e |x | Jump 0x222 ; case 0x71 0214 7828 |x( | Jump 0x23d ; case 0x72 0215 782a |x* | Jump 0x240 ; case 0x73 0216 780b |x | Jump 0x222 ; case 0x74 0217 782b |x+ | Jump 0x243 ; case 0x75 0218 7809 |x | Jump 0x222 ; case 0x76 0219 7808 |x | Jump 0x222 ; case 0x77 021a 780b |x | Jump 0x226 ; case 0x78 021b 7806 |x | Jump 0x222 ; case 0x79 021c 7805 |x | Jump 0x222 ; case 0x7a 021d 7804 |x | Jump 0x222 ; case 0x7b 021e 7803 |x | Jump 0x222 ; case 0x7c 021f 7802 |x | Jump 0x222 ; case 0x7d 0220 7801 |x | Jump 0x222 ; case 0x7e 0221 7800 |x | Jump 0x222 ; case 0x7f 0222 08e2 | | Execute_Immediate Raise,0xe2 0223 4801 |H | Short_Literal 0x1 0224 a404 | | Store_Unchecked 0x2,0x4 0225 7832 |x2 | Jump 0x258 0226 4800 |H | Short_Literal 0x0 0227 a404 | | Store_Unchecked 0x2,0x4 0228 782f |x/ | Jump 0x258 0229 e403 | | Load 0x2,0x3 022a 4608 |F | Jump_Case 0x9 022b 780e |x | Jump 0x23a ; case 0x0 022c 782b |x+ | Jump 0x258 ; case 0x1 022d 7806 |x | Jump 0x234 ; case 0x2 022e 7808 |x | Jump 0x237 ; case 0x3 022f 7828 |x( | Jump 0x258 ; case 0x4 0230 7827 |x' | Jump 0x258 ; case 0x5 0231 7826 |x& | Jump 0x258 ; case 0x6 0232 7825 |x% | Jump 0x258 ; case 0x7 0233 7824 |x$ | Jump 0x258 ; case 0x8 0234 4805 |H | Short_Literal 0x5 0235 a402 | | Store_Unchecked 0x2,0x2 0236 7821 |x! | Jump 0x258 0237 4806 |H | Short_Literal 0x6 0238 a402 | | Store_Unchecked 0x2,0x2 0239 781e |x | Jump 0x258 023a 4804 |H | Short_Literal 0x4 023b a402 | | Store_Unchecked 0x2,0x2 023c 781b |x | Jump 0x258 023d 4808 |H | Short_Literal 0x8 023e a402 | | Store_Unchecked 0x2,0x2 023f 7818 |x | Jump 0x258 0240 4807 |H | Short_Literal 0x7 0241 a402 | | Store_Unchecked 0x2,0x2 0242 7815 |x | Jump 0x258 0243 4802 |H | Short_Literal 0x2 0244 a403 | | Store_Unchecked 0x2,0x3 0245 e402 | | Load 0x2,0x2 0246 0e08 | | Execute_Immediate Not_Equal,0x8 0247 6810 |h | Jump_Zero 0x258 0248 e402 | | Load 0x2,0x2 0249 0e07 | | Execute_Immediate Not_Equal,0x7 024a 680d |h | Jump_Zero 0x258 024b 4805 |H | Short_Literal 0x5 024c a402 | | Store_Unchecked 0x2,0x2 024d 780a |x | Jump 0x258 024e 4803 |H | Short_Literal 0x3 024f a403 | | Store_Unchecked 0x2,0x3 0250 e402 | | Load 0x2,0x2 0251 0e08 | | Execute_Immediate Not_Equal,0x8 0252 6805 |h | Jump_Zero 0x258 0253 e402 | | Load 0x2,0x2 0254 0e07 | | Execute_Immediate Not_Equal,0x7 0255 6802 |h | Jump_Zero 0x258 0256 4806 |H | Short_Literal 0x6 0257 a402 | | Store_Unchecked 0x2,0x2 0258 00c8 | | Action Pop_Auxiliary_Range 0259 3f44 |?D | Loop_Increasing 0x19e 025a 00ce | | Action Pop_Auxiliary 025b 00d8 | | Load_Top At_Offset_0 025c 680f |h | Jump_Zero 0x26c 025d e5fc | | Load 0x2,-0x4 025e 00d8 | | Load_Top At_Offset_0 025f 0335 | 5 | Declare_Variable Array,Duplicate 0260 00cd | | Action Spare6_Action 0261 487f |H | Short_Literal 0x7f 0262 4800 |H | Short_Literal 0x0 0263 e403 | | Load 0x2,0x3 0264 00d9 | | Load_Top At_Offset_1 0265 e406 | | Load 0x2,0x6 0266 01d6 | | Execute Vector,Field_Write 0267 3ffb |? | Loop_Increasing 0x263 0268 00cd | | Action Spare6_Action 0269 e5fc | | Load 0x2,-0x4 026a 01d4 | | Execute Vector,Structure_Write 026b 780e |x | Jump 0x27a 026c e5fc | | Load 0x2,-0x4 026d 00d8 | | Load_Top At_Offset_0 026e 0335 | 5 | Declare_Variable Array,Duplicate 026f 00cd | | Action Spare6_Action 0270 487f |H | Short_Literal 0x7f 0271 4800 |H | Short_Literal 0x0 0272 e402 | | Load 0x2,0x2 0273 00d9 | | Load_Top At_Offset_1 0274 e406 | | Load 0x2,0x6 0275 01d6 | | Execute Vector,Field_Write 0276 3ffb |? | Loop_Increasing 0x272 0277 00cd | | Action Spare6_Action 0278 e5fc | | Load 0x2,-0x4 0279 01d4 | | Execute Vector,Structure_Write 027a 00cf | | Action Mark_Auxiliary 027b e5fe | | Load 0x2,-0x2 027c 01d9 | | Execute Vector,Reverse_Bounds 027d 0263 | c | Execute Discrete,Above_Bound 027e 7008 |p | Jump_Nonzero 0x287 027f 4801 |H | Short_Literal 0x1 0280 00d9 | | Load_Top At_Offset_1 0281 e5fe | | Load 0x2,-0x2 0282 01d7 | | Execute Vector,Field_Read 0283 e5fc | | Load 0x2,-0x4 0284 01d6 | | Execute Vector,Field_Write 0285 00c8 | | Action Pop_Auxiliary_Range 0286 3ff8 |? | Loop_Increasing 0x27f 0287 00ce | | Action Pop_Auxiliary 0288 00d8 | | Load_Top At_Offset_0 0289 680f |h | Jump_Zero 0x299 028a 00cf | | Action Mark_Auxiliary 028b e5ff | | Load 0x2,-0x1 028c 01d9 | | Execute Vector,Reverse_Bounds 028d 0263 | c | Execute Discrete,Above_Bound 028e 7008 |p | Jump_Nonzero 0x297 028f e402 | | Load 0x2,0x2 0290 00d9 | | Load_Top At_Offset_1 0291 e5ff | | Load 0x2,-0x1 0292 01d7 | | Execute Vector,Field_Read 0293 e5fc | | Load 0x2,-0x4 0294 01d6 | | Execute Vector,Field_Write 0295 00c8 | | Action Pop_Auxiliary_Range 0296 3ff8 |? | Loop_Increasing 0x28f 0297 00ce | | Action Pop_Auxiliary 0298 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0299 00cf | | Action Mark_Auxiliary 029a e5ff | | Load 0x2,-0x1 029b 01d9 | | Execute Vector,Reverse_Bounds 029c 0263 | c | Execute Discrete,Above_Bound 029d 7008 |p | Jump_Nonzero 0x2a6 029e e403 | | Load 0x2,0x3 029f 00d9 | | Load_Top At_Offset_1 02a0 e5ff | | Load 0x2,-0x1 02a1 01d7 | | Execute Vector,Field_Read 02a2 e5fc | | Load 0x2,-0x4 02a3 01d6 | | Execute Vector,Field_Write 02a4 00c8 | | Action Pop_Auxiliary_Range 02a5 3ff8 |? | Loop_Increasing 0x29e 02a6 00ce | | Action Pop_Auxiliary 02a7 4504 |E | Exit_Suprogram New_Top_Offset 0x4 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02b4 | | .CONST 0x02b4 ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0004 | | .CONST 0x0004 ; Number of locals 02ab INIT_02a8: 02ab 00da | | Load_Top At_Offset_2 02ac 00e3 | | Load_Encached Natural_Cache 02ad 03f1 | | Declare_Variable Discrete,With_Value 02ae 00e3 | | Load_Encached Natural_Cache 02af 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 02b0 e5fc | | Load 0x2,-0x4 02b1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 02b2 00e3 | | Load_Encached Natural_Cache 02b3 03f1 | | Declare_Variable Discrete,With_Value 02b4 BODY_02a8: 02b4 4800 |H | Short_Literal 0x0 02b5 a5fb | | Store_Unchecked 0x2,-0x5 02b6 00d8 | | Load_Top At_Offset_0 02b7 e5fd | | Load 0x2,-0x3 02b8 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02b9 027d | } | Execute Discrete,Greater 02ba 6803 |h | Jump_Zero 0x2be 02bb e5fd | | Load 0x2,-0x3 02bc 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02bd 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 02be 00cf | | Action Mark_Auxiliary 02bf 7894 |x | Jump 0x354 02c0 00da | | Load_Top At_Offset_2 02c1 e5fc | | Load 0x2,-0x4 02c2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 02c3 01d7 | | Execute Vector,Field_Read 02c4 e5fe | | Load 0x2,-0x2 02c5 01d7 | | Execute Vector,Field_Read 02c6 4608 |F | Jump_Case 0x9 02c7 780f |x | Jump 0x2d7 ; case 0x0 02c8 7887 |x | Jump 0x350 ; case 0x1 02c9 7819 |x | Jump 0x2e3 ; case 0x2 02ca 7827 |x' | Jump 0x2f2 ; case 0x3 02cb 7835 |x5 | Jump 0x301 ; case 0x4 02cc 7849 |xI | Jump 0x316 ; case 0x5 02cd 7860 |x` | Jump 0x32e ; case 0x6 02ce 7877 |xw | Jump 0x346 ; case 0x7 02cf 7800 |x | Jump 0x2d0 ; case 0x8 02d0 00da | | Load_Top At_Offset_2 02d1 e5fc | | Load 0x2,-0x4 02d2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 02d3 01d7 | | Execute Vector,Field_Read 02d4 a5fb | | Store_Unchecked 0x2,-0x5 02d5 00ce | | Action Pop_Auxiliary 02d6 78ca |x | Jump 0x3a1 02d7 00db | | Load_Top At_Offset_3 02d8 0a01 | | Execute_Immediate Plus,0x1 02d9 c402 | | Store 0x2,0x2 02da 00da | | Load_Top At_Offset_2 02db e5fc | | Load 0x2,-0x4 02dc 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 02dd 01d7 | | Execute Vector,Field_Read 02de e402 | | Load 0x2,0x2 02df e5fd | | Load 0x2,-0x3 02e0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 02e1 01d6 | | Execute Vector,Field_Write 02e2 786d |xm | Jump 0x350 02e3 00db | | Load_Top At_Offset_3 02e4 0a01 | | Execute_Immediate Plus,0x1 02e5 c402 | | Store 0x2,0x2 02e6 00da | | Load_Top At_Offset_2 02e7 e5fc | | Load 0x2,-0x4 02e8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 02e9 01d7 | | Execute Vector,Field_Read 02ea e001 | | Load 0x0,0x1 02eb 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02ec 01d7 | | Execute Vector,Field_Read 02ed e402 | | Load 0x2,0x2 02ee e5fd | | Load 0x2,-0x3 02ef 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 02f0 01d6 | | Execute Vector,Field_Write 02f1 785e |x^ | Jump 0x350 02f2 00db | | Load_Top At_Offset_3 02f3 0a01 | | Execute_Immediate Plus,0x1 02f4 c402 | | Store 0x2,0x2 02f5 00da | | Load_Top At_Offset_2 02f6 e5fc | | Load 0x2,-0x4 02f7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 02f8 01d7 | | Execute Vector,Field_Read 02f9 e001 | | Load 0x0,0x1 02fa 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02fb 01d7 | | Execute Vector,Field_Read 02fc e402 | | Load 0x2,0x2 02fd e5fd | | Load 0x2,-0x3 02fe 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 02ff 01d6 | | Execute Vector,Field_Write 0300 784f |xO | Jump 0x350 0301 00db | | Load_Top At_Offset_3 0302 0a01 | | Execute_Immediate Plus,0x1 0303 c402 | | Store 0x2,0x2 0304 00da | | Load_Top At_Offset_2 0305 e5fc | | Load 0x2,-0x4 0306 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0307 01d7 | | Execute Vector,Field_Read 0308 e402 | | Load 0x2,0x2 0309 e5fd | | Load 0x2,-0x3 030a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 030b 01d6 | | Execute Vector,Field_Write 030c 00da | | Load_Top At_Offset_2 030d e5fc | | Load 0x2,-0x4 030e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 030f 01d7 | | Execute Vector,Field_Read 0310 a5fb | | Store_Unchecked 0x2,-0x5 0311 00da | | Load_Top At_Offset_2 0312 0a01 | | Execute_Immediate Plus,0x1 0313 005b | [ | Store_Top Discrete,At_Offset_3 0314 00ce | | Action Pop_Auxiliary 0315 788b |x | Jump 0x3a1 0316 00db | | Load_Top At_Offset_3 0317 0a01 | | Execute_Immediate Plus,0x1 0318 c402 | | Store 0x2,0x2 0319 00da | | Load_Top At_Offset_2 031a e5fc | | Load 0x2,-0x4 031b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 031c 01d7 | | Execute Vector,Field_Read 031d e001 | | Load 0x0,0x1 031e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 031f 01d7 | | Execute Vector,Field_Read 0320 e402 | | Load 0x2,0x2 0321 e5fd | | Load 0x2,-0x3 0322 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0323 01d6 | | Execute Vector,Field_Write 0324 00da | | Load_Top At_Offset_2 0325 e5fc | | Load 0x2,-0x4 0326 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0327 01d7 | | Execute Vector,Field_Read 0328 a5fb | | Store_Unchecked 0x2,-0x5 0329 00da | | Load_Top At_Offset_2 032a 0a01 | | Execute_Immediate Plus,0x1 032b 005b | [ | Store_Top Discrete,At_Offset_3 032c 00ce | | Action Pop_Auxiliary 032d 7873 |xs | Jump 0x3a1 032e 00db | | Load_Top At_Offset_3 032f 0a01 | | Execute_Immediate Plus,0x1 0330 c402 | | Store 0x2,0x2 0331 00da | | Load_Top At_Offset_2 0332 e5fc | | Load 0x2,-0x4 0333 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0334 01d7 | | Execute Vector,Field_Read 0335 e001 | | Load 0x0,0x1 0336 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0337 01d7 | | Execute Vector,Field_Read 0338 e402 | | Load 0x2,0x2 0339 e5fd | | Load 0x2,-0x3 033a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 033b 01d6 | | Execute Vector,Field_Write 033c 00da | | Load_Top At_Offset_2 033d e5fc | | Load 0x2,-0x4 033e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 033f 01d7 | | Execute Vector,Field_Read 0340 a5fb | | Store_Unchecked 0x2,-0x5 0341 00da | | Load_Top At_Offset_2 0342 0a01 | | Execute_Immediate Plus,0x1 0343 005b | [ | Store_Top Discrete,At_Offset_3 0344 00ce | | Action Pop_Auxiliary 0345 785b |x[ | Jump 0x3a1 0346 00da | | Load_Top At_Offset_2 0347 e5fc | | Load 0x2,-0x4 0348 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0349 01d7 | | Execute Vector,Field_Read 034a a5fb | | Store_Unchecked 0x2,-0x5 034b 00da | | Load_Top At_Offset_2 034c 0a01 | | Execute_Immediate Plus,0x1 034d 005b | [ | Store_Top Discrete,At_Offset_3 034e 00ce | | Action Pop_Auxiliary 034f 7851 |xQ | Jump 0x3a1 0350 00da | | Load_Top At_Offset_2 0351 0a01 | | Execute_Immediate Plus,0x1 0352 005b | [ | Store_Top Discrete,At_Offset_3 0353 00c9 | | Action Pop_Auxiliary_Loop 0354 00da | | Load_Top At_Offset_2 0355 00da | | Load_Top At_Offset_2 0356 027a | z | Execute Discrete,Less_Equal 0357 7768 |wh | Jump_Nonzero 0x2c0 0358 00ce | | Action Pop_Auxiliary 0359 e5fc | | Load 0x2,-0x4 035a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 035b 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 035c 00cf | | Action Mark_Auxiliary 035d 783e |x> | Jump 0x39c 035e 00da | | Load_Top At_Offset_2 035f e5fc | | Load 0x2,-0x4 0360 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0361 01d7 | | Execute Vector,Field_Read 0362 e5fe | | Load 0x2,-0x2 0363 01d7 | | Execute Vector,Field_Read 0364 4608 |F | Jump_Case 0x9 0365 7832 |x2 | Jump 0x398 ; case 0x0 0366 7831 |x1 | Jump 0x398 ; case 0x1 0367 7830 |x0 | Jump 0x398 ; case 0x2 0368 782f |x/ | Jump 0x398 ; case 0x3 0369 780a |x | Jump 0x374 ; case 0x4 036a 7812 |x | Jump 0x37d ; case 0x5 036b 781a |x | Jump 0x386 ; case 0x6 036c 7822 |x" | Jump 0x38f ; case 0x7 036d 7800 |x | Jump 0x36e ; case 0x8 036e 00da | | Load_Top At_Offset_2 036f e5fc | | Load 0x2,-0x4 0370 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0371 01d7 | | Execute Vector,Field_Read 0372 a5fb | | Store_Unchecked 0x2,-0x5 0373 782c |x, | Jump 0x3a0 0374 00da | | Load_Top At_Offset_2 0375 e5fc | | Load 0x2,-0x4 0376 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0377 01d7 | | Execute Vector,Field_Read 0378 a5fb | | Store_Unchecked 0x2,-0x5 0379 00da | | Load_Top At_Offset_2 037a 0a01 | | Execute_Immediate Plus,0x1 037b 005b | [ | Store_Top Discrete,At_Offset_3 037c 7823 |x# | Jump 0x3a0 037d 00da | | Load_Top At_Offset_2 037e e5fc | | Load 0x2,-0x4 037f 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0380 01d7 | | Execute Vector,Field_Read 0381 a5fb | | Store_Unchecked 0x2,-0x5 0382 00da | | Load_Top At_Offset_2 0383 0a01 | | Execute_Immediate Plus,0x1 0384 005b | [ | Store_Top Discrete,At_Offset_3 0385 781a |x | Jump 0x3a0 0386 00da | | Load_Top At_Offset_2 0387 e5fc | | Load 0x2,-0x4 0388 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0389 01d7 | | Execute Vector,Field_Read 038a a5fb | | Store_Unchecked 0x2,-0x5 038b 00da | | Load_Top At_Offset_2 038c 0a01 | | Execute_Immediate Plus,0x1 038d 005b | [ | Store_Top Discrete,At_Offset_3 038e 7811 |x | Jump 0x3a0 038f 00da | | Load_Top At_Offset_2 0390 e5fc | | Load 0x2,-0x4 0391 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0392 01d7 | | Execute Vector,Field_Read 0393 a5fb | | Store_Unchecked 0x2,-0x5 0394 00da | | Load_Top At_Offset_2 0395 0a01 | | Execute_Immediate Plus,0x1 0396 005b | [ | Store_Top Discrete,At_Offset_3 0397 7808 |x | Jump 0x3a0 0398 00da | | Load_Top At_Offset_2 0399 0a01 | | Execute_Immediate Plus,0x1 039a 005b | [ | Store_Top Discrete,At_Offset_3 039b 00c9 | | Action Pop_Auxiliary_Loop 039c 00da | | Load_Top At_Offset_2 039d 00da | | Load_Top At_Offset_2 039e 027a | z | Execute Discrete,Less_Equal 039f 77be |w | Jump_Nonzero 0x35e 03a0 00ce | | Action Pop_Auxiliary 03a1 e5fc | | Load 0x2,-0x4 03a2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 03a3 00da | | Load_Top At_Offset_2 03a4 0272 | r | Execute Discrete,Minus 03a5 0a01 | | Execute_Immediate Plus,0x1 03a6 0059 | Y | Store_Top Discrete,At_Offset_1 03a7 00d9 | | Load_Top At_Offset_1 03a8 e5fc | | Load 0x2,-0x4 03a9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 03aa e5fc | | Load 0x2,-0x4 03ab 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 03ac 01cf | | Execute Vector,Slice_Read 03ad 4801 |H | Short_Literal 0x1 03ae 00da | | Load_Top At_Offset_2 03af e5fc | | Load 0x2,-0x4 03b0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 03b1 01ce | | Execute Vector,Slice_Write 03b2 00d8 | | Load_Top At_Offset_0 03b3 e5fc | | Load 0x2,-0x4 03b4 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 03b5 00da | | Load_Top At_Offset_2 03b6 e5fd | | Load 0x2,-0x3 03b7 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 03b8 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03b9 ; -------------------------------------------------------------------------------------- 03b9 ; STRING TABLE 03b9 ; -------------------------------------------------------------------------------------- 03b9 0014 | | .STRTAB 0x0014->0x03c3 ; "SA_TRANSFER" 03ba 001d | | .STRTAB 0x001d->0x03c8 ; "SA_SKIP" 03bb 0022 | " | .STRTAB 0x0022->0x03cc ; "SA_TRANSFER_UC" 03bc 002e | . | .STRTAB 0x002e->0x03d3 ; "SA_TRANSFER_LC" 03bd 003a | : | .STRTAB 0x003a->0x03da ; "SA_TRANSFER_BREAK" 03be 0049 | I | .STRTAB 0x0049->0x03e2 ; "SA_TRANSFER_UC_BREAK" 03bf 005b | [ | .STRTAB 0x005b->0x03ec ; "SA_TRANSFER_LC_BREAK" 03c0 006d | m | .STRTAB 0x006d->0x03f6 ; "SA_SKIP_BREAK" 03c1 0078 | x | .STRTAB 0x0078->0x03fd ; "SA_RETAIN_BREAK" 03c2 0085 | | .STREND 0x0085->0x0404 03c3 5341 5f54 |SA_T| .STRTAB_STRINGS 0405 0000 0000 | | .XXX[0x3] 0407 0000 | | 0408 ; -------------------------------------------------------------------------------------- 0408 ; Debug Table 0408 ; -------------------------------------------------------------------------------------- 0408 0004 0008 | | .DEBUG4 0x0004,0x0008,0xa940,0x0000,0x0001,0x0000 040e 0041 2105 | A! | .XXX[0x1f2] 0410 3911 3115 |9 1 | 0412 2d15 6541 |- eA| 0414 4915 4d4d |I MM| 0416 1510 73cb | s | 0418 768c 7374 |v st| 041a 0f42 8949 | B I| 041c 4b76 8813 |Kv | 041e ec0c 0031 | 1| 0420 6105 3131 |a 11| 0422 3d5d 1559 |=] Y| 0424 1539 514c | 9QL| 0426 73e4 1010 |s | 0428 0308 117a | z| 042a 7811 1000 |x | 042c 73b5 4b42 |s KB| 042e b031 444c | 1DL| 0430 6356 f040 |cV @| 0432 4c4f 7587 |LOu | 0434 7f0b 9017 | | 0436 7410 1800 |t | 0438 73fb ec0c |s | 043a 001d 1941 | A| 043c 4925 3951 |I%9Q| 043e 1873 9742 | s B| 0440 b021 4345 | !CE| 0442 8010 485f | H_| 0444 7680 7374 |v st| 0446 0742 b011 | B | 0448 4342 8149 |CB I| 044a 4376 8013 |Cv | 044c ec0c 0031 | 1| 044e 6105 3131 |a 11| 0450 3d5d 1559 |=] Y| 0452 1539 514c | 9QL| 0454 73e4 13f0 |s | 0456 0308 917a | z| 0458 7810 0400 |x | 045a 7329 5a7a |s)Zz| 045c b771 4f5a | qOZ| 045e 9843 4298 | CB | 0460 4153 42b0 |ASB | 0462 2112 98d3 |! | 0464 56b0 304c |V 0L| 0466 3a42 3dea |:B= | 0468 0e40 c20e | @ | 046a 423d ea0e |B= | 046c 40c2 0f42 |@ B| 046e 9841 5341 | ASA| 0470 1298 d143 | C| 0472 3d42 3c03 |=B< | 0474 fc00 0008 | | 0476 1401 a451 | Q| 0478 42bc c710 |B | 047a 005f be3b | _ ;| 047c affc ff55 | U| 047e 4342 9841 |CB A| 0480 5341 1298 |SA | 0482 d14b 4149 | KAI| 0484 43bc 2061 |C a| 0486 4151 e02d |AQ -| 0488 5157 2e3c |QW.<| 048a 03ff fffd | | 048c 4153 2551 |AS%Q| 048e 5543 4542 |UCEB| 0490 3c00 4000 |< @ | 0492 007d 2bbc | }+ | 0494 4839 4153 |H9AS| 0496 00c1 53d9 | S | 0498 520f 414d |R AM| 049a 5759 4fbc |WYO | 049c 3051 4153 |0QAS| 049e 2a3f 03ff |*? | 04a0 fffd 5000 | P | 04a2 080a 0300 | | 04a4 8153 d951 | S Q| 04a6 9741 4d57 | AMW| 04a8 594f bc18 |YO | 04aa 6941 532a |iAS*| 04ac 3f03 ffff |? | 04ae fd53 0081 | S | 04b0 53d9 5197 |S Q | 04b2 2e3f 03ff |.? | 04b4 fffd 4153 | AS| 04b6 0081 53d9 | S | 04b8 520c c470 |R p| 04ba 0745 423d | EB=| 04bc 0000 0000 | | 04be 7cae 40a2 || @ | 04c0 0f41 4d57 | AMW| 04c2 594f bc18 |YO | 04c4 6941 532a |iAS*| 04c6 3f03 ffff |? | 04c8 fd53 0081 | S | 04ca 53d9 5197 |S Q | 04cc 2e3f 03ff |.? | 04ce fffd 4153 | AS| 04d0 0081 53d9 | S | 04d2 520c c7a0 |R | 04d4 0240 820f | @ | 04d6 2e3f 03ff |.? | 04d8 fffd 4153 | AS| 04da 0081 53d9 | S | 04dc 520c c750 |R P| 04de 0242 3dea | B= | 04e0 0e40 c20f | @ | 04e2 4005 4603 |@ F | 04e4 4406 9840 |D @| 04e6 540c c704 |T | 04e8 037b 18e0 | { | 04ea 015f 421d | _B | 04ec 4b41 4943 |KAIC| 04ee bc20 6141 | aA| 04f0 51e0 2d51 |Q -Q| 04f2 572e 3c03 |W.< | 04f4 ffff fd41 | A| 04f6 5325 5155 |S%QU| 04f8 4345 423c |CEB<| 04fa 0040 0000 | @ | 04fc 7d33 bc48 |}3 H| 04fe 3941 5300 |9AS | 0500 c153 d952 | S R| 0502 0f41 4d57 | AMW| 0504 594f bc30 |YO 0| 0506 5141 532a |QAS*| 0508 3f03 ffff |? | 050a fd53 0081 | S | 050c 53d9 5197 |S Q | 050e 414d 5759 |AMWY| 0510 4fbc 1869 |O i| 0512 4153 2a3f |AS*?| 0514 03ff fffd | | 0516 5300 8153 |S S| 0518 d951 972e | Q .| 051a 3f03 ffff |? | 051c fd41 5300 | AS | 051e 8153 d952 | S R| 0520 0c45 2355 | E#U| 0522 4007 4542 |@ EB| 0524 9a3d 0000 | = | 0526 0000 7cae | | | 0528 40a2 0f41 |@ A| 052a 4d57 594f |MWYO| 052c bc18 6941 | iA| 052e 532a 3f03 |S*? | 0530 ffff fd53 | S| 0532 0081 53d9 | S | 0534 5197 2e3f |Q .?| 0536 03ff fffd | | 0538 4153 0081 |AS | 053a 53d9 520c |S R | 053c 4448 0640 |DH @| 053e 820f 2e3f | .?| 0540 03ff fffd | | 0542 4153 0081 |AS | 0544 53d9 520f |S R | 0546 c698 4005 | @ | 0548 4513 ff5e |E ^| 054a 9843 7ab7 | Cz | 054c 714b 0d49 |qK I| 054e 4dfb 7eb7 |M ~ | 0550 73ec 0800 |s | 0552 3551 1531 |5Q 1| 0554 3915 517d |9 Q}| 0556 4d51 4925 |MQI%| 0558 391c 73e4 |9 s | 055a 1030 0308 | 0 | 055c 117a 7811 | zx | 055e 1000 73cd | s | 0560 4f42 b011 |OB | 0562 4848 0413 |HH | 0564 7688 23ec |v # | 0566 0400 114d | M| 0568 4125 5073 |A%Ps| 056a e376 893b | v ;| 056c 7f0f c017 | | 056e 7410 1800 |t | 0570 73fb ec0c |s | 0572 001d 1941 | A| 0574 4925 3951 |I%9Q| 0576 1873 e413 | s | 0578 f03f 0831 | ? 1| 057a 7a78 1110 |zx | 057c 0073 d96f | s o| 057e 7f2f d017 | / | 0580 7eb7 dbec |~ | 0582 0800 194d | M| 0584 5149 0d41 |QI A| 0586 6473 db51 |ds Q| 0588 4f7a b011 |Oz | 058a 5741 955a |WA Z| 058c 7800 194d |x M| 058e 5149 3115 |QI1 | 0590 3873 f966 |8s f| 0592 7800 2161 |x !a| 0594 5135 0531 |Q5 1| 0596 313d 0c73 |1= s| 0598 f962 7800 | bx | 059a 194d 5149 | MQI| 059c 0d41 6473 | Ads| 059e e15f 550e | _U | 05a0 98a0 4c33 | L3| 05a2 4000 080a |@ | 05a4 f995 5341 | SA| 05a6 0e90 a14a | J| 05a8 5588 490b |U I | 05aa 410e d401 |A | 05ac 4848 0cc7 |HH | 05ae 0002 5588 | U | 05b0 480c c6e4 |H | 05b2 0375 4bec | uK | 05b4 05a7 0409 | | 05b6 41fb ec05 |A | 05b8 a341 414a | AAJ| 05ba 40a9 8b75 |@ u| 05bc 0ed4 027e | ~| 05be 8807 ec09 | | 05c0 9f04 c14d | M| 05c2 fb75 4b75 | uKu| 05c4 4bec 0c00 |K | 05c6 2905 1111 |) | 05c8 4905 5125 |I Q%| 05ca 5115 3473 |Q 4s| 05cc 1cc6 2c03 | , | 05ce 5540 0704 |U@ | 05d0 c14d 43d9 | MC | 05d2 42b7 eb41 |B A| 05d4 0d91 484c | HL| 05d6 ca55 884c | U L| 05d8 bb75 4bec | uK | 05da 05a7 0409 | | 05dc 41fb ec05 |A | 05de a341 414a | AAJ| 05e0 40a9 8b75 |@ u| 05e2 0d92 7e88 | ~ | 05e4 07ec 099f | | 05e6 750e 90a3 |u | 05e8 ec04 003d | =| 05ea 614d 5149 |aMQI| 05ec 2539 1d51 |%9 Q| 05ee 3d2d 1565 |=- e| 05f0 4d65 3473 |Me4s| 05f2 1f41 4168 | AAh| 05f4 448f 5540 |D U@| 05f6 0775 0e90 | u | 05f8 a3ec 05a7 | | 05fa 0409 41fb | A | 05fc ec05 a200 | | 05fe 0000 0000 | |