|
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_6148f2
└─⟦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 03f0 | | .CONST 0x03f0 ; 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 02ed | | .CONST 0x02ed ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0074 | t | .CONST 0x0074 ; Number of locals 000b INIT_0008: 000b a002 | | Store_Unchecked 0x0,0x2 000c 00c6 | | Action Check_Subprogram_Elaborated 000d e003 | | Load 0x0,0x3 000e 0129 | ) | Execute Any,Make_Visible 000f e004 | | Load 0x0,0x4 0010 00d8 | | Load_Top At_Offset_0 0011 012c | , | Execute Any,Size 0012 00d9 | | Load_Top At_Offset_1 0013 0266 | f | Execute Discrete,Bounds 0014 00db | | Load_Top At_Offset_3 0015 0122 | " | Execute Any,Make_Root_Type 0016 00d8 | | Load_Top At_Offset_0 0017 012c | , | Execute Any,Size 0018 00d0 | | Action Swap_Control 0019 0266 | f | Execute Discrete,Bounds 001a 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 001c 03fa | | Declare_Type Discrete,Defined,With_Size 001d 03f7 | | QQ_Declare_Variable Discrete,XXX 001e 00cd | | Action Spare6_Action 001f 0129 | ) | Execute Any,Make_Visible 0020 e005 | | Load 0x0,0x5 0021 0129 | ) | Execute Any,Make_Visible 0022 0093 0000 | | push_full_address 0x0 0024 6353 |cS | Indirect_Literal Discrete,0x378,{0x80000000, 0x001a0000} 0025 0273 | s | Execute Discrete,Plus 0026 e006 | | Load 0x0,0x6 0027 0273 | s | Execute Discrete,Plus 0028 e007 | | Load 0x0,0x7 0029 0273 | s | Execute Discrete,Plus 002a 0129 | ) | Execute Any,Make_Visible 002b 4800 |H | Short_Literal 0x0 002c 0129 | ) | Execute Any,Make_Visible 002d a008 | | Store_Unchecked 0x0,0x8 002e 00c6 | | Action Check_Subprogram_Elaborated 002f e003 | | Load 0x0,0x3 0030 0129 | ) | Execute Any,Make_Visible 0031 e004 | | Load 0x0,0x4 0032 00d8 | | Load_Top At_Offset_0 0033 012c | , | Execute Any,Size 0034 00d9 | | Load_Top At_Offset_1 0035 0266 | f | Execute Discrete,Bounds 0036 00db | | Load_Top At_Offset_3 0037 0122 | " | Execute Any,Make_Root_Type 0038 00d8 | | Load_Top At_Offset_0 0039 012c | , | Execute Any,Size 003a 00d0 | | Action Swap_Control 003b 0266 | f | Execute Discrete,Bounds 003c 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 003e 03fa | | Declare_Type Discrete,Defined,With_Size 003f 03f7 | | QQ_Declare_Variable Discrete,XXX 0040 00cd | | Action Spare6_Action 0041 0129 | ) | Execute Any,Make_Visible 0042 e005 | | Load 0x0,0x5 0043 0129 | ) | Execute Any,Make_Visible 0044 0093 0000 | | push_full_address 0x0 0046 632d |c- | Indirect_Literal Discrete,0x374,{0x80000000, 0x00190000} 0047 0273 | s | Execute Discrete,Plus 0048 e006 | | Load 0x0,0x6 0049 0273 | s | Execute Discrete,Plus 004a e009 | | Load 0x0,0x9 004b 0273 | s | Execute Discrete,Plus 004c 0129 | ) | Execute Any,Make_Visible 004d 4800 |H | Short_Literal 0x0 004e 0129 | ) | Execute Any,Make_Visible 004f a002 | | Store_Unchecked 0x0,0x2 0050 00c6 | | Action Check_Subprogram_Elaborated 0051 e00a | | Load 0x0,0xa 0052 0129 | ) | Execute Any,Make_Visible 0053 e004 | | Load 0x0,0x4 0054 00d8 | | Load_Top At_Offset_0 0055 012c | , | Execute Any,Size 0056 00d9 | | Load_Top At_Offset_1 0057 0266 | f | Execute Discrete,Bounds 0058 00db | | Load_Top At_Offset_3 0059 0122 | " | Execute Any,Make_Root_Type 005a 00d8 | | Load_Top At_Offset_0 005b 012c | , | Execute Any,Size 005c 00d0 | | Action Swap_Control 005d 0266 | f | Execute Discrete,Bounds 005e 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 0060 03fa | | Declare_Type Discrete,Defined,With_Size 0061 03f7 | | QQ_Declare_Variable Discrete,XXX 0062 00cd | | Action Spare6_Action 0063 0129 | ) | Execute Any,Make_Visible 0064 e00b | | Load 0x0,0xb 0065 0129 | ) | Execute Any,Make_Visible 0066 0093 0000 | | push_full_address 0x0 0068 6307 |c | Indirect_Literal Discrete,0x370,{0x80000000, 0x00180000} 0069 0273 | s | Execute Discrete,Plus 006a e006 | | Load 0x0,0x6 006b 0273 | s | Execute Discrete,Plus 006c e00c | | Load 0x0,0xc 006d 0273 | s | Execute Discrete,Plus 006e 0129 | ) | Execute Any,Make_Visible 006f 4800 |H | Short_Literal 0x0 0070 0129 | ) | Execute Any,Make_Visible 0071 a008 | | Store_Unchecked 0x0,0x8 0072 00c6 | | Action Check_Subprogram_Elaborated 0073 e00a | | Load 0x0,0xa 0074 0129 | ) | Execute Any,Make_Visible 0075 e004 | | Load 0x0,0x4 0076 00d8 | | Load_Top At_Offset_0 0077 012c | , | Execute Any,Size 0078 00d9 | | Load_Top At_Offset_1 0079 0266 | f | Execute Discrete,Bounds 007a 00db | | Load_Top At_Offset_3 007b 0122 | " | Execute Any,Make_Root_Type 007c 00d8 | | Load_Top At_Offset_0 007d 012c | , | Execute Any,Size 007e 00d0 | | Action Swap_Control 007f 0266 | f | Execute Discrete,Bounds 0080 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 0082 03fa | | Declare_Type Discrete,Defined,With_Size 0083 03f7 | | QQ_Declare_Variable Discrete,XXX 0084 00cd | | Action Spare6_Action 0085 0129 | ) | Execute Any,Make_Visible 0086 e00b | | Load 0x0,0xb 0087 0129 | ) | Execute Any,Make_Visible 0088 0093 0000 | | push_full_address 0x0 008a 62e1 |b | Indirect_Literal Discrete,0x36c,{0x80000000, 0x00170000} 008b 0273 | s | Execute Discrete,Plus 008c e006 | | Load 0x0,0x6 008d 0273 | s | Execute Discrete,Plus 008e e00d | | Load 0x0,0xd 008f 0273 | s | Execute Discrete,Plus 0090 0129 | ) | Execute Any,Make_Visible 0091 4800 |H | Short_Literal 0x0 0092 0129 | ) | Execute Any,Make_Visible 0093 a00e | | Store_Unchecked 0x0,0xe 0094 00c6 | | Action Check_Subprogram_Elaborated 0095 e00f | | Load 0x0,0xf 0096 0129 | ) | Execute Any,Make_Visible 0097 0093 0000 | | push_full_address 0x0 0099 62ce |b | Indirect_Literal Discrete,0x368,{0x80000000, 0x00160000} 009a 0273 | s | Execute Discrete,Plus 009b e006 | | Load 0x0,0x6 009c 0273 | s | Execute Discrete,Plus 009d e010 | | Load 0x0,0x10 009e 0273 | s | Execute Discrete,Plus 009f 0129 | ) | Execute Any,Make_Visible 00a0 4800 |H | Short_Literal 0x0 00a1 0129 | ) | Execute Any,Make_Visible 00a2 a011 | | Store_Unchecked 0x0,0x11 00a3 00c6 | | Action Check_Subprogram_Elaborated 00a4 e00f | | Load 0x0,0xf 00a5 0129 | ) | Execute Any,Make_Visible 00a6 0093 0000 | | push_full_address 0x0 00a8 62bb |b | Indirect_Literal Discrete,0x364,{0x80000000, 0x00150000} 00a9 0273 | s | Execute Discrete,Plus 00aa e006 | | Load 0x0,0x6 00ab 0273 | s | Execute Discrete,Plus 00ac e012 | | Load 0x0,0x12 00ad 0273 | s | Execute Discrete,Plus 00ae 0129 | ) | Execute Any,Make_Visible 00af 4800 |H | Short_Literal 0x0 00b0 0129 | ) | Execute Any,Make_Visible 00b1 a011 | | Store_Unchecked 0x0,0x11 00b2 00c6 | | Action Check_Subprogram_Elaborated 00b3 e013 | | Load 0x0,0x13 00b4 0129 | ) | Execute Any,Make_Visible 00b5 0093 0000 | | push_full_address 0x0 00b7 62a8 |b | Indirect_Literal Discrete,0x360,{0x80000000, 0x00140000} 00b8 0273 | s | Execute Discrete,Plus 00b9 e006 | | Load 0x0,0x6 00ba 0273 | s | Execute Discrete,Plus 00bb e014 | | Load 0x0,0x14 00bc 0273 | s | Execute Discrete,Plus 00bd 0129 | ) | Execute Any,Make_Visible 00be 4800 |H | Short_Literal 0x0 00bf 0129 | ) | Execute Any,Make_Visible 00c0 a008 | | Store_Unchecked 0x0,0x8 00c1 00c6 | | Action Check_Subprogram_Elaborated 00c2 e013 | | Load 0x0,0x13 00c3 0129 | ) | Execute Any,Make_Visible 00c4 e004 | | Load 0x0,0x4 00c5 00d8 | | Load_Top At_Offset_0 00c6 012c | , | Execute Any,Size 00c7 00d9 | | Load_Top At_Offset_1 00c8 0266 | f | Execute Discrete,Bounds 00c9 00db | | Load_Top At_Offset_3 00ca 0122 | " | Execute Any,Make_Root_Type 00cb 00d8 | | Load_Top At_Offset_0 00cc 012c | , | Execute Any,Size 00cd 00d0 | | Action Swap_Control 00ce 0266 | f | Execute Discrete,Bounds 00cf 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 00d1 03fa | | Declare_Type Discrete,Defined,With_Size 00d2 03f7 | | QQ_Declare_Variable Discrete,XXX 00d3 00cd | | Action Spare6_Action 00d4 0129 | ) | Execute Any,Make_Visible 00d5 e015 | | Load 0x0,0x15 00d6 0129 | ) | Execute Any,Make_Visible 00d7 0093 0000 | | push_full_address 0x0 00d9 6282 |b | Indirect_Literal Discrete,0x35c,{0x80000000, 0x00130000} 00da 0273 | s | Execute Discrete,Plus 00db e006 | | Load 0x0,0x6 00dc 0273 | s | Execute Discrete,Plus 00dd e016 | | Load 0x0,0x16 00de 0273 | s | Execute Discrete,Plus 00df 0129 | ) | Execute Any,Make_Visible 00e0 4800 |H | Short_Literal 0x0 00e1 0129 | ) | Execute Any,Make_Visible 00e2 a00e | | Store_Unchecked 0x0,0xe 00e3 00c6 | | Action Check_Subprogram_Elaborated 00e4 e017 | | Load 0x0,0x17 00e5 0129 | ) | Execute Any,Make_Visible 00e6 0093 0000 | | push_full_address 0x0 00e8 626f |bo | Indirect_Literal Discrete,0x358,{0x80000000, 0x00120000} 00e9 0273 | s | Execute Discrete,Plus 00ea e006 | | Load 0x0,0x6 00eb 0273 | s | Execute Discrete,Plus 00ec e018 | | Load 0x0,0x18 00ed 0273 | s | Execute Discrete,Plus 00ee 0129 | ) | Execute Any,Make_Visible 00ef 4800 |H | Short_Literal 0x0 00f0 0129 | ) | Execute Any,Make_Visible 00f1 a011 | | Store_Unchecked 0x0,0x11 00f2 00c6 | | Action Check_Subprogram_Elaborated 00f3 e017 | | Load 0x0,0x17 00f4 0129 | ) | Execute Any,Make_Visible 00f5 0093 0000 | | push_full_address 0x0 00f7 625c |b\ | Indirect_Literal Discrete,0x354,{0x80000000, 0x00110000} 00f8 0273 | s | Execute Discrete,Plus 00f9 e006 | | Load 0x0,0x6 00fa 0273 | s | Execute Discrete,Plus 00fb e019 | | Load 0x0,0x19 00fc 0273 | s | Execute Discrete,Plus 00fd 0129 | ) | Execute Any,Make_Visible 00fe 4800 |H | Short_Literal 0x0 00ff 0129 | ) | Execute Any,Make_Visible 0100 a008 | | Store_Unchecked 0x0,0x8 0101 00c6 | | Action Check_Subprogram_Elaborated 0102 e017 | | Load 0x0,0x17 0103 0129 | ) | Execute Any,Make_Visible 0104 e004 | | Load 0x0,0x4 0105 00d8 | | Load_Top At_Offset_0 0106 012c | , | Execute Any,Size 0107 00d9 | | Load_Top At_Offset_1 0108 0266 | f | Execute Discrete,Bounds 0109 00db | | Load_Top At_Offset_3 010a 0122 | " | Execute Any,Make_Root_Type 010b 00d8 | | Load_Top At_Offset_0 010c 012c | , | Execute Any,Size 010d 00d0 | | Action Swap_Control 010e 0266 | f | Execute Discrete,Bounds 010f 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 0111 03fa | | Declare_Type Discrete,Defined,With_Size 0112 03f7 | | QQ_Declare_Variable Discrete,XXX 0113 00cd | | Action Spare6_Action 0114 0129 | ) | Execute Any,Make_Visible 0115 e01a | | Load 0x0,0x1a 0116 0129 | ) | Execute Any,Make_Visible 0117 0093 0000 | | push_full_address 0x0 0119 6236 |b6 | Indirect_Literal Discrete,0x350,{0x80000000, 0x00100000} 011a 0273 | s | Execute Discrete,Plus 011b e006 | | Load 0x0,0x6 011c 0273 | s | Execute Discrete,Plus 011d e01b | | Load 0x0,0x1b 011e 0273 | s | Execute Discrete,Plus 011f 0129 | ) | Execute Any,Make_Visible 0120 4800 |H | Short_Literal 0x0 0121 0129 | ) | Execute Any,Make_Visible 0122 a002 | | Store_Unchecked 0x0,0x2 0123 00c6 | | Action Check_Subprogram_Elaborated 0124 e017 | | Load 0x0,0x17 0125 0129 | ) | Execute Any,Make_Visible 0126 e004 | | Load 0x0,0x4 0127 00d8 | | Load_Top At_Offset_0 0128 012c | , | Execute Any,Size 0129 00d9 | | Load_Top At_Offset_1 012a 0266 | f | Execute Discrete,Bounds 012b 00db | | Load_Top At_Offset_3 012c 0122 | " | Execute Any,Make_Root_Type 012d 00d8 | | Load_Top At_Offset_0 012e 012c | , | Execute Any,Size 012f 00d0 | | Action Swap_Control 0130 0266 | f | Execute Discrete,Bounds 0131 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 0133 03fa | | Declare_Type Discrete,Defined,With_Size 0134 03f7 | | QQ_Declare_Variable Discrete,XXX 0135 00cd | | Action Spare6_Action 0136 0129 | ) | Execute Any,Make_Visible 0137 e01a | | Load 0x0,0x1a 0138 0129 | ) | Execute Any,Make_Visible 0139 0093 0000 | | push_full_address 0x0 013b 6210 |b | Indirect_Literal Discrete,0x34c,{0x80000000, 0x000f0000} 013c 0273 | s | Execute Discrete,Plus 013d e006 | | Load 0x0,0x6 013e 0273 | s | Execute Discrete,Plus 013f e01c | | Load 0x0,0x1c 0140 0273 | s | Execute Discrete,Plus 0141 0129 | ) | Execute Any,Make_Visible 0142 4800 |H | Short_Literal 0x0 0143 0129 | ) | Execute Any,Make_Visible 0144 a00e | | Store_Unchecked 0x0,0xe 0145 00c6 | | Action Check_Subprogram_Elaborated 0146 e01d | | Load 0x0,0x1d 0147 0129 | ) | Execute Any,Make_Visible 0148 0093 0000 | | push_full_address 0x0 014a 61fd |a | Indirect_Literal Discrete,0x348,{0x80000000, 0x000e0000} 014b 0273 | s | Execute Discrete,Plus 014c e006 | | Load 0x0,0x6 014d 0273 | s | Execute Discrete,Plus 014e e01e | | Load 0x0,0x1e 014f 0273 | s | Execute Discrete,Plus 0150 0129 | ) | Execute Any,Make_Visible 0151 4800 |H | Short_Literal 0x0 0152 0129 | ) | Execute Any,Make_Visible 0153 a011 | | Store_Unchecked 0x0,0x11 0154 00c6 | | Action Check_Subprogram_Elaborated 0155 e01d | | Load 0x0,0x1d 0156 0129 | ) | Execute Any,Make_Visible 0157 0093 0000 | | push_full_address 0x0 0159 61ea |a | Indirect_Literal Discrete,0x344,{0x80000000, 0x000d0000} 015a 0273 | s | Execute Discrete,Plus 015b e006 | | Load 0x0,0x6 015c 0273 | s | Execute Discrete,Plus 015d e01f | | Load 0x0,0x1f 015e 0273 | s | Execute Discrete,Plus 015f 0129 | ) | Execute Any,Make_Visible 0160 4800 |H | Short_Literal 0x0 0161 0129 | ) | Execute Any,Make_Visible 0162 a020 | | Store_Unchecked 0x0,0x20 0163 00c6 | | Action Check_Subprogram_Elaborated 0164 e021 | ! | Load 0x0,0x21 0165 00d8 | | Load_Top At_Offset_0 0166 012c | , | Execute Any,Size 0167 00d9 | | Load_Top At_Offset_1 0168 0266 | f | Execute Discrete,Bounds 0169 00db | | Load_Top At_Offset_3 016a 0122 | " | Execute Any,Make_Root_Type 016b 00d8 | | Load_Top At_Offset_0 016c 012c | , | Execute Any,Size 016d 00d0 | | Action Swap_Control 016e 0266 | f | Execute Discrete,Bounds 016f 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 0171 03fa | | Declare_Type Discrete,Defined,With_Size 0172 03f7 | | QQ_Declare_Variable Discrete,XXX 0173 00cd | | Action Spare6_Action 0174 0129 | ) | Execute Any,Make_Visible 0175 0093 0000 | | push_full_address 0x0 0177 61c8 |a | Indirect_Literal Discrete,0x340,{0x80000000, 0x000c0000} 0178 0273 | s | Execute Discrete,Plus 0179 e006 | | Load 0x0,0x6 017a 0273 | s | Execute Discrete,Plus 017b e022 | " | Load 0x0,0x22 017c 0273 | s | Execute Discrete,Plus 017d 0129 | ) | Execute Any,Make_Visible 017e 4800 |H | Short_Literal 0x0 017f 0129 | ) | Execute Any,Make_Visible 0180 a023 | # | Store_Unchecked 0x0,0x23 0181 00c6 | | Action Check_Subprogram_Elaborated 0182 e021 | ! | Load 0x0,0x21 0183 00d8 | | Load_Top At_Offset_0 0184 012c | , | Execute Any,Size 0185 00d9 | | Load_Top At_Offset_1 0186 0266 | f | Execute Discrete,Bounds 0187 00db | | Load_Top At_Offset_3 0188 0122 | " | Execute Any,Make_Root_Type 0189 00d8 | | Load_Top At_Offset_0 018a 012c | , | Execute Any,Size 018b 00d0 | | Action Swap_Control 018c 0266 | f | Execute Discrete,Bounds 018d 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 018f 03fa | | Declare_Type Discrete,Defined,With_Size 0190 03f7 | | QQ_Declare_Variable Discrete,XXX 0191 00cd | | Action Spare6_Action 0192 0129 | ) | Execute Any,Make_Visible 0193 0093 0000 | | push_full_address 0x0 0195 61a6 |a | Indirect_Literal Discrete,0x33c,{0x80000000, 0x000b0000} 0196 0273 | s | Execute Discrete,Plus 0197 e006 | | Load 0x0,0x6 0198 0273 | s | Execute Discrete,Plus 0199 e024 | $ | Load 0x0,0x24 019a 0273 | s | Execute Discrete,Plus 019b 0129 | ) | Execute Any,Make_Visible 019c 4800 |H | Short_Literal 0x0 019d 0129 | ) | Execute Any,Make_Visible 019e a020 | | Store_Unchecked 0x0,0x20 019f 00c6 | | Action Check_Subprogram_Elaborated 01a0 e025 | % | Load 0x0,0x25 01a1 00d8 | | Load_Top At_Offset_0 01a2 012c | , | Execute Any,Size 01a3 00d9 | | Load_Top At_Offset_1 01a4 0266 | f | Execute Discrete,Bounds 01a5 00db | | Load_Top At_Offset_3 01a6 0122 | " | Execute Any,Make_Root_Type 01a7 00d8 | | Load_Top At_Offset_0 01a8 012c | , | Execute Any,Size 01a9 00d0 | | Action Swap_Control 01aa 0266 | f | Execute Discrete,Bounds 01ab 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 01ad 03fa | | Declare_Type Discrete,Defined,With_Size 01ae 03f7 | | QQ_Declare_Variable Discrete,XXX 01af 00cd | | Action Spare6_Action 01b0 0129 | ) | Execute Any,Make_Visible 01b1 0093 0000 | | push_full_address 0x0 01b3 6184 |a | Indirect_Literal Discrete,0x338,{0x80000000, 0x000a0000} 01b4 0273 | s | Execute Discrete,Plus 01b5 e006 | | Load 0x0,0x6 01b6 0273 | s | Execute Discrete,Plus 01b7 e026 | & | Load 0x0,0x26 01b8 0273 | s | Execute Discrete,Plus 01b9 0129 | ) | Execute Any,Make_Visible 01ba 4800 |H | Short_Literal 0x0 01bb 0129 | ) | Execute Any,Make_Visible 01bc a023 | # | Store_Unchecked 0x0,0x23 01bd 00c6 | | Action Check_Subprogram_Elaborated 01be e025 | % | Load 0x0,0x25 01bf 00d8 | | Load_Top At_Offset_0 01c0 012c | , | Execute Any,Size 01c1 00d9 | | Load_Top At_Offset_1 01c2 0266 | f | Execute Discrete,Bounds 01c3 00db | | Load_Top At_Offset_3 01c4 0122 | " | Execute Any,Make_Root_Type 01c5 00d8 | | Load_Top At_Offset_0 01c6 012c | , | Execute Any,Size 01c7 00d0 | | Action Swap_Control 01c8 0266 | f | Execute Discrete,Bounds 01c9 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 01cb 03fa | | Declare_Type Discrete,Defined,With_Size 01cc 03f7 | | QQ_Declare_Variable Discrete,XXX 01cd 00cd | | Action Spare6_Action 01ce 0129 | ) | Execute Any,Make_Visible 01cf 0093 0000 | | push_full_address 0x0 01d1 6162 |ab | Indirect_Literal Discrete,0x334,{0x80000000, 0x00090000} 01d2 0273 | s | Execute Discrete,Plus 01d3 e006 | | Load 0x0,0x6 01d4 0273 | s | Execute Discrete,Plus 01d5 e027 | ' | Load 0x0,0x27 01d6 0273 | s | Execute Discrete,Plus 01d7 0129 | ) | Execute Any,Make_Visible 01d8 4800 |H | Short_Literal 0x0 01d9 0129 | ) | Execute Any,Make_Visible 01da a020 | | Store_Unchecked 0x0,0x20 01db 00c6 | | Action Check_Subprogram_Elaborated 01dc e028 | ( | Load 0x0,0x28 01dd 00d8 | | Load_Top At_Offset_0 01de 012c | , | Execute Any,Size 01df 00d9 | | Load_Top At_Offset_1 01e0 0266 | f | Execute Discrete,Bounds 01e1 00db | | Load_Top At_Offset_3 01e2 0122 | " | Execute Any,Make_Root_Type 01e3 00d8 | | Load_Top At_Offset_0 01e4 012c | , | Execute Any,Size 01e5 00d0 | | Action Swap_Control 01e6 0266 | f | Execute Discrete,Bounds 01e7 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 01e9 03fa | | Declare_Type Discrete,Defined,With_Size 01ea 03f7 | | QQ_Declare_Variable Discrete,XXX 01eb 00cd | | Action Spare6_Action 01ec 0129 | ) | Execute Any,Make_Visible 01ed 0093 0000 | | push_full_address 0x0 01ef 6140 |a@ | Indirect_Literal Discrete,0x330,{0x80000000, 0x00080000} 01f0 0273 | s | Execute Discrete,Plus 01f1 e006 | | Load 0x0,0x6 01f2 0273 | s | Execute Discrete,Plus 01f3 e029 | ) | Load 0x0,0x29 01f4 0273 | s | Execute Discrete,Plus 01f5 0129 | ) | Execute Any,Make_Visible 01f6 4800 |H | Short_Literal 0x0 01f7 0129 | ) | Execute Any,Make_Visible 01f8 a023 | # | Store_Unchecked 0x0,0x23 01f9 00c6 | | Action Check_Subprogram_Elaborated 01fa e028 | ( | Load 0x0,0x28 01fb 00d8 | | Load_Top At_Offset_0 01fc 012c | , | Execute Any,Size 01fd 00d9 | | Load_Top At_Offset_1 01fe 0266 | f | Execute Discrete,Bounds 01ff 00db | | Load_Top At_Offset_3 0200 0122 | " | Execute Any,Make_Root_Type 0201 00d8 | | Load_Top At_Offset_0 0202 012c | , | Execute Any,Size 0203 00d0 | | Action Swap_Control 0204 0266 | f | Execute Discrete,Bounds 0205 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 0207 03fa | | Declare_Type Discrete,Defined,With_Size 0208 03f7 | | QQ_Declare_Variable Discrete,XXX 0209 00cd | | Action Spare6_Action 020a 0129 | ) | Execute Any,Make_Visible 020b 0093 0000 | | push_full_address 0x0 020d 611e |a | Indirect_Literal Discrete,0x32c,{0x80000000, 0x00070000} 020e 0273 | s | Execute Discrete,Plus 020f e006 | | Load 0x0,0x6 0210 0273 | s | Execute Discrete,Plus 0211 e02a | * | Load 0x0,0x2a 0212 0273 | s | Execute Discrete,Plus 0213 0129 | ) | Execute Any,Make_Visible 0214 4800 |H | Short_Literal 0x0 0215 0129 | ) | Execute Any,Make_Visible 0216 a020 | | Store_Unchecked 0x0,0x20 0217 00c6 | | Action Check_Subprogram_Elaborated 0218 e02b | + | Load 0x0,0x2b 0219 00d8 | | Load_Top At_Offset_0 021a 012c | , | Execute Any,Size 021b 00d9 | | Load_Top At_Offset_1 021c 0266 | f | Execute Discrete,Bounds 021d 00db | | Load_Top At_Offset_3 021e 0122 | " | Execute Any,Make_Root_Type 021f 00d8 | | Load_Top At_Offset_0 0220 012c | , | Execute Any,Size 0221 00d0 | | Action Swap_Control 0222 0266 | f | Execute Discrete,Bounds 0223 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 0225 03fa | | Declare_Type Discrete,Defined,With_Size 0226 03f7 | | QQ_Declare_Variable Discrete,XXX 0227 00cd | | Action Spare6_Action 0228 0129 | ) | Execute Any,Make_Visible 0229 0093 0000 | | push_full_address 0x0 022b 60fc |` | Indirect_Literal Discrete,0x328,{0x80000000, 0x00060000} 022c 0273 | s | Execute Discrete,Plus 022d e006 | | Load 0x0,0x6 022e 0273 | s | Execute Discrete,Plus 022f e02c | , | Load 0x0,0x2c 0230 0273 | s | Execute Discrete,Plus 0231 0129 | ) | Execute Any,Make_Visible 0232 4800 |H | Short_Literal 0x0 0233 0129 | ) | Execute Any,Make_Visible 0234 a023 | # | Store_Unchecked 0x0,0x23 0235 00c6 | | Action Check_Subprogram_Elaborated 0236 e02b | + | Load 0x0,0x2b 0237 00d8 | | Load_Top At_Offset_0 0238 012c | , | Execute Any,Size 0239 00d9 | | Load_Top At_Offset_1 023a 0266 | f | Execute Discrete,Bounds 023b 00db | | Load_Top At_Offset_3 023c 0122 | " | Execute Any,Make_Root_Type 023d 00d8 | | Load_Top At_Offset_0 023e 012c | , | Execute Any,Size 023f 00d0 | | Action Swap_Control 0240 0266 | f | Execute Discrete,Bounds 0241 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 0243 03fa | | Declare_Type Discrete,Defined,With_Size 0244 03f7 | | QQ_Declare_Variable Discrete,XXX 0245 00cd | | Action Spare6_Action 0246 0129 | ) | Execute Any,Make_Visible 0247 0093 0000 | | push_full_address 0x0 0249 60da |` | Indirect_Literal Discrete,0x324,{0x80000000, 0x00050000} 024a 0273 | s | Execute Discrete,Plus 024b e006 | | Load 0x0,0x6 024c 0273 | s | Execute Discrete,Plus 024d e02d | - | Load 0x0,0x2d 024e 0273 | s | Execute Discrete,Plus 024f 0129 | ) | Execute Any,Make_Visible 0250 4800 |H | Short_Literal 0x0 0251 0129 | ) | Execute Any,Make_Visible 0252 4800 |H | Short_Literal 0x0 0253 48ff |H | Short_Literal 0xff 0254 00e8 | | Load_Encached Character_Cache 0255 02a0 | | Declare_Subprogram Null_Subprogram 0256 4801 |H | Short_Literal 0x1 0257 035e | ^ | Declare_Type Array,Defined,Visible 0258 029a 0383 | | Declare_Subprogram INIT_0380,For_Outer_Call,Visible,Unelaborated 025a 029a 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call,Visible,Unelaborated 025c 029a 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call,Visible,Unelaborated 025e a002 | | Store_Unchecked 0x0,0x2 025f 00c6 | | Action Check_Subprogram_Elaborated 0260 e02e | . | Load 0x0,0x2e 0261 0129 | ) | Execute Any,Make_Visible 0262 e004 | | Load 0x0,0x4 0263 00d8 | | Load_Top At_Offset_0 0264 012c | , | Execute Any,Size 0265 00d9 | | Load_Top At_Offset_1 0266 0266 | f | Execute Discrete,Bounds 0267 00db | | Load_Top At_Offset_3 0268 0122 | " | Execute Any,Make_Root_Type 0269 00d8 | | Load_Top At_Offset_0 026a 012c | , | Execute Any,Size 026b 00d0 | | Action Swap_Control 026c 0266 | f | Execute Discrete,Bounds 026d 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 026f 03fa | | Declare_Type Discrete,Defined,With_Size 0270 03f7 | | QQ_Declare_Variable Discrete,XXX 0271 00cd | | Action Spare6_Action 0272 0129 | ) | Execute Any,Make_Visible 0273 e02f | / | Load 0x0,0x2f 0274 0129 | ) | Execute Any,Make_Visible 0275 0093 0000 | | push_full_address 0x0 0277 60a8 |` | Indirect_Literal Discrete,0x320,{0x80000000, 0x00040000} 0278 0273 | s | Execute Discrete,Plus 0279 e006 | | Load 0x0,0x6 027a 0273 | s | Execute Discrete,Plus 027b e030 | 0 | Load 0x0,0x30 027c 0273 | s | Execute Discrete,Plus 027d 0129 | ) | Execute Any,Make_Visible 027e 4800 |H | Short_Literal 0x0 027f 0129 | ) | Execute Any,Make_Visible 0280 a008 | | Store_Unchecked 0x0,0x8 0281 00c6 | | Action Check_Subprogram_Elaborated 0282 e02e | . | Load 0x0,0x2e 0283 0129 | ) | Execute Any,Make_Visible 0284 e004 | | Load 0x0,0x4 0285 00d8 | | Load_Top At_Offset_0 0286 012c | , | Execute Any,Size 0287 00d9 | | Load_Top At_Offset_1 0288 0266 | f | Execute Discrete,Bounds 0289 00db | | Load_Top At_Offset_3 028a 0122 | " | Execute Any,Make_Root_Type 028b 00d8 | | Load_Top At_Offset_0 028c 012c | , | Execute Any,Size 028d 00d0 | | Action Swap_Control 028e 0266 | f | Execute Discrete,Bounds 028f 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 0291 03fa | | Declare_Type Discrete,Defined,With_Size 0292 03f7 | | QQ_Declare_Variable Discrete,XXX 0293 00cd | | Action Spare6_Action 0294 0129 | ) | Execute Any,Make_Visible 0295 e02f | / | Load 0x0,0x2f 0296 0129 | ) | Execute Any,Make_Visible 0297 0093 0000 | | push_full_address 0x0 0299 6082 |` | Indirect_Literal Discrete,0x31c,{0x80000000, 0x00030000} 029a 0273 | s | Execute Discrete,Plus 029b e006 | | Load 0x0,0x6 029c 0273 | s | Execute Discrete,Plus 029d e031 | 1 | Load 0x0,0x31 029e 0273 | s | Execute Discrete,Plus 029f 0129 | ) | Execute Any,Make_Visible 02a0 4800 |H | Short_Literal 0x0 02a1 0129 | ) | Execute Any,Make_Visible 02a2 a002 | | Store_Unchecked 0x0,0x2 02a3 00c6 | | Action Check_Subprogram_Elaborated 02a4 e032 | 2 | Load 0x0,0x32 02a5 0129 | ) | Execute Any,Make_Visible 02a6 e004 | | Load 0x0,0x4 02a7 00d8 | | Load_Top At_Offset_0 02a8 012c | , | Execute Any,Size 02a9 00d9 | | Load_Top At_Offset_1 02aa 0266 | f | Execute Discrete,Bounds 02ab 00db | | Load_Top At_Offset_3 02ac 0122 | " | Execute Any,Make_Root_Type 02ad 00d8 | | Load_Top At_Offset_0 02ae 012c | , | Execute Any,Size 02af 00d0 | | Action Swap_Control 02b0 0266 | f | Execute Discrete,Bounds 02b1 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 02b3 03fa | | Declare_Type Discrete,Defined,With_Size 02b4 03f7 | | QQ_Declare_Variable Discrete,XXX 02b5 00cd | | Action Spare6_Action 02b6 0129 | ) | Execute Any,Make_Visible 02b7 e033 | 3 | Load 0x0,0x33 02b8 0129 | ) | Execute Any,Make_Visible 02b9 0093 0000 | | push_full_address 0x0 02bb 605c |`\ | Indirect_Literal Discrete,0x318,{0x80000000, 0x00020000} 02bc 0273 | s | Execute Discrete,Plus 02bd e006 | | Load 0x0,0x6 02be 0273 | s | Execute Discrete,Plus 02bf e034 | 4 | Load 0x0,0x34 02c0 0273 | s | Execute Discrete,Plus 02c1 0129 | ) | Execute Any,Make_Visible 02c2 4800 |H | Short_Literal 0x0 02c3 0129 | ) | Execute Any,Make_Visible 02c4 a008 | | Store_Unchecked 0x0,0x8 02c5 00c6 | | Action Check_Subprogram_Elaborated 02c6 e032 | 2 | Load 0x0,0x32 02c7 0129 | ) | Execute Any,Make_Visible 02c8 e004 | | Load 0x0,0x4 02c9 00d8 | | Load_Top At_Offset_0 02ca 012c | , | Execute Any,Size 02cb 00d9 | | Load_Top At_Offset_1 02cc 0266 | f | Execute Discrete,Bounds 02cd 00db | | Load_Top At_Offset_3 02ce 0122 | " | Execute Any,Make_Root_Type 02cf 00d8 | | Load_Top At_Offset_0 02d0 012c | , | Execute Any,Size 02d1 00d0 | | Action Swap_Control 02d2 0266 | f | Execute Discrete,Bounds 02d3 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 02d5 03fa | | Declare_Type Discrete,Defined,With_Size 02d6 03f7 | | QQ_Declare_Variable Discrete,XXX 02d7 00cd | | Action Spare6_Action 02d8 0129 | ) | Execute Any,Make_Visible 02d9 e033 | 3 | Load 0x0,0x33 02da 0129 | ) | Execute Any,Make_Visible 02db 0093 0000 | | push_full_address 0x0 02dd 6036 |`6 | Indirect_Literal Discrete,0x314,{0x80000000, 0x00010000} 02de 0273 | s | Execute Discrete,Plus 02df e006 | | Load 0x0,0x6 02e0 0273 | s | Execute Discrete,Plus 02e1 e035 | 5 | Load 0x0,0x35 02e2 0273 | s | Execute Discrete,Plus 02e3 0129 | ) | Execute Any,Make_Visible 02e4 4800 |H | Short_Literal 0x0 02e5 0129 | ) | Execute Any,Make_Visible 02e6 00bf | | Action Accept_Activation 02e7 1d5e | ^ | Execute_Immediate Reference_Lex_1,0x5e 02e8 00c7 | | Action Elaborate_Subprogram 02e9 1d5f | _ | Execute_Immediate Reference_Lex_1,0x5f 02ea 00c7 | | Action Elaborate_Subprogram 02eb 1d60 | ` | Execute_Immediate Reference_Lex_1,0x60 02ec 00c7 | | Action Elaborate_Subprogram 02ed BODY_0008: 02ed 00bc | | Action Signal_Activated 02ee 00bb | | Action Signal_Completion 02ef 0000 | | .XXX[0x1] 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 02f3 | | .CONST 0x02f3 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0001 | | .CONST 0x0001 ; Number of locals 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 BODY_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 INIT_02f0: 02f3 4607 |F | Jump_Case 0x8 02f4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 02f5 7807 |x | Jump 0x2fd ; case 0x1 02f6 780a |x | Jump 0x301 ; case 0x2 02f7 780e |x | Jump 0x306 ; case 0x3 02f8 7811 |x | Jump 0x30a ; case 0x4 02f9 7810 |x | Jump 0x30a ; case 0x5 02fa 7811 |x | Jump 0x30c ; case 0x6 02fb 7814 |x | Jump 0x310 ; case 0x7 02fc 4302 |C | .XXX[0x1] 02fd 00da | | Load_Top At_Offset_2 02fe 00e0 | | Load_Encached Standard_Cache 02ff 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0300 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0301 00db | | Load_Top At_Offset_3 0302 00db | | Load_Top At_Offset_3 0303 00e0 | | Load_Encached Standard_Cache 0304 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0305 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0306 00da | | Load_Top At_Offset_2 0307 00e0 | | Load_Encached Standard_Cache 0308 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0309 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 030a 00db | | Load_Top At_Offset_3 030b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 030c 00e5 | | Load_Encached Long_Integer_Cache 030d 00dc | | Load_Top At_Offset_4 030e 0267 | g | Execute Discrete,Predecessor 030f 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0310 00e5 | | Load_Encached Long_Integer_Cache 0311 00dc | | Load_Top At_Offset_4 0312 0268 | h | Execute Discrete,Successor 0313 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0314 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0318 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 031c 8000 0000 | | .LITERAL {0x80000000, 0x00030000} 0320 8000 0000 | | .LITERAL {0x80000000, 0x00040000} 0324 8000 0000 | | .LITERAL {0x80000000, 0x00050000} 0328 8000 0000 | | .LITERAL {0x80000000, 0x00060000} 032c 8000 0000 | | .LITERAL {0x80000000, 0x00070000} 0330 8000 0000 | | .LITERAL {0x80000000, 0x00080000} 0334 8000 0000 | | .LITERAL {0x80000000, 0x00090000} 0338 8000 0000 | | .LITERAL {0x80000000, 0x000a0000} 033c 8000 0000 | | .LITERAL {0x80000000, 0x000b0000} 0340 8000 0000 | | .LITERAL {0x80000000, 0x000c0000} 0344 8000 0000 | | .LITERAL {0x80000000, 0x000d0000} 0348 8000 0000 | | .LITERAL {0x80000000, 0x000e0000} 034c 8000 0000 | | .LITERAL {0x80000000, 0x000f0000} 0350 8000 0000 | | .LITERAL {0x80000000, 0x00100000} 0354 8000 0000 | | .LITERAL {0x80000000, 0x00110000} 0358 8000 0000 | | .LITERAL {0x80000000, 0x00120000} 035c 8000 0000 | | .LITERAL {0x80000000, 0x00130000} 0360 8000 0000 | | .LITERAL {0x80000000, 0x00140000} 0364 8000 0000 | | .LITERAL {0x80000000, 0x00150000} 0368 8000 0000 | | .LITERAL {0x80000000, 0x00160000} 036c 8000 0000 | | .LITERAL {0x80000000, 0x00170000} 0370 8000 0000 | | .LITERAL {0x80000000, 0x00180000} 0374 8000 0000 | | .LITERAL {0x80000000, 0x00190000} 0378 8000 0000 | | .LITERAL {0x80000000, 0x001a0000} 037c 0000 0000 | | .BLANK 0000[0x4] 0380 ; -------------------------------------------------------------------------------------- 0380 ; SUBPROGRAM 0380 ; -------------------------------------------------------------------------------------- 0380 0387 | | .CONST 0x0387 ; Address of begin 0381 0004 | | .CONST 0x0004 ; Address of exception handler 0382 0002 | | .CONST 0x0002 ; Number of locals 0383 INIT_0380: 0383 00da | | Load_Top At_Offset_2 0384 01dc | | Execute Vector,Last 0385 00e2 | | Load_Encached Integer_Cache 0386 03f1 | | Declare_Variable Discrete,With_Value 0387 BODY_0380: 0387 00db | | Load_Top At_Offset_3 0388 01db | | Execute Vector,Length 0389 e5fe | | Load 0x2,-0x2 038a 01db | | Execute Vector,Length 038b 027e | ~ | Execute Discrete,Not_Equal 038c 6801 |h | Jump_Zero 0x38e 038d 08e0 | | Execute_Immediate Raise,0xe0 038e 00cf | | Action Mark_Auxiliary 038f e5fe | | Load 0x2,-0x2 0390 01da | | Execute Vector,Bounds 0391 0264 | d | Execute Discrete,Below_Bound 0392 700b |p | Jump_Nonzero 0x39e 0393 00db | | Load_Top At_Offset_3 0394 e5ff | | Load 0x2,-0x1 0395 01d7 | | Execute Vector,Field_Read 0396 00d9 | | Load_Top At_Offset_1 0397 e5fe | | Load 0x2,-0x2 0398 01d6 | | Execute Vector,Field_Write 0399 00db | | Load_Top At_Offset_3 039a 0aff | | Execute_Immediate Plus,-0x1 039b c402 | | Store 0x2,0x2 039c 00c8 | | Action Pop_Auxiliary_Range 039d 37f5 |7 | Loop_Decreasing 0x393 039e 00ce | | Action Pop_Auxiliary 039f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03a0 ; -------------------------------------------------------------------------------------- 03a0 ; SUBPROGRAM 03a0 ; -------------------------------------------------------------------------------------- 03a0 03a7 | | .CONST 0x03a7 ; Address of begin 03a1 0004 | | .CONST 0x0004 ; Address of exception handler 03a2 0002 | | .CONST 0x0002 ; Number of locals 03a3 INIT_03a0: 03a3 00da | | Load_Top At_Offset_2 03a4 01dc | | Execute Vector,Last 03a5 e028 | ( | Load 0x0,0x28 03a6 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 03a7 BODY_03a0: 03a7 e5fe | | Load 0x2,-0x2 03a8 01db | | Execute Vector,Length 03a9 e5ff | | Load 0x2,-0x1 03aa 01db | | Execute Vector,Length 03ab 027e | ~ | Execute Discrete,Not_Equal 03ac 6801 |h | Jump_Zero 0x3ae 03ad 08e0 | | Execute_Immediate Raise,0xe0 03ae 00cf | | Action Mark_Auxiliary 03af e5fe | | Load 0x2,-0x2 03b0 01da | | Execute Vector,Bounds 03b1 0264 | d | Execute Discrete,Below_Bound 03b2 7012 |p | Jump_Nonzero 0x3c5 03b3 00db | | Load_Top At_Offset_3 03b4 e5ff | | Load 0x2,-0x1 03b5 01d7 | | Execute Vector,Field_Read 03b6 4880 |H | Short_Literal 0x80 03b7 026f | o | Execute Discrete,Remainder 03b8 00d8 | | Load_Top At_Offset_0 03b9 00e8 | | Load_Encached Character_Cache 03ba 0260 | ` | Execute Discrete,In_Type 03bb 7001 |p | Jump_Nonzero 0x3bd 03bc 0801 | | Execute_Immediate Raise,0x1 03bd 00d9 | | Load_Top At_Offset_1 03be e5fe | | Load 0x2,-0x2 03bf 01d6 | | Execute Vector,Field_Write 03c0 00db | | Load_Top At_Offset_3 03c1 0aff | | Execute_Immediate Plus,-0x1 03c2 c402 | | Store 0x2,0x2 03c3 00c8 | | Action Pop_Auxiliary_Range 03c4 37ee |7 | Loop_Decreasing 0x3b3 03c5 00ce | | Action Pop_Auxiliary 03c6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03c7 0000 | | .XXX[0x1] 03c8 ; -------------------------------------------------------------------------------------- 03c8 ; SUBPROGRAM 03c8 ; -------------------------------------------------------------------------------------- 03c8 03cf | | .CONST 0x03cf ; Address of begin 03c9 0004 | | .CONST 0x0004 ; Address of exception handler 03ca 0002 | | .CONST 0x0002 ; Number of locals 03cb INIT_03c8: 03cb 00da | | Load_Top At_Offset_2 03cc 01dc | | Execute Vector,Last 03cd e028 | ( | Load 0x0,0x28 03ce 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 03cf BODY_03c8: 03cf e5fd | | Load 0x2,-0x3 03d0 01db | | Execute Vector,Length 03d1 e5ff | | Load 0x2,-0x1 03d2 01db | | Execute Vector,Length 03d3 027e | ~ | Execute Discrete,Not_Equal 03d4 6801 |h | Jump_Zero 0x3d6 03d5 08e0 | | Execute_Immediate Raise,0xe0 03d6 00cf | | Action Mark_Auxiliary 03d7 e5fd | | Load 0x2,-0x3 03d8 01da | | Execute Vector,Bounds 03d9 0264 | d | Execute Discrete,Below_Bound 03da 700d |p | Jump_Nonzero 0x3e8 03db 00db | | Load_Top At_Offset_3 03dc e5ff | | Load 0x2,-0x1 03dd 01d7 | | Execute Vector,Field_Read 03de e5fe | | Load 0x2,-0x2 03df 01d7 | | Execute Vector,Field_Read 03e0 00d9 | | Load_Top At_Offset_1 03e1 e5fd | | Load 0x2,-0x3 03e2 01d6 | | Execute Vector,Field_Write 03e3 00db | | Load_Top At_Offset_3 03e4 0aff | | Execute_Immediate Plus,-0x1 03e5 c402 | | Store 0x2,0x2 03e6 00c8 | | Action Pop_Auxiliary_Range 03e7 37f3 |7 | Loop_Decreasing 0x3db 03e8 00ce | | Action Pop_Auxiliary 03e9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 03ea 0000 0000 | | .BLANK 0000[0x6] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; Debug Table 03f0 ; -------------------------------------------------------------------------------------- 03f0 0004 0000 | | .DEBUG4 0x0004,0x0000,0x67fb,0x0000,0x0001,0x0006 03f6 000b 040e | | .DBG4T 0x000b,0x040e,0x8000,0x0000 03fa 02e7 042e | .| .DBG4T 0x02e7,0x042e,0x8000,0x0000 03fe 02f3 0000 | | .DBG4T 0x02f3,0x0000,0x0005,0x0000 0402 0383 0433 | 3| .DBG4T 0x0383,0x0433,0x0001,0x0000 0406 03a3 043b | ;| .DBG4T 0x03a3,0x043b,0x0001,0x0000 040a 03cb 0443 | C| .DBG4T 0x03cb,0x0443,0x0001,0x0000 040e ; -------------------------------------------------------------------------------------- 040e ; Debug chain 040e ; -------------------------------------------------------------------------------------- 040e 001e 0000 | | .DBGLEN 0x001e,0x0000 0410 000b 002d | -| .DBGLNO 0x000b,0x002d,0x004f,0x0071,0x0093,0x00a2,0x00b1,0x00c0,0x00e2,0x00f1,0x0100,0x0122,0x0144,0x0153,0x0162,0x0180,0x019e,0x01bc,0x01da,0x01f8,0x0216,0x0234,0x0252,0x0258,0x025a,0x025c,0x025e,0x0280,0x02a2,0x02c4 042e ; -------------------------------------------------------------------------------------- 042e ; Debug chain 042e ; -------------------------------------------------------------------------------------- 042e 0003 0000 | | .DBGLEN 0x0003,0x0000 0430 02e7 02e9 | | .DBGLNO 0x02e7,0x02e9,0x02eb 0433 ; -------------------------------------------------------------------------------------- 0433 ; Debug chain 0433 ; -------------------------------------------------------------------------------------- 0433 0001 0005 | | .DBGLEN 0x0001,0x0005 0435 0383 0387 | | .DBGLNO 0x0383,0x0387,0x038d,0x038f,0x0393,0x0399 043b ; -------------------------------------------------------------------------------------- 043b ; Debug chain 043b ; -------------------------------------------------------------------------------------- 043b 0001 0005 | | .DBGLEN 0x0001,0x0005 043d 03a3 03a7 | | .DBGLNO 0x03a3,0x03a7,0x03ad,0x03af,0x03b3,0x03c0 0443 ; -------------------------------------------------------------------------------------- 0443 ; Debug chain 0443 ; -------------------------------------------------------------------------------------- 0443 0001 0005 | | .DBGLEN 0x0001,0x0005 0445 03cb 03cf | | .DBGLNO 0x03cb,0x03cf,0x03d5,0x03d7,0x03db,0x03e3 044b 0000 0000 | | .BLANK 0000[0x1b5]