|
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: 24576 (0x6000) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦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 2e70 |.p | .CONST 0x2e70 ; 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 801d | | .CONST 0x801d ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0458 | X | .CONST 0x0458 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 00e9 | | .CONST 0x00e9 ; Number of locals 000b INIT_0008: 000b e001 | | Load 0x0,0x1 000c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 000d 0129 | ) | Execute Any,Make_Visible 000e 029a 0463 | c| Declare_Subprogram INIT_0460,For_Outer_Call,Visible,Unelaborated 0010 00c4 | | Action Make_Default 0011 00c4 | | Action Make_Default 0012 00c4 | | Action Make_Default 0013 00c4 | | Action Make_Default 0014 00c4 | | Action Make_Default 0015 00c4 | | Action Make_Default 0016 00c4 | | Action Make_Default 0017 00c4 | | Action Make_Default 0018 00c4 | | Action Make_Default 0019 00c4 | | Action Make_Default 001a 00c4 | | Action Make_Default 001b 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 00c4 | | Action Make_Default 002b 00c4 | | Action Make_Default 002c 00c4 | | Action Make_Default 002d 00c4 | | Action Make_Default 002e 00c4 | | Action Make_Default 002f 00c4 | | Action Make_Default 0030 00c4 | | Action Make_Default 0031 00c4 | | Action Make_Default 0032 00c4 | | Action Make_Default 0033 00c4 | | Action Make_Default 0034 00c4 | | Action Make_Default 0035 00c4 | | Action Make_Default 0036 00c4 | | Action Make_Default 0037 00c4 | | Action Make_Default 0038 00c4 | | Action Make_Default 0039 00c4 | | Action Make_Default 003a 00c4 | | Action Make_Default 003b 00c4 | | Action Make_Default 003c 00c4 | | Action Make_Default 003d 00c4 | | Action Make_Default 003e 00c4 | | Action Make_Default 003f 00c4 | | Action Make_Default 0040 00c4 | | Action Make_Default 0041 00c4 | | Action Make_Default 0042 00c4 | | Action Make_Default 0043 00c4 | | Action Make_Default 0044 00c4 | | Action Make_Default 0045 00c4 | | Action Make_Default 0046 00c4 | | Action Make_Default 0047 00c4 | | Action Make_Default 0048 00c4 | | Action Make_Default 0049 00c4 | | Action Make_Default 004a 00c4 | | Action Make_Default 004b 00c4 | | Action Make_Default 004c 00c4 | | Action Make_Default 004d 00c4 | | Action Make_Default 004e 00c4 | | Action Make_Default 004f 00c4 | | Action Make_Default 0050 00c4 | | Action Make_Default 0051 00c4 | | Action Make_Default 0052 00c4 | | Action Make_Default 0053 00c4 | | Action Make_Default 0054 00c4 | | Action Make_Default 0055 00c4 | | Action Make_Default 0056 00c4 | | Action Make_Default 0057 00c4 | | Action Make_Default 0058 00c4 | | Action Make_Default 0059 00c4 | | Action Make_Default 005a 00c4 | | Action Make_Default 005b 00c4 | | Action Make_Default 005c 00c4 | | Action Make_Default 005d 00c4 | | Action Make_Default 005e 00c4 | | Action Make_Default 005f 00c4 | | Action Make_Default 0060 00c4 | | Action Make_Default 0061 00c4 | | Action Make_Default 0062 00c4 | | Action Make_Default 0063 00c4 | | Action Make_Default 0064 00c4 | | Action Make_Default 0065 00c4 | | Action Make_Default 0066 00c4 | | Action Make_Default 0067 00c4 | | Action Make_Default 0068 00c4 | | Action Make_Default 0069 00c4 | | Action Make_Default 006a 00c4 | | Action Make_Default 006b 00c4 | | Action Make_Default 006c 00c4 | | Action Make_Default 006d 00c4 | | Action Make_Default 006e 00c4 | | Action Make_Default 006f 00c4 | | Action Make_Default 0070 00c4 | | Action Make_Default 0071 00c4 | | Action Make_Default 0072 00c4 | | Action Make_Default 0073 00c4 | | Action Make_Default 0074 00c4 | | Action Make_Default 0075 00c4 | | Action Make_Default 0076 00c4 | | Action Make_Default 0077 00c4 | | Action Make_Default 0078 00c4 | | Action Make_Default 0079 00c4 | | Action Make_Default 007a 00c4 | | Action Make_Default 007b 00c4 | | Action Make_Default 007c 00c4 | | Action Make_Default 007d 00c4 | | Action Make_Default 007e 00c4 | | Action Make_Default 007f 00c4 | | Action Make_Default 0080 00c4 | | Action Make_Default 0081 00c4 | | Action Make_Default 0082 00c4 | | Action Make_Default 0083 00c4 | | Action Make_Default 0084 00c4 | | Action Make_Default 0085 00c4 | | Action Make_Default 0086 00c4 | | Action Make_Default 0087 00c4 | | Action Make_Default 0088 00c4 | | Action Make_Default 0089 00c4 | | Action Make_Default 008a 00c4 | | Action Make_Default 008b 00c4 | | Action Make_Default 008c 00c4 | | Action Make_Default 008d 00c4 | | Action Make_Default 008e 00c4 | | Action Make_Default 008f 00c4 | | Action Make_Default 0090 00c4 | | Action Make_Default 0091 00c4 | | Action Make_Default 0092 00c4 | | Action Make_Default 0093 00c4 | | Action Make_Default 0094 00c4 | | Action Make_Default 0095 00c4 | | Action Make_Default 0096 00c4 | | Action Make_Default 0097 00c4 | | Action Make_Default 0098 029a 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call,Visible,Unelaborated 009a c286 | | Store 0x1,0x86 009b 00e3 | | Load_Encached Natural_Cache 009c 0266 | f | Execute Discrete,Bounds 009d e20d | | Load 0x1,0xd 009e 02a0 | | Declare_Subprogram Null_Subprogram 009f 4801 |H | Short_Literal 0x1 00a0 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 00a1 c20f | | Store 0x1,0xf 00a2 00e3 | | Load_Encached Natural_Cache 00a3 e002 | | Load 0x0,0x2 00a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a5 4801 |H | Short_Literal 0x1 00a6 63b5 |c | Indirect_Literal Discrete,0x45c,{0x00000000, 0x7fffffff} 00a7 e20f | | Load 0x1,0xf 00a8 034f | O | Declare_Type Array,Constrained,Visible,Bounds_With_Object 00a9 029f 2b4b | +K| Declare_Subprogram INIT_2b48,For_Call 00ab 4800 |H | Short_Literal 0x0 00ac 4801 |H | Short_Literal 0x1 00ad 4801 |H | Short_Literal 0x1 00ae 4800 |H | Short_Literal 0x0 00af 4801 |H | Short_Literal 0x1 00b0 4801 |H | Short_Literal 0x1 00b1 031e | | Declare_Type Variant_Record,Defined,Visible 00b2 c210 | | Store 0x1,0x10 00b3 e003 | | Load 0x0,0x3 00b4 1b14 | | Execute Package,Field_Read,Field_Number 0x14 00b5 0129 | ) | Execute Any,Make_Visible 00b6 c211 | | Store 0x1,0x11 00b7 00e9 | | Load_Encached String_Cache 00b8 0129 | ) | Execute Any,Make_Visible 00b9 c265 | e | Store 0x1,0x65 00ba 029a 0473 | s| Declare_Subprogram INIT_0470,For_Outer_Call,Visible,Unelaborated 00bc c292 | | Store 0x1,0x92 00bd 029a 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call,Visible,Unelaborated 00bf c213 | | Store 0x1,0x13 00c0 029a 0563 | c| Declare_Subprogram INIT_0560,For_Outer_Call,Visible,Unelaborated 00c2 c291 | | Store 0x1,0x91 00c3 029a 05ab | | Declare_Subprogram INIT_05a8,For_Outer_Call,Visible,Unelaborated 00c5 c27e | ~ | Store 0x1,0x7e 00c6 029a 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call,Visible,Unelaborated 00c8 c214 | | Store 0x1,0x14 00c9 029a 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call,Visible,Unelaborated 00cb c215 | | Store 0x1,0x15 00cc 029a 060b | | Declare_Subprogram INIT_0608,For_Outer_Call,Visible,Unelaborated 00ce c216 | | Store 0x1,0x16 00cf 029a 061b | | Declare_Subprogram INIT_0618,For_Outer_Call,Visible,Unelaborated 00d1 c217 | | Store 0x1,0x17 00d2 029a 062b | +| Declare_Subprogram INIT_0628,For_Outer_Call,Visible,Unelaborated 00d4 c218 | | Store 0x1,0x18 00d5 029a 0633 | 3| Declare_Subprogram INIT_0630,For_Outer_Call,Visible,Unelaborated 00d7 c219 | | Store 0x1,0x19 00d8 029a 063b | ;| Declare_Subprogram INIT_0638,For_Outer_Call,Visible,Unelaborated 00da c27a | z | Store 0x1,0x7a 00db 029a 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call,Visible,Unelaborated 00dd c27b | { | Store 0x1,0x7b 00de 029a 065b | [| Declare_Subprogram INIT_0658,For_Outer_Call,Visible,Unelaborated 00e0 c27c | | | Store 0x1,0x7c 00e1 029a 066b | k| Declare_Subprogram INIT_0668,For_Outer_Call,Visible,Unelaborated 00e3 c27d | } | Store 0x1,0x7d 00e4 029a 067b | {| Declare_Subprogram INIT_0678,For_Outer_Call,Visible,Unelaborated 00e6 c28b | | Store 0x1,0x8b 00e7 029a 069b | | Declare_Subprogram INIT_0698,For_Outer_Call,Visible,Unelaborated 00e9 c28c | | Store 0x1,0x8c 00ea 029a 070b | | Declare_Subprogram INIT_0708,For_Outer_Call,Visible,Unelaborated 00ec c28d | | Store 0x1,0x8d 00ed 029a 073b | ;| Declare_Subprogram INIT_0738,For_Outer_Call,Visible,Unelaborated 00ef c28e | | Store 0x1,0x8e 00f0 029a 075b | [| Declare_Subprogram INIT_0758,For_Outer_Call,Visible,Unelaborated 00f2 c28f | | Store 0x1,0x8f 00f3 029a 07bb | | Declare_Subprogram INIT_07b8,For_Outer_Call,Visible,Unelaborated 00f5 c290 | | Store 0x1,0x90 00f6 029a 0843 | C| Declare_Subprogram INIT_0840,For_Outer_Call,Visible,Unelaborated 00f8 c221 | ! | Store 0x1,0x21 00f9 029a 085b | [| Declare_Subprogram INIT_0858,For_Outer_Call,Visible,Unelaborated 00fb c222 | " | Store 0x1,0x22 00fc 029a 08eb | | Declare_Subprogram INIT_08e8,For_Outer_Call,Visible,Unelaborated 00fe c26e | n | Store 0x1,0x6e 00ff 029a 08fb | | Declare_Subprogram INIT_08f8,For_Outer_Call,Visible,Unelaborated 0101 c224 | $ | Store 0x1,0x24 0102 029a 090b | | Declare_Subprogram INIT_0908,For_Outer_Call,Visible,Unelaborated 0104 c225 | % | Store 0x1,0x25 0105 029a 0913 | | Declare_Subprogram INIT_0910,For_Outer_Call,Visible,Unelaborated 0107 c226 | & | Store 0x1,0x26 0108 029a 091b | | Declare_Subprogram INIT_0918,For_Outer_Call,Visible,Unelaborated 010a c227 | ' | Store 0x1,0x27 010b e001 | | Load 0x0,0x1 010c 1b13 | | Execute Package,Field_Read,Field_Number 0x13 010d 0129 | ) | Execute Any,Make_Visible 010e c228 | ( | Store 0x1,0x28 010f 00e3 | | Load_Encached Natural_Cache 0110 0266 | f | Execute Discrete,Bounds 0111 e001 | | Load 0x0,0x1 0112 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0113 02a0 | | Declare_Subprogram Null_Subprogram 0114 4801 |H | Short_Literal 0x1 0115 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 0116 c229 | ) | Store 0x1,0x29 0117 00e3 | | Load_Encached Natural_Cache 0118 e002 | | Load 0x0,0x2 0119 1b0d | | Execute Package,Field_Read,Field_Number 0xd 011a 4801 |H | Short_Literal 0x1 011b 6340 |c@ | Indirect_Literal Discrete,0x45c,{0x00000000, 0x7fffffff} 011c e229 | ) | Load 0x1,0x29 011d 034f | O | Declare_Type Array,Constrained,Visible,Bounds_With_Object 011e 029f 2b73 | +s| Declare_Subprogram INIT_2b70,For_Call 0120 4800 |H | Short_Literal 0x0 0121 4801 |H | Short_Literal 0x1 0122 4801 |H | Short_Literal 0x1 0123 4800 |H | Short_Literal 0x0 0124 4801 |H | Short_Literal 0x1 0125 4801 |H | Short_Literal 0x1 0126 031e | | Declare_Type Variant_Record,Defined,Visible 0127 c22a | * | Store 0x1,0x2a 0128 029a 092b | +| Declare_Subprogram INIT_0928,For_Outer_Call,Visible,Unelaborated 012a c22b | + | Store 0x1,0x2b 012b 029a 0943 | C| Declare_Subprogram INIT_0940,For_Outer_Call,Visible,Unelaborated 012d c22c | , | Store 0x1,0x2c 012e 029a 098b | | Declare_Subprogram INIT_0988,For_Outer_Call,Visible,Unelaborated 0130 c22d | - | Store 0x1,0x2d 0131 029a 09a3 | | Declare_Subprogram INIT_09a0,For_Outer_Call,Visible,Unelaborated 0133 c22e | . | Store 0x1,0x2e 0134 029a 09cb | | Declare_Subprogram INIT_09c8,For_Outer_Call,Visible,Unelaborated 0136 c22f | / | Store 0x1,0x2f 0137 029a 0a43 | C| Declare_Subprogram INIT_0a40,For_Outer_Call,Visible,Unelaborated 0139 c230 | 0 | Store 0x1,0x30 013a 029a 0a53 | S| Declare_Subprogram INIT_0a50,For_Outer_Call,Visible,Unelaborated 013c c231 | 1 | Store 0x1,0x31 013d 029a 0b13 | | Declare_Subprogram INIT_0b10,For_Outer_Call,Visible,Unelaborated 013f c232 | 2 | Store 0x1,0x32 0140 029a 0b8b | | Declare_Subprogram INIT_0b88,For_Outer_Call,Visible,Unelaborated 0142 c233 | 3 | Store 0x1,0x33 0143 029a 0bab | | Declare_Subprogram INIT_0ba8,For_Outer_Call,Visible,Unelaborated 0145 c234 | 4 | Store 0x1,0x34 0146 029a 0bbb | | Declare_Subprogram INIT_0bb8,For_Outer_Call,Visible,Unelaborated 0148 c235 | 5 | Store 0x1,0x35 0149 029a 0cbb | | Declare_Subprogram INIT_0cb8,For_Outer_Call,Visible,Unelaborated 014b c236 | 6 | Store 0x1,0x36 014c 029a 0d33 | 3| Declare_Subprogram INIT_0d30,For_Outer_Call,Visible,Unelaborated 014e c237 | 7 | Store 0x1,0x37 014f 029a 0d43 | C| Declare_Subprogram INIT_0d40,For_Outer_Call,Visible,Unelaborated 0151 c238 | 8 | Store 0x1,0x38 0152 029a 0d53 | S| Declare_Subprogram INIT_0d50,For_Outer_Call,Visible,Unelaborated 0154 c239 | 9 | Store 0x1,0x39 0155 029a 0dcb | | Declare_Subprogram INIT_0dc8,For_Outer_Call,Visible,Unelaborated 0157 c23a | : | Store 0x1,0x3a 0158 029a 0e6b | k| Declare_Subprogram INIT_0e68,For_Outer_Call,Visible,Unelaborated 015a c284 | | Store 0x1,0x84 015b 029a 0e7b | {| Declare_Subprogram INIT_0e78,For_Outer_Call,Visible,Unelaborated 015d c285 | | Store 0x1,0x85 015e 029a 0e93 | | Declare_Subprogram INIT_0e90,For_Outer_Call,Visible,Unelaborated 0160 c23b | ; | Store 0x1,0x3b 0161 029a 0ea3 | | Declare_Subprogram INIT_0ea0,For_Outer_Call,Visible,Unelaborated 0163 c23c | < | Store 0x1,0x3c 0164 029a 0eb3 | | Declare_Subprogram INIT_0eb0,For_Outer_Call,Visible,Unelaborated 0166 c23d | = | Store 0x1,0x3d 0167 029a 0ec3 | | Declare_Subprogram INIT_0ec0,For_Outer_Call,Visible,Unelaborated 0169 c23e | > | Store 0x1,0x3e 016a 029a 0ed3 | | Declare_Subprogram INIT_0ed0,For_Outer_Call,Visible,Unelaborated 016c c287 | | Store 0x1,0x87 016d 029a 0edb | | Declare_Subprogram INIT_0ed8,For_Outer_Call,Visible,Unelaborated 016f c288 | | Store 0x1,0x88 0170 029a 0ee3 | | Declare_Subprogram INIT_0ee0,For_Outer_Call,Visible,Unelaborated 0172 c23f | ? | Store 0x1,0x3f 0173 029a 0f0b | | Declare_Subprogram INIT_0f08,For_Outer_Call,Visible,Unelaborated 0175 c240 | @ | Store 0x1,0x40 0176 029a 0f43 | C| Declare_Subprogram INIT_0f40,For_Outer_Call,Visible,Unelaborated 0178 c241 | A | Store 0x1,0x41 0179 029a 0f73 | s| Declare_Subprogram INIT_0f70,For_Outer_Call,Visible,Unelaborated 017b c242 | B | Store 0x1,0x42 017c 029a 0f83 | | Declare_Subprogram INIT_0f80,For_Outer_Call,Visible,Unelaborated 017e c243 | C | Store 0x1,0x43 017f 029a 0f93 | | Declare_Subprogram INIT_0f90,For_Outer_Call,Visible,Unelaborated 0181 c244 | D | Store 0x1,0x44 0182 029a 0fab | | Declare_Subprogram INIT_0fa8,For_Outer_Call,Visible,Unelaborated 0184 c283 | | Store 0x1,0x83 0185 029a 0fdb | | Declare_Subprogram INIT_0fd8,For_Outer_Call,Visible,Unelaborated 0187 c28a | | Store 0x1,0x8a 0188 029a 100b | | Declare_Subprogram INIT_1008,For_Outer_Call,Visible,Unelaborated 018a c245 | E | Store 0x1,0x45 018b 029a 101b | | Declare_Subprogram INIT_1018,For_Outer_Call,Visible,Unelaborated 018d c246 | F | Store 0x1,0x46 018e 029a 1023 | #| Declare_Subprogram INIT_1020,For_Outer_Call,Visible,Unelaborated 0190 c247 | G | Store 0x1,0x47 0191 029a 106b | k| Declare_Subprogram INIT_1068,For_Outer_Call,Visible,Unelaborated 0193 c248 | H | Store 0x1,0x48 0194 029a 1073 | s| Declare_Subprogram INIT_1070,For_Outer_Call,Visible,Unelaborated 0196 c249 | I | Store 0x1,0x49 0197 029a 1083 | | Declare_Subprogram INIT_1080,For_Outer_Call,Visible,Unelaborated 0199 c24a | J | Store 0x1,0x4a 019a 029a 108b | | Declare_Subprogram INIT_1088,For_Outer_Call,Visible,Unelaborated 019c c24b | K | Store 0x1,0x4b 019d 029a 109b | | Declare_Subprogram INIT_1098,For_Outer_Call,Visible,Unelaborated 019f c24c | L | Store 0x1,0x4c 01a0 029a 10a3 | | Declare_Subprogram INIT_10a0,For_Outer_Call,Visible,Unelaborated 01a2 c24d | M | Store 0x1,0x4d 01a3 029a 10b3 | | Declare_Subprogram INIT_10b0,For_Outer_Call,Visible,Unelaborated 01a5 c24e | N | Store 0x1,0x4e 01a6 029a 10bb | | Declare_Subprogram INIT_10b8,For_Outer_Call,Visible,Unelaborated 01a8 c24f | O | Store 0x1,0x4f 01a9 029a 10cb | | Declare_Subprogram INIT_10c8,For_Outer_Call,Visible,Unelaborated 01ab c27f | | Store 0x1,0x7f 01ac 029a 10d3 | | Declare_Subprogram INIT_10d0,For_Outer_Call,Visible,Unelaborated 01ae c280 | | Store 0x1,0x80 01af 029a 10db | | Declare_Subprogram INIT_10d8,For_Outer_Call,Visible,Unelaborated 01b1 c281 | | Store 0x1,0x81 01b2 029a 10e3 | | Declare_Subprogram INIT_10e0,For_Outer_Call,Visible,Unelaborated 01b4 c282 | | Store 0x1,0x82 01b5 029a 10f3 | | Declare_Subprogram INIT_10f0,For_Outer_Call,Visible,Unelaborated 01b7 c271 | q | Store 0x1,0x71 01b8 029a 1103 | | Declare_Subprogram INIT_1100,For_Outer_Call,Visible,Unelaborated 01ba c272 | r | Store 0x1,0x72 01bb 029a 1113 | | Declare_Subprogram INIT_1110,For_Outer_Call,Visible,Unelaborated 01bd c273 | s | Store 0x1,0x73 01be 029a 111b | | Declare_Subprogram INIT_1118,For_Outer_Call,Visible,Unelaborated 01c0 c274 | t | Store 0x1,0x74 01c1 029a 112b | +| Declare_Subprogram INIT_1128,For_Outer_Call,Visible,Unelaborated 01c3 c250 | P | Store 0x1,0x50 01c4 029a 1133 | 3| Declare_Subprogram INIT_1130,For_Outer_Call,Visible,Unelaborated 01c6 c251 | Q | Store 0x1,0x51 01c7 029a 11b3 | | Declare_Subprogram INIT_11b0,For_Outer_Call,Visible,Unelaborated 01c9 c252 | R | Store 0x1,0x52 01ca 029a 11fb | | Declare_Subprogram INIT_11f8,For_Outer_Call,Visible,Unelaborated 01cc c253 | S | Store 0x1,0x53 01cd 029a 124b | K| Declare_Subprogram INIT_1248,For_Outer_Call,Visible,Unelaborated 01cf c254 | T | Store 0x1,0x54 01d0 029a 1293 | | Declare_Subprogram INIT_1290,For_Outer_Call,Visible,Unelaborated 01d2 c293 | | Store 0x1,0x93 01d3 029a 12e3 | | Declare_Subprogram INIT_12e0,For_Outer_Call,Visible,Unelaborated 01d5 c256 | V | Store 0x1,0x56 01d6 029a 1343 | C| Declare_Subprogram INIT_1340,For_Outer_Call,Visible,Unelaborated 01d8 c294 | | Store 0x1,0x94 01d9 029a 1393 | | Declare_Subprogram INIT_1390,For_Outer_Call,Visible,Unelaborated 01db c295 | | Store 0x1,0x95 01dc 029a 13e3 | | Declare_Subprogram INIT_13e0,For_Outer_Call,Visible,Unelaborated 01de c296 | | Store 0x1,0x96 01df 029a 1433 | 3| Declare_Subprogram INIT_1430,For_Outer_Call,Visible,Unelaborated 01e1 c25a | Z | Store 0x1,0x5a 01e2 029a 1443 | C| Declare_Subprogram INIT_1440,For_Outer_Call,Visible,Unelaborated 01e4 c25b | [ | Store 0x1,0x5b 01e5 029a 1453 | S| Declare_Subprogram INIT_1450,For_Outer_Call,Visible,Unelaborated 01e7 c25c | \ | Store 0x1,0x5c 01e8 029a 1463 | c| Declare_Subprogram INIT_1460,For_Outer_Call,Visible,Unelaborated 01ea c275 | u | Store 0x1,0x75 01eb 029a 14ab | | Declare_Subprogram INIT_14a8,For_Outer_Call,Visible,Unelaborated 01ed c276 | v | Store 0x1,0x76 01ee 029a 14fb | | Declare_Subprogram INIT_14f8,For_Outer_Call,Visible,Unelaborated 01f0 c25f | _ | Store 0x1,0x5f 01f1 029a 150b | | Declare_Subprogram INIT_1508,For_Outer_Call,Visible,Unelaborated 01f3 c260 | ` | Store 0x1,0x60 01f4 029a 151b | | Declare_Subprogram INIT_1518,For_Outer_Call,Visible,Unelaborated 01f6 c261 | a | Store 0x1,0x61 01f7 4808 |H | Short_Literal 0x8 01f8 0093 2b9b | + | push_full_address INIT_2b98 01fa 02a0 | | Declare_Subprogram Null_Subprogram 01fb 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated 01fc c262 | b | Store 0x1,0x62 01fd 029a 152b | +| Declare_Subprogram INIT_1528,For_Outer_Call,Visible,Unelaborated 01ff c263 | c | Store 0x1,0x63 0200 029a 15a3 | | Declare_Subprogram INIT_15a0,For_Outer_Call,Visible,Unelaborated 0202 c264 | d | Store 0x1,0x64 0203 00bf | | Action Accept_Activation 0204 4800 |H | Short_Literal 0x0 0205 4806 |H | Short_Literal 0x6 0206 029f 15eb | | Declare_Subprogram INIT_15e8,For_Call 0208 03fd | | Declare_Type Discrete,Defined 0209 00e1 | | Load_Encached Boolean_Cache 020a 0266 | f | Execute Discrete,Bounds 020b e001 | | Load 0x0,0x1 020c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 020d 02a0 | | Declare_Subprogram Null_Subprogram 020e 4801 |H | Short_Literal 0x1 020f 035d | ] | Declare_Type Array,Defined 0210 00d8 | | Load_Top At_Offset_0 0211 0337 | 7 | Declare_Variable Array 0212 00d8 | | Load_Top At_Offset_0 0213 0335 | 5 | Declare_Variable Array,Duplicate 0214 00cd | | Action Spare6_Action 0215 4800 |H | Short_Literal 0x0 0216 4800 |H | Short_Literal 0x0 0217 00da | | Load_Top At_Offset_2 0218 01d6 | | Execute Vector,Field_Write 0219 4802 |H | Short_Literal 0x2 021a 4801 |H | Short_Literal 0x1 021b 00da | | Load_Top At_Offset_2 021c 01d6 | | Execute Vector,Field_Write 021d 00d9 | | Load_Top At_Offset_1 021e 01d4 | | Execute Vector,Structure_Write 021f e004 | | Load 0x0,0x4 0220 1919 | | Execute Package,Field_Reference,Field_Number 0x19 0221 0007 | | Action Break_Optional 0222 4800 |H | Short_Literal 0x0 0223 4812 |H | Short_Literal 0x12 0224 029f 1613 | | Declare_Subprogram INIT_1610,For_Call 0226 03fd | | Declare_Type Discrete,Defined 0227 4800 |H | Short_Literal 0x0 0228 4803 |H | Short_Literal 0x3 0229 00da | | Load_Top At_Offset_2 022a 03f8 | | Declare_Type Discrete,Constrained 022b 4808 |H | Short_Literal 0x8 022c 480c |H | Short_Literal 0xc 022d 00db | | Load_Top At_Offset_3 022e 03f8 | | Declare_Type Discrete,Constrained 022f 480d |H | Short_Literal 0xd 0230 4810 |H | Short_Literal 0x10 0231 e29b | | Load 0x1,0x9b 0232 03f8 | | Declare_Type Discrete,Constrained 0233 4811 |H | Short_Literal 0x11 0234 4812 |H | Short_Literal 0x12 0235 e29b | | Load 0x1,0x9b 0236 03f8 | | Declare_Type Discrete,Constrained 0237 4800 |H | Short_Literal 0x0 0238 4804 |H | Short_Literal 0x4 0239 029f 163b | ;| Declare_Subprogram INIT_1638,For_Call 023b 03fd | | Declare_Type Discrete,Defined 023c 4800 |H | Short_Literal 0x0 023d 4803 |H | Short_Literal 0x3 023e 029f 1663 | c| Declare_Subprogram INIT_1660,For_Call 0240 03fd | | Declare_Type Discrete,Defined 0241 e005 | | Load 0x0,0x5 0242 e006 | | Load 0x0,0x6 0243 e29b | | Load 0x1,0x9b 0244 e007 | | Load 0x0,0x7 0245 0387 | | Declare_Variable Package 0246 00d8 | | Load_Top At_Offset_0 0247 020f | | Execute Module,Activate 0248 e008 | | Load 0x0,0x8 0249 e009 | | Load 0x0,0x9 024a e2a0 | | Load 0x1,0xa0 024b e007 | | Load 0x0,0x7 024c 0387 | | Declare_Variable Package 024d 00d8 | | Load_Top At_Offset_0 024e 020f | | Execute Module,Activate 024f e00a | | Load 0x0,0xa 0250 e00b | | Load 0x0,0xb 0251 e2a1 | | Load 0x1,0xa1 0252 e007 | | Load 0x0,0x7 0253 0387 | | Declare_Variable Package 0254 00d8 | | Load_Top At_Offset_0 0255 020f | | Execute Module,Activate 0256 4800 |H | Short_Literal 0x0 0257 4815 |H | Short_Literal 0x15 0258 029f 168b | | Declare_Subprogram INIT_1688,For_Call 025a 03fd | | Declare_Type Discrete,Defined 025b 480a |H | Short_Literal 0xa 025c 480e |H | Short_Literal 0xe 025d 00da | | Load_Top At_Offset_2 025e 03f8 | | Declare_Type Discrete,Constrained 025f 480f |H | Short_Literal 0xf 0260 4812 |H | Short_Literal 0x12 0261 00db | | Load_Top At_Offset_3 0262 03f8 | | Declare_Type Discrete,Constrained 0263 4813 |H | Short_Literal 0x13 0264 4814 |H | Short_Literal 0x14 0265 e2a5 | | Load 0x1,0xa5 0266 03f8 | | Declare_Type Discrete,Constrained 0267 e29b | | Load 0x1,0x9b 0268 0266 | f | Execute Discrete,Bounds 0269 e2a5 | | Load 0x1,0xa5 026a 02a0 | | Declare_Subprogram Null_Subprogram 026b 4801 |H | Short_Literal 0x1 026c 035d | ] | Declare_Type Array,Defined 026d 00d8 | | Load_Top At_Offset_0 026e 0337 | 7 | Declare_Variable Array 026f 00d8 | | Load_Top At_Offset_0 0270 0335 | 5 | Declare_Variable Array,Duplicate 0271 00cd | | Action Spare6_Action 0272 4800 |H | Short_Literal 0x0 0273 4800 |H | Short_Literal 0x0 0274 00da | | Load_Top At_Offset_2 0275 01d6 | | Execute Vector,Field_Write 0276 4806 |H | Short_Literal 0x6 0277 4801 |H | Short_Literal 0x1 0278 00da | | Load_Top At_Offset_2 0279 01d6 | | Execute Vector,Field_Write 027a 4815 |H | Short_Literal 0x15 027b 4802 |H | Short_Literal 0x2 027c 00da | | Load_Top At_Offset_2 027d 01d6 | | Execute Vector,Field_Write 027e 4815 |H | Short_Literal 0x15 027f 4803 |H | Short_Literal 0x3 0280 00da | | Load_Top At_Offset_2 0281 01d6 | | Execute Vector,Field_Write 0282 4800 |H | Short_Literal 0x0 0283 4804 |H | Short_Literal 0x4 0284 00da | | Load_Top At_Offset_2 0285 01d6 | | Execute Vector,Field_Write 0286 4807 |H | Short_Literal 0x7 0287 4805 |H | Short_Literal 0x5 0288 00da | | Load_Top At_Offset_2 0289 01d6 | | Execute Vector,Field_Write 028a 4808 |H | Short_Literal 0x8 028b 4806 |H | Short_Literal 0x6 028c 00da | | Load_Top At_Offset_2 028d 01d6 | | Execute Vector,Field_Write 028e 4809 |H | Short_Literal 0x9 028f 4807 |H | Short_Literal 0x7 0290 00da | | Load_Top At_Offset_2 0291 01d6 | | Execute Vector,Field_Write 0292 480a |H | Short_Literal 0xa 0293 4808 |H | Short_Literal 0x8 0294 00da | | Load_Top At_Offset_2 0295 01d6 | | Execute Vector,Field_Write 0296 480b |H | Short_Literal 0xb 0297 4809 |H | Short_Literal 0x9 0298 00da | | Load_Top At_Offset_2 0299 01d6 | | Execute Vector,Field_Write 029a 480c |H | Short_Literal 0xc 029b 480a |H | Short_Literal 0xa 029c 00da | | Load_Top At_Offset_2 029d 01d6 | | Execute Vector,Field_Write 029e 480d |H | Short_Literal 0xd 029f 480b |H | Short_Literal 0xb 02a0 00da | | Load_Top At_Offset_2 02a1 01d6 | | Execute Vector,Field_Write 02a2 480e |H | Short_Literal 0xe 02a3 480c |H | Short_Literal 0xc 02a4 00da | | Load_Top At_Offset_2 02a5 01d6 | | Execute Vector,Field_Write 02a6 480f |H | Short_Literal 0xf 02a7 480d |H | Short_Literal 0xd 02a8 00da | | Load_Top At_Offset_2 02a9 01d6 | | Execute Vector,Field_Write 02aa 4810 |H | Short_Literal 0x10 02ab 480e |H | Short_Literal 0xe 02ac 00da | | Load_Top At_Offset_2 02ad 01d6 | | Execute Vector,Field_Write 02ae 4811 |H | Short_Literal 0x11 02af 480f |H | Short_Literal 0xf 02b0 00da | | Load_Top At_Offset_2 02b1 01d6 | | Execute Vector,Field_Write 02b2 4812 |H | Short_Literal 0x12 02b3 4810 |H | Short_Literal 0x10 02b4 00da | | Load_Top At_Offset_2 02b5 01d6 | | Execute Vector,Field_Write 02b6 4813 |H | Short_Literal 0x13 02b7 4811 |H | Short_Literal 0x11 02b8 00da | | Load_Top At_Offset_2 02b9 01d6 | | Execute Vector,Field_Write 02ba 4814 |H | Short_Literal 0x14 02bb 4812 |H | Short_Literal 0x12 02bc 00da | | Load_Top At_Offset_2 02bd 01d6 | | Execute Vector,Field_Write 02be 00d9 | | Load_Top At_Offset_1 02bf 01d4 | | Execute Vector,Structure_Write 02c0 e2a5 | | Load 0x1,0xa5 02c1 e00c | | Load 0x0,0xc 02c2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02c3 480b |H | Short_Literal 0xb 02c4 4801 |H | Short_Literal 0x1 02c5 4802 |H | Short_Literal 0x2 02c6 4811 |H | Short_Literal 0x11 02c7 0318 | | Declare_Type Variant_Record,Incomplete 02c8 029f 16b3 | | Declare_Subprogram INIT_16b0,For_Call 02ca 00d9 | | Load_Top At_Offset_1 02cb 012a | * | Execute Any,Change_Utility 02cc 0007 | | Action Break_Optional 02cd 00d8 | | Load_Top At_Offset_0 02ce 02a0 | | Declare_Subprogram Null_Subprogram 02cf 4818 |H | Short_Literal 0x18 02d0 03d3 | | Declare_Type Access,Defined,Accesses_Protected 02d1 00d8 | | Load_Top At_Offset_0 02d2 e00c | | Load 0x0,0xc 02d3 1b18 | | Execute Package,Field_Read,Field_Number 0x18 02d4 4801 |H | Short_Literal 0x1 02d5 4801 |H | Short_Literal 0x1 02d6 e2ac | | Load 0x1,0xac 02d7 4801 |H | Short_Literal 0x1 02d8 4801 |H | Short_Literal 0x1 02d9 e00d | | Load 0x0,0xd 02da 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 02db 4801 |H | Short_Literal 0x1 02dc 4801 |H | Short_Literal 0x1 02dd e00d | | Load 0x0,0xd 02de 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 02df 4801 |H | Short_Literal 0x1 02e0 4801 |H | Short_Literal 0x1 02e1 e00d | | Load 0x0,0xd 02e2 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 02e3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02e4 4801 |H | Short_Literal 0x1 02e5 4801 |H | Short_Literal 0x1 02e6 e2a0 | | Load 0x1,0xa0 02e7 4801 |H | Short_Literal 0x1 02e8 4801 |H | Short_Literal 0x1 02e9 e2a1 | | Load 0x1,0xa1 02ea 4801 |H | Short_Literal 0x1 02eb 4801 |H | Short_Literal 0x1 02ec e001 | | Load 0x0,0x1 02ed 1b17 | | Execute Package,Field_Read,Field_Number 0x17 02ee 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02ef 4802 |H | Short_Literal 0x2 02f0 4802 |H | Short_Literal 0x2 02f1 e004 | | Load 0x0,0x4 02f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02f3 e004 | | Load 0x0,0x4 02f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02f5 4801 |H | Short_Literal 0x1 02f6 4801 |H | Short_Literal 0x1 02f7 e001 | | Load 0x0,0x1 02f8 1b17 | | Execute Package,Field_Read,Field_Number 0x17 02f9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02fa 4802 |H | Short_Literal 0x2 02fb 4802 |H | Short_Literal 0x2 02fc 00e2 | | Load_Encached Integer_Cache 02fd 00e2 | | Load_Encached Integer_Cache 02fe 4801 |H | Short_Literal 0x1 02ff 4801 |H | Short_Literal 0x1 0300 00e1 | | Load_Encached Boolean_Cache 0301 029f 16b3 | | Declare_Subprogram INIT_16b0,For_Call 0303 480d |H | Short_Literal 0xd 0304 4801 |H | Short_Literal 0x1 0305 4801 |H | Short_Literal 0x1 0306 e2ab | | Load 0x1,0xab 0307 0307 | | Complete_Type Variant_Record,By_Defining 0308 00e3 | | Load_Encached Natural_Cache 0309 e002 | | Load 0x0,0x2 030a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 030b 00da | | Load_Top At_Offset_2 030c 00e9 | | Load_Encached String_Cache 030d 029f 178b | | Declare_Subprogram INIT_1788,For_Call 030f 4800 |H | Short_Literal 0x0 0310 4801 |H | Short_Literal 0x1 0311 4802 |H | Short_Literal 0x2 0312 4800 |H | Short_Literal 0x0 0313 4801 |H | Short_Literal 0x1 0314 4801 |H | Short_Literal 0x1 0315 031d | | Declare_Type Variant_Record,Defined 0316 0092 2c0b | , | Action Push_String_Extended,0x2c0b ; ":MONDAY :TUESDAY :WEDNESDAY :THURSDAY :FRIDAY :SATURDAY :SUNDAY :TODAY :YESTERDAY :JANUARY :FEBRUARY :MARCH :APRIL :MAY :JUNE :JULY :AUGUST :SEPTEMBER :OCTOBER :NOVEMBER :DECEMBER :NOON :MIDNIGHT :AM :PM :" 0318 029d 17b3 | | Declare_Subprogram INIT_17b0,For_Outer_Call 031a 029d 1823 | #| Declare_Subprogram INIT_1820,For_Outer_Call 031c 029d 194b | K| Declare_Subprogram INIT_1948,For_Outer_Call 031e 029d 19f3 | | Declare_Subprogram INIT_19f0,For_Outer_Call 0320 029d 1a5b | [| Declare_Subprogram INIT_1a58,For_Outer_Call 0322 029d 1a9b | | Declare_Subprogram INIT_1a98,For_Outer_Call 0324 029d 1c6b | k| Declare_Subprogram INIT_1c68,For_Outer_Call 0326 029d 1d1b | | Declare_Subprogram INIT_1d18,For_Outer_Call 0328 029d 1d9b | | Declare_Subprogram INIT_1d98,For_Outer_Call 032a 029d 1f83 | | Declare_Subprogram INIT_1f80,For_Outer_Call 032c 029d 1f9b | | Declare_Subprogram INIT_1f98,For_Outer_Call 032e 029d 1fb3 | | Declare_Subprogram INIT_1fb0,For_Outer_Call 0330 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0331 00c7 | | Action Elaborate_Subprogram 0332 1d86 | | Execute_Immediate Reference_Lex_1,0x86 0333 00c7 | | Action Elaborate_Subprogram 0334 029d 226b | "k| Declare_Subprogram INIT_2268,For_Outer_Call 0336 1d92 | | Execute_Immediate Reference_Lex_1,0x92 0337 00c7 | | Action Elaborate_Subprogram 0338 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0339 00c7 | | Action Elaborate_Subprogram 033a 1d91 | | Execute_Immediate Reference_Lex_1,0x91 033b 00c7 | | Action Elaborate_Subprogram 033c 1d7e | ~ | Execute_Immediate Reference_Lex_1,0x7e 033d 00c7 | | Action Elaborate_Subprogram 033e 1d14 | | Execute_Immediate Reference_Lex_1,0x14 033f 00c7 | | Action Elaborate_Subprogram 0340 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0341 00c7 | | Action Elaborate_Subprogram 0342 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0343 00c7 | | Action Elaborate_Subprogram 0344 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0345 00c7 | | Action Elaborate_Subprogram 0346 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0347 00c7 | | Action Elaborate_Subprogram 0348 1d19 | | Execute_Immediate Reference_Lex_1,0x19 0349 00c7 | | Action Elaborate_Subprogram 034a 1d7a | z | Execute_Immediate Reference_Lex_1,0x7a 034b 00c7 | | Action Elaborate_Subprogram 034c 1d7b | { | Execute_Immediate Reference_Lex_1,0x7b 034d 00c7 | | Action Elaborate_Subprogram 034e 1d7c | | | Execute_Immediate Reference_Lex_1,0x7c 034f 00c7 | | Action Elaborate_Subprogram 0350 1d7d | } | Execute_Immediate Reference_Lex_1,0x7d 0351 00c7 | | Action Elaborate_Subprogram 0352 1d63 | c | Execute_Immediate Reference_Lex_1,0x63 0353 00c7 | | Action Elaborate_Subprogram 0354 1d64 | d | Execute_Immediate Reference_Lex_1,0x64 0355 00c7 | | Action Elaborate_Subprogram 0356 029d 22e3 | " | Declare_Subprogram INIT_22e0,For_Outer_Call 0358 029d 2333 | #3| Declare_Subprogram INIT_2330,For_Outer_Call 035a 029d 23bb | # | Declare_Subprogram INIT_23b8,For_Outer_Call 035c 029d 23db | # | Declare_Subprogram INIT_23d8,For_Outer_Call 035e 1d8e | | Execute_Immediate Reference_Lex_1,0x8e 035f 00c7 | | Action Elaborate_Subprogram 0360 1d8f | | Execute_Immediate Reference_Lex_1,0x8f 0361 00c7 | | Action Elaborate_Subprogram 0362 1d8c | | Execute_Immediate Reference_Lex_1,0x8c 0363 00c7 | | Action Elaborate_Subprogram 0364 1d8d | | Execute_Immediate Reference_Lex_1,0x8d 0365 00c7 | | Action Elaborate_Subprogram 0366 1d8b | | Execute_Immediate Reference_Lex_1,0x8b 0367 00c7 | | Action Elaborate_Subprogram 0368 029d 25db | % | Declare_Subprogram INIT_25d8,For_Outer_Call 036a 1d90 | | Execute_Immediate Reference_Lex_1,0x90 036b 00c7 | | Action Elaborate_Subprogram 036c 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 036d 00c7 | | Action Elaborate_Subprogram 036e 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 036f 00c7 | | Action Elaborate_Subprogram 0370 1d6e | n | Execute_Immediate Reference_Lex_1,0x6e 0371 00c7 | | Action Elaborate_Subprogram 0372 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0373 00c7 | | Action Elaborate_Subprogram 0374 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0375 00c7 | | Action Elaborate_Subprogram 0376 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 0377 00c7 | | Action Elaborate_Subprogram 0378 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0379 00c7 | | Action Elaborate_Subprogram 037a 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 037b 00c7 | | Action Elaborate_Subprogram 037c 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 037d 00c7 | | Action Elaborate_Subprogram 037e 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 037f 00c7 | | Action Elaborate_Subprogram 0380 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 0381 00c7 | | Action Elaborate_Subprogram 0382 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0383 00c7 | | Action Elaborate_Subprogram 0384 029d 2613 | & | Declare_Subprogram INIT_2610,For_Outer_Call 0386 1d85 | | Execute_Immediate Reference_Lex_1,0x85 0387 00c7 | | Action Elaborate_Subprogram 0388 1d84 | | Execute_Immediate Reference_Lex_1,0x84 0389 00c7 | | Action Elaborate_Subprogram 038a 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38 038b 00c7 | | Action Elaborate_Subprogram 038c 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39 038d 00c7 | | Action Elaborate_Subprogram 038e 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a 038f 00c7 | | Action Elaborate_Subprogram 0390 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 0391 00c7 | | Action Elaborate_Subprogram 0392 029d 264b | &K| Declare_Subprogram INIT_2648,For_Outer_Call 0394 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 0395 00c7 | | Action Elaborate_Subprogram 0396 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 0397 00c7 | | Action Elaborate_Subprogram 0398 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 0399 00c7 | | Action Elaborate_Subprogram 039a 029d 2663 | &c| Declare_Subprogram INIT_2660,For_Outer_Call 039c 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34 039d 00c7 | | Action Elaborate_Subprogram 039e 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 039f 00c7 | | Action Elaborate_Subprogram 03a0 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36 03a1 00c7 | | Action Elaborate_Subprogram 03a2 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37 03a3 00c7 | | Action Elaborate_Subprogram 03a4 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b 03a5 00c7 | | Action Elaborate_Subprogram 03a6 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c 03a7 00c7 | | Action Elaborate_Subprogram 03a8 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d 03a9 00c7 | | Action Elaborate_Subprogram 03aa 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e 03ab 00c7 | | Action Elaborate_Subprogram 03ac 1d87 | | Execute_Immediate Reference_Lex_1,0x87 03ad 00c7 | | Action Elaborate_Subprogram 03ae 1d88 | | Execute_Immediate Reference_Lex_1,0x88 03af 00c7 | | Action Elaborate_Subprogram 03b0 029d 267b | &{| Declare_Subprogram INIT_2678,For_Outer_Call 03b2 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f 03b3 00c7 | | Action Elaborate_Subprogram 03b4 029d 2693 | & | Declare_Subprogram INIT_2690,For_Outer_Call 03b6 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40 03b7 00c7 | | Action Elaborate_Subprogram 03b8 1d41 | A | Execute_Immediate Reference_Lex_1,0x41 03b9 00c7 | | Action Elaborate_Subprogram 03ba e00e | | Load 0x0,0xe 03bb 193c | < | Execute Package,Field_Reference,Field_Number 0x3c 03bc 00c6 | | Action Check_Subprogram_Elaborated 03bd e228 | ( | Load 0x1,0x28 03be 4812 |H | Short_Literal 0x12 03bf e00f | | Load 0x0,0xf 03c0 1911 | | Execute Package,Field_Reference,Field_Number 0x11 03c1 e00f | | Load 0x0,0xf 03c2 1912 | | Execute Package,Field_Reference,Field_Number 0x12 03c3 e010 | | Load 0x0,0x10 03c4 e011 | | Load 0x0,0x11 03c5 4800 |H | Short_Literal 0x0 03c6 0007 | | Action Break_Optional 03c7 029d 26d3 | & | Declare_Subprogram INIT_26d0,For_Outer_Call 03c9 e00e | | Load 0x0,0xe 03ca 193d | = | Execute Package,Field_Reference,Field_Number 0x3d 03cb 00c6 | | Action Check_Subprogram_Elaborated 03cc e228 | ( | Load 0x1,0x28 03cd 4812 |H | Short_Literal 0x12 03ce 1dcd | | Execute_Immediate Reference_Lex_1,0xcd 03cf e001 | | Load 0x0,0x1 03d0 1b13 | | Execute Package,Field_Read,Field_Number 0x13 03d1 e012 | | Load 0x0,0x12 03d2 e013 | | Load 0x0,0x13 03d3 4800 |H | Short_Literal 0x0 03d4 0007 | | Action Break_Optional 03d5 1d42 | B | Execute_Immediate Reference_Lex_1,0x42 03d6 00c7 | | Action Elaborate_Subprogram 03d7 1d43 | C | Execute_Immediate Reference_Lex_1,0x43 03d8 00c7 | | Action Elaborate_Subprogram 03d9 1d44 | D | Execute_Immediate Reference_Lex_1,0x44 03da 00c7 | | Action Elaborate_Subprogram 03db 1d45 | E | Execute_Immediate Reference_Lex_1,0x45 03dc 00c7 | | Action Elaborate_Subprogram 03dd 1d46 | F | Execute_Immediate Reference_Lex_1,0x46 03de 00c7 | | Action Elaborate_Subprogram 03df 1d47 | G | Execute_Immediate Reference_Lex_1,0x47 03e0 00c7 | | Action Elaborate_Subprogram 03e1 029d 26eb | & | Declare_Subprogram INIT_26e8,For_Outer_Call 03e3 029d 2733 | '3| Declare_Subprogram INIT_2730,For_Outer_Call 03e5 029d 2743 | 'C| Declare_Subprogram INIT_2740,For_Outer_Call 03e7 029d 27a3 | ' | Declare_Subprogram INIT_27a0,For_Outer_Call 03e9 029d 283b | (;| Declare_Subprogram INIT_2838,For_Outer_Call 03eb 029d 2883 | ( | Declare_Subprogram INIT_2880,For_Outer_Call 03ed 1d48 | H | Execute_Immediate Reference_Lex_1,0x48 03ee 00c7 | | Action Elaborate_Subprogram 03ef 1d49 | I | Execute_Immediate Reference_Lex_1,0x49 03f0 00c7 | | Action Elaborate_Subprogram 03f1 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a 03f2 00c7 | | Action Elaborate_Subprogram 03f3 1d4b | K | Execute_Immediate Reference_Lex_1,0x4b 03f4 00c7 | | Action Elaborate_Subprogram 03f5 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c 03f6 00c7 | | Action Elaborate_Subprogram 03f7 1d4d | M | Execute_Immediate Reference_Lex_1,0x4d 03f8 00c7 | | Action Elaborate_Subprogram 03f9 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e 03fa 00c7 | | Action Elaborate_Subprogram 03fb 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f 03fc 00c7 | | Action Elaborate_Subprogram 03fd 1d7f | | Execute_Immediate Reference_Lex_1,0x7f 03fe 00c7 | | Action Elaborate_Subprogram 03ff 1d80 | | Execute_Immediate Reference_Lex_1,0x80 0400 00c7 | | Action Elaborate_Subprogram 0401 1d81 | | Execute_Immediate Reference_Lex_1,0x81 0402 00c7 | | Action Elaborate_Subprogram 0403 1d82 | | Execute_Immediate Reference_Lex_1,0x82 0404 00c7 | | Action Elaborate_Subprogram 0405 1d71 | q | Execute_Immediate Reference_Lex_1,0x71 0406 00c7 | | Action Elaborate_Subprogram 0407 1d72 | r | Execute_Immediate Reference_Lex_1,0x72 0408 00c7 | | Action Elaborate_Subprogram 0409 1d73 | s | Execute_Immediate Reference_Lex_1,0x73 040a 00c7 | | Action Elaborate_Subprogram 040b 1d74 | t | Execute_Immediate Reference_Lex_1,0x74 040c 00c7 | | Action Elaborate_Subprogram 040d 1d50 | P | Execute_Immediate Reference_Lex_1,0x50 040e 00c7 | | Action Elaborate_Subprogram 040f 1d51 | Q | Execute_Immediate Reference_Lex_1,0x51 0410 00c7 | | Action Elaborate_Subprogram 0411 1d52 | R | Execute_Immediate Reference_Lex_1,0x52 0412 00c7 | | Action Elaborate_Subprogram 0413 1d53 | S | Execute_Immediate Reference_Lex_1,0x53 0414 00c7 | | Action Elaborate_Subprogram 0415 1d54 | T | Execute_Immediate Reference_Lex_1,0x54 0416 00c7 | | Action Elaborate_Subprogram 0417 1d93 | | Execute_Immediate Reference_Lex_1,0x93 0418 00c7 | | Action Elaborate_Subprogram 0419 1d56 | V | Execute_Immediate Reference_Lex_1,0x56 041a 00c7 | | Action Elaborate_Subprogram 041b 1d94 | | Execute_Immediate Reference_Lex_1,0x94 041c 00c7 | | Action Elaborate_Subprogram 041d 1d95 | | Execute_Immediate Reference_Lex_1,0x95 041e 00c7 | | Action Elaborate_Subprogram 041f 1d96 | | Execute_Immediate Reference_Lex_1,0x96 0420 00c7 | | Action Elaborate_Subprogram 0421 e00e | | Load 0x0,0xe 0422 193c | < | Execute Package,Field_Reference,Field_Number 0x3c 0423 00c6 | | Action Check_Subprogram_Elaborated 0424 e20d | | Load 0x1,0xd 0425 4811 |H | Short_Literal 0x11 0426 e014 | | Load 0x0,0x14 0427 1911 | | Execute Package,Field_Reference,Field_Number 0x11 0428 e014 | | Load 0x0,0x14 0429 1912 | | Execute Package,Field_Reference,Field_Number 0x12 042a e015 | | Load 0x0,0x15 042b e016 | | Load 0x0,0x16 042c 4800 |H | Short_Literal 0x0 042d 0007 | | Action Break_Optional 042e 029d 28d3 | ( | Declare_Subprogram INIT_28d0,For_Outer_Call 0430 e00e | | Load 0x0,0xe 0431 193d | = | Execute Package,Field_Reference,Field_Number 0x3d 0432 00c6 | | Action Check_Subprogram_Elaborated 0433 e20d | | Load 0x1,0xd 0434 4811 |H | Short_Literal 0x11 0435 1de2 | | Execute_Immediate Reference_Lex_1,0xe2 0436 e001 | | Load 0x0,0x1 0437 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0438 e017 | | Load 0x0,0x17 0439 e018 | | Load 0x0,0x18 043a 4800 |H | Short_Literal 0x0 043b 0007 | | Action Break_Optional 043c 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a 043d 00c7 | | Action Elaborate_Subprogram 043e 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b 043f 00c7 | | Action Elaborate_Subprogram 0440 1d5c | \ | Execute_Immediate Reference_Lex_1,0x5c 0441 00c7 | | Action Elaborate_Subprogram 0442 1d75 | u | Execute_Immediate Reference_Lex_1,0x75 0443 00c7 | | Action Elaborate_Subprogram 0444 1d83 | | Execute_Immediate Reference_Lex_1,0x83 0445 00c7 | | Action Elaborate_Subprogram 0446 1d8a | | Execute_Immediate Reference_Lex_1,0x8a 0447 00c7 | | Action Elaborate_Subprogram 0448 1d76 | v | Execute_Immediate Reference_Lex_1,0x76 0449 00c7 | | Action Elaborate_Subprogram 044a 1d5f | _ | Execute_Immediate Reference_Lex_1,0x5f 044b 00c7 | | Action Elaborate_Subprogram 044c 1d60 | ` | Execute_Immediate Reference_Lex_1,0x60 044d 00c7 | | Action Elaborate_Subprogram 044e 1d61 | a | Execute_Immediate Reference_Lex_1,0x61 044f 00c7 | | Action Elaborate_Subprogram 0450 e019 | | Load 0x0,0x19 0451 e01a | | Load 0x0,0x1a 0452 e01b | | Load 0x0,0x1b 0453 4803 |H | Short_Literal 0x3 0454 e262 | b | Load 0x1,0x62 0455 020e | | Execute Module,Augment_Imports 0456 e262 | b | Load 0x1,0x62 0457 020d | | Execute Module,Elaborate 0458 BODY_0008: 0458 00bc | | Action Signal_Activated 0459 00bb | | Action Signal_Completion 045a 0000 0000 | | .XXX[0x2] 045c 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 0460 ; -------------------------------------------------------------------------------------- 0460 ; SUBPROGRAM 0460 ; -------------------------------------------------------------------------------------- 0460 0463 | c | .CONST 0x0463 ; Address of begin 0461 0004 | | .CONST 0x0004 ; Address of exception handler 0462 0001 | | .CONST 0x0001 ; Number of locals 0463 BODY_0460: 0463 INIT_0460: 0463 e001 | | Load 0x0,0x1 0464 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0465 00ca | | Action Exit_Nullary_Function 0466 0000 0000 | | .XXX[0x2] 0468 ; -------------------------------------------------------------------------------------- 0468 ; SUBPROGRAM 0468 ; -------------------------------------------------------------------------------------- 0468 046b | k | .CONST 0x046b ; Address of begin 0469 0004 | | .CONST 0x0004 ; Address of exception handler 046a 0001 | | .CONST 0x0001 ; Number of locals 046b BODY_0468: 046b INIT_0468: 046b 00da | | Load_Top At_Offset_2 046c 021d | | Execute Heap_Access,Is_Null 046d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 046e 0000 0000 | | .XXX[0x2] 0470 ; -------------------------------------------------------------------------------------- 0470 ; SUBPROGRAM 0470 ; -------------------------------------------------------------------------------------- 0470 0482 | | .CONST 0x0482 ; Address of begin 0471 0004 | | .CONST 0x0004 ; Address of exception handler 0472 0005 | | .CONST 0x0005 ; Number of locals 0473 INIT_0470: 0473 e00d | | Load 0x0,0xd 0474 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0475 02c7 | | Declare_Variable Any 0476 00d8 | | Load_Top At_Offset_0 0477 1c00 | | Execute_Immediate Run_Utility,0x0 0478 e00d | | Load 0x0,0xd 0479 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 047a 1b18 | | Execute Package,Field_Read,Field_Number 0x18 047b 02c7 | | Declare_Variable Any 047c 00d8 | | Load_Top At_Offset_0 047d 1c00 | | Execute_Immediate Run_Utility,0x0 047e e00d | | Load 0x0,0xd 047f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0480 029f 28eb | ( | Declare_Subprogram INIT_28e8,For_Call 0482 BODY_0470: 0482 e5f9 | | Load 0x2,-0x7 0483 00db | | Load_Top At_Offset_3 0484 6063 |`c | Indirect_Literal Discrete,0x4e8,{0x00000000, 0x00002817} 0485 605e |`^ | Indirect_Literal Discrete,0x4e4,{0x00000000, 0x00002803} 0486 e5ff | | Load 0x2,-0x1 0487 801c | | Call 0x0,0x1c 0488 c403 | | Store 0x2,0x3 0489 c5f9 | | Store 0x2,-0x7 048a 4800 |H | Short_Literal 0x0 048b e5f9 | | Load 0x2,-0x7 048c e002 | | Load 0x0,0x2 048d 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 048e 684d |hM | Jump_Zero 0x4dc 048f 00cf | | Action Mark_Auxiliary 0490 7840 |x@ | Jump 0x4d1 0491 e00d | | Load 0x0,0xd 0492 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0493 e402 | | Load 0x2,0x2 0494 0120 | | Execute Any,Is_Value 0495 6803 |h | Jump_Zero 0x499 0496 e00d | | Load 0x0,0xd 0497 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0498 7801 |x | Jump 0x49a 0499 e402 | | Load 0x2,0x2 049a e403 | | Load 0x2,0x3 049b e00d | | Load 0x0,0xd 049c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 049d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 049e c402 | | Store 0x2,0x2 049f 005b | [ | Store_Top Discrete,At_Offset_3 04a0 00da | | Load_Top At_Offset_2 04a1 681c |h | Jump_Zero 0x4be 04a2 e002 | | Load 0x0,0x2 04a3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04a4 4801 |H | Short_Literal 0x1 04a5 4802 |H | Short_Literal 0x2 04a6 e00e | | Load 0x0,0xe 04a7 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04a8 035b | [ | Declare_Type Array,Constrained 04a9 0337 | 7 | Declare_Variable Array 04aa e403 | | Load 0x2,0x3 04ab e00d | | Load 0x0,0xd 04ac 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04ad 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 04ae e00e | | Load 0x0,0xe 04af 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04b0 4801 |H | Short_Literal 0x1 04b1 00da | | Load_Top At_Offset_2 04b2 01d6 | | Execute Vector,Field_Write 04b3 e404 | | Load 0x2,0x4 04b4 e00e | | Load 0x0,0xe 04b5 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 04b6 4802 |H | Short_Literal 0x2 04b7 00da | | Load_Top At_Offset_2 04b8 01d6 | | Execute Vector,Field_Write 04b9 6026 |`& | Indirect_Literal Discrete,0x4e0,{0x00000000, 0x00002808} 04ba e002 | | Load 0x0,0x2 04bb 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 04bc c5f9 | | Store 0x2,-0x7 04bd 7802 |x | Jump 0x4c0 04be e402 | | Load 0x2,0x2 04bf 8405 | | Call 0x2,0x5 04c0 0092 2c0c | , | Action Push_String_Extended,0x2c0c ; "Created state file for world \x22" 04c2 e403 | | Load 0x2,0x3 04c3 e00d | | Load 0x0,0xd 04c4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04c5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 04c6 01cc | | Execute Vector,Catenate 04c7 0092 2c0d | , | Action Push_String_Extended,0x2c0d ; "\x22." 04c9 01cc | | Execute Vector,Catenate 04ca 801d | | Call 0x0,0x1d 04cb 00db | | Load_Top At_Offset_3 04cc e00d | | Load 0x0,0xd 04cd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04ce 181d | | Execute Package,Field_Execute,Field_Number 0x1d 04cf c403 | | Store 0x2,0x3 04d0 00c9 | | Action Pop_Auxiliary_Loop 04d1 00db | | Load_Top At_Offset_3 04d2 e00d | | Load 0x0,0xd 04d3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04d4 181e | | Execute Package,Field_Execute,Field_Number 0x1e 04d5 6fbb |o | Jump_Zero 0x491 04d6 00ce | | Action Pop_Auxiliary 04d7 00da | | Load_Top At_Offset_2 04d8 e00d | | Load 0x0,0xd 04d9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04da 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 04db c403 | | Store 0x2,0x3 04dc 4507 |E | Exit_Suprogram New_Top_Offset 0x7 04dd 0000 0000 | | .XXX[0x3] 04df 0000 | | 04e0 0000 0000 | | .LITERAL {0x00000000, 0x00002808} 04e4 0000 0000 | | .LITERAL {0x00000000, 0x00002803} 04e8 0000 0000 | | .LITERAL {0x00000000, 0x00002817} 04ec 0000 0000 | | .BLANK 0000[0x4] 04f0 ; -------------------------------------------------------------------------------------- 04f0 ; SUBPROGRAM 04f0 ; -------------------------------------------------------------------------------------- 04f0 0500 | | .CONST 0x0500 ; Address of begin 04f1 0004 | | .CONST 0x0004 ; Address of exception handler 04f2 0004 | | .CONST 0x0004 ; Number of locals 04f3 INIT_04f0: 04f3 e00d | | Load 0x0,0xd 04f4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04f5 02c7 | | Declare_Variable Any 04f6 00d8 | | Load_Top At_Offset_0 04f7 1c00 | | Execute_Immediate Run_Utility,0x0 04f8 e00d | | Load 0x0,0xd 04f9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04fa 1b18 | | Execute Package,Field_Read,Field_Number 0x18 04fb 02c7 | | Declare_Variable Any 04fc 00d8 | | Load_Top At_Offset_0 04fd 1c00 | | Execute_Immediate Run_Utility,0x0 04fe e00d | | Load 0x0,0xd 04ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0500 BODY_04f0: 0500 e5fd | | Load 0x2,-0x3 0501 00da | | Load_Top At_Offset_2 0502 6055 |`U | Indirect_Literal Discrete,0x558,{0x00000000, 0x00002818} 0503 6050 |`P | Indirect_Literal Discrete,0x554,{0x00000000, 0x00002806} 0504 e5ff | | Load 0x2,-0x1 0505 801c | | Call 0x0,0x1c 0506 c403 | | Store 0x2,0x3 0507 c5fd | | Store 0x2,-0x3 0508 4800 |H | Short_Literal 0x0 0509 e5fd | | Load 0x2,-0x3 050a e002 | | Load 0x0,0x2 050b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 050c 6846 |hF | Jump_Zero 0x553 050d 00cf | | Action Mark_Auxiliary 050e 7839 |x9 | Jump 0x548 050f e00d | | Load 0x0,0xd 0510 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0511 e402 | | Load 0x2,0x2 0512 0120 | | Execute Any,Is_Value 0513 6803 |h | Jump_Zero 0x517 0514 e00d | | Load 0x0,0xd 0515 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0516 7801 |x | Jump 0x518 0517 e402 | | Load 0x2,0x2 0518 e403 | | Load 0x2,0x3 0519 e00d | | Load 0x0,0xd 051a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 051b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 051c c402 | | Store 0x2,0x2 051d 005a | Z | Store_Top Discrete,At_Offset_2 051e 00d9 | | Load_Top At_Offset_1 051f 681c |h | Jump_Zero 0x53c 0520 e002 | | Load 0x0,0x2 0521 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0522 4801 |H | Short_Literal 0x1 0523 4802 |H | Short_Literal 0x2 0524 e00e | | Load 0x0,0xe 0525 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0526 035b | [ | Declare_Type Array,Constrained 0527 0337 | 7 | Declare_Variable Array 0528 e403 | | Load 0x2,0x3 0529 e00d | | Load 0x0,0xd 052a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 052b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 052c e00e | | Load 0x0,0xe 052d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 052e 4801 |H | Short_Literal 0x1 052f 00da | | Load_Top At_Offset_2 0530 01d6 | | Execute Vector,Field_Write 0531 00db | | Load_Top At_Offset_3 0532 e00e | | Load 0x0,0xe 0533 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0534 4802 |H | Short_Literal 0x2 0535 00da | | Load_Top At_Offset_2 0536 01d6 | | Execute Vector,Field_Write 0537 67a8 |g | Indirect_Literal Discrete,0x4e0,{0x00000000, 0x00002808} 0538 e002 | | Load 0x0,0x2 0539 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 053a c5fd | | Store 0x2,-0x3 053b 7806 |x | Jump 0x542 053c e5fd | | Load 0x2,-0x3 053d e5fe | | Load 0x2,-0x2 053e e402 | | Load 0x2,0x2 053f e01b | | Load 0x0,0x1b 0540 180e | | Execute Package,Field_Execute,Field_Number 0xe 0541 c5fd | | Store 0x2,-0x3 0542 00da | | Load_Top At_Offset_2 0543 e00d | | Load 0x0,0xd 0544 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0545 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0546 c403 | | Store 0x2,0x3 0547 00c9 | | Action Pop_Auxiliary_Loop 0548 00da | | Load_Top At_Offset_2 0549 e00d | | Load 0x0,0xd 054a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 054b 181e | | Execute Package,Field_Execute,Field_Number 0x1e 054c 6fc2 |o | Jump_Zero 0x50f 054d 00ce | | Action Pop_Auxiliary 054e 00d9 | | Load_Top At_Offset_1 054f e00d | | Load 0x0,0xd 0550 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0551 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0552 c403 | | Store 0x2,0x3 0553 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0554 0000 0000 | | .LITERAL {0x00000000, 0x00002806} 0558 0000 0000 | | .LITERAL {0x00000000, 0x00002818} 055c 0000 0000 | | .BLANK 0000[0x4] 0560 ; -------------------------------------------------------------------------------------- 0560 ; SUBPROGRAM 0560 ; -------------------------------------------------------------------------------------- 0560 056f | o | .CONST 0x056f ; Address of begin 0561 0004 | | .CONST 0x0004 ; Address of exception handler 0562 0004 | | .CONST 0x0004 ; Number of locals 0563 INIT_0560: 0563 e20d | | Load 0x1,0xd 0564 0007 | | Action Break_Optional 0565 e001 | | Load 0x0,0x1 0566 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0567 02c7 | | Declare_Variable Any 0568 00d8 | | Load_Top At_Offset_0 0569 1c00 | | Execute_Immediate Run_Utility,0x0 056a 6039 |`9 | Indirect_Literal Discrete,0x5a4,{0x00000000, 0x0000282a} 056b 6034 |`4 | Indirect_Literal Discrete,0x5a0,{0x00000000, 0x00002829} 056c 602f |`/ | Indirect_Literal Discrete,0x59c,{0x00000000, 0x00002828} 056d e5ff | | Load 0x2,-0x1 056e 801e | | Call 0x0,0x1e 056f BODY_0560: 056f 00be | | Action Activate_Tasks 0570 00d8 | | Load_Top At_Offset_0 0571 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0572 a5fc | | Store_Unchecked 0x2,-0x4 0573 4800 |H | Short_Literal 0x0 0574 00d9 | | Load_Top At_Offset_1 0575 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0576 e002 | | Load 0x0,0x2 0577 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0578 6822 |h" | Jump_Zero 0x59b 0579 00cf | | Action Mark_Auxiliary 057a 00d9 | | Load_Top At_Offset_1 057b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 057c 01d9 | | Execute Vector,Reverse_Bounds 057d 0263 | c | Execute Discrete,Above_Bound 057e 701b |p | Jump_Nonzero 0x59a 057f e5fc | | Load 0x2,-0x4 0580 e403 | | Load 0x2,0x3 0581 e20d | | Load 0x1,0xd 0582 4801 |H | Short_Literal 0x1 0583 e5fd | | Load 0x2,-0x3 0584 e407 | | Load 0x2,0x7 0585 e404 | | Load 0x2,0x4 0586 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0587 01d7 | | Execute Vector,Field_Read 0588 4802 |H | Short_Literal 0x2 0589 e5fe | | Load 0x2,-0x2 058a e001 | | Load 0x0,0x1 058b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 058c c402 | | Store 0x2,0x2 058d c403 | | Store 0x2,0x3 058e c5fc | | Store 0x2,-0x4 058f e5fc | | Load 0x2,-0x4 0590 e403 | | Load 0x2,0x3 0591 e402 | | Load 0x2,0x2 0592 4800 |H | Short_Literal 0x0 0593 e001 | | Load 0x0,0x1 0594 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0595 c402 | | Store 0x2,0x2 0596 c403 | | Store 0x2,0x3 0597 c5fc | | Store 0x2,-0x4 0598 00c8 | | Action Pop_Auxiliary_Range 0599 3fe5 |? | Loop_Increasing 0x57f 059a 00ce | | Action Pop_Auxiliary 059b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 059c 0000 0000 | | .LITERAL {0x00000000, 0x00002828} 05a0 0000 0000 | | .LITERAL {0x00000000, 0x00002829} 05a4 0000 0000 | | .LITERAL {0x00000000, 0x0000282a} 05a8 ; -------------------------------------------------------------------------------------- 05a8 ; SUBPROGRAM 05a8 ; -------------------------------------------------------------------------------------- 05a8 05be | | .CONST 0x05be ; Address of begin 05a9 0004 | | .CONST 0x0004 ; Address of exception handler 05aa 0006 | | .CONST 0x0006 ; Number of locals 05ab INIT_05a8: 05ab e20d | | Load 0x1,0xd 05ac 0007 | | Action Break_Optional 05ad e001 | | Load 0x0,0x1 05ae 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05af 02c7 | | Declare_Variable Any 05b0 00d8 | | Load_Top At_Offset_0 05b1 1c00 | | Execute_Immediate Run_Utility,0x0 05b2 67f1 |g | Indirect_Literal Discrete,0x5a4,{0x00000000, 0x0000282a} 05b3 67ec |g | Indirect_Literal Discrete,0x5a0,{0x00000000, 0x00002829} 05b4 67e7 |g | Indirect_Literal Discrete,0x59c,{0x00000000, 0x00002828} 05b5 e5ff | | Load 0x2,-0x1 05b6 801e | | Call 0x0,0x1e 05b7 00d8 | | Load_Top At_Offset_0 05b8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 05b9 e002 | | Load 0x0,0x2 05ba 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05bb 03f1 | | Declare_Variable Discrete,With_Value 05bc 00e1 | | Load_Encached Boolean_Cache 05bd 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 05be BODY_05a8: 05be 00be | | Action Activate_Tasks 05bf 4800 |H | Short_Literal 0x0 05c0 00da | | Load_Top At_Offset_2 05c1 e002 | | Load 0x0,0x2 05c2 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 05c3 682b |h+ | Jump_Zero 0x5ef 05c4 00cf | | Action Mark_Auxiliary 05c5 00db | | Load_Top At_Offset_3 05c6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 05c7 01d9 | | Execute Vector,Reverse_Bounds 05c8 0263 | c | Execute Discrete,Above_Bound 05c9 7024 |p$ | Jump_Nonzero 0x5ee 05ca e405 | | Load 0x2,0x5 05cb e403 | | Load 0x2,0x3 05cc e20d | | Load 0x1,0xd 05cd e5fe | | Load 0x2,-0x2 05ce e409 | | Load 0x2,0x9 05cf e404 | | Load 0x2,0x4 05d0 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 05d1 01d7 | | Execute Vector,Field_Read 05d2 4800 |H | Short_Literal 0x0 05d3 e01b | | Load 0x0,0x1b 05d4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05d5 c402 | | Store 0x2,0x2 05d6 c403 | | Store 0x2,0x3 05d7 c405 | | Store 0x2,0x5 05d8 00d8 | | Load_Top At_Offset_0 05d9 e404 | | Load 0x2,0x4 05da 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 05db 01d7 | | Execute Vector,Field_Read 05dc e402 | | Load 0x2,0x2 05dd 801f | | Call 0x0,0x1f 05de a406 | | Store_Unchecked 0x2,0x6 05df e405 | | Load 0x2,0x5 05e0 e403 | | Load 0x2,0x3 05e1 e402 | | Load 0x2,0x2 05e2 4800 |H | Short_Literal 0x0 05e3 e001 | | Load 0x0,0x1 05e4 181f | | Execute Package,Field_Execute,Field_Number 0x1f 05e5 c402 | | Store 0x2,0x2 05e6 c403 | | Store 0x2,0x3 05e7 c405 | | Store 0x2,0x5 05e8 00db | | Load_Top At_Offset_3 05e9 7002 |p | Jump_Nonzero 0x5ec 05ea 00d2 | | Pop_Control Pop_Count_2 05eb 7802 |x | Jump 0x5ee 05ec 00c8 | | Action Pop_Auxiliary_Range 05ed 3fdc |? | Loop_Increasing 0x5ca 05ee 00ce | | Action Pop_Auxiliary 05ef 00d8 | | Load_Top At_Offset_0 05f0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05f1 0000 0000 | | .BLANK 0000[0x7] 05f8 ; -------------------------------------------------------------------------------------- 05f8 ; SUBPROGRAM 05f8 ; -------------------------------------------------------------------------------------- 05f8 05fb | | .CONST 0x05fb ; Address of begin 05f9 0004 | | .CONST 0x0004 ; Address of exception handler 05fa 0001 | | .CONST 0x0001 ; Number of locals 05fb BODY_05f8: 05fb INIT_05f8: 05fb 08e2 | | Execute_Immediate Raise,0xe2 05fc 0000 0000 | | .BLANK 0000[0x4] 0600 ; -------------------------------------------------------------------------------------- 0600 ; SUBPROGRAM 0600 ; -------------------------------------------------------------------------------------- 0600 0603 | | .CONST 0x0603 ; Address of begin 0601 0004 | | .CONST 0x0004 ; Address of exception handler 0602 0001 | | .CONST 0x0001 ; Number of locals 0603 BODY_0600: 0603 INIT_0600: 0603 08e2 | | Execute_Immediate Raise,0xe2 0604 0000 0000 | | .BLANK 0000[0x4] 0608 ; -------------------------------------------------------------------------------------- 0608 ; SUBPROGRAM 0608 ; -------------------------------------------------------------------------------------- 0608 060b | | .CONST 0x060b ; Address of begin 0609 060e | | .CONST 0x060e ; Address of exception handler 060a 0001 | | .CONST 0x0001 ; Number of locals 060b BODY_0608: 060b INIT_0608: 060b 00da | | Load_Top At_Offset_2 060c 021c | | Execute Heap_Access,Not_Null 060d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 060e TRAP_0608: 060e 0007 | | Action Break_Optional 060f 4800 |H | Short_Literal 0x0 0610 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0611 0000 0000 | | .BLANK 0000[0x7] 0618 ; -------------------------------------------------------------------------------------- 0618 ; SUBPROGRAM 0618 ; -------------------------------------------------------------------------------------- 0618 061b | | .CONST 0x061b ; Address of begin 0619 0004 | | .CONST 0x0004 ; Address of exception handler 061a 0001 | | .CONST 0x0001 ; Number of locals 061b BODY_0618: 061b INIT_0618: 061b 00da | | Load_Top At_Offset_2 061c 0217 | | Execute Heap_Access,All_Reference 061d 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 061e 0217 | | Execute Heap_Access,All_Reference 061f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0620 c5fe | | Store 0x2,-0x2 0621 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0622 0000 0000 | | .BLANK 0000[0x6] 0628 ; -------------------------------------------------------------------------------------- 0628 ; SUBPROGRAM 0628 ; -------------------------------------------------------------------------------------- 0628 062b | + | .CONST 0x062b ; Address of begin 0629 0004 | | .CONST 0x0004 ; Address of exception handler 062a 0001 | | .CONST 0x0001 ; Number of locals 062b BODY_0628: 062b INIT_0628: 062b 00da | | Load_Top At_Offset_2 062c 0217 | | Execute Heap_Access,All_Reference 062d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 062e c5fe | | Store 0x2,-0x2 062f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0630 ; -------------------------------------------------------------------------------------- 0630 ; SUBPROGRAM 0630 ; -------------------------------------------------------------------------------------- 0630 0633 | 3 | .CONST 0x0633 ; Address of begin 0631 0004 | | .CONST 0x0004 ; Address of exception handler 0632 0001 | | .CONST 0x0001 ; Number of locals 0633 BODY_0630: 0633 INIT_0630: 0633 00db | | Load_Top At_Offset_3 0634 00db | | Load_Top At_Offset_3 0635 0217 | | Execute Heap_Access,All_Reference 0636 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0637 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0638 ; -------------------------------------------------------------------------------------- 0638 ; SUBPROGRAM 0638 ; -------------------------------------------------------------------------------------- 0638 063b | ; | .CONST 0x063b ; Address of begin 0639 0004 | | .CONST 0x0004 ; Address of exception handler 063a 0001 | | .CONST 0x0001 ; Number of locals 063b BODY_0638: 063b INIT_0638: 063b 00da | | Load_Top At_Offset_2 063c 0217 | | Execute Heap_Access,All_Reference 063d 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 063e e020 | | Load 0x0,0x20 063f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0640 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0641 0000 0000 | | .BLANK 0000[0x7] 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 064b | K | .CONST 0x064b ; Address of begin 0649 0004 | | .CONST 0x0004 ; Address of exception handler 064a 0001 | | .CONST 0x0001 ; Number of locals 064b BODY_0648: 064b INIT_0648: 064b 00da | | Load_Top At_Offset_2 064c e5fe | | Load 0x2,-0x2 064d e020 | | Load 0x0,0x20 064e 180f | | Execute Package,Field_Execute,Field_Number 0xf 064f 00db | | Load_Top At_Offset_3 0650 0217 | | Execute Heap_Access,All_Reference 0651 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0652 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0653 0000 0000 | | .BLANK 0000[0x5] 0658 ; -------------------------------------------------------------------------------------- 0658 ; SUBPROGRAM 0658 ; -------------------------------------------------------------------------------------- 0658 065b | [ | .CONST 0x065b ; Address of begin 0659 0004 | | .CONST 0x0004 ; Address of exception handler 065a 0001 | | .CONST 0x0001 ; Number of locals 065b BODY_0658: 065b INIT_0658: 065b 00da | | Load_Top At_Offset_2 065c 0217 | | Execute Heap_Access,All_Reference 065d 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 065e e020 | | Load 0x0,0x20 065f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0660 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0661 0000 0000 | | .BLANK 0000[0x7] 0668 ; -------------------------------------------------------------------------------------- 0668 ; SUBPROGRAM 0668 ; -------------------------------------------------------------------------------------- 0668 066b | k | .CONST 0x066b ; Address of begin 0669 0004 | | .CONST 0x0004 ; Address of exception handler 066a 0001 | | .CONST 0x0001 ; Number of locals 066b BODY_0668: 066b INIT_0668: 066b 00da | | Load_Top At_Offset_2 066c e5fe | | Load 0x2,-0x2 066d e020 | | Load 0x0,0x20 066e 180f | | Execute Package,Field_Execute,Field_Number 0xf 066f 00db | | Load_Top At_Offset_3 0670 0217 | | Execute Heap_Access,All_Reference 0671 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0672 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0673 0000 0000 | | .BLANK 0000[0x5] 0678 ; -------------------------------------------------------------------------------------- 0678 ; SUBPROGRAM 0678 ; -------------------------------------------------------------------------------------- 0678 0680 | | .CONST 0x0680 ; Address of begin 0679 0004 | | .CONST 0x0004 ; Address of exception handler 067a 0003 | | .CONST 0x0003 ; Number of locals 067b INIT_0678: 067b e001 | | Load 0x0,0x1 067c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 067d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 067e 00e2 | | Load_Encached Integer_Cache 067f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0680 BODY_0678: 0680 00d8 | | Load_Top At_Offset_0 0681 e5fb | | Load 0x2,-0x5 0682 e001 | | Load 0x0,0x1 0683 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0684 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0685 e5fc | | Load 0x2,-0x4 0686 e5fd | | Load 0x2,-0x3 0687 e5fe | | Load 0x2,-0x2 0688 e5ff | | Load 0x2,-0x1 0689 82bf | | Call 0x1,0xbf 068a c402 | | Store 0x2,0x2 068b c5fb | | Store 0x2,-0x5 068c 0059 | Y | Store_Top Discrete,At_Offset_1 068d e5fb | | Load 0x2,-0x5 068e e5fd | | Load 0x2,-0x3 068f 00da | | Load_Top At_Offset_2 0690 4801 |H | Short_Literal 0x1 0691 e5fe | | Load 0x2,-0x2 0692 82bd | | Call 0x1,0xbd 0693 c5fb | | Store 0x2,-0x5 0694 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0695 0000 0000 | | .XXX[0x3] 0697 0000 | | 0698 ; -------------------------------------------------------------------------------------- 0698 ; SUBPROGRAM 0698 ; -------------------------------------------------------------------------------------- 0698 06a9 | | .CONST 0x06a9 ; Address of begin 0699 0004 | | .CONST 0x0004 ; Address of exception handler 069a 0006 | | .CONST 0x0006 ; Number of locals 069b INIT_0698: 069b e00d | | Load 0x0,0xd 069c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 069d 02c7 | | Declare_Variable Any 069e 00d8 | | Load_Top At_Offset_0 069f 1c00 | | Execute_Immediate Run_Utility,0x0 06a0 e00d | | Load 0x0,0xd 06a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06a2 e001 | | Load 0x0,0x1 06a3 1b14 | | Execute Package,Field_Read,Field_Number 0x14 06a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06a5 00e2 | | Load_Encached Integer_Cache 06a6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 06a7 00e2 | | Load_Encached Integer_Cache 06a8 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 06a9 BODY_0698: 06a9 00cf | | Action Mark_Auxiliary 06aa 7843 |xC | Jump 0x6ee 06ab e00d | | Load 0x0,0xd 06ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06ad e402 | | Load 0x2,0x2 06ae 0120 | | Execute Any,Is_Value 06af 6803 |h | Jump_Zero 0x6b3 06b0 e00d | | Load 0x0,0xd 06b1 1b0f | | Execute Package,Field_Read,Field_Number 0xf 06b2 7801 |x | Jump 0x6b4 06b3 e402 | | Load 0x2,0x2 06b4 e5fc | | Load 0x2,-0x4 06b5 e00d | | Load 0x0,0xd 06b6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06b7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 06b8 c402 | | Store 0x2,0x2 06b9 c403 | | Store 0x2,0x3 06ba e403 | | Load 0x2,0x3 06bb 7011 |p | Jump_Nonzero 0x6cd 06bc 00da | | Load_Top At_Offset_2 06bd e5fb | | Load 0x2,-0x5 06be e001 | | Load 0x0,0x1 06bf 1b14 | | Execute Package,Field_Read,Field_Number 0x14 06c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06c1 e5fd | | Load 0x2,-0x3 06c2 e5fe | | Load 0x2,-0x2 06c3 e5ff | | Load 0x2,-0x1 06c4 e402 | | Load 0x2,0x2 06c5 82bf | | Call 0x1,0xbf 06c6 c404 | | Store 0x2,0x4 06c7 c5fb | | Store 0x2,-0x5 06c8 005b | [ | Store_Top Discrete,At_Offset_3 06c9 00d9 | | Load_Top At_Offset_1 06ca 0a01 | | Execute_Immediate Plus,0x1 06cb 005a | Z | Store_Top Discrete,At_Offset_2 06cc 781b |x | Jump 0x6e8 06cd e002 | | Load 0x0,0x2 06ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06cf 4801 |H | Short_Literal 0x1 06d0 4802 |H | Short_Literal 0x2 06d1 e00e | | Load 0x0,0xe 06d2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 06d3 035b | [ | Declare_Type Array,Constrained 06d4 0337 | 7 | Declare_Variable Array 06d5 e5fc | | Load 0x2,-0x4 06d6 e00d | | Load 0x0,0xd 06d7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06d8 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 06d9 e00e | | Load 0x0,0xe 06da 1810 | | Execute Package,Field_Execute,Field_Number 0x10 06db 4801 |H | Short_Literal 0x1 06dc 00da | | Load_Top At_Offset_2 06dd 01d6 | | Execute Vector,Field_Write 06de e403 | | Load 0x2,0x3 06df e00e | | Load 0x0,0xe 06e0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 06e1 4802 |H | Short_Literal 0x2 06e2 00da | | Load_Top At_Offset_2 06e3 01d6 | | Execute Vector,Field_Write 06e4 601f |` | Indirect_Literal Discrete,0x704,{0x00000000, 0x00002808} 06e5 e002 | | Load 0x0,0x2 06e6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 06e7 c5fb | | Store 0x2,-0x5 06e8 e5fc | | Load 0x2,-0x4 06e9 e00d | | Load 0x0,0xd 06ea 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06eb 181d | | Execute Package,Field_Execute,Field_Number 0x1d 06ec c5fc | | Store 0x2,-0x4 06ed 00c9 | | Action Pop_Auxiliary_Loop 06ee e5fc | | Load 0x2,-0x4 06ef e00d | | Load 0x0,0xd 06f0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06f1 181e | | Execute Package,Field_Execute,Field_Number 0x1e 06f2 6fb8 |o | Jump_Zero 0x6ab 06f3 00ce | | Action Pop_Auxiliary 06f4 e5fb | | Load 0x2,-0x5 06f5 e5fe | | Load 0x2,-0x2 06f6 00db | | Load_Top At_Offset_3 06f7 00db | | Load_Top At_Offset_3 06f8 e5ff | | Load 0x2,-0x1 06f9 82bd | | Call 0x1,0xbd 06fa c5fb | | Store 0x2,-0x5 06fb e5fc | | Load 0x2,-0x4 06fc e00d | | Load 0x0,0xd 06fd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06fe 181c | | Execute Package,Field_Execute,Field_Number 0x1c 06ff c5fc | | Store 0x2,-0x4 0700 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0701 0000 0000 | | .XXX[0x3] 0703 0000 | | 0704 0000 0000 | | .LITERAL {0x00000000, 0x00002808} 0708 ; -------------------------------------------------------------------------------------- 0708 ; SUBPROGRAM 0708 ; -------------------------------------------------------------------------------------- 0708 0711 | | .CONST 0x0711 ; Address of begin 0709 0004 | | .CONST 0x0004 ; Address of exception handler 070a 0002 | | .CONST 0x0002 ; Number of locals 070b INIT_0708: 070b e00d | | Load 0x0,0xd 070c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 070d 1b18 | | Execute Package,Field_Read,Field_Number 0x18 070e 02c7 | | Declare_Variable Any 070f 00d8 | | Load_Top At_Offset_0 0710 1c00 | | Execute_Immediate Run_Utility,0x0 0711 BODY_0708: 0711 e5fb | | Load 0x2,-0x5 0712 00d9 | | Load_Top At_Offset_1 0713 601c |` | Indirect_Literal Discrete,0x730,{0x00000000, 0x0000281b} 0714 6017 |` | Indirect_Literal Discrete,0x72c,{0x00000000, 0x00002809} 0715 e5ff | | Load 0x2,-0x1 0716 e5fe | | Load 0x2,-0x2 0717 8021 | ! | Call 0x0,0x21 0718 801c | | Call 0x0,0x1c 0719 c402 | | Store 0x2,0x2 071a c5fb | | Store 0x2,-0x5 071b 4800 |H | Short_Literal 0x0 071c e5fb | | Load 0x2,-0x5 071d e002 | | Load 0x0,0x2 071e 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 071f 6808 |h | Jump_Zero 0x728 0720 e5fb | | Load 0x2,-0x5 0721 00d9 | | Load_Top At_Offset_1 0722 e5fc | | Load 0x2,-0x4 0723 e5fd | | Load 0x2,-0x3 0724 e5fe | | Load 0x2,-0x2 0725 828c | | Call 0x1,0x8c 0726 c402 | | Store 0x2,0x2 0727 c5fb | | Store 0x2,-0x5 0728 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0729 0000 0000 | | .XXX[0x3] 072b 0000 | | 072c 0000 0000 | | .LITERAL {0x00000000, 0x00002809} 0730 0000 0000 | | .LITERAL {0x00000000, 0x0000281b} 0734 0000 0000 | | .BLANK 0000[0x4] 0738 ; -------------------------------------------------------------------------------------- 0738 ; SUBPROGRAM 0738 ; -------------------------------------------------------------------------------------- 0738 073d | = | .CONST 0x073d ; Address of begin 0739 0004 | | .CONST 0x0004 ; Address of exception handler 073a 0002 | | .CONST 0x0002 ; Number of locals 073b INIT_0738: 073b 00e2 | | Load_Encached Integer_Cache 073c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 073d BODY_0738: 073d 00d8 | | Load_Top At_Offset_0 073e e5fa | | Load 0x2,-0x6 073f e001 | | Load 0x0,0x1 0740 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0741 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0742 e5fc | | Load 0x2,-0x4 0743 e5fd | | Load 0x2,-0x3 0744 e5fe | | Load 0x2,-0x2 0745 e5ff | | Load 0x2,-0x1 0746 82bf | | Call 0x1,0xbf 0747 c5fb | | Store 0x2,-0x5 0748 c5fa | | Store 0x2,-0x6 0749 0059 | Y | Store_Top Discrete,At_Offset_1 074a e5fa | | Load 0x2,-0x6 074b e5fd | | Load 0x2,-0x3 074c 00da | | Load_Top At_Offset_2 074d 4801 |H | Short_Literal 0x1 074e e5fe | | Load 0x2,-0x2 074f 82bd | | Call 0x1,0xbd 0750 c5fa | | Store 0x2,-0x6 0751 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0752 0000 0000 | | .BLANK 0000[0x6] 0758 ; -------------------------------------------------------------------------------------- 0758 ; SUBPROGRAM 0758 ; -------------------------------------------------------------------------------------- 0758 0765 | e | .CONST 0x0765 ; Address of begin 0759 0004 | | .CONST 0x0004 ; Address of exception handler 075a 0004 | | .CONST 0x0004 ; Number of locals 075b INIT_0758: 075b e00d | | Load 0x0,0xd 075c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 075d 02c7 | | Declare_Variable Any 075e 00d8 | | Load_Top At_Offset_0 075f 1c00 | | Execute_Immediate Run_Utility,0x0 0760 e00d | | Load 0x0,0xd 0761 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0762 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0763 00e2 | | Load_Encached Integer_Cache 0764 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0765 BODY_0758: 0765 e00d | | Load 0x0,0xd 0766 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0767 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0768 00db | | Load_Top At_Offset_3 0769 0120 | | Execute Any,Is_Value 076a 6803 |h | Jump_Zero 0x76e 076b e00d | | Load 0x0,0xd 076c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 076d 7801 |x | Jump 0x76f 076e 00db | | Load_Top At_Offset_3 076f 6040 |`@ | Indirect_Literal Discrete,0x7b0,{0x00000000, 0x00004000} 0770 e022 | " | Load 0x0,0x22 0771 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0772 e023 | # | Load 0x0,0x23 0773 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0774 e00d | | Load 0x0,0xd 0775 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0776 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0777 e5ff | | Load 0x2,-0x1 0778 e5fe | | Load 0x2,-0x2 0779 8021 | ! | Call 0x0,0x21 077a e00d | | Load 0x0,0xd 077b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 077c 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 077d c402 | | Store 0x2,0x2 077e 005a | Z | Store_Top Discrete,At_Offset_2 077f 00d9 | | Load_Top At_Offset_1 0780 7015 |p | Jump_Nonzero 0x796 0781 00d8 | | Load_Top At_Offset_0 0782 e5fa | | Load 0x2,-0x6 0783 e001 | | Load 0x0,0x1 0784 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0785 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0786 e5fc | | Load 0x2,-0x4 0787 e5fd | | Load 0x2,-0x3 0788 e5fe | | Load 0x2,-0x2 0789 e402 | | Load 0x2,0x2 078a 82bf | | Call 0x1,0xbf 078b c5fb | | Store 0x2,-0x5 078c c5fa | | Store 0x2,-0x6 078d 0059 | Y | Store_Top Discrete,At_Offset_1 078e e5fa | | Load 0x2,-0x6 078f e5fd | | Load 0x2,-0x3 0790 00da | | Load_Top At_Offset_2 0791 4801 |H | Short_Literal 0x1 0792 e5fe | | Load 0x2,-0x2 0793 82bd | | Call 0x1,0xbd 0794 c5fa | | Store 0x2,-0x6 0795 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0796 e002 | | Load 0x0,0x2 0797 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0798 4801 |H | Short_Literal 0x1 0799 4801 |H | Short_Literal 0x1 079a e00e | | Load 0x0,0xe 079b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 079c 035b | [ | Declare_Type Array,Constrained 079d 0337 | 7 | Declare_Variable Array 079e e5ff | | Load 0x2,-0x1 079f e403 | | Load 0x2,0x3 07a0 e00e | | Load 0x0,0xe 07a1 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 07a2 4801 |H | Short_Literal 0x1 07a3 00da | | Load_Top At_Offset_2 07a4 01d6 | | Execute Vector,Field_Write 07a5 6006 |` | Indirect_Literal Discrete,0x7ac,{0x00000000, 0x00002809} 07a6 e002 | | Load 0x0,0x2 07a7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 07a8 c5fa | | Store 0x2,-0x6 07a9 4505 |E | Exit_Suprogram New_Top_Offset 0x5 07aa 0000 0000 | | .XXX[0x2] 07ac 0000 0000 | | .LITERAL {0x00000000, 0x00002809} 07b0 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 07b4 0000 0000 | | .BLANK 0000[0x4] 07b8 ; -------------------------------------------------------------------------------------- 07b8 ; SUBPROGRAM 07b8 ; -------------------------------------------------------------------------------------- 07b8 07d3 | | .CONST 0x07d3 ; Address of begin 07b9 0004 | | .CONST 0x0004 ; Address of exception handler 07ba 0008 | | .CONST 0x0008 ; Number of locals 07bb INIT_07b8: 07bb e00d | | Load 0x0,0xd 07bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 07bd e00d | | Load 0x0,0xd 07be 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 07bf 1b18 | | Execute Package,Field_Read,Field_Number 0x18 07c0 02c7 | | Declare_Variable Any 07c1 00d8 | | Load_Top At_Offset_0 07c2 1c00 | | Execute_Immediate Run_Utility,0x0 07c3 4800 |H | Short_Literal 0x0 07c4 e001 | | Load 0x0,0x1 07c5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 07c6 1b14 | | Execute Package,Field_Read,Field_Number 0x14 07c7 1c08 | | Execute_Immediate Run_Utility,0x8 07c8 00e2 | | Load_Encached Integer_Cache 07c9 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 07ca e00d | | Load 0x0,0xd 07cb 1b0f | | Execute Package,Field_Read,Field_Number 0xf 07cc 02c7 | | Declare_Variable Any 07cd 00d8 | | Load_Top At_Offset_0 07ce 1c00 | | Execute_Immediate Run_Utility,0x0 07cf 00e2 | | Load_Encached Integer_Cache 07d0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 07d1 029f 298b | ) | Declare_Subprogram INIT_2988,For_Call 07d3 BODY_07b8: 07d3 e404 | | Load 0x2,0x4 07d4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 07d5 e403 | | Load 0x2,0x3 07d6 6061 |`a | Indirect_Literal Discrete,0x838,{0x00000000, 0x0000281b} 07d7 67d4 |g | Indirect_Literal Discrete,0x7ac,{0x00000000, 0x00002809} 07d8 e5ff | | Load 0x2,-0x1 07d9 e5fe | | Load 0x2,-0x2 07da 8021 | ! | Call 0x0,0x21 07db 801c | | Call 0x0,0x1c 07dc c403 | | Store 0x2,0x3 07dd e404 | | Load 0x2,0x4 07de 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 07df 4800 |H | Short_Literal 0x0 07e0 e404 | | Load 0x2,0x4 07e1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 07e2 e002 | | Load 0x0,0x2 07e3 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 07e4 6845 |hE | Jump_Zero 0x82a 07e5 00cf | | Action Mark_Auxiliary 07e6 7837 |x7 | Jump 0x81e 07e7 e00d | | Load 0x0,0xd 07e8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 07e9 e406 | | Load 0x2,0x6 07ea 0120 | | Execute Any,Is_Value 07eb 6803 |h | Jump_Zero 0x7ef 07ec e00d | | Load 0x0,0xd 07ed 1b0f | | Execute Package,Field_Read,Field_Number 0xf 07ee 7801 |x | Jump 0x7f0 07ef e406 | | Load 0x2,0x6 07f0 e403 | | Load 0x2,0x3 07f1 e00d | | Load 0x0,0xd 07f2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 07f3 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 07f4 c406 | | Store 0x2,0x6 07f5 c402 | | Store 0x2,0x2 07f6 e402 | | Load 0x2,0x2 07f7 7004 |p | Jump_Nonzero 0x7fc 07f8 e405 | | Load 0x2,0x5 07f9 0a01 | | Execute_Immediate Plus,0x1 07fa c405 | | Store 0x2,0x5 07fb 781c |x | Jump 0x818 07fc e002 | | Load 0x0,0x2 07fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 07fe 4801 |H | Short_Literal 0x1 07ff 4802 |H | Short_Literal 0x2 0800 e00e | | Load 0x0,0xe 0801 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0802 035b | [ | Declare_Type Array,Constrained 0803 0337 | 7 | Declare_Variable Array 0804 e403 | | Load 0x2,0x3 0805 e00d | | Load 0x0,0xd 0806 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0807 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0808 e00e | | Load 0x0,0xe 0809 1810 | | Execute Package,Field_Execute,Field_Number 0x10 080a 4801 |H | Short_Literal 0x1 080b 00da | | Load_Top At_Offset_2 080c 01d6 | | Execute Vector,Field_Write 080d e402 | | Load 0x2,0x2 080e e00e | | Load 0x0,0xe 080f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0810 4802 |H | Short_Literal 0x2 0811 00da | | Load_Top At_Offset_2 0812 01d6 | | Execute Vector,Field_Write 0813 6020 |` | Indirect_Literal Discrete,0x834,{0x00000000, 0x00002808} 0814 e002 | | Load 0x0,0x2 0815 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0816 e404 | | Load 0x2,0x4 0817 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0818 e403 | | Load 0x2,0x3 0819 e00d | | Load 0x0,0xd 081a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 081b 181d | | Execute Package,Field_Execute,Field_Number 0x1d 081c c403 | | Store 0x2,0x3 081d 00c9 | | Action Pop_Auxiliary_Loop 081e e403 | | Load 0x2,0x3 081f e00d | | Load 0x0,0xd 0820 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0821 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0822 6fc4 |o | Jump_Zero 0x7e7 0823 00ce | | Action Pop_Auxiliary 0824 e403 | | Load 0x2,0x3 0825 e00d | | Load 0x0,0xd 0826 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0827 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0828 c403 | | Store 0x2,0x3 0829 8408 | | Call 0x2,0x8 082a e403 | | Load 0x2,0x3 082b e00d | | Load 0x0,0xd 082c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 082d 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 082e c403 | | Store 0x2,0x3 082f e404 | | Load 0x2,0x4 0830 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0831 0000 0000 | | .XXX[0x3] 0833 0000 | | 0834 0000 0000 | | .LITERAL {0x00000000, 0x00002808} 0838 0000 0000 | | .LITERAL {0x00000000, 0x0000281b} 083c 0000 0000 | | .BLANK 0000[0x4] 0840 ; -------------------------------------------------------------------------------------- 0840 ; SUBPROGRAM 0840 ; -------------------------------------------------------------------------------------- 0840 0843 | C | .CONST 0x0843 ; Address of begin 0841 0004 | | .CONST 0x0004 ; Address of exception handler 0842 0001 | | .CONST 0x0001 ; Number of locals 0843 BODY_0840: 0843 INIT_0840: 0843 00da | | Load_Top At_Offset_2 0844 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0845 a5fd | | Store_Unchecked 0x2,-0x3 0846 00cf | | Action Mark_Auxiliary 0847 00db | | Load_Top At_Offset_3 0848 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0849 01d9 | | Execute Vector,Reverse_Bounds 084a 0263 | c | Execute Discrete,Above_Bound 084b 700a |p | Jump_Nonzero 0x856 084c e5fd | | Load 0x2,-0x3 084d e5fe | | Load 0x2,-0x2 084e 00da | | Load_Top At_Offset_2 084f e5ff | | Load 0x2,-0x1 0850 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0851 01d7 | | Execute Vector,Field_Read 0852 8222 | " | Call 0x1,0x22 0853 c5fd | | Store 0x2,-0x3 0854 00c8 | | Action Pop_Auxiliary_Range 0855 3ff6 |? | Loop_Increasing 0x84c 0856 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0857 0000 | | .XXX[0x1] 0858 ; -------------------------------------------------------------------------------------- 0858 ; SUBPROGRAM 0858 ; -------------------------------------------------------------------------------------- 0858 0865 | e | .CONST 0x0865 ; Address of begin 0859 0004 | | .CONST 0x0004 ; Address of exception handler 085a 0005 | | .CONST 0x0005 ; Number of locals 085b INIT_0858: 085b e01b | | Load 0x0,0x1b 085c 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 085d e01b | | Load 0x0,0x1b 085e 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 085f e5ff | | Load 0x2,-0x1 0860 0217 | | Execute Heap_Access,All_Reference 0861 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b 0862 0007 | | Action Break_Optional 0863 e01b | | Load 0x0,0x1b 0864 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 0865 BODY_0858: 0865 e024 | $ | Load 0x0,0x24 0866 180e | | Execute Package,Field_Execute,Field_Number 0xe 0867 e5ff | | Load 0x2,-0x1 0868 0217 | | Execute Heap_Access,All_Reference 0869 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 086a e020 | | Load 0x0,0x20 086b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 086c 4801 |H | Short_Literal 0x1 086d 6076 |`v | Indirect_Literal Discrete,0x8e4,{0x00000000, 0x00002822} 086e e002 | | Load 0x0,0x2 086f 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 0870 e5ff | | Load 0x2,-0x1 0871 0217 | | Execute Heap_Access,All_Reference 0872 3c15 |< | Execute Record,Field_Read,Field_Number 0x15 0873 a402 | | Store_Unchecked 0x2,0x2 0874 00cf | | Action Mark_Auxiliary 0875 780f |x | Jump 0x885 0876 e402 | | Load 0x2,0x2 0877 0217 | | Execute Heap_Access,All_Reference 0878 3c14 |< | Execute Record,Field_Read,Field_Number 0x14 0879 a403 | | Store_Unchecked 0x2,0x3 087a e5fd | | Load 0x2,-0x3 087b e5fe | | Load 0x2,-0x2 087c e402 | | Load 0x2,0x2 087d e001 | | Load 0x0,0x1 087e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 087f 0216 | | Execute Heap_Access,Convert 0880 8222 | " | Call 0x1,0x22 0881 c5fd | | Store 0x2,-0x3 0882 00db | | Load_Top At_Offset_3 0883 a402 | | Store_Unchecked 0x2,0x2 0884 00c9 | | Action Pop_Auxiliary_Loop 0885 e402 | | Load 0x2,0x2 0886 77ef |w | Jump_Nonzero 0x876 0887 00ce | | Action Pop_Auxiliary 0888 e5ff | | Load 0x2,-0x1 0889 0217 | | Execute Heap_Access,All_Reference 088a 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 088b a402 | | Store_Unchecked 0x2,0x2 088c 00cf | | Action Mark_Auxiliary 088d 780f |x | Jump 0x89d 088e e402 | | Load 0x2,0x2 088f 0217 | | Execute Heap_Access,All_Reference 0890 3c14 |< | Execute Record,Field_Read,Field_Number 0x14 0891 a403 | | Store_Unchecked 0x2,0x3 0892 e5fd | | Load 0x2,-0x3 0893 e5fe | | Load 0x2,-0x2 0894 e402 | | Load 0x2,0x2 0895 e001 | | Load 0x0,0x1 0896 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0897 0216 | | Execute Heap_Access,Convert 0898 8222 | " | Call 0x1,0x22 0899 c5fd | | Store 0x2,-0x3 089a 00db | | Load_Top At_Offset_3 089b a402 | | Store_Unchecked 0x2,0x2 089c 00c9 | | Action Pop_Auxiliary_Loop 089d e402 | | Load 0x2,0x2 089e 77ef |w | Jump_Nonzero 0x88e 089f 00c9 | | Action Pop_Auxiliary_Loop 08a0 780b |x | Jump 0x8ac 08a1 00da | | Load_Top At_Offset_2 08a2 0217 | | Execute Heap_Access,All_Reference 08a3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 08a4 0032 | 2 | Store_Top Heap_Access,At_Offset_2 08a5 00da | | Load_Top At_Offset_2 08a6 e01b | | Load 0x0,0x1b 08a7 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 08a8 0033 | 3 | Store_Top Heap_Access,At_Offset_3 08a9 00d9 | | Load_Top At_Offset_1 08aa 0033 | 3 | Store_Top Heap_Access,At_Offset_3 08ab 00c9 | | Action Pop_Auxiliary_Loop 08ac 00da | | Load_Top At_Offset_2 08ad 77f3 |w | Jump_Nonzero 0x8a1 08ae 00ce | | Action Pop_Auxiliary 08af e5fd | | Load 0x2,-0x3 08b0 e001 | | Load 0x0,0x1 08b1 1b15 | | Execute Package,Field_Read,Field_Number 0x15 08b2 1b18 | | Execute Package,Field_Read,Field_Number 0x18 08b3 e5ff | | Load 0x2,-0x1 08b4 e001 | | Load 0x0,0x1 08b5 1b15 | | Execute Package,Field_Read,Field_Number 0x15 08b6 1b22 | " | Execute Package,Field_Read,Field_Number 0x22 08b7 e001 | | Load 0x0,0x1 08b8 1b15 | | Execute Package,Field_Read,Field_Number 0x15 08b9 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 08ba c5fd | | Store 0x2,-0x3 08bb e5ff | | Load 0x2,-0x1 08bc 0217 | | Execute Heap_Access,All_Reference 08bd 3c17 |< | Execute Record,Field_Read,Field_Number 0x17 08be 6807 |h | Jump_Zero 0x8c6 08bf e01b | | Load 0x0,0x1b 08c0 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 08c1 e5ff | | Load 0x2,-0x1 08c2 0217 | | Execute Heap_Access,All_Reference 08c3 3c17 |< | Execute Record,Field_Read,Field_Number 0x17 08c4 0217 | | Execute Heap_Access,All_Reference 08c5 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 08c6 e5ff | | Load 0x2,-0x1 08c7 0217 | | Execute Heap_Access,All_Reference 08c8 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 08c9 6807 |h | Jump_Zero 0x8d1 08ca e01b | | Load 0x0,0x1b 08cb 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 08cc e5ff | | Load 0x2,-0x1 08cd 0217 | | Execute Heap_Access,All_Reference 08ce 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 08cf 0217 | | Execute Heap_Access,All_Reference 08d0 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 08d1 e5fe | | Load 0x2,-0x2 08d2 e5ff | | Load 0x2,-0x1 08d3 8263 | c | Call 0x1,0x63 08d4 e5ff | | Load 0x2,-0x1 08d5 e01b | | Load 0x0,0x1b 08d6 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 08d7 0216 | | Execute Heap_Access,Convert 08d8 a402 | | Store_Unchecked 0x2,0x2 08d9 e5fe | | Load 0x2,-0x2 08da e402 | | Load 0x2,0x2 08db 0217 | | Execute Heap_Access,All_Reference 08dc 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 08dd e025 | % | Load 0x0,0x25 08de 1811 | | Execute Package,Field_Execute,Field_Number 0x11 08df 00db | | Load_Top At_Offset_3 08e0 e01b | | Load 0x0,0x1b 08e1 181d | | Execute Package,Field_Execute,Field_Number 0x1d 08e2 c402 | | Store 0x2,0x2 08e3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 08e4 0000 0000 | | .LITERAL {0x00000000, 0x00002822} 08e8 ; -------------------------------------------------------------------------------------- 08e8 ; SUBPROGRAM 08e8 ; -------------------------------------------------------------------------------------- 08e8 08eb | | .CONST 0x08eb ; Address of begin 08e9 0004 | | .CONST 0x0004 ; Address of exception handler 08ea 0001 | | .CONST 0x0001 ; Number of locals 08eb BODY_08e8: 08eb INIT_08e8: 08eb e5fd | | Load 0x2,-0x3 08ec e5fe | | Load 0x2,-0x2 08ed 00d8 | | Load_Top At_Offset_0 08ee e5ff | | Load 0x2,-0x1 08ef e5fe | | Load 0x2,-0x2 08f0 8021 | ! | Call 0x0,0x21 08f1 8276 | v | Call 0x1,0x76 08f2 8221 | ! | Call 0x1,0x21 08f3 c5fd | | Store 0x2,-0x3 08f4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 08f5 0000 0000 | | .XXX[0x3] 08f7 0000 | | 08f8 ; -------------------------------------------------------------------------------------- 08f8 ; SUBPROGRAM 08f8 ; -------------------------------------------------------------------------------------- 08f8 08fb | | .CONST 0x08fb ; Address of begin 08f9 0004 | | .CONST 0x0004 ; Address of exception handler 08fa 0001 | | .CONST 0x0001 ; Number of locals 08fb BODY_08f8: 08fb INIT_08f8: 08fb 00da | | Load_Top At_Offset_2 08fc 0217 | | Execute Heap_Access,All_Reference 08fd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 08fe e001 | | Load 0x0,0x1 08ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0900 00d9 | | Load_Top At_Offset_1 0901 00d0 | | Action Swap_Control 0902 0260 | ` | Execute Discrete,In_Type 0903 7001 |p | Jump_Nonzero 0x905 0904 0801 | | Execute_Immediate Raise,0x1 0905 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0906 0000 0000 | | .XXX[0x2] 0908 ; -------------------------------------------------------------------------------------- 0908 ; SUBPROGRAM 0908 ; -------------------------------------------------------------------------------------- 0908 090b | | .CONST 0x090b ; Address of begin 0909 0004 | | .CONST 0x0004 ; Address of exception handler 090a 0001 | | .CONST 0x0001 ; Number of locals 090b BODY_0908: 090b INIT_0908: 090b 00da | | Load_Top At_Offset_2 090c 0217 | | Execute Heap_Access,All_Reference 090d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 090e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 090f 0000 | | .XXX[0x1] 0910 ; -------------------------------------------------------------------------------------- 0910 ; SUBPROGRAM 0910 ; -------------------------------------------------------------------------------------- 0910 0913 | | .CONST 0x0913 ; Address of begin 0911 0004 | | .CONST 0x0004 ; Address of exception handler 0912 0001 | | .CONST 0x0001 ; Number of locals 0913 BODY_0910: 0913 INIT_0910: 0913 00da | | Load_Top At_Offset_2 0914 0217 | | Execute Heap_Access,All_Reference 0915 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0916 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0917 0000 | | .XXX[0x1] 0918 ; -------------------------------------------------------------------------------------- 0918 ; SUBPROGRAM 0918 ; -------------------------------------------------------------------------------------- 0918 091b | | .CONST 0x091b ; Address of begin 0919 0004 | | .CONST 0x0004 ; Address of exception handler 091a 0001 | | .CONST 0x0001 ; Number of locals 091b BODY_0918: 091b INIT_0918: 091b 00da | | Load_Top At_Offset_2 091c 0217 | | Execute Heap_Access,All_Reference 091d 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 091e 0217 | | Execute Heap_Access,All_Reference 091f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0920 e020 | | Load 0x0,0x20 0921 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0922 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0923 0000 0000 | | .BLANK 0000[0x5] 0928 ; -------------------------------------------------------------------------------------- 0928 ; SUBPROGRAM 0928 ; -------------------------------------------------------------------------------------- 0928 092e | . | .CONST 0x092e ; Address of begin 0929 0004 | | .CONST 0x0004 ; Address of exception handler 092a 0002 | | .CONST 0x0002 ; Number of locals 092b INIT_0928: 092b e002 | | Load 0x0,0x2 092c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 092d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 092e BODY_0928: 092e 00d8 | | Load_Top At_Offset_0 092f 4800 |H | Short_Literal 0x0 0930 e5ff | | Load 0x2,-0x1 0931 e01b | | Load 0x0,0x1b 0932 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0933 0059 | Y | Store_Top Discrete,At_Offset_1 0934 00d8 | | Load_Top At_Offset_0 0935 7004 |p | Jump_Nonzero 0x93a 0936 00db | | Load_Top At_Offset_3 0937 0217 | | Execute Heap_Access,All_Reference 0938 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0939 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 093a e00e | | Load 0x0,0xe 093b 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 093c 00d9 | | Load_Top At_Offset_1 093d e002 | | Load 0x0,0x2 093e 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 093f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0940 ; -------------------------------------------------------------------------------------- 0940 ; SUBPROGRAM 0940 ; -------------------------------------------------------------------------------------- 0940 0948 | H | .CONST 0x0948 ; Address of begin 0941 0004 | | .CONST 0x0004 ; Address of exception handler 0942 0003 | | .CONST 0x0003 ; Number of locals 0943 INIT_0940: 0943 e002 | | Load 0x0,0x2 0944 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0945 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0946 e01b | | Load 0x0,0x1b 0947 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0948 BODY_0940: 0948 00d9 | | Load_Top At_Offset_1 0949 4802 |H | Short_Literal 0x2 094a e5ff | | Load 0x2,-0x1 094b e01b | | Load 0x0,0x1b 094c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 094d 005a | Z | Store_Top Discrete,At_Offset_2 094e 00d9 | | Load_Top At_Offset_1 094f 7024 |p$ | Jump_Nonzero 0x974 0950 e5fe | | Load 0x2,-0x2 0951 e5ff | | Load 0x2,-0x1 0952 0217 | | Execute Heap_Access,All_Reference 0953 380b |8 | Execute Record,Field_Write,Field_Number 0xb 0954 e5fe | | Load 0x2,-0x2 0955 701d |p | Jump_Nonzero 0x973 0956 e5ff | | Load 0x2,-0x1 0957 0217 | | Execute Heap_Access,All_Reference 0958 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0959 0031 | 1 | Store_Top Heap_Access,At_Offset_1 095a 00cf | | Action Mark_Auxiliary 095b 7814 |x | Jump 0x970 095c 00d9 | | Load_Top At_Offset_1 095d 0217 | | Execute Heap_Access,All_Reference 095e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 095f e5ff | | Load 0x2,-0x1 0960 0217 | | Execute Heap_Access,All_Reference 0961 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0962 0217 | | Execute Heap_Access,All_Reference 0963 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0964 012e | . | Execute Any,Not_Equal 0965 6805 |h | Jump_Zero 0x96b 0966 e00d | | Load 0x0,0xd 0967 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0968 00da | | Load_Top At_Offset_2 0969 0217 | | Execute Heap_Access,All_Reference 096a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 096b 00d9 | | Load_Top At_Offset_1 096c 0217 | | Execute Heap_Access,All_Reference 096d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 096e 0032 | 2 | Store_Top Heap_Access,At_Offset_2 096f 00c9 | | Action Pop_Auxiliary_Loop 0970 00d9 | | Load_Top At_Offset_1 0971 77ea |w | Jump_Nonzero 0x95c 0972 00ce | | Action Pop_Auxiliary 0973 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0974 e002 | | Load 0x0,0x2 0975 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0976 4801 |H | Short_Literal 0x1 0977 4801 |H | Short_Literal 0x1 0978 e00e | | Load 0x0,0xe 0979 1b0f | | Execute Package,Field_Read,Field_Number 0xf 097a 035b | [ | Declare_Type Array,Constrained 097b 0337 | 7 | Declare_Variable Array 097c e5ff | | Load 0x2,-0x1 097d 825a | Z | Call 0x1,0x5a 097e 4801 |H | Short_Literal 0x1 097f 00da | | Load_Top At_Offset_2 0980 01d6 | | Execute Vector,Field_Write 0981 00db | | Load_Top At_Offset_3 0982 e002 | | Load 0x0,0x2 0983 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0984 c5fd | | Store 0x2,-0x3 0985 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0986 0000 0000 | | .XXX[0x2] 0988 ; -------------------------------------------------------------------------------------- 0988 ; SUBPROGRAM 0988 ; -------------------------------------------------------------------------------------- 0988 098e | | .CONST 0x098e ; Address of begin 0989 0004 | | .CONST 0x0004 ; Address of exception handler 098a 0002 | | .CONST 0x0002 ; Number of locals 098b INIT_0988: 098b e002 | | Load 0x0,0x2 098c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 098d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 098e BODY_0988: 098e 00d8 | | Load_Top At_Offset_0 098f 4800 |H | Short_Literal 0x0 0990 e5ff | | Load 0x2,-0x1 0991 e01b | | Load 0x0,0x1b 0992 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0993 0059 | Y | Store_Top Discrete,At_Offset_1 0994 00d8 | | Load_Top At_Offset_0 0995 7004 |p | Jump_Nonzero 0x99a 0996 00db | | Load_Top At_Offset_3 0997 0217 | | Execute Heap_Access,All_Reference 0998 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0999 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 099a e00e | | Load 0x0,0xe 099b 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 099c 00d9 | | Load_Top At_Offset_1 099d e002 | | Load 0x0,0x2 099e 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 099f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09a0 ; -------------------------------------------------------------------------------------- 09a0 ; SUBPROGRAM 09a0 ; -------------------------------------------------------------------------------------- 09a0 09a6 | | .CONST 0x09a6 ; Address of begin 09a1 0004 | | .CONST 0x0004 ; Address of exception handler 09a2 0002 | | .CONST 0x0002 ; Number of locals 09a3 INIT_09a0: 09a3 e002 | | Load 0x0,0x2 09a4 1b10 | | Execute Package,Field_Read,Field_Number 0x10 09a5 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 09a6 BODY_09a0: 09a6 00d8 | | Load_Top At_Offset_0 09a7 4802 |H | Short_Literal 0x2 09a8 e5ff | | Load 0x2,-0x1 09a9 e01b | | Load 0x0,0x1b 09aa 1811 | | Execute Package,Field_Execute,Field_Number 0x11 09ab 0059 | Y | Store_Top Discrete,At_Offset_1 09ac 00d8 | | Load_Top At_Offset_0 09ad 7005 |p | Jump_Nonzero 0x9b3 09ae e5fe | | Load 0x2,-0x2 09af e5ff | | Load 0x2,-0x1 09b0 0217 | | Execute Heap_Access,All_Reference 09b1 380c |8 | Execute Record,Field_Write,Field_Number 0xc 09b2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 09b3 e002 | | Load 0x0,0x2 09b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 09b5 4801 |H | Short_Literal 0x1 09b6 4801 |H | Short_Literal 0x1 09b7 e00e | | Load 0x0,0xe 09b8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 09b9 035b | [ | Declare_Type Array,Constrained 09ba 0337 | 7 | Declare_Variable Array 09bb e5ff | | Load 0x2,-0x1 09bc 825a | Z | Call 0x1,0x5a 09bd 4801 |H | Short_Literal 0x1 09be 00da | | Load_Top At_Offset_2 09bf 01d6 | | Execute Vector,Field_Write 09c0 00da | | Load_Top At_Offset_2 09c1 e002 | | Load 0x0,0x2 09c2 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 09c3 c5fd | | Store 0x2,-0x3 09c4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 09c5 0000 0000 | | .XXX[0x3] 09c7 0000 | | 09c8 ; -------------------------------------------------------------------------------------- 09c8 ; SUBPROGRAM 09c8 ; -------------------------------------------------------------------------------------- 09c8 09d5 | | .CONST 0x09d5 ; Address of begin 09c9 0004 | | .CONST 0x0004 ; Address of exception handler 09ca 0004 | | .CONST 0x0004 ; Number of locals 09cb INIT_09c8: 09cb e002 | | Load 0x0,0x2 09cc 1b10 | | Execute Package,Field_Read,Field_Number 0x10 09cd 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 09ce 4801 |H | Short_Literal 0x1 09cf 4a00 |J | Short_Literal 0x200 09d0 e229 | ) | Load 0x1,0x29 09d1 035b | [ | Declare_Type Array,Constrained 09d2 0337 | 7 | Declare_Variable Array 09d3 e01b | | Load 0x0,0x1b 09d4 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 09d5 BODY_09c8: 09d5 00da | | Load_Top At_Offset_2 09d6 4800 |H | Short_Literal 0x0 09d7 e5ff | | Load 0x2,-0x1 09d8 e01b | | Load 0x0,0x1b 09d9 1811 | | Execute Package,Field_Execute,Field_Number 0x11 09da 005b | [ | Store_Top Discrete,At_Offset_3 09db 00da | | Load_Top At_Offset_2 09dc 7037 |p7 | Jump_Nonzero 0xa14 09dd e5ff | | Load 0x2,-0x1 09de 0217 | | Execute Heap_Access,All_Reference 09df 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 09e0 0031 | 1 | Store_Top Heap_Access,At_Offset_1 09e1 00cf | | Action Mark_Auxiliary 09e2 00da | | Load_Top At_Offset_2 09e3 01d9 | | Execute Vector,Reverse_Bounds 09e4 0007 | | Action Break_Optional 09e5 00db | | Load_Top At_Offset_3 09e6 701f |p | Jump_Nonzero 0xa06 09e7 00d8 | | Load_Top At_Offset_0 09e8 0aff | | Execute_Immediate Plus,-0x1 09e9 e22a | * | Load 0x1,0x2a 09ea 1c08 | | Execute_Immediate Run_Utility,0x8 09eb 4800 |H | Short_Literal 0x0 09ec 00d9 | | Load_Top At_Offset_1 09ed 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 09ee 4801 |H | Short_Literal 0x1 09ef 00da | | Load_Top At_Offset_2 09f0 0aff | | Execute_Immediate Plus,-0x1 09f1 e403 | | Load 0x2,0x3 09f2 01cf | | Execute Vector,Slice_Read 09f3 00d9 | | Load_Top At_Offset_1 09f4 00d8 | | Load_Top At_Offset_0 09f5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 09f6 00da | | Load_Top At_Offset_2 09f7 01da | | Execute Vector,Bounds 09f8 00da | | Load_Top At_Offset_2 09f9 01da | | Execute Vector,Bounds 09fa 00da | | Load_Top At_Offset_2 09fb 027f | | Execute Discrete,Equal 09fc 7001 |p | Jump_Nonzero 0x9fe 09fd 08e0 | | Execute_Immediate Raise,0xe0 09fe 00cd | | Action Spare6_Action 09ff 027f | | Execute Discrete,Equal 0a00 7001 |p | Jump_Nonzero 0xa02 0a01 08e0 | | Execute_Immediate Raise,0xe0 0a02 00d2 | | Pop_Control Pop_Count_2 0a03 00d9 | | Load_Top At_Offset_1 0a04 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 0a05 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a06 00db | | Load_Top At_Offset_3 0a07 e001 | | Load 0x0,0x1 0a08 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0a09 0216 | | Execute Heap_Access,Convert 0a0a 00d9 | | Load_Top At_Offset_1 0a0b e403 | | Load 0x2,0x3 0a0c 01d6 | | Execute Vector,Field_Write 0a0d 00db | | Load_Top At_Offset_3 0a0e 0217 | | Execute Heap_Access,All_Reference 0a0f 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0a10 a404 | | Store_Unchecked 0x2,0x4 0a11 00c8 | | Action Pop_Auxiliary_Range 0a12 3fd2 |? | Loop_Increasing 0x9e5 0a13 00ce | | Action Pop_Auxiliary 0a14 4800 |H | Short_Literal 0x0 0a15 e22a | * | Load 0x1,0x2a 0a16 1c08 | | Execute_Immediate Run_Utility,0x8 0a17 4801 |H | Short_Literal 0x1 0a18 4801 |H | Short_Literal 0x1 0a19 e00e | | Load 0x0,0xe 0a1a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0a1b 035b | [ | Declare_Type Array,Constrained 0a1c 0337 | 7 | Declare_Variable Array 0a1d e5ff | | Load 0x2,-0x1 0a1e 825a | Z | Call 0x1,0x5a 0a1f 4801 |H | Short_Literal 0x1 0a20 00da | | Load_Top At_Offset_2 0a21 01d6 | | Execute Vector,Field_Write 0a22 e402 | | Load 0x2,0x2 0a23 e002 | | Load 0x0,0x2 0a24 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a25 00d9 | | Load_Top At_Offset_1 0a26 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0a27 4801 |H | Short_Literal 0x1 0a28 4800 |H | Short_Literal 0x0 0a29 e229 | ) | Load 0x1,0x29 0a2a 035b | [ | Declare_Type Array,Constrained 0a2b 0337 | 7 | Declare_Variable Array 0a2c 00d9 | | Load_Top At_Offset_1 0a2d 00d8 | | Load_Top At_Offset_0 0a2e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0a2f 00da | | Load_Top At_Offset_2 0a30 01da | | Execute Vector,Bounds 0a31 00da | | Load_Top At_Offset_2 0a32 01da | | Execute Vector,Bounds 0a33 00da | | Load_Top At_Offset_2 0a34 027f | | Execute Discrete,Equal 0a35 7001 |p | Jump_Nonzero 0xa37 0a36 08e0 | | Execute_Immediate Raise,0xe0 0a37 00cd | | Action Spare6_Action 0a38 027f | | Execute Discrete,Equal 0a39 7001 |p | Jump_Nonzero 0xa3b 0a3a 08e0 | | Execute_Immediate Raise,0xe0 0a3b 00d2 | | Pop_Control Pop_Count_2 0a3c 00d9 | | Load_Top At_Offset_1 0a3d 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 0a3e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a3f 0000 | | .XXX[0x1] 0a40 ; -------------------------------------------------------------------------------------- 0a40 ; SUBPROGRAM 0a40 ; -------------------------------------------------------------------------------------- 0a40 0a43 | C | .CONST 0x0a43 ; Address of begin 0a41 0004 | | .CONST 0x0004 ; Address of exception handler 0a42 0001 | | .CONST 0x0001 ; Number of locals 0a43 BODY_0a40: 0a43 INIT_0a40: 0a43 e5fd | | Load 0x2,-0x3 0a44 e5fe | | Load 0x2,-0x2 0a45 e5ff | | Load 0x2,-0x1 0a46 0217 | | Execute Heap_Access,All_Reference 0a47 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0a48 0217 | | Execute Heap_Access,All_Reference 0a49 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0a4a 8231 | 1 | Call 0x1,0x31 0a4b c5fd | | Store 0x2,-0x3 0a4c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a4d 0000 0000 | | .XXX[0x3] 0a4f 0000 | | 0a50 ; -------------------------------------------------------------------------------------- 0a50 ; SUBPROGRAM 0a50 ; -------------------------------------------------------------------------------------- 0a50 0a65 | e | .CONST 0x0a65 ; Address of begin 0a51 0af3 | | .CONST 0x0af3 ; Address of exception handler 0a52 0006 | | .CONST 0x0006 ; Number of locals 0a53 INIT_0a50: 0a53 00da | | Load_Top At_Offset_2 0a54 8026 | & | Call 0x0,0x26 0a55 e027 | ' | Load 0x0,0x27 0a56 03f1 | | Declare_Variable Discrete,With_Value 0a57 e00d | | Load 0x0,0xd 0a58 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0a59 02c7 | | Declare_Variable Any 0a5a 00d8 | | Load_Top At_Offset_0 0a5b 1c00 | | Execute_Immediate Run_Utility,0x0 0a5c e00d | | Load 0x0,0xd 0a5d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0a5e 02c7 | | Declare_Variable Any 0a5f 00d8 | | Load_Top At_Offset_0 0a60 1c00 | | Execute_Immediate Run_Utility,0x0 0a61 e01b | | Load 0x0,0x1b 0a62 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0a63 e01b | | Load 0x0,0x1b 0a64 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0a65 BODY_0a50: 0a65 e402 | | Load 0x2,0x2 0a66 4604 |F | Jump_Case 0x5 0a67 781c |x | Jump 0xa84 ; case 0x0 0a68 780f |x | Jump 0xa78 ; case 0x1 0a69 780b |x | Jump 0xa75 ; case 0x2 0a6a 7814 |x | Jump 0xa7f ; case 0x3 0a6b 7800 |x | Jump 0xa6c ; case 0x4 0a6c e5fd | | Load 0x2,-0x3 0a6d e5fe | | Load 0x2,-0x2 0a6e 6099 |` | Indirect_Literal Discrete,0xb08,{0x00000000, 0x0000280c} 0a6f 4801 |H | Short_Literal 0x1 0a70 e5ff | | Load 0x2,-0x1 0a71 8028 | ( | Call 0x0,0x28 0a72 82c2 | | Call 0x1,0xc2 0a73 c5fd | | Store 0x2,-0x3 0a74 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a75 e5ff | | Load 0x2,-0x1 0a76 c403 | | Store 0x2,0x3 0a77 7814 |x | Jump 0xa8c 0a78 e5ff | | Load 0x2,-0x1 0a79 c404 | | Store 0x2,0x4 0a7a 6089 |` | Indirect_Literal Discrete,0xb04,{0x00000000, 0x0000280b} 0a7b 00db | | Load_Top At_Offset_3 0a7c 8029 | ) | Call 0x0,0x29 0a7d c403 | | Store 0x2,0x3 0a7e 780d |x | Jump 0xa8c 0a7f e5ff | | Load 0x2,-0x1 0a80 c403 | | Store 0x2,0x3 0a81 e5ff | | Load 0x2,-0x1 0a82 c404 | | Store 0x2,0x4 0a83 7808 |x | Jump 0xa8c 0a84 e5fd | | Load 0x2,-0x3 0a85 e5fe | | Load 0x2,-0x2 0a86 6079 |`y | Indirect_Literal Discrete,0xb00,{0x00000000, 0x00002815} 0a87 e5ff | | Load 0x2,-0x1 0a88 8029 | ) | Call 0x0,0x29 0a89 8231 | 1 | Call 0x1,0x31 0a8a c5fd | | Store 0x2,-0x3 0a8b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a8c e5fd | | Load 0x2,-0x3 0a8d e01b | | Load 0x0,0x1b 0a8e 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0a8f e5fe | | Load 0x2,-0x2 0a90 e403 | | Load 0x2,0x3 0a91 82c1 | | Call 0x1,0xc1 0a92 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0a93 c5fd | | Store 0x2,-0x3 0a94 4800 |H | Short_Literal 0x0 0a95 e5fd | | Load 0x2,-0x3 0a96 e002 | | Load 0x0,0x2 0a97 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0a98 6859 |hY | Jump_Zero 0xaf2 0a99 00d9 | | Load_Top At_Offset_1 0a9a 7005 |p | Jump_Nonzero 0xaa0 0a9b e5fe | | Load 0x2,-0x2 0a9c 00db | | Load_Top At_Offset_3 0a9d e403 | | Load 0x2,0x3 0a9e 82bb | | Call 0x1,0xbb 0a9f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0aa0 e5fe | | Load 0x2,-0x2 0aa1 0217 | | Execute Heap_Access,All_Reference 0aa2 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0aa3 684e |hN | Jump_Zero 0xaf2 0aa4 00da | | Load_Top At_Offset_2 0aa5 e00d | | Load 0x0,0xd 0aa6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0aa7 6818 |h | Jump_Zero 0xac0 0aa8 e002 | | Load 0x0,0x2 0aa9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0aaa 4801 |H | Short_Literal 0x1 0aab 4802 |H | Short_Literal 0x2 0aac e00e | | Load 0x0,0xe 0aad 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0aae 035b | [ | Declare_Type Array,Constrained 0aaf 0337 | 7 | Declare_Variable Array 0ab0 e403 | | Load 0x2,0x3 0ab1 e00e | | Load 0x0,0xe 0ab2 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0ab3 4801 |H | Short_Literal 0x1 0ab4 00da | | Load_Top At_Offset_2 0ab5 01d6 | | Execute Vector,Field_Write 0ab6 e5fe | | Load 0x2,-0x2 0ab7 825a | Z | Call 0x1,0x5a 0ab8 4802 |H | Short_Literal 0x2 0ab9 00da | | Load_Top At_Offset_2 0aba 01d6 | | Execute Vector,Field_Write 0abb 6040 |`@ | Indirect_Literal Discrete,0xafc,{0x00000000, 0x00002816} 0abc e002 | | Load 0x0,0x2 0abd 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0abe c5fd | | Store 0x2,-0x3 0abf 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0ac0 00da | | Load_Top At_Offset_2 0ac1 00da | | Load_Top At_Offset_2 0ac2 0217 | | Execute Heap_Access,All_Reference 0ac3 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0ac4 012e | . | Execute Any,Not_Equal 0ac5 682c |h, | Jump_Zero 0xaf2 0ac6 00da | | Load_Top At_Offset_2 0ac7 00da | | Load_Top At_Offset_2 0ac8 0217 | | Execute Heap_Access,All_Reference 0ac9 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0aca 00db | | Load_Top At_Offset_3 0acb 00db | | Load_Top At_Offset_3 0acc 012e | . | Execute Any,Not_Equal 0acd 680b |h | Jump_Zero 0xad9 0ace e5fe | | Load 0x2,-0x2 0acf 00db | | Load_Top At_Offset_3 0ad0 e00d | | Load 0x0,0xd 0ad1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0ad2 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0ad3 e020 | | Load 0x0,0x20 0ad4 180f | | Execute Package,Field_Execute,Field_Number 0xf 0ad5 00da | | Load_Top At_Offset_2 0ad6 0217 | | Execute Heap_Access,All_Reference 0ad7 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0ad8 7806 |x | Jump 0xadf 0ad9 00d9 | | Load_Top At_Offset_1 0ada 0217 | | Execute Heap_Access,All_Reference 0adb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0adc 00da | | Load_Top At_Offset_2 0add 0217 | | Execute Heap_Access,All_Reference 0ade 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0adf 00d9 | | Load_Top At_Offset_1 0ae0 0217 | | Execute Heap_Access,All_Reference 0ae1 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0ae2 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0ae3 00cf | | Action Mark_Auxiliary 0ae4 780a |x | Jump 0xaef 0ae5 e003 | | Load 0x0,0x3 0ae6 180f | | Execute Package,Field_Execute,Field_Number 0xf 0ae7 00da | | Load_Top At_Offset_2 0ae8 0217 | | Execute Heap_Access,All_Reference 0ae9 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0aea 00d9 | | Load_Top At_Offset_1 0aeb 0217 | | Execute Heap_Access,All_Reference 0aec 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0aed 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0aee 00c9 | | Action Pop_Auxiliary_Loop 0aef 00d9 | | Load_Top At_Offset_1 0af0 77f4 |w | Jump_Nonzero 0xae5 0af1 00ce | | Action Pop_Auxiliary 0af2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0af3 TRAP_0a50: 0af3 e002 | | Load 0x0,0x2 0af4 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0af5 010f | | Execute Exception,Equal 0af6 6804 |h | Jump_Zero 0xafb 0af7 e002 | | Load 0x0,0x2 0af8 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0af9 a5fd | | Store_Unchecked 0x2,-0x3 0afa 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0afb 0100 | | Execute Exception,Raise 0afc 0000 0000 | | .LITERAL {0x00000000, 0x00002816} 0b00 0000 0000 | | .LITERAL {0x00000000, 0x00002815} 0b04 0000 0000 | | .LITERAL {0x00000000, 0x0000280b} 0b08 0000 0000 | | .LITERAL {0x00000000, 0x0000280c} 0b0c 0000 0000 | | .BLANK 0000[0x4] 0b10 ; -------------------------------------------------------------------------------------- 0b10 ; SUBPROGRAM 0b10 ; -------------------------------------------------------------------------------------- 0b10 0b20 | | .CONST 0x0b20 ; Address of begin 0b11 0b73 | s | .CONST 0x0b73 ; Address of exception handler 0b12 0004 | | .CONST 0x0004 ; Number of locals 0b13 INIT_0b10: 0b13 e00d | | Load 0x0,0xd 0b14 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b15 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0b16 02c7 | | Declare_Variable Any 0b17 00d8 | | Load_Top At_Offset_0 0b18 1c00 | | Execute_Immediate Run_Utility,0x0 0b19 e00d | | Load 0x0,0xd 0b1a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b1b 02c7 | | Declare_Variable Any 0b1c 00d8 | | Load_Top At_Offset_0 0b1d 1c00 | | Execute_Immediate Run_Utility,0x0 0b1e e00d | | Load 0x0,0xd 0b1f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0b20 BODY_0b10: 0b20 e5fd | | Load 0x2,-0x3 0b21 00db | | Load_Top At_Offset_3 0b22 6061 |`a | Indirect_Literal Discrete,0xb84,{0x00000000, 0x00002819} 0b23 605c |`\ | Indirect_Literal Discrete,0xb80,{0x00000000, 0x00002807} 0b24 e5ff | | Load 0x2,-0x1 0b25 801c | | Call 0x0,0x1c 0b26 c402 | | Store 0x2,0x2 0b27 c5fd | | Store 0x2,-0x3 0b28 4800 |H | Short_Literal 0x0 0b29 e5fd | | Load 0x2,-0x3 0b2a e002 | | Load 0x0,0x2 0b2b 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0b2c 6840 |h@ | Jump_Zero 0xb6d 0b2d 00cf | | Action Mark_Auxiliary 0b2e 7838 |x8 | Jump 0xb67 0b2f e00d | | Load 0x0,0xd 0b30 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0b31 00db | | Load_Top At_Offset_3 0b32 0120 | | Execute Any,Is_Value 0b33 6803 |h | Jump_Zero 0xb37 0b34 e00d | | Load 0x0,0xd 0b35 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b36 7801 |x | Jump 0xb38 0b37 00db | | Load_Top At_Offset_3 0b38 e402 | | Load 0x2,0x2 0b39 e00d | | Load 0x0,0xd 0b3a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b3b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0b3c c403 | | Store 0x2,0x3 0b3d 005a | Z | Store_Top Discrete,At_Offset_2 0b3e 00d9 | | Load_Top At_Offset_1 0b3f 7006 |p | Jump_Nonzero 0xb46 0b40 e5fd | | Load 0x2,-0x3 0b41 e5fe | | Load 0x2,-0x2 0b42 e403 | | Load 0x2,0x3 0b43 8231 | 1 | Call 0x1,0x31 0b44 c5fd | | Store 0x2,-0x3 0b45 781b |x | Jump 0xb61 0b46 e002 | | Load 0x0,0x2 0b47 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0b48 4801 |H | Short_Literal 0x1 0b49 4802 |H | Short_Literal 0x2 0b4a e00e | | Load 0x0,0xe 0b4b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b4c 035b | [ | Declare_Type Array,Constrained 0b4d 0337 | 7 | Declare_Variable Array 0b4e e402 | | Load 0x2,0x2 0b4f e00d | | Load 0x0,0xd 0b50 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b51 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0b52 e00e | | Load 0x0,0xe 0b53 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0b54 4801 |H | Short_Literal 0x1 0b55 00da | | Load_Top At_Offset_2 0b56 01d6 | | Execute Vector,Field_Write 0b57 00db | | Load_Top At_Offset_3 0b58 e00e | | Load 0x0,0xe 0b59 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0b5a 4802 |H | Short_Literal 0x2 0b5b 00da | | Load_Top At_Offset_2 0b5c 01d6 | | Execute Vector,Field_Write 0b5d 601e |` | Indirect_Literal Discrete,0xb7c,{0x00000000, 0x00002812} 0b5e e002 | | Load 0x0,0x2 0b5f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0b60 c5fd | | Store 0x2,-0x3 0b61 00db | | Load_Top At_Offset_3 0b62 e00d | | Load 0x0,0xd 0b63 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b64 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0b65 c402 | | Store 0x2,0x2 0b66 00c9 | | Action Pop_Auxiliary_Loop 0b67 00db | | Load_Top At_Offset_3 0b68 e00d | | Load 0x0,0xd 0b69 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b6a 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0b6b 6fc3 |o | Jump_Zero 0xb2f 0b6c 00ce | | Action Pop_Auxiliary 0b6d 00da | | Load_Top At_Offset_2 0b6e e00d | | Load 0x0,0xd 0b6f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b70 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0b71 c402 | | Store 0x2,0x2 0b72 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0b73 TRAP_0b10: 0b73 0007 | | Action Break_Optional 0b74 00db | | Load_Top At_Offset_3 0b75 e00d | | Load 0x0,0xd 0b76 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b77 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0b78 c402 | | Store 0x2,0x2 0b79 00d8 | | Load_Top At_Offset_0 0b7a 0101 | | Execute Exception,Reraise 0b7b 0000 | | .XXX[0x1] 0b7c 0000 0000 | | .LITERAL {0x00000000, 0x00002812} 0b80 0000 0000 | | .LITERAL {0x00000000, 0x00002807} 0b84 0000 0000 | | .LITERAL {0x00000000, 0x00002819} 0b88 ; -------------------------------------------------------------------------------------- 0b88 ; SUBPROGRAM 0b88 ; -------------------------------------------------------------------------------------- 0b88 0b8b | | .CONST 0x0b8b ; Address of begin 0b89 0004 | | .CONST 0x0004 ; Address of exception handler 0b8a 0001 | | .CONST 0x0001 ; Number of locals 0b8b BODY_0b88: 0b8b INIT_0b88: 0b8b 00da | | Load_Top At_Offset_2 0b8c 0217 | | Execute Heap_Access,All_Reference 0b8d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0b8e e00d | | Load 0x0,0xd 0b8f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0b90 6808 |h | Jump_Zero 0xb99 0b91 e5fd | | Load 0x2,-0x3 0b92 e5fe | | Load 0x2,-0x2 0b93 e5ff | | Load 0x2,-0x1 0b94 0217 | | Execute Heap_Access,All_Reference 0b95 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b96 8231 | 1 | Call 0x1,0x31 0b97 c5fd | | Store 0x2,-0x3 0b98 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0b99 e5fd | | Load 0x2,-0x3 0b9a e5fe | | Load 0x2,-0x2 0b9b e5ff | | Load 0x2,-0x1 0b9c 0217 | | Execute Heap_Access,All_Reference 0b9d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0b9e 8231 | 1 | Call 0x1,0x31 0b9f c5fd | | Store 0x2,-0x3 0ba0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0ba1 0000 0000 | | .BLANK 0000[0x7] 0ba8 ; -------------------------------------------------------------------------------------- 0ba8 ; SUBPROGRAM 0ba8 ; -------------------------------------------------------------------------------------- 0ba8 0bab | | .CONST 0x0bab ; Address of begin 0ba9 0004 | | .CONST 0x0004 ; Address of exception handler 0baa 0001 | | .CONST 0x0001 ; Number of locals 0bab BODY_0ba8: 0bab INIT_0ba8: 0bab e5fd | | Load 0x2,-0x3 0bac e5fe | | Load 0x2,-0x2 0bad e5ff | | Load 0x2,-0x1 0bae 0217 | | Execute Heap_Access,All_Reference 0baf 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0bb0 0217 | | Execute Heap_Access,All_Reference 0bb1 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0bb2 8235 | 5 | Call 0x1,0x35 0bb3 c5fd | | Store 0x2,-0x3 0bb4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0bb5 0000 0000 | | .XXX[0x3] 0bb7 0000 | | 0bb8 ; -------------------------------------------------------------------------------------- 0bb8 ; SUBPROGRAM 0bb8 ; -------------------------------------------------------------------------------------- 0bb8 0bde | | .CONST 0x0bde ; Address of begin 0bb9 0004 | | .CONST 0x0004 ; Address of exception handler 0bba 000e | | .CONST 0x000e ; Number of locals 0bbb INIT_0bb8: 0bbb 00da | | Load_Top At_Offset_2 0bbc 8026 | & | Call 0x0,0x26 0bbd e027 | ' | Load 0x0,0x27 0bbe 03f1 | | Declare_Variable Discrete,With_Value 0bbf e00d | | Load 0x0,0xd 0bc0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0bc1 02c7 | | Declare_Variable Any 0bc2 00d8 | | Load_Top At_Offset_0 0bc3 1c00 | | Execute_Immediate Run_Utility,0x0 0bc4 e5fe | | Load 0x2,-0x2 0bc5 0217 | | Execute Heap_Access,All_Reference 0bc6 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0bc7 0007 | | Action Break_Optional 0bc8 00d8 | | Load_Top At_Offset_0 0bc9 0217 | | Execute Heap_Access,All_Reference 0bca 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0bcb 0007 | | Action Break_Optional 0bcc e01b | | Load 0x0,0x1b 0bcd 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0bce e01b | | Load 0x0,0x1b 0bcf 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 0bd0 e01b | | Load 0x0,0x1b 0bd1 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 0bd2 e01b | | Load 0x0,0x1b 0bd3 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0bd4 e01b | | Load 0x0,0x1b 0bd5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0bd6 e01b | | Load 0x0,0x1b 0bd7 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0bd8 e01b | | Load 0x0,0x1b 0bd9 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0bda e01b | | Load 0x0,0x1b 0bdb 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 0bdc e01b | | Load 0x0,0x1b 0bdd 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 0bde BODY_0bb8: 0bde e402 | | Load 0x2,0x2 0bdf 4604 |F | Jump_Case 0x5 0be0 7815 |x | Jump 0xbf6 ; case 0x0 0be1 780f |x | Jump 0xbf1 ; case 0x1 0be2 780b |x | Jump 0xbee ; case 0x2 0be3 780a |x | Jump 0xbee ; case 0x3 0be4 7800 |x | Jump 0xbe5 ; case 0x4 0be5 e5fd | | Load 0x2,-0x3 0be6 e5fe | | Load 0x2,-0x2 0be7 60c8 |` | Indirect_Literal Discrete,0xcb0,{0x00000000, 0x0000280d} 0be8 4800 |H | Short_Literal 0x0 0be9 e5ff | | Load 0x2,-0x1 0bea 8028 | ( | Call 0x0,0x28 0beb 82c3 | | Call 0x1,0xc3 0bec c5fd | | Store 0x2,-0x3 0bed 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0bee e5ff | | Load 0x2,-0x1 0bef c403 | | Store 0x2,0x3 0bf0 780d |x | Jump 0xbfe 0bf1 60ba |` | Indirect_Literal Discrete,0xcac,{0x00000000, 0x0000280b} 0bf2 e5ff | | Load 0x2,-0x1 0bf3 8029 | ) | Call 0x0,0x29 0bf4 c403 | | Store 0x2,0x3 0bf5 7808 |x | Jump 0xbfe 0bf6 e5fd | | Load 0x2,-0x3 0bf7 e5fe | | Load 0x2,-0x2 0bf8 60af |` | Indirect_Literal Discrete,0xca8,{0x00000000, 0x00002815} 0bf9 e5ff | | Load 0x2,-0x1 0bfa 8029 | ) | Call 0x0,0x29 0bfb 8235 | 5 | Call 0x1,0x35 0bfc c5fd | | Store 0x2,-0x3 0bfd 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0bfe 00cf | | Action Mark_Auxiliary 0bff 789f |x | Jump 0xc9f 0c00 e404 | | Load 0x2,0x4 0c01 0217 | | Execute Heap_Access,All_Reference 0c02 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c03 e403 | | Load 0x2,0x3 0c04 012f | / | Execute Any,Equal 0c05 6890 |h | Jump_Zero 0xc96 0c06 e404 | | Load 0x2,0x4 0c07 e5fe | | Load 0x2,-0x2 0c08 0217 | | Execute Heap_Access,All_Reference 0c09 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0c0a 021e | | Execute Heap_Access,Maximum 0c0b 6895 |h | Jump_Zero 0xca1 0c0c e406 | | Load 0x2,0x6 0c0d 7007 |p | Jump_Nonzero 0xc15 0c0e e404 | | Load 0x2,0x4 0c0f 0217 | | Execute Heap_Access,All_Reference 0c10 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0c11 e5fe | | Load 0x2,-0x2 0c12 0217 | | Execute Heap_Access,All_Reference 0c13 380d |8 | Execute Record,Field_Write,Field_Number 0xd 0c14 7806 |x | Jump 0xc1b 0c15 e404 | | Load 0x2,0x4 0c16 0217 | | Execute Heap_Access,All_Reference 0c17 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0c18 e406 | | Load 0x2,0x6 0c19 0217 | | Execute Heap_Access,All_Reference 0c1a 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0c1b e404 | | Load 0x2,0x4 0c1c 0217 | | Execute Heap_Access,All_Reference 0c1d 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0c1e a407 | | Store_Unchecked 0x2,0x7 0c1f 00cf | | Action Mark_Auxiliary 0c20 7859 |xY | Jump 0xc7a 0c21 e407 | | Load 0x2,0x7 0c22 0217 | | Execute Heap_Access,All_Reference 0c23 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0c24 a408 | | Store_Unchecked 0x2,0x8 0c25 e407 | | Load 0x2,0x7 0c26 0217 | | Execute Heap_Access,All_Reference 0c27 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0c28 a409 | | Store_Unchecked 0x2,0x9 0c29 00cf | | Action Mark_Auxiliary 0c2a 783f |x? | Jump 0xc6a 0c2b e409 | | Load 0x2,0x9 0c2c 0217 | | Execute Heap_Access,All_Reference 0c2d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c2e a40a | | Store_Unchecked 0x2,0xa 0c2f e409 | | Load 0x2,0x9 0c30 0217 | | Execute Heap_Access,All_Reference 0c31 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c32 0217 | | Execute Heap_Access,All_Reference 0c33 3c19 |< | Execute Record,Field_Read,Field_Number 0x19 0c34 a40d | | Store_Unchecked 0x2,0xd 0c35 00cf | | Action Mark_Auxiliary 0c36 7829 |x) | Jump 0xc60 0c37 e40d | | Load 0x2,0xd 0c38 0217 | | Execute Heap_Access,All_Reference 0c39 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0c3a e407 | | Load 0x2,0x7 0c3b 021f | | Execute Heap_Access,Equal 0c3c 681c |h | Jump_Zero 0xc59 0c3d e40e | | Load 0x2,0xe 0c3e 7009 |p | Jump_Nonzero 0xc48 0c3f e40d | | Load 0x2,0xd 0c40 0217 | | Execute Heap_Access,All_Reference 0c41 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c42 e409 | | Load 0x2,0x9 0c43 0217 | | Execute Heap_Access,All_Reference 0c44 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c45 0217 | | Execute Heap_Access,All_Reference 0c46 3819 |8 | Execute Record,Field_Write,Field_Number 0x19 0c47 7806 |x | Jump 0xc4e 0c48 e40d | | Load 0x2,0xd 0c49 0217 | | Execute Heap_Access,All_Reference 0c4a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c4b e40e | | Load 0x2,0xe 0c4c 0217 | | Execute Heap_Access,All_Reference 0c4d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0c4e e40d | | Load 0x2,0xd 0c4f e01b | | Load 0x0,0x1b 0c50 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0c51 c40d | | Store 0x2,0xd 0c52 4800 |H | Short_Literal 0x0 0c53 e409 | | Load 0x2,0x9 0c54 0217 | | Execute Heap_Access,All_Reference 0c55 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c56 0217 | | Execute Heap_Access,All_Reference 0c57 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 0c58 7809 |x | Jump 0xc62 0c59 e40d | | Load 0x2,0xd 0c5a a40e | | Store_Unchecked 0x2,0xe 0c5b e40d | | Load 0x2,0xd 0c5c 0217 | | Execute Heap_Access,All_Reference 0c5d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c5e a40d | | Store_Unchecked 0x2,0xd 0c5f 00c9 | | Action Pop_Auxiliary_Loop 0c60 e40d | | Load 0x2,0xd 0c61 77d5 |w | Jump_Nonzero 0xc37 0c62 00ce | | Action Pop_Auxiliary 0c63 e409 | | Load 0x2,0x9 0c64 e01b | | Load 0x0,0x1b 0c65 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0c66 c409 | | Store 0x2,0x9 0c67 e40a | | Load 0x2,0xa 0c68 a409 | | Store_Unchecked 0x2,0x9 0c69 00c9 | | Action Pop_Auxiliary_Loop 0c6a e409 | | Load 0x2,0x9 0c6b 77bf |w | Jump_Nonzero 0xc2b 0c6c 00ce | | Action Pop_Auxiliary 0c6d e5fe | | Load 0x2,-0x2 0c6e e407 | | Load 0x2,0x7 0c6f 0217 | | Execute Heap_Access,All_Reference 0c70 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0c71 e02a | * | Load 0x0,0x2a 0c72 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0c73 e407 | | Load 0x2,0x7 0c74 e01b | | Load 0x0,0x1b 0c75 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0c76 c407 | | Store 0x2,0x7 0c77 e408 | | Load 0x2,0x8 0c78 a407 | | Store_Unchecked 0x2,0x7 0c79 00c9 | | Action Pop_Auxiliary_Loop 0c7a e407 | | Load 0x2,0x7 0c7b 77a5 |w | Jump_Nonzero 0xc21 0c7c 00ce | | Action Pop_Auxiliary 0c7d e404 | | Load 0x2,0x4 0c7e 0217 | | Execute Heap_Access,All_Reference 0c7f 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0c80 a40b | | Store_Unchecked 0x2,0xb 0c81 00cf | | Action Mark_Auxiliary 0c82 780b |x | Jump 0xc8e 0c83 e40b | | Load 0x2,0xb 0c84 0217 | | Execute Heap_Access,All_Reference 0c85 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c86 a40c | | Store_Unchecked 0x2,0xc 0c87 e40b | | Load 0x2,0xb 0c88 e01b | | Load 0x0,0x1b 0c89 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0c8a c40b | | Store 0x2,0xb 0c8b e40c | | Load 0x2,0xc 0c8c a40b | | Store_Unchecked 0x2,0xb 0c8d 00c9 | | Action Pop_Auxiliary_Loop 0c8e e40b | | Load 0x2,0xb 0c8f 77f3 |w | Jump_Nonzero 0xc83 0c90 00ce | | Action Pop_Auxiliary 0c91 e404 | | Load 0x2,0x4 0c92 e01b | | Load 0x0,0x1b 0c93 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0c94 c404 | | Store 0x2,0x4 0c95 780b |x | Jump 0xca1 0c96 e404 | | Load 0x2,0x4 0c97 a406 | | Store_Unchecked 0x2,0x6 0c98 e405 | | Load 0x2,0x5 0c99 a404 | | Store_Unchecked 0x2,0x4 0c9a e404 | | Load 0x2,0x4 0c9b 0217 | | Execute Heap_Access,All_Reference 0c9c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0c9d a405 | | Store_Unchecked 0x2,0x5 0c9e 00c9 | | Action Pop_Auxiliary_Loop 0c9f e404 | | Load 0x2,0x4 0ca0 775f |w_ | Jump_Nonzero 0xc00 0ca1 00ce | | Action Pop_Auxiliary 0ca2 e5fe | | Load 0x2,-0x2 0ca3 e403 | | Load 0x2,0x3 0ca4 e02a | * | Load 0x0,0x2a 0ca5 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0ca6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0ca7 0000 | | .XXX[0x1] 0ca8 0000 0000 | | .LITERAL {0x00000000, 0x00002815} 0cac 0000 0000 | | .LITERAL {0x00000000, 0x0000280b} 0cb0 0000 0000 | | .LITERAL {0x00000000, 0x0000280d} 0cb4 0000 0000 | | .BLANK 0000[0x4] 0cb8 ; -------------------------------------------------------------------------------------- 0cb8 ; SUBPROGRAM 0cb8 ; -------------------------------------------------------------------------------------- 0cb8 0cc8 | | .CONST 0x0cc8 ; Address of begin 0cb9 0d1b | | .CONST 0x0d1b ; Address of exception handler 0cba 0004 | | .CONST 0x0004 ; Number of locals 0cbb INIT_0cb8: 0cbb e00d | | Load 0x0,0xd 0cbc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0cbd 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0cbe 02c7 | | Declare_Variable Any 0cbf 00d8 | | Load_Top At_Offset_0 0cc0 1c00 | | Execute_Immediate Run_Utility,0x0 0cc1 e00d | | Load 0x0,0xd 0cc2 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0cc3 e00d | | Load 0x0,0xd 0cc4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0cc5 02c7 | | Declare_Variable Any 0cc6 00d8 | | Load_Top At_Offset_0 0cc7 1c00 | | Execute_Immediate Run_Utility,0x0 0cc8 BODY_0cb8: 0cc8 e5fd | | Load 0x2,-0x3 0cc9 00db | | Load_Top At_Offset_3 0cca 6061 |`a | Indirect_Literal Discrete,0xd2c,{0x00000000, 0x00002819} 0ccb 605c |`\ | Indirect_Literal Discrete,0xd28,{0x00000000, 0x00002807} 0ccc e5ff | | Load 0x2,-0x1 0ccd 801c | | Call 0x0,0x1c 0cce c402 | | Store 0x2,0x2 0ccf c5fd | | Store 0x2,-0x3 0cd0 4800 |H | Short_Literal 0x0 0cd1 e5fd | | Load 0x2,-0x3 0cd2 e002 | | Load 0x0,0x2 0cd3 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0cd4 6840 |h@ | Jump_Zero 0xd15 0cd5 00cf | | Action Mark_Auxiliary 0cd6 7838 |x8 | Jump 0xd0f 0cd7 e00d | | Load 0x0,0xd 0cd8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0cd9 00da | | Load_Top At_Offset_2 0cda 0120 | | Execute Any,Is_Value 0cdb 6803 |h | Jump_Zero 0xcdf 0cdc e00d | | Load 0x0,0xd 0cdd 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0cde 7801 |x | Jump 0xce0 0cdf 00da | | Load_Top At_Offset_2 0ce0 e402 | | Load 0x2,0x2 0ce1 e00d | | Load 0x0,0xd 0ce2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0ce3 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0ce4 c404 | | Store 0x2,0x4 0ce5 005b | [ | Store_Top Discrete,At_Offset_3 0ce6 00da | | Load_Top At_Offset_2 0ce7 7006 |p | Jump_Nonzero 0xcee 0ce8 e5fd | | Load 0x2,-0x3 0ce9 e5fe | | Load 0x2,-0x2 0cea 00db | | Load_Top At_Offset_3 0ceb 8235 | 5 | Call 0x1,0x35 0cec c5fd | | Store 0x2,-0x3 0ced 781b |x | Jump 0xd09 0cee e002 | | Load 0x0,0x2 0cef 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0cf0 4801 |H | Short_Literal 0x1 0cf1 4802 |H | Short_Literal 0x2 0cf2 e00e | | Load 0x0,0xe 0cf3 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0cf4 035b | [ | Declare_Type Array,Constrained 0cf5 0337 | 7 | Declare_Variable Array 0cf6 e402 | | Load 0x2,0x2 0cf7 e00d | | Load 0x0,0xd 0cf8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0cf9 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0cfa e00e | | Load 0x0,0xe 0cfb 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0cfc 4801 |H | Short_Literal 0x1 0cfd 00da | | Load_Top At_Offset_2 0cfe 01d6 | | Execute Vector,Field_Write 0cff e403 | | Load 0x2,0x3 0d00 e00e | | Load 0x0,0xe 0d01 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0d02 4802 |H | Short_Literal 0x2 0d03 00da | | Load_Top At_Offset_2 0d04 01d6 | | Execute Vector,Field_Write 0d05 601e |` | Indirect_Literal Discrete,0xd24,{0x00000000, 0x00002812} 0d06 e002 | | Load 0x0,0x2 0d07 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0d08 c5fd | | Store 0x2,-0x3 0d09 00db | | Load_Top At_Offset_3 0d0a e00d | | Load 0x0,0xd 0d0b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0d0c 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0d0d c402 | | Store 0x2,0x2 0d0e 00c9 | | Action Pop_Auxiliary_Loop 0d0f 00db | | Load_Top At_Offset_3 0d10 e00d | | Load 0x0,0xd 0d11 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0d12 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0d13 6fc3 |o | Jump_Zero 0xcd7 0d14 00ce | | Action Pop_Auxiliary 0d15 00da | | Load_Top At_Offset_2 0d16 e00d | | Load 0x0,0xd 0d17 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0d18 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0d19 c402 | | Store 0x2,0x2 0d1a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0d1b TRAP_0cb8: 0d1b 0007 | | Action Break_Optional 0d1c 00db | | Load_Top At_Offset_3 0d1d e00d | | Load 0x0,0xd 0d1e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0d1f 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0d20 c402 | | Store 0x2,0x2 0d21 00d8 | | Load_Top At_Offset_0 0d22 0101 | | Execute Exception,Reraise 0d23 0000 | | .XXX[0x1] 0d24 0000 0000 | | .LITERAL {0x00000000, 0x00002812} 0d28 0000 0000 | | .LITERAL {0x00000000, 0x00002807} 0d2c 0000 0000 | | .LITERAL {0x00000000, 0x00002819} 0d30 ; -------------------------------------------------------------------------------------- 0d30 ; SUBPROGRAM 0d30 ; -------------------------------------------------------------------------------------- 0d30 0d33 | 3 | .CONST 0x0d33 ; Address of begin 0d31 0004 | | .CONST 0x0004 ; Address of exception handler 0d32 0001 | | .CONST 0x0001 ; Number of locals 0d33 BODY_0d30: 0d33 INIT_0d30: 0d33 e5fd | | Load 0x2,-0x3 0d34 e5fe | | Load 0x2,-0x2 0d35 e5ff | | Load 0x2,-0x1 0d36 0217 | | Execute Heap_Access,All_Reference 0d37 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0d38 8235 | 5 | Call 0x1,0x35 0d39 c5fd | | Store 0x2,-0x3 0d3a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0d3b 0000 0000 | | .BLANK 0000[0x5] 0d40 ; -------------------------------------------------------------------------------------- 0d40 ; SUBPROGRAM 0d40 ; -------------------------------------------------------------------------------------- 0d40 0d43 | C | .CONST 0x0d43 ; Address of begin 0d41 0004 | | .CONST 0x0004 ; Address of exception handler 0d42 0001 | | .CONST 0x0001 ; Number of locals 0d43 BODY_0d40: 0d43 INIT_0d40: 0d43 e5fc | | Load 0x2,-0x4 0d44 e228 | ( | Load 0x1,0x28 0d45 e5fe | | Load 0x2,-0x2 0d46 e5ff | | Load 0x2,-0x1 0d47 0217 | | Execute Heap_Access,All_Reference 0d48 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0d49 0217 | | Execute Heap_Access,All_Reference 0d4a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0d4b 8239 | 9 | Call 0x1,0x39 0d4c c5fd | | Store 0x2,-0x3 0d4d c5fc | | Store 0x2,-0x4 0d4e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0d4f 0000 | | .XXX[0x1] 0d50 ; -------------------------------------------------------------------------------------- 0d50 ; SUBPROGRAM 0d50 ; -------------------------------------------------------------------------------------- 0d50 0d5e | ^ | .CONST 0x0d5e ; Address of begin 0d51 0004 | | .CONST 0x0004 ; Address of exception handler 0d52 0004 | | .CONST 0x0004 ; Number of locals 0d53 INIT_0d50: 0d53 00da | | Load_Top At_Offset_2 0d54 8026 | & | Call 0x0,0x26 0d55 e027 | ' | Load 0x0,0x27 0d56 03f1 | | Declare_Variable Discrete,With_Value 0d57 e00d | | Load 0x0,0xd 0d58 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0d59 02c7 | | Declare_Variable Any 0d5a 00d8 | | Load_Top At_Offset_0 0d5b 1c00 | | Execute_Immediate Run_Utility,0x0 0d5c e01b | | Load 0x0,0x1b 0d5d 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0d5e BODY_0d50: 0d5e 00da | | Load_Top At_Offset_2 0d5f 4604 |F | Jump_Case 0x5 0d60 781f |x | Jump 0xd80 ; case 0x0 0d61 7819 |x | Jump 0xd7b ; case 0x1 0d62 7815 |x | Jump 0xd78 ; case 0x2 0d63 7814 |x | Jump 0xd78 ; case 0x3 0d64 7800 |x | Jump 0xd65 ; case 0x4 0d65 e002 | | Load 0x0,0x2 0d66 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0d67 4801 |H | Short_Literal 0x1 0d68 4801 |H | Short_Literal 0x1 0d69 e00e | | Load 0x0,0xe 0d6a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0d6b 035b | [ | Declare_Type Array,Constrained 0d6c 0337 | 7 | Declare_Variable Array 0d6d e5ff | | Load 0x2,-0x1 0d6e e00e | | Load 0x0,0xe 0d6f 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0d70 4801 |H | Short_Literal 0x1 0d71 00da | | Load_Top At_Offset_2 0d72 01d6 | | Execute Vector,Field_Write 0d73 604c |`L | Indirect_Literal Discrete,0xdc0,{0x00000000, 0x00002801} 0d74 e002 | | Load 0x0,0x2 0d75 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0d76 c5fc | | Store 0x2,-0x4 0d77 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0d78 e5ff | | Load 0x2,-0x1 0d79 c403 | | Store 0x2,0x3 0d7a 780f |x | Jump 0xd8a 0d7b 6040 |`@ | Indirect_Literal Discrete,0xdbc,{0x00000000, 0x0000280b} 0d7c e5ff | | Load 0x2,-0x1 0d7d 8029 | ) | Call 0x0,0x29 0d7e c403 | | Store 0x2,0x3 0d7f 780a |x | Jump 0xd8a 0d80 e5fc | | Load 0x2,-0x4 0d81 e228 | ( | Load 0x1,0x28 0d82 e5fe | | Load 0x2,-0x2 0d83 6034 |`4 | Indirect_Literal Discrete,0xdb8,{0x00000000, 0x00002815} 0d84 e5ff | | Load 0x2,-0x1 0d85 8029 | ) | Call 0x0,0x29 0d86 8239 | 9 | Call 0x1,0x39 0d87 c5fd | | Store 0x2,-0x3 0d88 c5fc | | Store 0x2,-0x4 0d89 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0d8a e5fc | | Load 0x2,-0x4 0d8b e01b | | Load 0x0,0x1b 0d8c 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0d8d e5fe | | Load 0x2,-0x2 0d8e e403 | | Load 0x2,0x3 0d8f 82c1 | | Call 0x1,0xc1 0d90 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0d91 c5fc | | Store 0x2,-0x4 0d92 00d8 | | Load_Top At_Offset_0 0d93 7018 |p | Jump_Nonzero 0xdac 0d94 e002 | | Load 0x0,0x2 0d95 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0d96 4801 |H | Short_Literal 0x1 0d97 4802 |H | Short_Literal 0x2 0d98 e00e | | Load 0x0,0xe 0d99 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0d9a 035b | [ | Declare_Type Array,Constrained 0d9b 0337 | 7 | Declare_Variable Array 0d9c 00db | | Load_Top At_Offset_3 0d9d e00e | | Load 0x0,0xe 0d9e 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0d9f 4801 |H | Short_Literal 0x1 0da0 00da | | Load_Top At_Offset_2 0da1 01d6 | | Execute Vector,Field_Write 0da2 e5ff | | Load 0x2,-0x1 0da3 e00e | | Load 0x0,0xe 0da4 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0da5 4802 |H | Short_Literal 0x2 0da6 00da | | Load_Top At_Offset_2 0da7 01d6 | | Execute Vector,Field_Write 0da8 600b |` | Indirect_Literal Discrete,0xdb4,{0x00000000, 0x00002814} 0da9 e002 | | Load 0x0,0x2 0daa 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0dab c5fc | | Store 0x2,-0x4 0dac 00d8 | | Load_Top At_Offset_0 0dad e001 | | Load 0x0,0x1 0dae 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0daf 0216 | | Execute Heap_Access,Convert 0db0 a5fd | | Store_Unchecked 0x2,-0x3 0db1 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0db2 0000 0000 | | .XXX[0x2] 0db4 0000 0000 | | .LITERAL {0x00000000, 0x00002814} 0db8 0000 0000 | | .LITERAL {0x00000000, 0x00002815} 0dbc 0000 0000 | | .LITERAL {0x00000000, 0x0000280b} 0dc0 0000 0000 | | .LITERAL {0x00000000, 0x00002801} 0dc4 0000 0000 | | .BLANK 0000[0x4] 0dc8 ; -------------------------------------------------------------------------------------- 0dc8 ; SUBPROGRAM 0dc8 ; -------------------------------------------------------------------------------------- 0dc8 0dd8 | | .CONST 0x0dd8 ; Address of begin 0dc9 0e4e | N | .CONST 0x0e4e ; Address of exception handler 0dca 0004 | | .CONST 0x0004 ; Number of locals 0dcb INIT_0dc8: 0dcb e00d | | Load 0x0,0xd 0dcc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0dcd 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0dce 02c7 | | Declare_Variable Any 0dcf 00d8 | | Load_Top At_Offset_0 0dd0 1c00 | | Execute_Immediate Run_Utility,0x0 0dd1 e00d | | Load 0x0,0xd 0dd2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0dd3 02c7 | | Declare_Variable Any 0dd4 00d8 | | Load_Top At_Offset_0 0dd5 1c00 | | Execute_Immediate Run_Utility,0x0 0dd6 e00d | | Load 0x0,0xd 0dd7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0dd8 BODY_0dc8: 0dd8 e5fc | | Load 0x2,-0x4 0dd9 00db | | Load_Top At_Offset_3 0dda 6089 |` | Indirect_Literal Discrete,0xe64,{0x00000000, 0x00002819} 0ddb 6084 |` | Indirect_Literal Discrete,0xe60,{0x00000000, 0x00002807} 0ddc e5ff | | Load 0x2,-0x1 0ddd 801c | | Call 0x0,0x1c 0dde c402 | | Store 0x2,0x2 0ddf c5fc | | Store 0x2,-0x4 0de0 4800 |H | Short_Literal 0x0 0de1 e5fc | | Load 0x2,-0x4 0de2 e002 | | Load 0x0,0x2 0de3 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0de4 6863 |hc | Jump_Zero 0xe48 0de5 e00d | | Load 0x0,0xd 0de6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0de7 00da | | Load_Top At_Offset_2 0de8 0120 | | Execute Any,Is_Value 0de9 6803 |h | Jump_Zero 0xded 0dea e00d | | Load 0x0,0xd 0deb 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0dec 7801 |x | Jump 0xdee 0ded 00da | | Load_Top At_Offset_2 0dee e402 | | Load 0x2,0x2 0def e00d | | Load 0x0,0xd 0df0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0df1 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0df2 c403 | | Store 0x2,0x3 0df3 0059 | Y | Store_Top Discrete,At_Offset_1 0df4 00d8 | | Load_Top At_Offset_0 0df5 7037 |p7 | Jump_Nonzero 0xe2d 0df6 00da | | Load_Top At_Offset_2 0df7 e00d | | Load 0x0,0xd 0df8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0df9 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0dfa c402 | | Store 0x2,0x2 0dfb 00da | | Load_Top At_Offset_2 0dfc e00d | | Load 0x0,0xd 0dfd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0dfe 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0dff 7025 |p% | Jump_Nonzero 0xe25 0e00 e002 | | Load 0x0,0x2 0e01 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0e02 4801 |H | Short_Literal 0x1 0e03 4803 |H | Short_Literal 0x3 0e04 e00e | | Load 0x0,0xe 0e05 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0e06 035b | [ | Declare_Type Array,Constrained 0e07 0337 | 7 | Declare_Variable Array 0e08 e5ff | | Load 0x2,-0x1 0e09 e00e | | Load 0x0,0xe 0e0a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0e0b 4801 |H | Short_Literal 0x1 0e0c 00da | | Load_Top At_Offset_2 0e0d 01d6 | | Execute Vector,Field_Write 0e0e 00db | | Load_Top At_Offset_3 0e0f e00d | | Load 0x0,0xd 0e10 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0e11 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0e12 e00e | | Load 0x0,0xe 0e13 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0e14 4802 |H | Short_Literal 0x2 0e15 00da | | Load_Top At_Offset_2 0e16 01d6 | | Execute Vector,Field_Write 0e17 e402 | | Load 0x2,0x2 0e18 e00d | | Load 0x0,0xd 0e19 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0e1a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0e1b e00e | | Load 0x0,0xe 0e1c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0e1d 4803 |H | Short_Literal 0x3 0e1e 00da | | Load_Top At_Offset_2 0e1f 01d6 | | Execute Vector,Field_Write 0e20 603b |`; | Indirect_Literal Discrete,0xe5c,{0x00000000, 0x00002813} 0e21 e002 | | Load 0x0,0x2 0e22 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0e23 c5fc | | Store 0x2,-0x4 0e24 7823 |x# | Jump 0xe48 0e25 e5fc | | Load 0x2,-0x4 0e26 e228 | ( | Load 0x1,0x28 0e27 e5fe | | Load 0x2,-0x2 0e28 e403 | | Load 0x2,0x3 0e29 8239 | 9 | Call 0x1,0x39 0e2a c5fd | | Store 0x2,-0x3 0e2b c5fc | | Store 0x2,-0x4 0e2c 781b |x | Jump 0xe48 0e2d e002 | | Load 0x0,0x2 0e2e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0e2f 4801 |H | Short_Literal 0x1 0e30 4802 |H | Short_Literal 0x2 0e31 e00e | | Load 0x0,0xe 0e32 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0e33 035b | [ | Declare_Type Array,Constrained 0e34 0337 | 7 | Declare_Variable Array 0e35 e402 | | Load 0x2,0x2 0e36 e00d | | Load 0x0,0xd 0e37 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0e38 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0e39 e00e | | Load 0x0,0xe 0e3a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0e3b 4801 |H | Short_Literal 0x1 0e3c 00da | | Load_Top At_Offset_2 0e3d 01d6 | | Execute Vector,Field_Write 0e3e 00da | | Load_Top At_Offset_2 0e3f e00e | | Load 0x0,0xe 0e40 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0e41 4802 |H | Short_Literal 0x2 0e42 00da | | Load_Top At_Offset_2 0e43 01d6 | | Execute Vector,Field_Write 0e44 6013 |` | Indirect_Literal Discrete,0xe58,{0x00000000, 0x00002812} 0e45 e002 | | Load 0x0,0x2 0e46 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0e47 c5fc | | Store 0x2,-0x4 0e48 00da | | Load_Top At_Offset_2 0e49 e00d | | Load 0x0,0xd 0e4a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0e4b 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0e4c c402 | | Store 0x2,0x2 0e4d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0e4e TRAP_0dc8: 0e4e 0007 | | Action Break_Optional 0e4f 00db | | Load_Top At_Offset_3 0e50 e00d | | Load 0x0,0xd 0e51 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0e52 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0e53 c402 | | Store 0x2,0x2 0e54 00d8 | | Load_Top At_Offset_0 0e55 0101 | | Execute Exception,Reraise 0e56 0000 0000 | | .XXX[0x2] 0e58 0000 0000 | | .LITERAL {0x00000000, 0x00002812} 0e5c 0000 0000 | | .LITERAL {0x00000000, 0x00002813} 0e60 0000 0000 | | .LITERAL {0x00000000, 0x00002807} 0e64 0000 0000 | | .LITERAL {0x00000000, 0x00002819} 0e68 ; -------------------------------------------------------------------------------------- 0e68 ; SUBPROGRAM 0e68 ; -------------------------------------------------------------------------------------- 0e68 0e6b | k | .CONST 0x0e6b ; Address of begin 0e69 0004 | | .CONST 0x0004 ; Address of exception handler 0e6a 0001 | | .CONST 0x0001 ; Number of locals 0e6b BODY_0e68: 0e6b INIT_0e68: 0e6b 00db | | Load_Top At_Offset_3 0e6c 00db | | Load_Top At_Offset_3 0e6d 0217 | | Execute Heap_Access,All_Reference 0e6e 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0e6f 0217 | | Execute Heap_Access,All_Reference 0e70 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e71 8285 | | Call 0x1,0x85 0e72 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0e73 0000 0000 | | .BLANK 0000[0x5] 0e78 ; -------------------------------------------------------------------------------------- 0e78 ; SUBPROGRAM 0e78 ; -------------------------------------------------------------------------------------- 0e78 0e85 | | .CONST 0x0e85 ; Address of begin 0e79 0004 | | .CONST 0x0004 ; Address of exception handler 0e7a 0002 | | .CONST 0x0002 ; Number of locals 0e7b INIT_0e78: 0e7b e02a | * | Load 0x0,0x2a 0e7c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0e7d 02ff | | Declare_Variable Variant_Record 0e7e 4801 |H | Short_Literal 0x1 0e7f e5fe | | Load 0x2,-0x2 0e80 e5ff | | Load 0x2,-0x1 0e81 e02a | * | Load 0x0,0x2a 0e82 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0e83 00d9 | | Load_Top At_Offset_1 0e84 016d | m | Execute Variant_Record,Structure_Write 0e85 BODY_0e78: 0e85 00d8 | | Load_Top At_Offset_0 0e86 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0e87 0f01 | | Execute_Immediate Equal,0x1 0e88 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0e89 0000 0000 | | .BLANK 0000[0x7] 0e90 ; -------------------------------------------------------------------------------------- 0e90 ; SUBPROGRAM 0e90 ; -------------------------------------------------------------------------------------- 0e90 0e93 | | .CONST 0x0e93 ; Address of begin 0e91 0004 | | .CONST 0x0004 ; Address of exception handler 0e92 0001 | | .CONST 0x0001 ; Number of locals 0e93 BODY_0e90: 0e93 INIT_0e90: 0e93 00da | | Load_Top At_Offset_2 0e94 0217 | | Execute Heap_Access,All_Reference 0e95 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e96 00d8 | | Load_Top At_Offset_0 0e97 0120 | | Execute Any,Is_Value 0e98 7002 |p | Jump_Nonzero 0xe9b 0e99 00d8 | | Load_Top At_Offset_0 0e9a 011e | | Execute Any,Convert 0e9b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0e9c 0000 0000 | | .BLANK 0000[0x4] 0ea0 ; -------------------------------------------------------------------------------------- 0ea0 ; SUBPROGRAM 0ea0 ; -------------------------------------------------------------------------------------- 0ea0 0ea3 | | .CONST 0x0ea3 ; Address of begin 0ea1 0004 | | .CONST 0x0004 ; Address of exception handler 0ea2 0001 | | .CONST 0x0001 ; Number of locals 0ea3 BODY_0ea0: 0ea3 INIT_0ea0: 0ea3 00da | | Load_Top At_Offset_2 0ea4 0217 | | Execute Heap_Access,All_Reference 0ea5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0ea6 e020 | | Load 0x0,0x20 0ea7 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0ea8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ea9 0000 0000 | | .BLANK 0000[0x7] 0eb0 ; -------------------------------------------------------------------------------------- 0eb0 ; SUBPROGRAM 0eb0 ; -------------------------------------------------------------------------------------- 0eb0 0eb3 | | .CONST 0x0eb3 ; Address of begin 0eb1 0004 | | .CONST 0x0004 ; Address of exception handler 0eb2 0001 | | .CONST 0x0001 ; Number of locals 0eb3 BODY_0eb0: 0eb3 INIT_0eb0: 0eb3 00da | | Load_Top At_Offset_2 0eb4 0217 | | Execute Heap_Access,All_Reference 0eb5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0eb6 00d8 | | Load_Top At_Offset_0 0eb7 0120 | | Execute Any,Is_Value 0eb8 7002 |p | Jump_Nonzero 0xebb 0eb9 00d8 | | Load_Top At_Offset_0 0eba 011e | | Execute Any,Convert 0ebb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ebc 0000 0000 | | .BLANK 0000[0x4] 0ec0 ; -------------------------------------------------------------------------------------- 0ec0 ; SUBPROGRAM 0ec0 ; -------------------------------------------------------------------------------------- 0ec0 0ec3 | | .CONST 0x0ec3 ; Address of begin 0ec1 0004 | | .CONST 0x0004 ; Address of exception handler 0ec2 0001 | | .CONST 0x0001 ; Number of locals 0ec3 BODY_0ec0: 0ec3 INIT_0ec0: 0ec3 00da | | Load_Top At_Offset_2 0ec4 0217 | | Execute Heap_Access,All_Reference 0ec5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0ec6 e00d | | Load 0x0,0xd 0ec7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0ec8 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0ec9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0eca 0000 0000 | | .BLANK 0000[0x6] 0ed0 ; -------------------------------------------------------------------------------------- 0ed0 ; SUBPROGRAM 0ed0 ; -------------------------------------------------------------------------------------- 0ed0 0ed3 | | .CONST 0x0ed3 ; Address of begin 0ed1 0004 | | .CONST 0x0004 ; Address of exception handler 0ed2 0001 | | .CONST 0x0001 ; Number of locals 0ed3 BODY_0ed0: 0ed3 INIT_0ed0: 0ed3 00da | | Load_Top At_Offset_2 0ed4 0217 | | Execute Heap_Access,All_Reference 0ed5 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0ed6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ed7 0000 | | .XXX[0x1] 0ed8 ; -------------------------------------------------------------------------------------- 0ed8 ; SUBPROGRAM 0ed8 ; -------------------------------------------------------------------------------------- 0ed8 0edb | | .CONST 0x0edb ; Address of begin 0ed9 0004 | | .CONST 0x0004 ; Address of exception handler 0eda 0001 | | .CONST 0x0001 ; Number of locals 0edb BODY_0ed8: 0edb INIT_0ed8: 0edb 00da | | Load_Top At_Offset_2 0edc 0217 | | Execute Heap_Access,All_Reference 0edd 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0ede 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0edf 0000 | | .XXX[0x1] 0ee0 ; -------------------------------------------------------------------------------------- 0ee0 ; SUBPROGRAM 0ee0 ; -------------------------------------------------------------------------------------- 0ee0 0eed | | .CONST 0x0eed ; Address of begin 0ee1 0004 | | .CONST 0x0004 ; Address of exception handler 0ee2 0003 | | .CONST 0x0003 ; Number of locals 0ee3 INIT_0ee0: 0ee3 00da | | Load_Top At_Offset_2 0ee4 0217 | | Execute Heap_Access,All_Reference 0ee5 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0ee6 0007 | | Action Break_Optional 0ee7 00db | | Load_Top At_Offset_3 0ee8 82c4 | | Call 0x1,0xc4 0ee9 e001 | | Load 0x0,0x1 0eea 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0eeb 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 0eec 1c08 | | Execute_Immediate Run_Utility,0x8 0eed BODY_0ee0: 0eed 4800 |H | Short_Literal 0x0 0eee 00d9 | | Load_Top At_Offset_1 0eef 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0ef0 00cf | | Action Mark_Auxiliary 0ef1 00d9 | | Load_Top At_Offset_1 0ef2 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0ef3 01d9 | | Execute Vector,Reverse_Bounds 0ef4 0263 | c | Execute Discrete,Above_Bound 0ef5 700b |p | Jump_Nonzero 0xf01 0ef6 e402 | | Load 0x2,0x2 0ef7 00d9 | | Load_Top At_Offset_1 0ef8 e403 | | Load 0x2,0x3 0ef9 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0efa 01d6 | | Execute Vector,Field_Write 0efb e402 | | Load 0x2,0x2 0efc 0217 | | Execute Heap_Access,All_Reference 0efd 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0efe a402 | | Store_Unchecked 0x2,0x2 0eff 00c8 | | Action Pop_Auxiliary_Range 0f00 3ff5 |? | Loop_Increasing 0xef6 0f01 00ce | | Action Pop_Auxiliary 0f02 00d8 | | Load_Top At_Offset_0 0f03 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0f04 0000 0000 | | .BLANK 0000[0x4] 0f08 ; -------------------------------------------------------------------------------------- 0f08 ; SUBPROGRAM 0f08 ; -------------------------------------------------------------------------------------- 0f08 0f10 | | .CONST 0x0f10 ; Address of begin 0f09 0004 | | .CONST 0x0004 ; Address of exception handler 0f0a 0003 | | .CONST 0x0003 ; Number of locals 0f0b INIT_0f08: 0f0b e01b | | Load 0x0,0x1b 0f0c 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0f0d e002 | | Load 0x0,0x2 0f0e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0f0f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0f10 BODY_0f08: 0f10 00d8 | | Load_Top At_Offset_0 0f11 e01b | | Load 0x0,0x1b 0f12 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0f13 4800 |H | Short_Literal 0x0 0f14 e5fe | | Load 0x2,-0x2 0f15 e5ff | | Load 0x2,-0x1 0f16 82c5 | | Call 0x1,0xc5 0f17 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0f18 0059 | Y | Store_Top Discrete,At_Offset_1 0f19 00d8 | | Load_Top At_Offset_0 0f1a 7009 |p | Jump_Nonzero 0xf24 0f1b 00d9 | | Load_Top At_Offset_1 0f1c 0217 | | Execute Heap_Access,All_Reference 0f1d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0f1e 00d8 | | Load_Top At_Offset_0 0f1f 0120 | | Execute Any,Is_Value 0f20 7002 |p | Jump_Nonzero 0xf23 0f21 00d8 | | Load_Top At_Offset_0 0f22 011e | | Execute Any,Convert 0f23 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0f24 00d8 | | Load_Top At_Offset_0 0f25 6016 |` | Indirect_Literal Discrete,0xf3c,{0x00000000, 0x0000281a} 0f26 027f | | Execute Discrete,Equal 0f27 6803 |h | Jump_Zero 0xf2b 0f28 e003 | | Load 0x0,0x3 0f29 180f | | Execute Package,Field_Execute,Field_Number 0xf 0f2a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0f2b 4801 |H | Short_Literal 0x1 0f2c 4801 |H | Short_Literal 0x1 0f2d e00e | | Load 0x0,0xe 0f2e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0f2f 035b | [ | Declare_Type Array,Constrained 0f30 0337 | 7 | Declare_Variable Array 0f31 e5ff | | Load 0x2,-0x1 0f32 8242 | B | Call 0x1,0x42 0f33 4801 |H | Short_Literal 0x1 0f34 00da | | Load_Top At_Offset_2 0f35 01d6 | | Execute Vector,Field_Write 0f36 00d9 | | Load_Top At_Offset_1 0f37 e002 | | Load 0x0,0x2 0f38 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0f39 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0f3a 0000 0000 | | .XXX[0x2] 0f3c 0000 0000 | | .LITERAL {0x00000000, 0x0000281a} 0f40 ; -------------------------------------------------------------------------------------- 0f40 ; SUBPROGRAM 0f40 ; -------------------------------------------------------------------------------------- 0f40 0f48 | H | .CONST 0x0f48 ; Address of begin 0f41 0004 | | .CONST 0x0004 ; Address of exception handler 0f42 0003 | | .CONST 0x0003 ; Number of locals 0f43 INIT_0f40: 0f43 e01b | | Load 0x0,0x1b 0f44 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0f45 e002 | | Load 0x0,0x2 0f46 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0f47 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0f48 BODY_0f40: 0f48 00d8 | | Load_Top At_Offset_0 0f49 e01b | | Load 0x0,0x1b 0f4a 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0f4b 4800 |H | Short_Literal 0x0 0f4c e5fd | | Load 0x2,-0x3 0f4d e5ff | | Load 0x2,-0x1 0f4e 82c5 | | Call 0x1,0xc5 0f4f 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0f50 0059 | Y | Store_Top Discrete,At_Offset_1 0f51 00d8 | | Load_Top At_Offset_0 0f52 7005 |p | Jump_Nonzero 0xf58 0f53 e5fe | | Load 0x2,-0x2 0f54 00da | | Load_Top At_Offset_2 0f55 0217 | | Execute Heap_Access,All_Reference 0f56 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0f57 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0f58 e002 | | Load 0x0,0x2 0f59 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0f5a 4801 |H | Short_Literal 0x1 0f5b 4801 |H | Short_Literal 0x1 0f5c e00e | | Load 0x0,0xe 0f5d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0f5e 035b | [ | Declare_Type Array,Constrained 0f5f 0337 | 7 | Declare_Variable Array 0f60 e5ff | | Load 0x2,-0x1 0f61 8242 | B | Call 0x1,0x42 0f62 4801 |H | Short_Literal 0x1 0f63 00da | | Load_Top At_Offset_2 0f64 01d6 | | Execute Vector,Field_Write 0f65 00da | | Load_Top At_Offset_2 0f66 e002 | | Load 0x0,0x2 0f67 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0f68 c5fc | | Store 0x2,-0x4 0f69 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0f6a 0000 0000 | | .BLANK 0000[0x6] 0f70 ; -------------------------------------------------------------------------------------- 0f70 ; SUBPROGRAM 0f70 ; -------------------------------------------------------------------------------------- 0f70 0f73 | s | .CONST 0x0f73 ; Address of begin 0f71 0004 | | .CONST 0x0004 ; Address of exception handler 0f72 0001 | | .CONST 0x0001 ; Number of locals 0f73 BODY_0f70: 0f73 INIT_0f70: 0f73 00da | | Load_Top At_Offset_2 0f74 e2c6 | | Load 0x1,0xc6 0f75 e2c7 | | Load 0x1,0xc7 0f76 1dc8 | | Execute_Immediate Reference_Lex_1,0xc8 0f77 1dc9 | | Execute_Immediate Reference_Lex_1,0xc9 0f78 1dca | | Execute_Immediate Reference_Lex_1,0xca 0f79 e00e | | Load 0x0,0xe 0f7a 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 0f7b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0f7c 0000 0000 | | .BLANK 0000[0x4] 0f80 ; -------------------------------------------------------------------------------------- 0f80 ; SUBPROGRAM 0f80 ; -------------------------------------------------------------------------------------- 0f80 0f83 | | .CONST 0x0f83 ; Address of begin 0f81 0004 | | .CONST 0x0004 ; Address of exception handler 0f82 0001 | | .CONST 0x0001 ; Number of locals 0f83 BODY_0f80: 0f83 INIT_0f80: 0f83 00da | | Load_Top At_Offset_2 0f84 e2ce | | Load 0x1,0xce 0f85 e2cf | | Load 0x1,0xcf 0f86 1dd0 | | Execute_Immediate Reference_Lex_1,0xd0 0f87 e2d1 | | Load 0x1,0xd1 0f88 1dd2 | | Execute_Immediate Reference_Lex_1,0xd2 0f89 e00e | | Load 0x0,0xe 0f8a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 0f8b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0f8c 0000 0000 | | .BLANK 0000[0x4] 0f90 ; -------------------------------------------------------------------------------------- 0f90 ; SUBPROGRAM 0f90 ; -------------------------------------------------------------------------------------- 0f90 0f93 | | .CONST 0x0f93 ; Address of begin 0f91 0004 | | .CONST 0x0004 ; Address of exception handler 0f92 0001 | | .CONST 0x0001 ; Number of locals 0f93 BODY_0f90: 0f93 INIT_0f90: 0f93 00da | | Load_Top At_Offset_2 0f94 0217 | | Execute Heap_Access,All_Reference 0f95 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0f96 e020 | | Load 0x0,0x20 0f97 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0f98 7006 |p | Jump_Nonzero 0xf9f 0f99 00da | | Load_Top At_Offset_2 0f9a 0217 | | Execute Heap_Access,All_Reference 0f9b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0f9c e020 | | Load 0x0,0x20 0f9d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0f9e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0f9f 00da | | Load_Top At_Offset_2 0fa0 0217 | | Execute Heap_Access,All_Reference 0fa1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0fa2 e020 | | Load 0x0,0x20 0fa3 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0fa4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0fa5 0000 0000 | | .XXX[0x3] 0fa7 0000 | | 0fa8 ; -------------------------------------------------------------------------------------- 0fa8 ; SUBPROGRAM 0fa8 ; -------------------------------------------------------------------------------------- 0fa8 0fad | | .CONST 0x0fad ; Address of begin 0fa9 0004 | | .CONST 0x0004 ; Address of exception handler 0faa 0002 | | .CONST 0x0002 ; Number of locals 0fab INIT_0fa8: 0fab e020 | | Load 0x0,0x20 0fac 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0fad BODY_0fa8: 0fad 00db | | Load_Top At_Offset_3 0fae 0217 | | Execute Heap_Access,All_Reference 0faf 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0fb0 e001 | | Load 0x0,0x1 0fb1 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0fb2 0216 | | Execute Heap_Access,Convert 0fb3 e001 | | Load 0x0,0x1 0fb4 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0fb5 180f | | Execute Package,Field_Execute,Field_Number 0xf 0fb6 7007 |p | Jump_Nonzero 0xfbe 0fb7 00db | | Load_Top At_Offset_3 0fb8 0217 | | Execute Heap_Access,All_Reference 0fb9 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0fba e001 | | Load 0x0,0x1 0fbb 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0fbc 0216 | | Execute Heap_Access,Convert 0fbd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0fbe e5fe | | Load 0x2,-0x2 0fbf e5ff | | Load 0x2,-0x1 0fc0 e001 | | Load 0x0,0x1 0fc1 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0fc2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0fc3 e020 | | Load 0x0,0x20 0fc4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0fc5 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0fc6 00d8 | | Load_Top At_Offset_0 0fc7 e020 | | Load 0x0,0x20 0fc8 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0fc9 7008 |p | Jump_Nonzero 0xfd2 0fca e5fe | | Load 0x2,-0x2 0fcb 00d9 | | Load_Top At_Offset_1 0fcc e025 | % | Load 0x0,0x25 0fcd 180f | | Execute Package,Field_Execute,Field_Number 0xf 0fce e001 | | Load 0x0,0x1 0fcf 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0fd0 0216 | | Execute Heap_Access,Convert 0fd1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0fd2 e001 | | Load 0x0,0x1 0fd3 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0fd4 180e | | Execute Package,Field_Execute,Field_Number 0xe 0fd5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0fd6 0000 0000 | | .XXX[0x2] 0fd8 ; -------------------------------------------------------------------------------------- 0fd8 ; SUBPROGRAM 0fd8 ; -------------------------------------------------------------------------------------- 0fd8 0fe2 | | .CONST 0x0fe2 ; Address of begin 0fd9 0004 | | .CONST 0x0004 ; Address of exception handler 0fda 0004 | | .CONST 0x0004 ; Number of locals 0fdb INIT_0fd8: 0fdb e228 | ( | Load 0x1,0x28 0fdc 0007 | | Action Break_Optional 0fdd e002 | | Load 0x0,0x2 0fde 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0fdf 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0fe0 e01b | | Load 0x0,0x1b 0fe1 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 0fe2 BODY_0fd8: 0fe2 00d9 | | Load_Top At_Offset_1 0fe3 e228 | ( | Load 0x1,0x28 0fe4 e5ff | | Load 0x2,-0x1 0fe5 e5fe | | Load 0x2,-0x2 0fe6 825f | _ | Call 0x1,0x5f 0fe7 8238 | 8 | Call 0x1,0x38 0fe8 c402 | | Store 0x2,0x2 0fe9 005a | Z | Store_Top Discrete,At_Offset_2 0fea 00da | | Load_Top At_Offset_2 0feb 0217 | | Execute Heap_Access,All_Reference 0fec 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0fed 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0fee 00cf | | Action Mark_Auxiliary 0fef 780d |x | Jump 0xffd 0ff0 e5fe | | Load 0x2,-0x2 0ff1 0217 | | Execute Heap_Access,All_Reference 0ff2 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0ff3 00da | | Load_Top At_Offset_2 0ff4 0217 | | Execute Heap_Access,All_Reference 0ff5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0ff6 021f | | Execute Heap_Access,Equal 0ff7 7007 |p | Jump_Nonzero 0xfff 0ff8 00d9 | | Load_Top At_Offset_1 0ff9 0217 | | Execute Heap_Access,All_Reference 0ffa 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0ffb 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0ffc 00c9 | | Action Pop_Auxiliary_Loop 0ffd 00d9 | | Load_Top At_Offset_1 0ffe 77f1 |w | Jump_Nonzero 0xff0 0fff 00ce | | Action Pop_Auxiliary 1000 00d8 | | Load_Top At_Offset_0 1001 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1002 0000 0000 | | .BLANK 0000[0x6] 1008 ; -------------------------------------------------------------------------------------- 1008 ; SUBPROGRAM 1008 ; -------------------------------------------------------------------------------------- 1008 100b | | .CONST 0x100b ; Address of begin 1009 0004 | | .CONST 0x0004 ; Address of exception handler 100a 0001 | | .CONST 0x0001 ; Number of locals 100b BODY_1008: 100b INIT_1008: 100b 00da | | Load_Top At_Offset_2 100c 0217 | | Execute Heap_Access,All_Reference 100d 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 100e e001 | | Load 0x0,0x1 100f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1010 00d9 | | Load_Top At_Offset_1 1011 00d0 | | Action Swap_Control 1012 0260 | ` | Execute Discrete,In_Type 1013 7001 |p | Jump_Nonzero 0x1015 1014 0801 | | Execute_Immediate Raise,0x1 1015 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1016 0000 0000 | | .XXX[0x2] 1018 ; -------------------------------------------------------------------------------------- 1018 ; SUBPROGRAM 1018 ; -------------------------------------------------------------------------------------- 1018 101b | | .CONST 0x101b ; Address of begin 1019 0004 | | .CONST 0x0004 ; Address of exception handler 101a 0001 | | .CONST 0x0001 ; Number of locals 101b BODY_1018: 101b INIT_1018: 101b 00db | | Load_Top At_Offset_3 101c 00db | | Load_Top At_Offset_3 101d 0217 | | Execute Heap_Access,All_Reference 101e 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 101f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1020 ; -------------------------------------------------------------------------------------- 1020 ; SUBPROGRAM 1020 ; -------------------------------------------------------------------------------------- 1020 102e | . | .CONST 0x102e ; Address of begin 1021 0004 | | .CONST 0x0004 ; Address of exception handler 1022 0005 | | .CONST 0x0005 ; Number of locals 1023 INIT_1020: 1023 e00c | | Load 0x0,0xc 1024 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1025 06ff | | Execute_Immediate Set_Value_Unchecked,0xff 1026 e00c | | Load 0x0,0xc 1027 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1028 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1029 e5ff | | Load 0x2,-0x1 102a 0217 | | Execute Heap_Access,All_Reference 102b 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 102c 029f 2a0b | * | Declare_Subprogram INIT_2a08,For_Call 102e BODY_1020: 102e 00cf | | Action Mark_Auxiliary 102f 7819 |x | Jump 0x1049 1030 00da | | Load_Top At_Offset_2 1031 0217 | | Execute Heap_Access,All_Reference 1032 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1033 e402 | | Load 0x2,0x2 1034 027c | | | Execute Discrete,Less 1035 6804 |h | Jump_Zero 0x103a 1036 00da | | Load_Top At_Offset_2 1037 0217 | | Execute Heap_Access,All_Reference 1038 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1039 a402 | | Store_Unchecked 0x2,0x2 103a 00da | | Load_Top At_Offset_2 103b 0217 | | Execute Heap_Access,All_Reference 103c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 103d e403 | | Load 0x2,0x3 103e 027d | } | Execute Discrete,Greater 103f 6804 |h | Jump_Zero 0x1044 1040 00da | | Load_Top At_Offset_2 1041 0217 | | Execute Heap_Access,All_Reference 1042 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1043 a403 | | Store_Unchecked 0x2,0x3 1044 00da | | Load_Top At_Offset_2 1045 0217 | | Execute Heap_Access,All_Reference 1046 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1047 0033 | 3 | Store_Top Heap_Access,At_Offset_3 1048 00c9 | | Action Pop_Auxiliary_Loop 1049 00da | | Load_Top At_Offset_2 104a 77e5 |w | Jump_Nonzero 0x1030 104b 00ce | | Action Pop_Auxiliary 104c 00db | | Load_Top At_Offset_3 104d 00db | | Load_Top At_Offset_3 104e 027c | | | Execute Discrete,Less 104f 6802 |h | Jump_Zero 0x1052 1050 8405 | | Call 0x2,0x5 1051 7813 |x | Jump 0x1065 1052 00db | | Load_Top At_Offset_3 1053 00db | | Load_Top At_Offset_3 1054 e00c | | Load 0x0,0xc 1055 1b18 | | Execute Package,Field_Read,Field_Number 0x18 1056 035b | [ | Declare_Type Array,Constrained 1057 0337 | 7 | Declare_Variable Array 1058 00d8 | | Load_Top At_Offset_0 1059 01d9 | | Execute Vector,Reverse_Bounds 105a 0263 | c | Execute Discrete,Above_Bound 105b 7005 |p | Jump_Nonzero 0x1061 105c 4801 |H | Short_Literal 0x1 105d 00d9 | | Load_Top At_Offset_1 105e e406 | | Load 0x2,0x6 105f 01d6 | | Execute Vector,Field_Write 1060 3ffb |? | Loop_Increasing 0x105c 1061 e00c | | Load 0x0,0xc 1062 1b18 | | Execute Package,Field_Read,Field_Number 0x18 1063 01c6 | | Execute Vector,Convert_To_Formal 1064 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1065 0831 | 1 | Execute_Immediate Raise,0x31 1066 0000 0000 | | .XXX[0x2] 1068 ; -------------------------------------------------------------------------------------- 1068 ; SUBPROGRAM 1068 ; -------------------------------------------------------------------------------------- 1068 106b | k | .CONST 0x106b ; Address of begin 1069 0004 | | .CONST 0x0004 ; Address of exception handler 106a 0001 | | .CONST 0x0001 ; Number of locals 106b BODY_1068: 106b INIT_1068: 106b 00db | | Load_Top At_Offset_3 106c 4800 |H | Short_Literal 0x0 106d e5ff | | Load 0x2,-0x1 106e 82d7 | | Call 0x1,0xd7 106f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1070 ; -------------------------------------------------------------------------------------- 1070 ; SUBPROGRAM 1070 ; -------------------------------------------------------------------------------------- 1070 1073 | s | .CONST 0x1073 ; Address of begin 1071 0004 | | .CONST 0x0004 ; Address of exception handler 1072 0001 | | .CONST 0x0001 ; Number of locals 1073 BODY_1070: 1073 INIT_1070: 1073 e5fc | | Load 0x2,-0x4 1074 e5fd | | Load 0x2,-0x3 1075 e5fe | | Load 0x2,-0x2 1076 4800 |H | Short_Literal 0x0 1077 e5ff | | Load 0x2,-0x1 1078 82d8 | | Call 0x1,0xd8 1079 c5fc | | Store 0x2,-0x4 107a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 107b 0000 0000 | | .BLANK 0000[0x5] 1080 ; -------------------------------------------------------------------------------------- 1080 ; SUBPROGRAM 1080 ; -------------------------------------------------------------------------------------- 1080 1083 | | .CONST 0x1083 ; Address of begin 1081 0004 | | .CONST 0x0004 ; Address of exception handler 1082 0001 | | .CONST 0x0001 ; Number of locals 1083 BODY_1080: 1083 INIT_1080: 1083 00db | | Load_Top At_Offset_3 1084 4801 |H | Short_Literal 0x1 1085 e5ff | | Load 0x2,-0x1 1086 82d7 | | Call 0x1,0xd7 1087 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1088 ; -------------------------------------------------------------------------------------- 1088 ; SUBPROGRAM 1088 ; -------------------------------------------------------------------------------------- 1088 108b | | .CONST 0x108b ; Address of begin 1089 0004 | | .CONST 0x0004 ; Address of exception handler 108a 0001 | | .CONST 0x0001 ; Number of locals 108b BODY_1088: 108b INIT_1088: 108b e5fc | | Load 0x2,-0x4 108c e5fd | | Load 0x2,-0x3 108d e5fe | | Load 0x2,-0x2 108e 4801 |H | Short_Literal 0x1 108f e5ff | | Load 0x2,-0x1 1090 82d8 | | Call 0x1,0xd8 1091 c5fc | | Store 0x2,-0x4 1092 4504 |E | Exit_Suprogram New_Top_Offset 0x4 1093 0000 0000 | | .BLANK 0000[0x5] 1098 ; -------------------------------------------------------------------------------------- 1098 ; SUBPROGRAM 1098 ; -------------------------------------------------------------------------------------- 1098 109b | | .CONST 0x109b ; Address of begin 1099 0004 | | .CONST 0x0004 ; Address of exception handler 109a 0001 | | .CONST 0x0001 ; Number of locals 109b BODY_1098: 109b INIT_1098: 109b 00db | | Load_Top At_Offset_3 109c 4802 |H | Short_Literal 0x2 109d e5ff | | Load 0x2,-0x1 109e 82d7 | | Call 0x1,0xd7 109f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 10a0 ; -------------------------------------------------------------------------------------- 10a0 ; SUBPROGRAM 10a0 ; -------------------------------------------------------------------------------------- 10a0 10a3 | | .CONST 0x10a3 ; Address of begin 10a1 0004 | | .CONST 0x0004 ; Address of exception handler 10a2 0001 | | .CONST 0x0001 ; Number of locals 10a3 BODY_10a0: 10a3 INIT_10a0: 10a3 e5fc | | Load 0x2,-0x4 10a4 e5fd | | Load 0x2,-0x3 10a5 e5fe | | Load 0x2,-0x2 10a6 4802 |H | Short_Literal 0x2 10a7 e5ff | | Load 0x2,-0x1 10a8 82d8 | | Call 0x1,0xd8 10a9 c5fc | | Store 0x2,-0x4 10aa 4504 |E | Exit_Suprogram New_Top_Offset 0x4 10ab 0000 0000 | | .BLANK 0000[0x5] 10b0 ; -------------------------------------------------------------------------------------- 10b0 ; SUBPROGRAM 10b0 ; -------------------------------------------------------------------------------------- 10b0 10b3 | | .CONST 0x10b3 ; Address of begin 10b1 0004 | | .CONST 0x0004 ; Address of exception handler 10b2 0001 | | .CONST 0x0001 ; Number of locals 10b3 BODY_10b0: 10b3 INIT_10b0: 10b3 00db | | Load_Top At_Offset_3 10b4 4803 |H | Short_Literal 0x3 10b5 e5ff | | Load 0x2,-0x1 10b6 82d7 | | Call 0x1,0xd7 10b7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 10b8 ; -------------------------------------------------------------------------------------- 10b8 ; SUBPROGRAM 10b8 ; -------------------------------------------------------------------------------------- 10b8 10bb | | .CONST 0x10bb ; Address of begin 10b9 0004 | | .CONST 0x0004 ; Address of exception handler 10ba 0001 | | .CONST 0x0001 ; Number of locals 10bb BODY_10b8: 10bb INIT_10b8: 10bb e5fc | | Load 0x2,-0x4 10bc e5fd | | Load 0x2,-0x3 10bd e5fe | | Load 0x2,-0x2 10be 4803 |H | Short_Literal 0x3 10bf e5ff | | Load 0x2,-0x1 10c0 82d8 | | Call 0x1,0xd8 10c1 c5fc | | Store 0x2,-0x4 10c2 4504 |E | Exit_Suprogram New_Top_Offset 0x4 10c3 0000 0000 | | .BLANK 0000[0x5] 10c8 ; -------------------------------------------------------------------------------------- 10c8 ; SUBPROGRAM 10c8 ; -------------------------------------------------------------------------------------- 10c8 10cb | | .CONST 0x10cb ; Address of begin 10c9 0004 | | .CONST 0x0004 ; Address of exception handler 10ca 0001 | | .CONST 0x0001 ; Number of locals 10cb BODY_10c8: 10cb INIT_10c8: 10cb 00da | | Load_Top At_Offset_2 10cc 0217 | | Execute Heap_Access,All_Reference 10cd 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 10ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 10cf 0000 | | .XXX[0x1] 10d0 ; -------------------------------------------------------------------------------------- 10d0 ; SUBPROGRAM 10d0 ; -------------------------------------------------------------------------------------- 10d0 10d3 | | .CONST 0x10d3 ; Address of begin 10d1 0004 | | .CONST 0x0004 ; Address of exception handler 10d2 0001 | | .CONST 0x0001 ; Number of locals 10d3 BODY_10d0: 10d3 INIT_10d0: 10d3 00db | | Load_Top At_Offset_3 10d4 00db | | Load_Top At_Offset_3 10d5 0217 | | Execute Heap_Access,All_Reference 10d6 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 10d7 4503 |E | Exit_Suprogram New_Top_Offset 0x3 10d8 ; -------------------------------------------------------------------------------------- 10d8 ; SUBPROGRAM 10d8 ; -------------------------------------------------------------------------------------- 10d8 10db | | .CONST 0x10db ; Address of begin 10d9 0004 | | .CONST 0x0004 ; Address of exception handler 10da 0001 | | .CONST 0x0001 ; Number of locals 10db BODY_10d8: 10db INIT_10d8: 10db 00db | | Load_Top At_Offset_3 10dc 4805 |H | Short_Literal 0x5 10dd e5ff | | Load 0x2,-0x1 10de 82d9 | | Call 0x1,0xd9 10df 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 10e0 ; -------------------------------------------------------------------------------------- 10e0 ; SUBPROGRAM 10e0 ; -------------------------------------------------------------------------------------- 10e0 10e3 | | .CONST 0x10e3 ; Address of begin 10e1 0004 | | .CONST 0x0004 ; Address of exception handler 10e2 0001 | | .CONST 0x0001 ; Number of locals 10e3 BODY_10e0: 10e3 INIT_10e0: 10e3 e5fc | | Load 0x2,-0x4 10e4 e5fd | | Load 0x2,-0x3 10e5 e5fe | | Load 0x2,-0x2 10e6 4805 |H | Short_Literal 0x5 10e7 e5ff | | Load 0x2,-0x1 10e8 82da | | Call 0x1,0xda 10e9 c5fc | | Store 0x2,-0x4 10ea 4504 |E | Exit_Suprogram New_Top_Offset 0x4 10eb 0000 0000 | | .BLANK 0000[0x5] 10f0 ; -------------------------------------------------------------------------------------- 10f0 ; SUBPROGRAM 10f0 ; -------------------------------------------------------------------------------------- 10f0 10f3 | | .CONST 0x10f3 ; Address of begin 10f1 0004 | | .CONST 0x0004 ; Address of exception handler 10f2 0001 | | .CONST 0x0001 ; Number of locals 10f3 BODY_10f0: 10f3 INIT_10f0: 10f3 00da | | Load_Top At_Offset_2 10f4 0217 | | Execute Heap_Access,All_Reference 10f5 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 10f6 e020 | | Load 0x0,0x20 10f7 1812 | | Execute Package,Field_Execute,Field_Number 0x12 10f8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 10f9 0000 0000 | | .BLANK 0000[0x7] 1100 ; -------------------------------------------------------------------------------------- 1100 ; SUBPROGRAM 1100 ; -------------------------------------------------------------------------------------- 1100 1103 | | .CONST 0x1103 ; Address of begin 1101 0004 | | .CONST 0x0004 ; Address of exception handler 1102 0001 | | .CONST 0x0001 ; Number of locals 1103 BODY_1100: 1103 INIT_1100: 1103 00da | | Load_Top At_Offset_2 1104 e5fe | | Load 0x2,-0x2 1105 e020 | | Load 0x0,0x20 1106 180f | | Execute Package,Field_Execute,Field_Number 0xf 1107 00db | | Load_Top At_Offset_3 1108 0217 | | Execute Heap_Access,All_Reference 1109 380a |8 | Execute Record,Field_Write,Field_Number 0xa 110a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 110b 0000 0000 | | .BLANK 0000[0x5] 1110 ; -------------------------------------------------------------------------------------- 1110 ; SUBPROGRAM 1110 ; -------------------------------------------------------------------------------------- 1110 1113 | | .CONST 0x1113 ; Address of begin 1111 0004 | | .CONST 0x0004 ; Address of exception handler 1112 0001 | | .CONST 0x0001 ; Number of locals 1113 BODY_1110: 1113 INIT_1110: 1113 00db | | Load_Top At_Offset_3 1114 4804 |H | Short_Literal 0x4 1115 e5ff | | Load 0x2,-0x1 1116 82d7 | | Call 0x1,0xd7 1117 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1118 ; -------------------------------------------------------------------------------------- 1118 ; SUBPROGRAM 1118 ; -------------------------------------------------------------------------------------- 1118 111b | | .CONST 0x111b ; Address of begin 1119 0004 | | .CONST 0x0004 ; Address of exception handler 111a 0001 | | .CONST 0x0001 ; Number of locals 111b BODY_1118: 111b INIT_1118: 111b e5fc | | Load 0x2,-0x4 111c e5fd | | Load 0x2,-0x3 111d e5fe | | Load 0x2,-0x2 111e 4804 |H | Short_Literal 0x4 111f e5ff | | Load 0x2,-0x1 1120 82d8 | | Call 0x1,0xd8 1121 c5fc | | Store 0x2,-0x4 1122 4504 |E | Exit_Suprogram New_Top_Offset 0x4 1123 0000 0000 | | .BLANK 0000[0x5] 1128 ; -------------------------------------------------------------------------------------- 1128 ; SUBPROGRAM 1128 ; -------------------------------------------------------------------------------------- 1128 112b | + | .CONST 0x112b ; Address of begin 1129 0004 | | .CONST 0x0004 ; Address of exception handler 112a 0001 | | .CONST 0x0001 ; Number of locals 112b BODY_1128: 112b INIT_1128: 112b 00db | | Load_Top At_Offset_3 112c 4806 |H | Short_Literal 0x6 112d e5ff | | Load 0x2,-0x1 112e 82d9 | | Call 0x1,0xd9 112f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1130 ; -------------------------------------------------------------------------------------- 1130 ; SUBPROGRAM 1130 ; -------------------------------------------------------------------------------------- 1130 1138 | 8 | .CONST 0x1138 ; Address of begin 1131 0004 | | .CONST 0x0004 ; Address of exception handler 1132 0003 | | .CONST 0x0003 ; Number of locals 1133 INIT_1130: 1133 e01b | | Load 0x0,0x1b 1134 1b16 | | Execute Package,Field_Read,Field_Number 0x16 1135 e002 | | Load 0x0,0x2 1136 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1137 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1138 BODY_1130: 1138 00d8 | | Load_Top At_Offset_0 1139 e01b | | Load 0x0,0x1b 113a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 113b 4801 |H | Short_Literal 0x1 113c e5fd | | Load 0x2,-0x3 113d e5ff | | Load 0x2,-0x1 113e 82d5 | | Call 0x1,0xd5 113f 0033 | 3 | Store_Top Heap_Access,At_Offset_3 1140 0059 | Y | Store_Top Discrete,At_Offset_1 1141 00d8 | | Load_Top At_Offset_0 1142 704a |pJ | Jump_Nonzero 0x118d 1143 e5fe | | Load 0x2,-0x2 1144 00da | | Load_Top At_Offset_2 1145 0217 | | Execute Heap_Access,All_Reference 1146 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 1147 027e | ~ | Execute Discrete,Not_Equal 1148 6843 |hC | Jump_Zero 0x118c 1149 e5ff | | Load 0x2,-0x1 114a 8224 | $ | Call 0x1,0x24 114b 7022 |p" | Jump_Nonzero 0x116e 114c e5fe | | Load 0x2,-0x2 114d 00da | | Load_Top At_Offset_2 114e 0217 | | Execute Heap_Access,All_Reference 114f 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 1150 00d9 | | Load_Top At_Offset_1 1151 0217 | | Execute Heap_Access,All_Reference 1152 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 1153 680c |h | Jump_Zero 0x1160 1154 00d9 | | Load_Top At_Offset_1 1155 0219 | | Execute Heap_Access,All_Read 1156 00d8 | | Load_Top At_Offset_0 1157 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 1158 e5ff | | Load 0x2,-0x1 1159 4800 |H | Short_Literal 0x0 115a e02b | + | Load 0x0,0x2b 115b 180e | | Execute Package,Field_Execute,Field_Number 0xe 115c 00d9 | | Load_Top At_Offset_1 115d 380a |8 | Execute Record,Field_Write,Field_Number 0xa 115e 00d1 | | Pop_Control Pop_Count_1 115f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 1160 00d9 | | Load_Top At_Offset_1 1161 0219 | | Execute Heap_Access,All_Read 1162 00d8 | | Load_Top At_Offset_0 1163 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 1164 e5ff | | Load 0x2,-0x1 1165 e402 | | Load 0x2,0x2 1166 0217 | | Execute Heap_Access,All_Reference 1167 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 1168 e02b | + | Load 0x0,0x2b 1169 180e | | Execute Package,Field_Execute,Field_Number 0xe 116a 00d9 | | Load_Top At_Offset_1 116b 380a |8 | Execute Record,Field_Write,Field_Number 0xa 116c 00d1 | | Pop_Control Pop_Count_1 116d 4504 |E | Exit_Suprogram New_Top_Offset 0x4 116e e002 | | Load 0x0,0x2 116f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1170 4801 |H | Short_Literal 0x1 1171 4803 |H | Short_Literal 0x3 1172 e00e | | Load 0x0,0xe 1173 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1174 035b | [ | Declare_Type Array,Constrained 1175 0337 | 7 | Declare_Variable Array 1176 e5ff | | Load 0x2,-0x1 1177 825a | Z | Call 0x1,0x5a 1178 4801 |H | Short_Literal 0x1 1179 00da | | Load_Top At_Offset_2 117a 01d6 | | Execute Vector,Field_Write 117b e5fd | | Load 0x2,-0x3 117c e00c | | Load 0x0,0xc 117d 181c | | Execute Package,Field_Execute,Field_Number 0x1c 117e 4802 |H | Short_Literal 0x2 117f 00da | | Load_Top At_Offset_2 1180 01d6 | | Execute Vector,Field_Write 1181 e5ff | | Load 0x2,-0x1 1182 8224 | $ | Call 0x1,0x24 1183 e00e | | Load 0x0,0xe 1184 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1185 4803 |H | Short_Literal 0x3 1186 00da | | Load_Top At_Offset_2 1187 01d6 | | Execute Vector,Field_Write 1188 601f |` | Indirect_Literal Discrete,0x11a8,{0x00000000, 0x00002835} 1189 e002 | | Load 0x0,0x2 118a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 118b c5fc | | Store 0x2,-0x4 118c 4504 |E | Exit_Suprogram New_Top_Offset 0x4 118d e002 | | Load 0x0,0x2 118e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 118f 4801 |H | Short_Literal 0x1 1190 4802 |H | Short_Literal 0x2 1191 e00e | | Load 0x0,0xe 1192 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1193 035b | [ | Declare_Type Array,Constrained 1194 0337 | 7 | Declare_Variable Array 1195 e5ff | | Load 0x2,-0x1 1196 825a | Z | Call 0x1,0x5a 1197 4801 |H | Short_Literal 0x1 1198 00da | | Load_Top At_Offset_2 1199 01d6 | | Execute Vector,Field_Write 119a e5fd | | Load 0x2,-0x3 119b e00c | | Load 0x0,0xc 119c 181c | | Execute Package,Field_Execute,Field_Number 0x1c 119d 4802 |H | Short_Literal 0x2 119e 00da | | Load_Top At_Offset_2 119f 01d6 | | Execute Vector,Field_Write 11a0 00da | | Load_Top At_Offset_2 11a1 e002 | | Load 0x0,0x2 11a2 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 11a3 c5fc | | Store 0x2,-0x4 11a4 4504 |E | Exit_Suprogram New_Top_Offset 0x4 11a5 0000 0000 | | .XXX[0x3] 11a7 0000 | | 11a8 0000 0000 | | .LITERAL {0x00000000, 0x00002835} 11ac 0000 0000 | | .BLANK 0000[0x4] 11b0 ; -------------------------------------------------------------------------------------- 11b0 ; SUBPROGRAM 11b0 ; -------------------------------------------------------------------------------------- 11b0 11b8 | | .CONST 0x11b8 ; Address of begin 11b1 0004 | | .CONST 0x0004 ; Address of exception handler 11b2 0003 | | .CONST 0x0003 ; Number of locals 11b3 INIT_11b0: 11b3 e01b | | Load 0x0,0x1b 11b4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 11b5 e002 | | Load 0x0,0x2 11b6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 11b7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 11b8 BODY_11b0: 11b8 00d8 | | Load_Top At_Offset_0 11b9 e01b | | Load 0x0,0x1b 11ba 1b16 | | Execute Package,Field_Read,Field_Number 0x16 11bb 4800 |H | Short_Literal 0x0 11bc e5fe | | Load 0x2,-0x2 11bd e5ff | | Load 0x2,-0x1 11be 82d5 | | Call 0x1,0xd5 11bf 0033 | 3 | Store_Top Heap_Access,At_Offset_3 11c0 0059 | Y | Store_Top Discrete,At_Offset_1 11c1 00d8 | | Load_Top At_Offset_0 11c2 7009 |p | Jump_Nonzero 0x11cc 11c3 00d9 | | Load_Top At_Offset_1 11c4 0217 | | Execute Heap_Access,All_Reference 11c5 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 11c6 00d8 | | Load_Top At_Offset_0 11c7 00e4 | | Load_Encached Positive_Cache 11c8 0260 | ` | Execute Discrete,In_Type 11c9 7001 |p | Jump_Nonzero 0x11cb 11ca 0801 | | Execute_Immediate Raise,0x1 11cb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 11cc 00d8 | | Load_Top At_Offset_0 11cd 6026 |`& | Indirect_Literal Discrete,0x11f4,{0x00000000, 0x0000281c} 11ce 027f | | Execute Discrete,Equal 11cf 6807 |h | Jump_Zero 0x11d7 11d0 4800 |H | Short_Literal 0x0 11d1 00d8 | | Load_Top At_Offset_0 11d2 00e4 | | Load_Encached Positive_Cache 11d3 0260 | ` | Execute Discrete,In_Type 11d4 7001 |p | Jump_Nonzero 0x11d6 11d5 0801 | | Execute_Immediate Raise,0x1 11d6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 11d7 4801 |H | Short_Literal 0x1 11d8 4802 |H | Short_Literal 0x2 11d9 e00e | | Load 0x0,0xe 11da 1b0f | | Execute Package,Field_Read,Field_Number 0xf 11db 035b | [ | Declare_Type Array,Constrained 11dc 0337 | 7 | Declare_Variable Array 11dd e5ff | | Load 0x2,-0x1 11de 825a | Z | Call 0x1,0x5a 11df 4801 |H | Short_Literal 0x1 11e0 00da | | Load_Top At_Offset_2 11e1 01d6 | | Execute Vector,Field_Write 11e2 e5fe | | Load 0x2,-0x2 11e3 e00c | | Load 0x0,0xc 11e4 181c | | Execute Package,Field_Execute,Field_Number 0x1c 11e5 4802 |H | Short_Literal 0x2 11e6 00da | | Load_Top At_Offset_2 11e7 01d6 | | Execute Vector,Field_Write 11e8 00d9 | | Load_Top At_Offset_1 11e9 e002 | | Load 0x0,0x2 11ea 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 11eb 00d8 | | Load_Top At_Offset_0 11ec 00e4 | | Load_Encached Positive_Cache 11ed 0260 | ` | Execute Discrete,In_Type 11ee 7001 |p | Jump_Nonzero 0x11f0 11ef 0801 | | Execute_Immediate Raise,0x1 11f0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 11f1 0000 0000 | | .XXX[0x3] 11f3 0000 | | 11f4 0000 0000 | | .LITERAL {0x00000000, 0x0000281c} 11f8 ; -------------------------------------------------------------------------------------- 11f8 ; SUBPROGRAM 11f8 ; -------------------------------------------------------------------------------------- 11f8 1200 | | .CONST 0x1200 ; Address of begin 11f9 0004 | | .CONST 0x0004 ; Address of exception handler 11fa 0003 | | .CONST 0x0003 ; Number of locals 11fb INIT_11f8: 11fb e01b | | Load 0x0,0x1b 11fc 1b16 | | Execute Package,Field_Read,Field_Number 0x16 11fd e002 | | Load 0x0,0x2 11fe 1b10 | | Execute Package,Field_Read,Field_Number 0x10 11ff 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1200 BODY_11f8: 1200 00d8 | | Load_Top At_Offset_0 1201 4802 |H | Short_Literal 0x2 1202 e5ff | | Load 0x2,-0x1 1203 e01b | | Load 0x0,0x1b 1204 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1205 0059 | Y | Store_Top Discrete,At_Offset_1 1206 00d8 | | Load_Top At_Offset_0 1207 7021 |p! | Jump_Nonzero 0x1229 1208 00d8 | | Load_Top At_Offset_0 1209 e01b | | Load 0x0,0x1b 120a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 120b 4801 |H | Short_Literal 0x1 120c e5fd | | Load 0x2,-0x3 120d e5ff | | Load 0x2,-0x1 120e 82d5 | | Call 0x1,0xd5 120f 0033 | 3 | Store_Top Heap_Access,At_Offset_3 1210 0059 | Y | Store_Top Discrete,At_Offset_1 1211 00d8 | | Load_Top At_Offset_0 1212 7016 |p | Jump_Nonzero 0x1229 1213 00d9 | | Load_Top At_Offset_1 1214 0217 | | Execute Heap_Access,All_Reference 1215 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 1216 6803 |h | Jump_Zero 0x121a 1217 602c |`, | Indirect_Literal Discrete,0x1244,{0x00000000, 0x0000282f} 1218 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 1219 780f |x | Jump 0x1229 121a e5fe | | Load 0x2,-0x2 121b 00da | | Load_Top At_Offset_2 121c 0217 | | Execute Heap_Access,All_Reference 121d 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 121e 00d9 | | Load_Top At_Offset_1 121f 0219 | | Execute Heap_Access,All_Read 1220 00d8 | | Load_Top At_Offset_0 1221 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 1222 e5ff | | Load 0x2,-0x1 1223 e5fe | | Load 0x2,-0x2 1224 e02b | + | Load 0x0,0x2b 1225 180e | | Execute Package,Field_Execute,Field_Number 0xe 1226 00d9 | | Load_Top At_Offset_1 1227 380a |8 | Execute Record,Field_Write,Field_Number 0xa 1228 4504 |E | Exit_Suprogram New_Top_Offset 0x4 1229 e002 | | Load 0x0,0x2 122a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 122b 4801 |H | Short_Literal 0x1 122c 4802 |H | Short_Literal 0x2 122d e00e | | Load 0x0,0xe 122e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 122f 035b | [ | Declare_Type Array,Constrained 1230 0337 | 7 | Declare_Variable Array 1231 e5ff | | Load 0x2,-0x1 1232 825a | Z | Call 0x1,0x5a 1233 4801 |H | Short_Literal 0x1 1234 00da | | Load_Top At_Offset_2 1235 01d6 | | Execute Vector,Field_Write 1236 e5fd | | Load 0x2,-0x3 1237 e00c | | Load 0x0,0xc 1238 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1239 4802 |H | Short_Literal 0x2 123a 00da | | Load_Top At_Offset_2 123b 01d6 | | Execute Vector,Field_Write 123c 00da | | Load_Top At_Offset_2 123d e002 | | Load 0x0,0x2 123e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 123f c5fc | | Store 0x2,-0x4 1240 4504 |E | Exit_Suprogram New_Top_Offset 0x4 1241 0000 0000 | | .XXX[0x3] 1243 0000 | | 1244 0000 0000 | | .LITERAL {0x00000000, 0x0000282f} 1248 ; -------------------------------------------------------------------------------------- 1248 ; SUBPROGRAM 1248 ; -------------------------------------------------------------------------------------- 1248 1250 | P | .CONST 0x1250 ; Address of begin 1249 0004 | | .CONST 0x0004 ; Address of exception handler 124a 0003 | | .CONST 0x0003 ; Number of locals 124b INIT_1248: 124b e01b | | Load 0x0,0x1b 124c 1b16 | | Execute Package,Field_Read,Field_Number 0x16 124d e002 | | Load 0x0,0x2 124e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 124f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1250 BODY_1248: 1250 00d8 | | Load_Top At_Offset_0 1251 4800 |H | Short_Literal 0x0 1252 e5ff | | Load 0x2,-0x1 1253 e01b | | Load 0x0,0x1b 1254 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1255 0059 | Y | Store_Top Discrete,At_Offset_1 1256 00d8 | | Load_Top At_Offset_0 1257 7017 |p | Jump_Nonzero 0x126f 1258 00d8 | | Load_Top At_Offset_0 1259 e01b | | Load 0x0,0x1b 125a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 125b 4800 |H | Short_Literal 0x0 125c e5fe | | Load 0x2,-0x2 125d e5ff | | Load 0x2,-0x1 125e 82d5 | | Call 0x1,0xd5 125f 0033 | 3 | Store_Top Heap_Access,At_Offset_3 1260 0059 | Y | Store_Top Discrete,At_Offset_1 1261 00d8 | | Load_Top At_Offset_0 1262 7006 |p | Jump_Nonzero 0x1269 1263 00d9 | | Load_Top At_Offset_1 1264 0217 | | Execute Heap_Access,All_Reference 1265 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 1266 e02b | + | Load 0x0,0x2b 1267 180f | | Execute Package,Field_Execute,Field_Number 0xf 1268 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1269 00d8 | | Load_Top At_Offset_0 126a 6021 |`! | Indirect_Literal Discrete,0x128c,{0x00000000, 0x0000281c} 126b 027f | | Execute Discrete,Equal 126c 6802 |h | Jump_Zero 0x126f 126d 4800 |H | Short_Literal 0x0 126e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 126f 4801 |H | Short_Literal 0x1 1270 4802 |H | Short_Literal 0x2 1271 e00e | | Load 0x0,0xe 1272 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1273 035b | [ | Declare_Type Array,Constrained 1274 0337 | 7 | Declare_Variable Array 1275 e5ff | | Load 0x2,-0x1 1276 825a | Z | Call 0x1,0x5a 1277 4801 |H | Short_Literal 0x1 1278 00da | | Load_Top At_Offset_2 1279 01d6 | | Execute Vector,Field_Write 127a e5fe | | Load 0x2,-0x2 127b e00c | | Load 0x0,0xc 127c 181c | | Execute Package,Field_Execute,Field_Number 0x1c 127d 4802 |H | Short_Literal 0x2 127e 00da | | Load_Top At_Offset_2 127f 01d6 | | Execute Vector,Field_Write 1280 00d9 | | Load_Top At_Offset_1 1281 e002 | | Load 0x0,0x2 1282 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 1283 00d8 | | Load_Top At_Offset_0 1284 00e3 | | Load_Encached Natural_Cache 1285 0260 | ` | Execute Discrete,In_Type 1286 7001 |p | Jump_Nonzero 0x1288 1287 0801 | | Execute_Immediate Raise,0x1 1288 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1289 0000 0000 | | .XXX[0x3] 128b 0000 | | 128c 0000 0000 | | .LITERAL {0x00000000, 0x0000281c} 1290 ; -------------------------------------------------------------------------------------- 1290 ; SUBPROGRAM 1290 ; -------------------------------------------------------------------------------------- 1290 129a | | .CONST 0x129a ; Address of begin 1291 0004 | | .CONST 0x0004 ; Address of exception handler 1292 0004 | | .CONST 0x0004 ; Number of locals 1293 INIT_1290: 1293 e01b | | Load 0x0,0x1b 1294 1b16 | | Execute Package,Field_Read,Field_Number 0x16 1295 e002 | | Load 0x0,0x2 1296 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1297 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1298 029f 2a43 | *C| Declare_Subprogram INIT_2a40,For_Call 129a BODY_1290: 129a 00d9 | | Load_Top At_Offset_1 129b 4802 |H | Short_Literal 0x2 129c e5ff | | Load 0x2,-0x1 129d e01b | | Load 0x0,0x1b 129e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 129f 005a | Z | Store_Top Discrete,At_Offset_2 12a0 00d9 | | Load_Top At_Offset_1 12a1 7020 |p | Jump_Nonzero 0x12c2 12a2 00d9 | | Load_Top At_Offset_1 12a3 e01b | | Load 0x0,0x1b 12a4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 12a5 4801 |H | Short_Literal 0x1 12a6 e5fc | | Load 0x2,-0x4 12a7 e5ff | | Load 0x2,-0x1 12a8 82d5 | | Call 0x1,0xd5 12a9 c402 | | Store 0x2,0x2 12aa 005a | Z | Store_Top Discrete,At_Offset_2 12ab 00d9 | | Load_Top At_Offset_1 12ac 7015 |p | Jump_Nonzero 0x12c2 12ad 00da | | Load_Top At_Offset_2 12ae 0217 | | Execute Heap_Access,All_Reference 12af 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 12b0 6802 |h | Jump_Zero 0x12b3 12b1 8404 | | Call 0x2,0x4 12b2 780f |x | Jump 0x12c2 12b3 00da | | Load_Top At_Offset_2 12b4 0219 | | Execute Heap_Access,All_Read 12b5 00da | | Load_Top At_Offset_2 12b6 00d9 | | Load_Top At_Offset_1 12b7 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 12b8 e5fe | | Load 0x2,-0x2 12b9 e02b | + | Load 0x0,0x2b 12ba 1810 | | Execute Package,Field_Execute,Field_Number 0x10 12bb 00da | | Load_Top At_Offset_2 12bc 380a |8 | Execute Record,Field_Write,Field_Number 0xa 12bd 005b | [ | Store_Top Discrete,At_Offset_3 12be 00d1 | | Pop_Control Pop_Count_1 12bf 00d9 | | Load_Top At_Offset_1 12c0 7001 |p | Jump_Nonzero 0x12c2 12c1 4505 |E | Exit_Suprogram New_Top_Offset 0x5 12c2 e002 | | Load 0x0,0x2 12c3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 12c4 4801 |H | Short_Literal 0x1 12c5 4802 |H | Short_Literal 0x2 12c6 e00e | | Load 0x0,0xe 12c7 1b0f | | Execute Package,Field_Read,Field_Number 0xf 12c8 035b | [ | Declare_Type Array,Constrained 12c9 0337 | 7 | Declare_Variable Array 12ca e5ff | | Load 0x2,-0x1 12cb 825a | Z | Call 0x1,0x5a 12cc 4801 |H | Short_Literal 0x1 12cd 00da | | Load_Top At_Offset_2 12ce 01d6 | | Execute Vector,Field_Write 12cf e5fc | | Load 0x2,-0x4 12d0 e00c | | Load 0x0,0xc 12d1 181c | | Execute Package,Field_Execute,Field_Number 0x1c 12d2 4802 |H | Short_Literal 0x2 12d3 00da | | Load_Top At_Offset_2 12d4 01d6 | | Execute Vector,Field_Write 12d5 00db | | Load_Top At_Offset_3 12d6 e002 | | Load 0x0,0x2 12d7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 12d8 c5fb | | Store 0x2,-0x5 12d9 4505 |E | Exit_Suprogram New_Top_Offset 0x5 12da 0000 0000 | | .BLANK 0000[0x6] 12e0 ; -------------------------------------------------------------------------------------- 12e0 ; SUBPROGRAM 12e0 ; -------------------------------------------------------------------------------------- 12e0 12ed | | .CONST 0x12ed ; Address of begin 12e1 0004 | | .CONST 0x0004 ; Address of exception handler 12e2 0004 | | .CONST 0x0004 ; Number of locals 12e3 INIT_12e0: 12e3 e01b | | Load 0x0,0x1b 12e4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 12e5 e002 | | Load 0x0,0x2 12e6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 12e7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 12e8 e004 | | Load 0x0,0x4 12e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 12ea 02c7 | | Declare_Variable Any 12eb 00d8 | | Load_Top At_Offset_0 12ec 1c00 | | Execute_Immediate Run_Utility,0x0 12ed BODY_12e0: 12ed 00d9 | | Load_Top At_Offset_1 12ee 4800 |H | Short_Literal 0x0 12ef e5ff | | Load 0x2,-0x1 12f0 e01b | | Load 0x0,0x1b 12f1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 12f2 005a | Z | Store_Top Discrete,At_Offset_2 12f3 00d9 | | Load_Top At_Offset_1 12f4 702d |p- | Jump_Nonzero 0x1322 12f5 00d9 | | Load_Top At_Offset_1 12f6 e01b | | Load 0x0,0x1b 12f7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 12f8 4800 |H | Short_Literal 0x0 12f9 e5fd | | Load 0x2,-0x3 12fa e5ff | | Load 0x2,-0x1 12fb 82d5 | | Call 0x1,0xd5 12fc c402 | | Store 0x2,0x2 12fd 005a | Z | Store_Top Discrete,At_Offset_2 12fe 00d9 | | Load_Top At_Offset_1 12ff 701b |p | Jump_Nonzero 0x131b 1300 00da | | Load_Top At_Offset_2 1301 0219 | | Execute Heap_Access,All_Read 1302 00da | | Load_Top At_Offset_2 1303 00da | | Load_Top At_Offset_2 1304 0120 | | Execute Any,Is_Value 1305 6803 |h | Jump_Zero 0x1309 1306 e004 | | Load 0x0,0x4 1307 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1308 7801 |x | Jump 0x130a 1309 00da | | Load_Top At_Offset_2 130a 00da | | Load_Top At_Offset_2 130b 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 130c e5fe | | Load 0x2,-0x2 130d e02b | + | Load 0x0,0x2b 130e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 130f 00db | | Load_Top At_Offset_3 1310 380a |8 | Execute Record,Field_Write,Field_Number 0xa 1311 c404 | | Store 0x2,0x4 1312 005b | [ | Store_Top Discrete,At_Offset_3 1313 00d1 | | Pop_Control Pop_Count_1 1314 00d9 | | Load_Top At_Offset_1 1315 7002 |p | Jump_Nonzero 0x1318 1316 00d8 | | Load_Top At_Offset_0 1317 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 1318 e003 | | Load 0x0,0x3 1319 180f | | Execute Package,Field_Execute,Field_Number 0xf 131a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 131b 00d9 | | Load_Top At_Offset_1 131c 601b |` | Indirect_Literal Discrete,0x1338,{0x00000000, 0x0000281c} 131d 027f | | Execute Discrete,Equal 131e 6803 |h | Jump_Zero 0x1322 131f e003 | | Load 0x0,0x3 1320 180f | | Execute Package,Field_Execute,Field_Number 0xf 1321 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 1322 4801 |H | Short_Literal 0x1 1323 4802 |H | Short_Literal 0x2 1324 e00e | | Load 0x0,0xe 1325 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1326 035b | [ | Declare_Type Array,Constrained 1327 0337 | 7 | Declare_Variable Array 1328 e5ff | | Load 0x2,-0x1 1329 825a | Z | Call 0x1,0x5a 132a 4801 |H | Short_Literal 0x1 132b 00da | | Load_Top At_Offset_2 132c 01d6 | | Execute Vector,Field_Write 132d e5fd | | Load 0x2,-0x3 132e e00c | | Load 0x0,0xc 132f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1330 4802 |H | Short_Literal 0x2 1331 00da | | Load_Top At_Offset_2 1332 01d6 | | Execute Vector,Field_Write 1333 00da | | Load_Top At_Offset_2 1334 e002 | | Load 0x0,0x2 1335 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 1336 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 1337 0000 | | .XXX[0x1] 1338 0000 0000 | | .LITERAL {0x00000000, 0x0000281c} 133c 0000 0000 | | .BLANK 0000[0x4] 1340 ; -------------------------------------------------------------------------------------- 1340 ; SUBPROGRAM 1340 ; -------------------------------------------------------------------------------------- 1340 134a | J | .CONST 0x134a ; Address of begin 1341 0004 | | .CONST 0x0004 ; Address of exception handler 1342 0004 | | .CONST 0x0004 ; Number of locals 1343 INIT_1340: 1343 e01b | | Load 0x0,0x1b 1344 1b16 | | Execute Package,Field_Read,Field_Number 0x16 1345 e002 | | Load 0x0,0x2 1346 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1347 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1348 029f 2a6b | *k| Declare_Subprogram INIT_2a68,For_Call 134a BODY_1340: 134a 00d9 | | Load_Top At_Offset_1 134b 4802 |H | Short_Literal 0x2 134c e5ff | | Load 0x2,-0x1 134d e01b | | Load 0x0,0x1b 134e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 134f 005a | Z | Store_Top Discrete,At_Offset_2 1350 00d9 | | Load_Top At_Offset_1 1351 7021 |p! | Jump_Nonzero 0x1373 1352 00d9 | | Load_Top At_Offset_1 1353 e01b | | Load 0x0,0x1b 1354 1b16 | | Execute Package,Field_Read,Field_Number 0x16 1355 4801 |H | Short_Literal 0x1 1356 e5fb | | Load 0x2,-0x5 1357 e5ff | | Load 0x2,-0x1 1358 82d5 | | Call 0x1,0xd5 1359 c402 | | Store 0x2,0x2 135a 005a | Z | Store_Top Discrete,At_Offset_2 135b 00d9 | | Load_Top At_Offset_1 135c 7016 |p | Jump_Nonzero 0x1373 135d 00da | | Load_Top At_Offset_2 135e 0217 | | Execute Heap_Access,All_Reference 135f 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 1360 6802 |h | Jump_Zero 0x1363 1361 8404 | | Call 0x2,0x4 1362 7810 |x | Jump 0x1373 1363 00da | | Load_Top At_Offset_2 1364 0219 | | Execute Heap_Access,All_Read 1365 00da | | Load_Top At_Offset_2 1366 00d9 | | Load_Top At_Offset_1 1367 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 1368 e5fe | | Load 0x2,-0x2 1369 e5fd | | Load 0x2,-0x3 136a e02b | + | Load 0x0,0x2b 136b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 136c 00da | | Load_Top At_Offset_2 136d 380a |8 | Execute Record,Field_Write,Field_Number 0xa 136e 005b | [ | Store_Top Discrete,At_Offset_3 136f 00d1 | | Pop_Control Pop_Count_1 1370 00d9 | | Load_Top At_Offset_1 1371 7001 |p | Jump_Nonzero 0x1373 1372 4506 |E | Exit_Suprogram New_Top_Offset 0x6 1373 e002 | | Load 0x0,0x2 1374 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1375 4801 |H | Short_Literal 0x1 1376 4802 |H | Short_Literal 0x2 1377 e00e | | Load 0x0,0xe 1378 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1379 035b | [ | Declare_Type Array,Constrained 137a 0337 | 7 | Declare_Variable Array 137b e5ff | | Load 0x2,-0x1 137c 825a | Z | Call 0x1,0x5a 137d 4801 |H | Short_Literal 0x1 137e 00da | | Load_Top At_Offset_2 137f 01d6 | | Execute Vector,Field_Write 1380 e5fb | | Load 0x2,-0x5 1381 e00c | | Load 0x0,0xc 1382 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1383 4802 |H | Short_Literal 0x2 1384 00da | | Load_Top At_Offset_2 1385 01d6 | | Execute Vector,Field_Write 1386 00db | | Load_Top At_Offset_3 1387 e002 | | Load 0x0,0x2 1388 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1389 c5fa | | Store 0x2,-0x6 138a 4506 |E | Exit_Suprogram New_Top_Offset 0x6 138b 0000 0000 | | .BLANK 0000[0x5] 1390 ; -------------------------------------------------------------------------------------- 1390 ; SUBPROGRAM 1390 ; -------------------------------------------------------------------------------------- 1390 139a | | .CONST 0x139a ; Address of begin 1391 0004 | | .CONST 0x0004 ; Address of exception handler 1392 0004 | | .CONST 0x0004 ; Number of locals 1393 INIT_1390: 1393 e01b | | Load 0x0,0x1b 1394 1b16 | | Execute Package,Field_Read,Field_Number 0x16 1395 e002 | | Load 0x0,0x2 1396 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1397 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1398 029f 2a93 | * | Declare_Subprogram INIT_2a90,For_Call 139a BODY_1390: 139a 00d9 | | Load_Top At_Offset_1 139b 4802 |H | Short_Literal 0x2 139c e5ff | | Load 0x2,-0x1 139d e01b | | Load 0x0,0x1b 139e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 139f 005a | Z | Store_Top Discrete,At_Offset_2 13a0 00d9 | | Load_Top At_Offset_1 13a1 7020 |p | Jump_Nonzero 0x13c2 13a2 00d9 | | Load_Top At_Offset_1 13a3 e01b | | Load 0x0,0x1b 13a4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 13a5 4801 |H | Short_Literal 0x1 13a6 e5fc | | Load 0x2,-0x4 13a7 e5ff | | Load 0x2,-0x1 13a8 82d5 | | Call 0x1,0xd5 13a9 c402 | | Store 0x2,0x2 13aa 005a | Z | Store_Top Discrete,At_Offset_2 13ab 00d9 | | Load_Top At_Offset_1 13ac 7015 |p | Jump_Nonzero 0x13c2 13ad 00da | | Load_Top At_Offset_2 13ae 0217 | | Execute Heap_Access,All_Reference 13af 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 13b0 6802 |h | Jump_Zero 0x13b3 13b1 8404 | | Call 0x2,0x4 13b2 780f |x | Jump 0x13c2 13b3 00da | | Load_Top At_Offset_2 13b4 0219 | | Execute Heap_Access,All_Read 13b5 00da | | Load_Top At_Offset_2 13b6 00d9 | | Load_Top At_Offset_1 13b7 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 13b8 e5fe | | Load 0x2,-0x2 13b9 e02b | + | Load 0x0,0x2b 13ba 1813 | | Execute Package,Field_Execute,Field_Number 0x13 13bb 00da | | Load_Top At_Offset_2 13bc 380a |8 | Execute Record,Field_Write,Field_Number 0xa 13bd 005b | [ | Store_Top Discrete,At_Offset_3 13be 00d1 | | Pop_Control Pop_Count_1 13bf 00d9 | | Load_Top At_Offset_1 13c0 7001 |p | Jump_Nonzero 0x13c2 13c1 4505 |E | Exit_Suprogram New_Top_Offset 0x5 13c2 e002 | | Load 0x0,0x2 13c3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 13c4 4801 |H | Short_Literal 0x1 13c5 4802 |H | Short_Literal 0x2 13c6 e00e | | Load 0x0,0xe 13c7 1b0f | | Execute Package,Field_Read,Field_Number 0xf 13c8 035b | [ | Declare_Type Array,Constrained 13c9 0337 | 7 | Declare_Variable Array 13ca e5ff | | Load 0x2,-0x1 13cb 825a | Z | Call 0x1,0x5a 13cc 4801 |H | Short_Literal 0x1 13cd 00da | | Load_Top At_Offset_2 13ce 01d6 | | Execute Vector,Field_Write 13cf e5fc | | Load 0x2,-0x4 13d0 e00c | | Load 0x0,0xc 13d1 181c | | Execute Package,Field_Execute,Field_Number 0x1c 13d2 4802 |H | Short_Literal 0x2 13d3 00da | | Load_Top At_Offset_2 13d4 01d6 | | Execute Vector,Field_Write 13d5 00db | | Load_Top At_Offset_3 13d6 e002 | | Load 0x0,0x2 13d7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 13d8 c5fb | | Store 0x2,-0x5 13d9 4505 |E | Exit_Suprogram New_Top_Offset 0x5 13da 0000 0000 | | .BLANK 0000[0x6] 13e0 ; -------------------------------------------------------------------------------------- 13e0 ; SUBPROGRAM 13e0 ; -------------------------------------------------------------------------------------- 13e0 13ea | | .CONST 0x13ea ; Address of begin 13e1 0004 | | .CONST 0x0004 ; Address of exception handler 13e2 0004 | | .CONST 0x0004 ; Number of locals 13e3 INIT_13e0: 13e3 e01b | | Load 0x0,0x1b 13e4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 13e5 e002 | | Load 0x0,0x2 13e6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 13e7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 13e8 029f 2abb | * | Declare_Subprogram INIT_2ab8,For_Call 13ea BODY_13e0: 13ea 00d9 | | Load_Top At_Offset_1 13eb 4802 |H | Short_Literal 0x2 13ec e5ff | | Load 0x2,-0x1 13ed e01b | | Load 0x0,0x1b 13ee 1811 | | Execute Package,Field_Execute,Field_Number 0x11 13ef 005a | Z | Store_Top Discrete,At_Offset_2 13f0 00d9 | | Load_Top At_Offset_1 13f1 7020 |p | Jump_Nonzero 0x1412 13f2 00d9 | | Load_Top At_Offset_1 13f3 e01b | | Load 0x0,0x1b 13f4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 13f5 4801 |H | Short_Literal 0x1 13f6 e5fc | | Load 0x2,-0x4 13f7 e5ff | | Load 0x2,-0x1 13f8 82d5 | | Call 0x1,0xd5 13f9 c402 | | Store 0x2,0x2 13fa 005a | Z | Store_Top Discrete,At_Offset_2 13fb 00d9 | | Load_Top At_Offset_1 13fc 7015 |p | Jump_Nonzero 0x1412 13fd 00da | | Load_Top At_Offset_2 13fe 0217 | | Execute Heap_Access,All_Reference 13ff 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 1400 6802 |h | Jump_Zero 0x1403 1401 8404 | | Call 0x2,0x4 1402 780f |x | Jump 0x1412 1403 00da | | Load_Top At_Offset_2 1404 0219 | | Execute Heap_Access,All_Read 1405 00da | | Load_Top At_Offset_2 1406 00d9 | | Load_Top At_Offset_1 1407 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 1408 e5fe | | Load 0x2,-0x2 1409 e02b | + | Load 0x0,0x2b 140a 1814 | | Execute Package,Field_Execute,Field_Number 0x14 140b 00da | | Load_Top At_Offset_2 140c 380a |8 | Execute Record,Field_Write,Field_Number 0xa 140d 005b | [ | Store_Top Discrete,At_Offset_3 140e 00d1 | | Pop_Control Pop_Count_1 140f 00d9 | | Load_Top At_Offset_1 1410 7001 |p | Jump_Nonzero 0x1412 1411 4505 |E | Exit_Suprogram New_Top_Offset 0x5 1412 e002 | | Load 0x0,0x2 1413 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1414 4801 |H | Short_Literal 0x1 1415 4802 |H | Short_Literal 0x2 1416 e00e | | Load 0x0,0xe 1417 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1418 035b | [ | Declare_Type Array,Constrained 1419 0337 | 7 | Declare_Variable Array 141a e5ff | | Load 0x2,-0x1 141b 825a | Z | Call 0x1,0x5a 141c 4801 |H | Short_Literal 0x1 141d 00da | | Load_Top At_Offset_2 141e 01d6 | | Execute Vector,Field_Write 141f e5fc | | Load 0x2,-0x4 1420 e00c | | Load 0x0,0xc 1421 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1422 4802 |H | Short_Literal 0x2 1423 00da | | Load_Top At_Offset_2 1424 01d6 | | Execute Vector,Field_Write 1425 00db | | Load_Top At_Offset_3 1426 e002 | | Load 0x0,0x2 1427 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1428 c5fb | | Store 0x2,-0x5 1429 4505 |E | Exit_Suprogram New_Top_Offset 0x5 142a 0000 0000 | | .BLANK 0000[0x6] 1430 ; -------------------------------------------------------------------------------------- 1430 ; SUBPROGRAM 1430 ; -------------------------------------------------------------------------------------- 1430 1433 | 3 | .CONST 0x1433 ; Address of begin 1431 0004 | | .CONST 0x0004 ; Address of exception handler 1432 0001 | | .CONST 0x0001 ; Number of locals 1433 BODY_1430: 1433 INIT_1430: 1433 00da | | Load_Top At_Offset_2 1434 e2db | | Load 0x1,0xdb 1435 e2dc | | Load 0x1,0xdc 1436 1ddd | | Execute_Immediate Reference_Lex_1,0xdd 1437 1dde | | Execute_Immediate Reference_Lex_1,0xde 1438 1ddf | | Execute_Immediate Reference_Lex_1,0xdf 1439 e00e | | Load 0x0,0xe 143a 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 143b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 143c 0000 0000 | | .BLANK 0000[0x4] 1440 ; -------------------------------------------------------------------------------------- 1440 ; SUBPROGRAM 1440 ; -------------------------------------------------------------------------------------- 1440 1443 | C | .CONST 0x1443 ; Address of begin 1441 0004 | | .CONST 0x0004 ; Address of exception handler 1442 0001 | | .CONST 0x0001 ; Number of locals 1443 BODY_1440: 1443 INIT_1440: 1443 00da | | Load_Top At_Offset_2 1444 e2e3 | | Load 0x1,0xe3 1445 e2e4 | | Load 0x1,0xe4 1446 1de5 | | Execute_Immediate Reference_Lex_1,0xe5 1447 e2e6 | | Load 0x1,0xe6 1448 1de7 | | Execute_Immediate Reference_Lex_1,0xe7 1449 e00e | | Load 0x0,0xe 144a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 144b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 144c 0000 0000 | | .BLANK 0000[0x4] 1450 ; -------------------------------------------------------------------------------------- 1450 ; SUBPROGRAM 1450 ; -------------------------------------------------------------------------------------- 1450 1453 | S | .CONST 0x1453 ; Address of begin 1451 145b | [ | .CONST 0x145b ; Address of exception handler 1452 0001 | | .CONST 0x0001 ; Number of locals 1453 BODY_1450: 1453 INIT_1450: 1453 00da | | Load_Top At_Offset_2 1454 0217 | | Execute Heap_Access,All_Reference 1455 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 1456 e001 | | Load 0x0,0x1 1457 1b13 | | Execute Package,Field_Read,Field_Number 0x13 1458 0216 | | Execute Heap_Access,Convert 1459 8244 | D | Call 0x1,0x44 145a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 145b TRAP_1450: 145b 0007 | | Action Break_Optional 145c 00db | | Load_Top At_Offset_3 145d e01b | | Load 0x0,0x1b 145e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 145f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1460 ; -------------------------------------------------------------------------------------- 1460 ; SUBPROGRAM 1460 ; -------------------------------------------------------------------------------------- 1460 1466 | f | .CONST 0x1466 ; Address of begin 1461 0004 | | .CONST 0x0004 ; Address of exception handler 1462 0002 | | .CONST 0x0002 ; Number of locals 1463 INIT_1460: 1463 00db | | Load_Top At_Offset_3 1464 00db | | Load_Top At_Offset_3 1465 8276 | v | Call 0x1,0x76 1466 BODY_1460: 1466 e001 | | Load 0x0,0x1 1467 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1468 180e | | Execute Package,Field_Execute,Field_Number 0xe 1469 a5fd | | Store_Unchecked 0x2,-0x3 146a 4800 |H | Short_Literal 0x0 146b 00d9 | | Load_Top At_Offset_1 146c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 146d e002 | | Load 0x0,0x2 146e 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 146f 682a |h* | Jump_Zero 0x149a 1470 00d8 | | Load_Top At_Offset_0 1471 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 1472 0b00 | | Execute_Immediate Case_Compare,0x0 1473 701f |p | Jump_Nonzero 0x1493 1474 0f01 | | Execute_Immediate Equal,0x1 1475 701f |p | Jump_Nonzero 0x1495 1476 4801 |H | Short_Literal 0x1 1477 00d9 | | Load_Top At_Offset_1 1478 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 1479 01d7 | | Execute Vector,Field_Read 147a a5fd | | Store_Unchecked 0x2,-0x3 147b e002 | | Load 0x0,0x2 147c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 147d 4801 |H | Short_Literal 0x1 147e 4802 |H | Short_Literal 0x2 147f e00e | | Load 0x0,0xe 1480 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1481 035b | [ | Declare_Type Array,Constrained 1482 0337 | 7 | Declare_Variable Array 1483 e5ff | | Load 0x2,-0x1 1484 e00e | | Load 0x0,0xe 1485 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1486 4801 |H | Short_Literal 0x1 1487 00da | | Load_Top At_Offset_2 1488 01d6 | | Execute Vector,Field_Write 1489 e5fe | | Load 0x2,-0x2 148a 825a | Z | Call 0x1,0x5a 148b 4802 |H | Short_Literal 0x2 148c 00da | | Load_Top At_Offset_2 148d 01d6 | | Execute Vector,Field_Write 148e 6011 |` | Indirect_Literal Discrete,0x14a0,{0x00000000, 0x00002802} 148f e002 | | Load 0x0,0x2 1490 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1491 c5fc | | Store 0x2,-0x4 1492 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1493 00d1 | | Pop_Control Pop_Count_1 1494 7805 |x | Jump 0x149a 1495 4801 |H | Short_Literal 0x1 1496 00d9 | | Load_Top At_Offset_1 1497 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 1498 01d7 | | Execute Vector,Field_Read 1499 a5fd | | Store_Unchecked 0x2,-0x3 149a 00d8 | | Load_Top At_Offset_0 149b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 149c a5fc | | Store_Unchecked 0x2,-0x4 149d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 149e 0000 0000 | | .XXX[0x2] 14a0 0000 0000 | | .LITERAL {0x00000000, 0x00002802} 14a4 0000 0000 | | .BLANK 0000[0x4] 14a8 ; -------------------------------------------------------------------------------------- 14a8 ; SUBPROGRAM 14a8 ; -------------------------------------------------------------------------------------- 14a8 14b4 | | .CONST 0x14b4 ; Address of begin 14a9 0004 | | .CONST 0x0004 ; Address of exception handler 14aa 0004 | | .CONST 0x0004 ; Number of locals 14ab INIT_14a8: 14ab 00da | | Load_Top At_Offset_2 14ac 82b7 | | Call 0x1,0xb7 14ad 00d8 | | Load_Top At_Offset_0 14ae 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 14af e002 | | Load 0x0,0x2 14b0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 14b1 03f1 | | Declare_Variable Discrete,With_Value 14b2 029f 2ae3 | * | Declare_Subprogram INIT_2ae0,For_Call 14b4 BODY_14a8: 14b4 4800 |H | Short_Literal 0x0 14b5 00da | | Load_Top At_Offset_2 14b6 e002 | | Load 0x0,0x2 14b7 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 14b8 680c |h | Jump_Zero 0x14c5 14b9 00da | | Load_Top At_Offset_2 14ba 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 14bb 7008 |p | Jump_Nonzero 0x14c4 14bc 6033 |`3 | Indirect_Literal Discrete,0x14f0,{0x00000000, 0x0000282d} 14bd 602e |`. | Indirect_Literal Discrete,0x14ec,{0x00000000, 0x0000282c} 14be 6029 |`) | Indirect_Literal Discrete,0x14e8,{0x00000000, 0x0000282b} 14bf e5fe | | Load 0x2,-0x2 14c0 e402 | | Load 0x2,0x2 14c1 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 14c2 802c | , | Call 0x0,0x2c 14c3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 14c4 8404 | | Call 0x2,0x4 14c5 4800 |H | Short_Literal 0x0 14c6 e001 | | Load 0x0,0x1 14c7 1b14 | | Execute Package,Field_Read,Field_Number 0x14 14c8 1b14 | | Execute Package,Field_Read,Field_Number 0x14 14c9 1c08 | | Execute_Immediate Run_Utility,0x8 14ca 00da | | Load_Top At_Offset_2 14cb 00d9 | | Load_Top At_Offset_1 14cc 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 14cd 4801 |H | Short_Literal 0x1 14ce 4800 |H | Short_Literal 0x0 14cf e001 | | Load 0x0,0x1 14d0 1b14 | | Execute Package,Field_Read,Field_Number 0x14 14d1 1b13 | | Execute Package,Field_Read,Field_Number 0x13 14d2 035b | [ | Declare_Type Array,Constrained 14d3 0337 | 7 | Declare_Variable Array 14d4 00d9 | | Load_Top At_Offset_1 14d5 00d8 | | Load_Top At_Offset_0 14d6 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 14d7 00da | | Load_Top At_Offset_2 14d8 01da | | Execute Vector,Bounds 14d9 00da | | Load_Top At_Offset_2 14da 01da | | Execute Vector,Bounds 14db 00da | | Load_Top At_Offset_2 14dc 027f | | Execute Discrete,Equal 14dd 7001 |p | Jump_Nonzero 0x14df 14de 08e0 | | Execute_Immediate Raise,0xe0 14df 00cd | | Action Spare6_Action 14e0 027f | | Execute Discrete,Equal 14e1 7001 |p | Jump_Nonzero 0x14e3 14e2 08e0 | | Execute_Immediate Raise,0xe0 14e3 00d2 | | Pop_Control Pop_Count_2 14e4 00d9 | | Load_Top At_Offset_1 14e5 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 14e6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 14e7 0000 | | .XXX[0x1] 14e8 0000 0000 | | .LITERAL {0x00000000, 0x0000282b} 14ec 0000 0000 | | .LITERAL {0x00000000, 0x0000282c} 14f0 0000 0000 | | .LITERAL {0x00000000, 0x0000282d} 14f4 0000 0000 | | .BLANK 0000[0x4] 14f8 ; -------------------------------------------------------------------------------------- 14f8 ; SUBPROGRAM 14f8 ; -------------------------------------------------------------------------------------- 14f8 14fb | | .CONST 0x14fb ; Address of begin 14f9 0004 | | .CONST 0x0004 ; Address of exception handler 14fa 0001 | | .CONST 0x0001 ; Number of locals 14fb BODY_14f8: 14fb INIT_14f8: 14fb 00da | | Load_Top At_Offset_2 14fc e02d | - | Load 0x0,0x2d 14fd 1811 | | Execute Package,Field_Execute,Field_Number 0x11 14fe e01b | | Load 0x0,0x1b 14ff 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 1500 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1501 0000 0000 | | .BLANK 0000[0x7] 1508 ; -------------------------------------------------------------------------------------- 1508 ; SUBPROGRAM 1508 ; -------------------------------------------------------------------------------------- 1508 150b | | .CONST 0x150b ; Address of begin 1509 0004 | | .CONST 0x0004 ; Address of exception handler 150a 0001 | | .CONST 0x0001 ; Number of locals 150b BODY_1508: 150b INIT_1508: 150b 00da | | Load_Top At_Offset_2 150c e02e | . | Load 0x0,0x2e 150d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 150e e01b | | Load 0x0,0x1b 150f 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 1510 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1511 0000 0000 | | .BLANK 0000[0x7] 1518 ; -------------------------------------------------------------------------------------- 1518 ; SUBPROGRAM 1518 ; -------------------------------------------------------------------------------------- 1518 151b | | .CONST 0x151b ; Address of begin 1519 0004 | | .CONST 0x0004 ; Address of exception handler 151a 0001 | | .CONST 0x0001 ; Number of locals 151b BODY_1518: 151b INIT_1518: 151b 00da | | Load_Top At_Offset_2 151c e00f | | Load 0x0,0xf 151d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 151e e01b | | Load 0x0,0x1b 151f 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 1520 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1521 0000 0000 | | .BLANK 0000[0x7] 1528 ; -------------------------------------------------------------------------------------- 1528 ; SUBPROGRAM 1528 ; -------------------------------------------------------------------------------------- 1528 152f | / | .CONST 0x152f ; Address of begin 1529 0004 | | .CONST 0x0004 ; Address of exception handler 152a 0004 | | .CONST 0x0004 ; Number of locals 152b INIT_1528: 152b e01b | | Load 0x0,0x1b 152c 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 152d 039d | | Declare_Variable Heap_Access,Duplicate 152e 039d | | Declare_Variable Heap_Access,Duplicate 152f BODY_1528: 152f e5ff | | Load 0x2,-0x1 1530 0217 | | Execute Heap_Access,All_Reference 1531 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 1532 7005 |p | Jump_Nonzero 0x1538 1533 e5fe | | Load 0x2,-0x2 1534 0217 | | Execute Heap_Access,All_Reference 1535 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 1536 0032 | 2 | Store_Top Heap_Access,At_Offset_2 1537 7811 |x | Jump 0x1549 1538 e5ff | | Load 0x2,-0x1 1539 0217 | | Execute Heap_Access,All_Reference 153a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 153b 6807 |h | Jump_Zero 0x1543 153c e5ff | | Load 0x2,-0x1 153d 0217 | | Execute Heap_Access,All_Reference 153e 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 153f 0217 | | Execute Heap_Access,All_Reference 1540 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 1541 0032 | 2 | Store_Top Heap_Access,At_Offset_2 1542 7806 |x | Jump 0x1549 1543 e5ff | | Load 0x2,-0x1 1544 0217 | | Execute Heap_Access,All_Reference 1545 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 1546 0217 | | Execute Heap_Access,All_Reference 1547 3c15 |< | Execute Record,Field_Read,Field_Number 0x15 1548 0032 | 2 | Store_Top Heap_Access,At_Offset_2 1549 00cf | | Action Mark_Auxiliary 154a 7852 |xR | Jump 0x159d 154b 00da | | Load_Top At_Offset_2 154c 0217 | | Execute Heap_Access,All_Reference 154d 3c14 |< | Execute Record,Field_Read,Field_Number 0x14 154e 0032 | 2 | Store_Top Heap_Access,At_Offset_2 154f 00da | | Load_Top At_Offset_2 1550 e001 | | Load 0x0,0x1 1551 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1552 0216 | | Execute Heap_Access,Convert 1553 e5ff | | Load 0x2,-0x1 1554 021f | | Execute Heap_Access,Equal 1555 6842 |hB | Jump_Zero 0x1598 1556 00db | | Load_Top At_Offset_3 1557 7023 |p# | Jump_Nonzero 0x157b 1558 e5ff | | Load 0x2,-0x1 1559 0217 | | Execute Heap_Access,All_Reference 155a 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 155b 7005 |p | Jump_Nonzero 0x1561 155c 00d9 | | Load_Top At_Offset_1 155d e5fe | | Load 0x2,-0x2 155e 0217 | | Execute Heap_Access,All_Reference 155f 380f |8 | Execute Record,Field_Write,Field_Number 0xf 1560 781e |x | Jump 0x157f 1561 e5ff | | Load 0x2,-0x1 1562 0217 | | Execute Heap_Access,All_Reference 1563 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 1564 680f |h | Jump_Zero 0x1574 1565 00d9 | | Load_Top At_Offset_1 1566 e5ff | | Load 0x2,-0x1 1567 0217 | | Execute Heap_Access,All_Reference 1568 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 1569 0217 | | Execute Heap_Access,All_Reference 156a 3816 |8 | Execute Record,Field_Write,Field_Number 0x16 156b 00d9 | | Load_Top At_Offset_1 156c 7012 |p | Jump_Nonzero 0x157f 156d 4800 |H | Short_Literal 0x0 156e e5ff | | Load 0x2,-0x1 156f 0217 | | Execute Heap_Access,All_Reference 1570 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 1571 0217 | | Execute Heap_Access,All_Reference 1572 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 1573 780b |x | Jump 0x157f 1574 00d9 | | Load_Top At_Offset_1 1575 e5ff | | Load 0x2,-0x1 1576 0217 | | Execute Heap_Access,All_Reference 1577 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 1578 0217 | | Execute Heap_Access,All_Reference 1579 3815 |8 | Execute Record,Field_Write,Field_Number 0x15 157a 7804 |x | Jump 0x157f 157b 00d9 | | Load_Top At_Offset_1 157c e402 | | Load 0x2,0x2 157d 0217 | | Execute Heap_Access,All_Reference 157e 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 157f e01b | | Load 0x0,0x1b 1580 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 1581 e5ff | | Load 0x2,-0x1 1582 0217 | | Execute Heap_Access,All_Reference 1583 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 1584 4800 |H | Short_Literal 0x0 1585 e5ff | | Load 0x2,-0x1 1586 0217 | | Execute Heap_Access,All_Reference 1587 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 1588 e5ff | | Load 0x2,-0x1 1589 0217 | | Execute Heap_Access,All_Reference 158a 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 158b 680b |h | Jump_Zero 0x1597 158c 4800 |H | Short_Literal 0x0 158d e5ff | | Load 0x2,-0x1 158e 0217 | | Execute Heap_Access,All_Reference 158f 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 1590 e5fe | | Load 0x2,-0x2 1591 0217 | | Execute Heap_Access,All_Reference 1592 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 1593 0aff | | Execute_Immediate Plus,-0x1 1594 e5fe | | Load 0x2,-0x2 1595 0217 | | Execute Heap_Access,All_Reference 1596 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 1597 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1598 00da | | Load_Top At_Offset_2 1599 a402 | | Store_Unchecked 0x2,0x2 159a 00d9 | | Load_Top At_Offset_1 159b 0033 | 3 | Store_Top Heap_Access,At_Offset_3 159c 00c9 | | Action Pop_Auxiliary_Loop 159d 00da | | Load_Top At_Offset_2 159e 77ac |w | Jump_Nonzero 0x154b 159f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 15a0 ; -------------------------------------------------------------------------------------- 15a0 ; SUBPROGRAM 15a0 ; -------------------------------------------------------------------------------------- 15a0 15a3 | | .CONST 0x15a3 ; Address of begin 15a1 0004 | | .CONST 0x0004 ; Address of exception handler 15a2 0001 | | .CONST 0x0001 ; Number of locals 15a3 BODY_15a0: 15a3 INIT_15a0: 15a3 00da | | Load_Top At_Offset_2 15a4 0217 | | Execute Heap_Access,All_Reference 15a5 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 15a6 700e |p | Jump_Nonzero 0x15b5 15a7 00db | | Load_Top At_Offset_3 15a8 0217 | | Execute Heap_Access,All_Reference 15a9 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 15aa 00db | | Load_Top At_Offset_3 15ab 0217 | | Execute Heap_Access,All_Reference 15ac 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 15ad 00da | | Load_Top At_Offset_2 15ae e01b | | Load 0x0,0x1b 15af 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 15b0 0216 | | Execute Heap_Access,Convert 15b1 e5fe | | Load 0x2,-0x2 15b2 0217 | | Execute Heap_Access,All_Reference 15b3 380f |8 | Execute Record,Field_Write,Field_Number 0xf 15b4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 15b5 00da | | Load_Top At_Offset_2 15b6 0217 | | Execute Heap_Access,All_Reference 15b7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 15b8 6818 |h | Jump_Zero 0x15d1 15b9 00da | | Load_Top At_Offset_2 15ba 0217 | | Execute Heap_Access,All_Reference 15bb 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 15bc 0217 | | Execute Heap_Access,All_Reference 15bd 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 15be 00db | | Load_Top At_Offset_3 15bf 0217 | | Execute Heap_Access,All_Reference 15c0 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 15c1 00da | | Load_Top At_Offset_2 15c2 e01b | | Load 0x0,0x1b 15c3 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 15c4 0216 | | Execute Heap_Access,Convert 15c5 00db | | Load_Top At_Offset_3 15c6 0217 | | Execute Heap_Access,All_Reference 15c7 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 15c8 0217 | | Execute Heap_Access,All_Reference 15c9 3816 |8 | Execute Record,Field_Write,Field_Number 0x16 15ca 4801 |H | Short_Literal 0x1 15cb 00db | | Load_Top At_Offset_3 15cc 0217 | | Execute Heap_Access,All_Reference 15cd 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 15ce 0217 | | Execute Heap_Access,All_Reference 15cf 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 15d0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 15d1 00da | | Load_Top At_Offset_2 15d2 0217 | | Execute Heap_Access,All_Reference 15d3 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 15d4 0217 | | Execute Heap_Access,All_Reference 15d5 3c15 |< | Execute Record,Field_Read,Field_Number 0x15 15d6 00db | | Load_Top At_Offset_3 15d7 0217 | | Execute Heap_Access,All_Reference 15d8 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 15d9 00da | | Load_Top At_Offset_2 15da e01b | | Load 0x0,0x1b 15db 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 15dc 0216 | | Execute Heap_Access,Convert 15dd 00db | | Load_Top At_Offset_3 15de 0217 | | Execute Heap_Access,All_Reference 15df 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 15e0 0217 | | Execute Heap_Access,All_Reference 15e1 3815 |8 | Execute Record,Field_Write,Field_Number 0x15 15e2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 15e3 0000 0000 | | .BLANK 0000[0x5] 15e8 ; -------------------------------------------------------------------------------------- 15e8 ; SUBPROGRAM 15e8 ; -------------------------------------------------------------------------------------- 15e8 15eb | | .CONST 0x15eb ; Address of begin 15e9 0004 | | .CONST 0x0004 ; Address of exception handler 15ea 0001 | | .CONST 0x0001 ; Number of locals 15eb BODY_15e8: 15eb INIT_15e8: 15eb 4607 |F | Jump_Case 0x8 15ec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 15ed 7806 |x | Jump 0x15f4 ; case 0x1 15ee 7809 |x | Jump 0x15f8 ; case 0x2 15ef 780d |x | Jump 0x15fd ; case 0x3 15f0 7810 |x | Jump 0x1601 ; case 0x4 15f1 7811 |x | Jump 0x1603 ; case 0x5 15f2 7812 |x | Jump 0x1605 ; case 0x6 15f3 7815 |x | Jump 0x1609 ; case 0x7 15f4 00da | | Load_Top At_Offset_2 15f5 0091 2bd2 | + | Action Push_String_Extended_Indexed,0x2bd2 ; "TARGET_MACHINE_FIELD" 15f7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 15f8 00db | | Load_Top At_Offset_3 15f9 00db | | Load_Top At_Offset_3 15fa 00e0 | | Load_Encached Standard_Cache 15fb 181b | | Execute Package,Field_Execute,Field_Number 0x1b 15fc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 15fd 00da | | Load_Top At_Offset_2 15fe 00e0 | | Load_Encached Standard_Cache 15ff 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1600 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 1601 00db | | Load_Top At_Offset_3 1602 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1603 00db | | Load_Top At_Offset_3 1604 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1605 e297 | | Load 0x1,0x97 1606 00dc | | Load_Top At_Offset_4 1607 0267 | g | Execute Discrete,Predecessor 1608 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1609 e297 | | Load 0x1,0x97 160a 00dc | | Load_Top At_Offset_4 160b 0268 | h | Execute Discrete,Successor 160c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 160d 0000 0000 | | .XXX[0x3] 160f 0000 | | 1610 ; -------------------------------------------------------------------------------------- 1610 ; SUBPROGRAM 1610 ; -------------------------------------------------------------------------------------- 1610 1613 | | .CONST 0x1613 ; Address of begin 1611 0004 | | .CONST 0x0004 ; Address of exception handler 1612 0001 | | .CONST 0x0001 ; Number of locals 1613 BODY_1610: 1613 INIT_1610: 1613 4607 |F | Jump_Case 0x8 1614 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 1615 7806 |x | Jump 0x161c ; case 0x1 1616 7809 |x | Jump 0x1620 ; case 0x2 1617 780d |x | Jump 0x1625 ; case 0x3 1618 7810 |x | Jump 0x1629 ; case 0x4 1619 7811 |x | Jump 0x162b ; case 0x5 161a 7812 |x | Jump 0x162d ; case 0x6 161b 7815 |x | Jump 0x1631 ; case 0x7 161c 00da | | Load_Top At_Offset_2 161d 0091 2bd9 | + | Action Push_String_Extended_Indexed,0x2bd9 ; "C" 161f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 1620 00db | | Load_Top At_Offset_3 1621 00db | | Load_Top At_Offset_3 1622 00e0 | | Load_Encached Standard_Cache 1623 181b | | Execute Package,Field_Execute,Field_Number 0x1b 1624 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1625 00da | | Load_Top At_Offset_2 1626 00e0 | | Load_Encached Standard_Cache 1627 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1628 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 1629 00db | | Load_Top At_Offset_3 162a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 162b 00db | | Load_Top At_Offset_3 162c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 162d e29b | | Load 0x1,0x9b 162e 00dc | | Load_Top At_Offset_4 162f 0267 | g | Execute Discrete,Predecessor 1630 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1631 e29b | | Load 0x1,0x9b 1632 00dc | | Load_Top At_Offset_4 1633 0268 | h | Execute Discrete,Successor 1634 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1635 0000 0000 | | .XXX[0x3] 1637 0000 | | 1638 ; -------------------------------------------------------------------------------------- 1638 ; SUBPROGRAM 1638 ; -------------------------------------------------------------------------------------- 1638 163b | ; | .CONST 0x163b ; Address of begin 1639 0004 | | .CONST 0x0004 ; Address of exception handler 163a 0001 | | .CONST 0x0001 ; Number of locals 163b BODY_1638: 163b INIT_1638: 163b 4607 |F | Jump_Case 0x8 163c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 163d 7806 |x | Jump 0x1644 ; case 0x1 163e 7809 |x | Jump 0x1648 ; case 0x2 163f 780d |x | Jump 0x164d ; case 0x3 1640 7810 |x | Jump 0x1651 ; case 0x4 1641 7811 |x | Jump 0x1653 ; case 0x5 1642 7812 |x | Jump 0x1655 ; case 0x6 1643 7815 |x | Jump 0x1659 ; case 0x7 1644 00da | | Load_Top At_Offset_2 1645 0091 2bec | + | Action Push_String_Extended_Indexed,0x2bec ; "BASIC_FRESH" 1647 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 1648 00db | | Load_Top At_Offset_3 1649 00db | | Load_Top At_Offset_3 164a 00e0 | | Load_Encached Standard_Cache 164b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 164c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 164d 00da | | Load_Top At_Offset_2 164e 00e0 | | Load_Encached Standard_Cache 164f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1650 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 1651 00db | | Load_Top At_Offset_3 1652 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1653 00db | | Load_Top At_Offset_3 1654 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1655 e2a0 | | Load 0x1,0xa0 1656 00dc | | Load_Top At_Offset_4 1657 0267 | g | Execute Discrete,Predecessor 1658 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1659 e2a0 | | Load 0x1,0xa0 165a 00dc | | Load_Top At_Offset_4 165b 0268 | h | Execute Discrete,Successor 165c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 165d 0000 0000 | | .XXX[0x3] 165f 0000 | | 1660 ; -------------------------------------------------------------------------------------- 1660 ; SUBPROGRAM 1660 ; -------------------------------------------------------------------------------------- 1660 1663 | c | .CONST 0x1663 ; Address of begin 1661 0004 | | .CONST 0x0004 ; Address of exception handler 1662 0001 | | .CONST 0x0001 ; Number of locals 1663 BODY_1660: 1663 INIT_1660: 1663 4607 |F | Jump_Case 0x8 1664 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 1665 7806 |x | Jump 0x166c ; case 0x1 1666 7809 |x | Jump 0x1670 ; case 0x2 1667 780d |x | Jump 0x1675 ; case 0x3 1668 7810 |x | Jump 0x1679 ; case 0x4 1669 7811 |x | Jump 0x167b ; case 0x5 166a 7812 |x | Jump 0x167d ; case 0x6 166b 7815 |x | Jump 0x1681 ; case 0x7 166c 00da | | Load_Top At_Offset_2 166d 0091 2bf1 | + | Action Push_String_Extended_Indexed,0x2bf1 ; "SEPARATE_GENERIC_BODIES" 166f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 1670 00db | | Load_Top At_Offset_3 1671 00db | | Load_Top At_Offset_3 1672 00e0 | | Load_Encached Standard_Cache 1673 181b | | Execute Package,Field_Execute,Field_Number 0x1b 1674 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1675 00da | | Load_Top At_Offset_2 1676 00e0 | | Load_Encached Standard_Cache 1677 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1678 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 1679 00db | | Load_Top At_Offset_3 167a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 167b 00db | | Load_Top At_Offset_3 167c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 167d e2a1 | | Load 0x1,0xa1 167e 00dc | | Load_Top At_Offset_4 167f 0267 | g | Execute Discrete,Predecessor 1680 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1681 e2a1 | | Load 0x1,0xa1 1682 00dc | | Load_Top At_Offset_4 1683 0268 | h | Execute Discrete,Successor 1684 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1685 0000 0000 | | .XXX[0x3] 1687 0000 | | 1688 ; -------------------------------------------------------------------------------------- 1688 ; SUBPROGRAM 1688 ; -------------------------------------------------------------------------------------- 1688 168b | | .CONST 0x168b ; Address of begin 1689 0004 | | .CONST 0x0004 ; Address of exception handler 168a 0001 | | .CONST 0x0001 ; Number of locals 168b BODY_1688: 168b INIT_1688: 168b 4607 |F | Jump_Case 0x8 168c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 168d 7806 |x | Jump 0x1694 ; case 0x1 168e 7809 |x | Jump 0x1698 ; case 0x2 168f 780d |x | Jump 0x169d ; case 0x3 1690 7810 |x | Jump 0x16a1 ; case 0x4 1691 7811 |x | Jump 0x16a3 ; case 0x5 1692 7812 |x | Jump 0x16a5 ; case 0x6 1693 7815 |x | Jump 0x16a9 ; case 0x7 1694 00da | | Load_Top At_Offset_2 1695 0091 2bf5 | + | Action Push_String_Extended_Indexed,0x2bf5 ; "NIL" 1697 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 1698 00db | | Load_Top At_Offset_3 1699 00db | | Load_Top At_Offset_3 169a 00e0 | | Load_Encached Standard_Cache 169b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 169c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 169d 00da | | Load_Top At_Offset_2 169e 00e0 | | Load_Encached Standard_Cache 169f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 16a0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 16a1 00db | | Load_Top At_Offset_3 16a2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 16a3 00db | | Load_Top At_Offset_3 16a4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 16a5 e2a5 | | Load 0x1,0xa5 16a6 00dc | | Load_Top At_Offset_4 16a7 0267 | g | Execute Discrete,Predecessor 16a8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 16a9 e2a5 | | Load 0x1,0xa5 16aa 00dc | | Load_Top At_Offset_4 16ab 0268 | h | Execute Discrete,Successor 16ac 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 16ad 0000 0000 | | .XXX[0x3] 16af 0000 | | 16b0 ; -------------------------------------------------------------------------------------- 16b0 ; SUBPROGRAM 16b0 ; SUBPROGRAM 16b0 ; -------------------------------------------------------------------------------------- 16b0 16b3 | | .CONST 0x16b3 ; Address of begin 16b1 0004 | | .CONST 0x0004 ; Address of exception handler 16b2 0001 | | .CONST 0x0001 ; Number of locals 16b3 BODY_16b0: 16b3 BODY_16b0: 16b3 INIT_16b0: 16b3 INIT_16b0: 16b3 4608 |F | Jump_Case 0x9 16b4 7808 |x | Jump 0x16bd ; case 0x0 16b5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 16b6 78cd |x | Jump 0x1784 ; case 0x2 16b7 78cc |x | Jump 0x1784 ; case 0x3 16b8 78cb |x | Jump 0x1784 ; case 0x4 16b9 78ca |x | Jump 0x1784 ; case 0x5 16ba 782c |x, | Jump 0x16e7 ; case 0x6 16bb 785b |x[ | Jump 0x1717 ; case 0x7 16bc 789f |x | Jump 0x175c ; case 0x8 16bd 00da | | Load_Top At_Offset_2 16be 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 16bf 4615 |F | Jump_Case 0x16 16c0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 16c1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 16c2 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 16c3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 16c4 7811 |x | Jump 0x16d6 ; case 0x4 16c5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 16c6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6 16c7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7 16c8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8 16c9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x9 16ca 7811 |x | Jump 0x16dc ; case 0xa 16cb 7810 |x | Jump 0x16dc ; case 0xb 16cc 780f |x | Jump 0x16dc ; case 0xc 16cd 780e |x | Jump 0x16dc ; case 0xd 16ce 780d |x | Jump 0x16dc ; case 0xe 16cf 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0xf 16d0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x10 16d1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x11 16d2 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x12 16d3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x13 16d4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x14 16d5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x15 16d6 00da | | Load_Top At_Offset_2 16d7 2206 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x6 16d8 00da | | Load_Top At_Offset_2 16d9 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 16da 1c00 | | Execute_Immediate Run_Utility,0x0 16db 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 16dc 00da | | Load_Top At_Offset_2 16dd 220c |" | Execute Variant_Record,Field_Constrain,Field_Number 0xc 16de 00da | | Load_Top At_Offset_2 16df 260c |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc 16e0 1c00 | | Execute_Immediate Run_Utility,0x0 16e1 00da | | Load_Top At_Offset_2 16e2 220d |" | Execute Variant_Record,Field_Constrain,Field_Number 0xd 16e3 00da | | Load_Top At_Offset_2 16e4 260d |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd 16e5 1c00 | | Execute_Immediate Run_Utility,0x0 16e6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 16e7 e5fd | | Load 0x2,-0x3 16e8 4615 |F | Jump_Case 0x16 16e9 782b |x+ | Jump 0x1715 ; case 0x0 16ea 7816 |x | Jump 0x1701 ; case 0x1 16eb 7815 |x | Jump 0x1701 ; case 0x2 16ec 7814 |x | Jump 0x1701 ; case 0x3 16ed 7815 |x | Jump 0x1703 ; case 0x4 16ee 7816 |x | Jump 0x1705 ; case 0x5 16ef 7817 |x | Jump 0x1707 ; case 0x6 16f0 7818 |x | Jump 0x1709 ; case 0x7 16f1 7819 |x | Jump 0x170b ; case 0x8 16f2 781a |x | Jump 0x170d ; case 0x9 16f3 781b |x | Jump 0x170f ; case 0xa 16f4 781a |x | Jump 0x170f ; case 0xb 16f5 7819 |x | Jump 0x170f ; case 0xc 16f6 7818 |x | Jump 0x170f ; case 0xd 16f7 7817 |x | Jump 0x170f ; case 0xe 16f8 7818 |x | Jump 0x1711 ; case 0xf 16f9 7817 |x | Jump 0x1711 ; case 0x10 16fa 7816 |x | Jump 0x1711 ; case 0x11 16fb 7815 |x | Jump 0x1711 ; case 0x12 16fc 7816 |x | Jump 0x1713 ; case 0x13 16fd 7815 |x | Jump 0x1713 ; case 0x14 16fe 7800 |x | Jump 0x16ff ; case 0x15 16ff 480b |H | Short_Literal 0xb 1700 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 1701 4801 |H | Short_Literal 0x1 1702 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 1703 4802 |H | Short_Literal 0x2 1704 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 1705 4803 |H | Short_Literal 0x3 1706 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 1707 4804 |H | Short_Literal 0x4 1708 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 1709 4805 |H | Short_Literal 0x5 170a 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 170b 4806 |H | Short_Literal 0x6 170c 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 170d 4807 |H | Short_Literal 0x7 170e 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 170f 4808 |H | Short_Literal 0x8 1710 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 1711 4809 |H | Short_Literal 0x9 1712 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 1713 480a |H | Short_Literal 0xa 1714 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 1715 48ff |H | Short_Literal 0xff 1716 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 1717 e5fd | | Load 0x2,-0x3 1718 e5fe | | Load 0x2,-0x2 1719 4800 |H | Short_Literal 0x0 171a e5fe | | Load 0x2,-0x2 171b e00c | | Load 0x0,0xc 171c 1b18 | | Execute Package,Field_Read,Field_Number 0x18 171d 035b | [ | Declare_Type Array,Constrained 171e e5fd | | Load 0x2,-0x3 171f 4615 |F | Jump_Case 0x16 1720 7818 |x | Jump 0x1739 ; case 0x0 1721 781a |x | Jump 0x173c ; case 0x1 1722 7819 |x | Jump 0x173c ; case 0x2 1723 7818 |x | Jump 0x173c ; case 0x3 1724 781a |x | Jump 0x173f ; case 0x4 1725 781c |x | Jump 0x1742 ; case 0x5 1726 781e |x | Jump 0x1745 ; case 0x6 1727 7820 |x | Jump 0x1748 ; case 0x7 1728 7822 |x" | Jump 0x174b ; case 0x8 1729 7824 |x$ | Jump 0x174e ; case 0x9 172a 7826 |x& | Jump 0x1751 ; case 0xa 172b 7825 |x% | Jump 0x1751 ; case 0xb 172c 7824 |x$ | Jump 0x1751 ; case 0xc 172d 7823 |x# | Jump 0x1751 ; case 0xd 172e 7822 |x" | Jump 0x1751 ; case 0xe 172f 7824 |x$ | Jump 0x1754 ; case 0xf 1730 7823 |x# | Jump 0x1754 ; case 0x10 1731 7822 |x" | Jump 0x1754 ; case 0x11 1732 7821 |x! | Jump 0x1754 ; case 0x12 1733 7823 |x# | Jump 0x1757 ; case 0x13 1734 7822 |x" | Jump 0x1757 ; case 0x14 1735 7800 |x | Jump 0x1736 ; case 0x15 1736 4801 |H | Short_Literal 0x1 1737 480b |H | Short_Literal 0xb 1738 7820 |x | Jump 0x1759 1739 4801 |H | Short_Literal 0x1 173a 48ff |H | Short_Literal 0xff 173b 781d |x | Jump 0x1759 173c 4801 |H | Short_Literal 0x1 173d 4801 |H | Short_Literal 0x1 173e 781a |x | Jump 0x1759 173f 4801 |H | Short_Literal 0x1 1740 4802 |H | Short_Literal 0x2 1741 7817 |x | Jump 0x1759 1742 4801 |H | Short_Literal 0x1 1743 4803 |H | Short_Literal 0x3 1744 7814 |x | Jump 0x1759 1745 4801 |H | Short_Literal 0x1 1746 4804 |H | Short_Literal 0x4 1747 7811 |x | Jump 0x1759 1748 4801 |H | Short_Literal 0x1 1749 4805 |H | Short_Literal 0x5 174a 780e |x | Jump 0x1759 174b 4801 |H | Short_Literal 0x1 174c 4806 |H | Short_Literal 0x6 174d 780b |x | Jump 0x1759 174e 4801 |H | Short_Literal 0x1 174f 4807 |H | Short_Literal 0x7 1750 7808 |x | Jump 0x1759 1751 4801 |H | Short_Literal 0x1 1752 4808 |H | Short_Literal 0x8 1753 7805 |x | Jump 0x1759 1754 4801 |H | Short_Literal 0x1 1755 4809 |H | Short_Literal 0x9 1756 7802 |x | Jump 0x1759 1757 4801 |H | Short_Literal 0x1 1758 480a |H | Short_Literal 0xa 1759 e5ff | | Load 0x2,-0x1 175a 031b | | Declare_Type Variant_Record,Constrained 175b 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 175c e5fd | | Load 0x2,-0x3 175d e5fe | | Load 0x2,-0x2 175e e5fd | | Load 0x2,-0x3 175f e5fe | | Load 0x2,-0x2 1760 e5ff | | Load 0x2,-0x1 1761 1c06 | | Execute_Immediate Run_Utility,0x6 1762 e5ff | | Load 0x2,-0x1 1763 02fc | | Declare_Variable Variant_Record,With_Constraint 1764 4800 |H | Short_Literal 0x0 1765 e5fe | | Load 0x2,-0x2 1766 e00c | | Load 0x0,0xc 1767 1b18 | | Execute Package,Field_Read,Field_Number 0x18 1768 0334 | 4 | Declare_Variable Array,With_Constraint 1769 2d04 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x4 176a e5fd | | Load 0x2,-0x3 176b 4615 |F | Jump_Case 0x16 176c 7815 |x | Jump 0x1782 ; case 0x0 176d 7814 |x | Jump 0x1782 ; case 0x1 176e 7813 |x | Jump 0x1782 ; case 0x2 176f 7812 |x | Jump 0x1782 ; case 0x3 1770 7811 |x | Jump 0x1782 ; case 0x4 1771 7810 |x | Jump 0x1782 ; case 0x5 1772 780f |x | Jump 0x1782 ; case 0x6 1773 780e |x | Jump 0x1782 ; case 0x7 1774 780d |x | Jump 0x1782 ; case 0x8 1775 780c |x | Jump 0x1782 ; case 0x9 1776 780b |x | Jump 0x1782 ; case 0xa 1777 780a |x | Jump 0x1782 ; case 0xb 1778 7809 |x | Jump 0x1782 ; case 0xc 1779 7808 |x | Jump 0x1782 ; case 0xd 177a 7807 |x | Jump 0x1782 ; case 0xe 177b 7806 |x | Jump 0x1782 ; case 0xf 177c 7805 |x | Jump 0x1782 ; case 0x10 177d 7804 |x | Jump 0x1782 ; case 0x11 177e 7803 |x | Jump 0x1782 ; case 0x12 177f 7802 |x | Jump 0x1782 ; case 0x13 1780 7801 |x | Jump 0x1782 ; case 0x14 1781 7800 |x | Jump 0x1782 ; case 0x15 1782 016a | j | QQ_execute Variant_Record,XXX 1783 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 1784 0869 | i | Execute_Immediate Raise,0x69 1785 0000 0000 | | .XXX[0x3] 1787 0000 | | 1788 ; -------------------------------------------------------------------------------------- 1788 ; SUBPROGRAM 1788 ; -------------------------------------------------------------------------------------- 1788 178b | | .CONST 0x178b ; Address of begin 1789 0004 | | .CONST 0x0004 ; Address of exception handler 178a 0001 | | .CONST 0x0001 ; Number of locals 178b BODY_1788: 178b INIT_1788: 178b 4608 |F | Jump_Case 0x9 178c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 178d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 178e 7819 |x | Jump 0x17a8 ; case 0x2 178f 7818 |x | Jump 0x17a8 ; case 0x3 1790 7817 |x | Jump 0x17a8 ; case 0x4 1791 7816 |x | Jump 0x17a8 ; case 0x5 1792 7815 |x | Jump 0x17a8 ; case 0x6 1793 7801 |x | Jump 0x1795 ; case 0x7 1794 7809 |x | Jump 0x179e ; case 0x8 1795 00db | | Load_Top At_Offset_3 1796 4801 |H | Short_Literal 0x1 1797 e5fe | | Load 0x2,-0x2 1798 00e9 | | Load_Encached String_Cache 1799 035b | [ | Declare_Type Array,Constrained 179a 4801 |H | Short_Literal 0x1 179b e5ff | | Load 0x2,-0x1 179c 031b | | Declare_Type Variant_Record,Constrained 179d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 179e 00db | | Load_Top At_Offset_3 179f 00db | | Load_Top At_Offset_3 17a0 02fc | | Declare_Variable Variant_Record,With_Constraint 17a1 4801 |H | Short_Literal 0x1 17a2 e5fe | | Load 0x2,-0x2 17a3 00e9 | | Load_Encached String_Cache 17a4 0334 | 4 | Declare_Variable Array,With_Constraint 17a5 2d04 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x4 17a6 016a | j | QQ_execute Variant_Record,XXX 17a7 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 17a8 0869 | i | Execute_Immediate Raise,0x69 17a9 0000 0000 | | .BLANK 0000[0x7] 17b0 ; -------------------------------------------------------------------------------------- 17b0 ; SUBPROGRAM 17b0 ; -------------------------------------------------------------------------------------- 17b0 17b5 | | .CONST 0x17b5 ; Address of begin 17b1 181a | | .CONST 0x181a ; Address of exception handler 17b2 0002 | | .CONST 0x0002 ; Number of locals 17b3 INIT_17b0: 17b3 00e2 | | Load_Encached Integer_Cache 17b4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 17b5 BODY_17b0: 17b5 00cf | | Action Mark_Auxiliary 17b6 7804 |x | Jump 0x17bb 17b7 e5fd | | Load 0x2,-0x3 17b8 0a01 | | Execute_Immediate Plus,0x1 17b9 c5fd | | Store 0x2,-0x3 17ba 00c9 | | Action Pop_Auxiliary_Loop 17bb e5fd | | Load 0x2,-0x3 17bc e5ff | | Load 0x2,-0x1 17bd 01d7 | | Execute Vector,Field_Read 17be 0f5f | _ | Execute_Immediate Equal,0x5f 17bf 77f7 |w | Jump_Nonzero 0x17b7 17c0 00ce | | Action Pop_Auxiliary 17c1 e5fd | | Load 0x2,-0x3 17c2 0a02 | | Execute_Immediate Plus,0x2 17c3 e5ff | | Load 0x2,-0x1 17c4 01dc | | Execute Vector,Last 17c5 027a | z | Execute Discrete,Less_Equal 17c6 6811 |h | Jump_Zero 0x17d8 17c7 4800 |H | Short_Literal 0x0 17c8 e5fe | | Load 0x2,-0x2 17c9 483a |H: | Short_Literal 0x3a 17ca e5fd | | Load 0x2,-0x3 17cb 00d8 | | Load_Top At_Offset_0 17cc 0a02 | | Execute_Immediate Plus,0x2 17cd 00d8 | | Load_Top At_Offset_0 17ce 00e2 | | Load_Encached Integer_Cache 17cf 0260 | ` | Execute Discrete,In_Type 17d0 7001 |p | Jump_Nonzero 0x17d2 17d1 0801 | | Execute_Immediate Raise,0x1 17d2 e5ff | | Load 0x2,-0x1 17d3 01cf | | Execute Vector,Slice_Read 17d4 01ca | | Execute Vector,Prepend 17d5 e02f | / | Load 0x0,0x2f 17d6 181d | | Execute Package,Field_Execute,Field_Number 0x1d 17d7 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 17d8 00d8 | | Load_Top At_Offset_0 17d9 7011 |p | Jump_Nonzero 0x17eb 17da 4800 |H | Short_Literal 0x0 17db e5fe | | Load 0x2,-0x2 17dc 483a |H: | Short_Literal 0x3a 17dd e5fd | | Load 0x2,-0x3 17de 00d8 | | Load_Top At_Offset_0 17df 0a01 | | Execute_Immediate Plus,0x1 17e0 00d8 | | Load_Top At_Offset_0 17e1 00e2 | | Load_Encached Integer_Cache 17e2 0260 | ` | Execute Discrete,In_Type 17e3 7001 |p | Jump_Nonzero 0x17e5 17e4 0801 | | Execute_Immediate Raise,0x1 17e5 e5ff | | Load 0x2,-0x1 17e6 01cf | | Execute Vector,Slice_Read 17e7 01ca | | Execute Vector,Prepend 17e8 e02f | / | Load 0x0,0x2f 17e9 181d | | Execute Package,Field_Execute,Field_Number 0x1d 17ea 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 17eb 00d8 | | Load_Top At_Offset_0 17ec 0a0b | | Execute_Immediate Plus,0xb 17ed 480c |H | Short_Literal 0xc 17ee 0270 | p | Execute Discrete,Divide 17ef c5fc | | Store 0x2,-0x4 17f0 00d8 | | Load_Top At_Offset_0 17f1 0c01 | | Execute_Immediate Greater_Equal,0x1 17f2 6826 |h& | Jump_Zero 0x1819 17f3 00cf | | Action Mark_Auxiliary 17f4 e5ff | | Load 0x2,-0x1 17f5 01dc | | Execute Vector,Last 17f6 e5fd | | Load 0x2,-0x3 17f7 0263 | c | Execute Discrete,Above_Bound 17f8 701b |p | Jump_Nonzero 0x1814 17f9 00db | | Load_Top At_Offset_3 17fa 0a01 | | Execute_Immediate Plus,0x1 17fb c402 | | Store 0x2,0x2 17fc 00db | | Load_Top At_Offset_3 17fd e5fe | | Load 0x2,-0x2 17fe 01d7 | | Execute Vector,Field_Read 17ff 00d9 | | Load_Top At_Offset_1 1800 e5ff | | Load 0x2,-0x1 1801 01d7 | | Execute Vector,Field_Read 1802 027e | ~ | Execute Discrete,Not_Equal 1803 680e |h | Jump_Zero 0x1812 1804 00d8 | | Load_Top At_Offset_0 1805 a5fd | | Store_Unchecked 0x2,-0x3 1806 00cf | | Action Mark_Auxiliary 1807 7804 |x | Jump 0x180c 1808 e5fd | | Load 0x2,-0x3 1809 0a01 | | Execute_Immediate Plus,0x1 180a c5fd | | Store 0x2,-0x3 180b 00c9 | | Action Pop_Auxiliary_Loop 180c e5fd | | Load 0x2,-0x3 180d e5ff | | Load 0x2,-0x1 180e 01d7 | | Execute Vector,Field_Read 180f 0f5f | _ | Execute_Immediate Equal,0x5f 1810 77f7 |w | Jump_Nonzero 0x1808 1811 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1812 00c8 | | Action Pop_Auxiliary_Range 1813 3fe5 |? | Loop_Increasing 0x17f9 1814 00ce | | Action Pop_Auxiliary 1815 00db | | Load_Top At_Offset_3 1816 01dc | | Execute Vector,Last 1817 0a01 | | Execute_Immediate Plus,0x1 1818 c5fd | | Store 0x2,-0x3 1819 4503 |E | Exit_Suprogram New_Top_Offset 0x3 181a TRAP_17b0: 181a 0007 | | Action Break_Optional 181b 4800 |H | Short_Literal 0x0 181c a5fc | | Store_Unchecked 0x2,-0x4 181d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 181e 0000 0000 | | .XXX[0x2] 1820 ; -------------------------------------------------------------------------------------- 1820 ; SUBPROGRAM 1820 ; -------------------------------------------------------------------------------------- 1820 183f | ? | .CONST 0x183f ; Address of begin 1821 191a | | .CONST 0x191a ; Address of exception handler 1822 000b | | .CONST 0x000b ; Number of locals 1823 INIT_1820: 1823 00e2 | | Load_Encached Integer_Cache 1824 00e2 | | Load_Encached Integer_Cache 1825 00e7 | | Load_Encached Duration_Cache 1826 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1827 00e7 | | Load_Encached Duration_Cache 1828 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1829 6116 |a | Indirect_Literal Discrete,0x1940,{0x00000000, 0xa8c00000} 182a 00e7 | | Load_Encached Duration_Cache 182b 03f1 | | Declare_Variable Discrete,With_Value 182c 4800 |H | Short_Literal 0x0 182d e5ff | | Load 0x2,-0x1 182e 0092 2c0e | , | Action Push_String_Extended,0x2c0e ; "AT" 1830 e02f | / | Load 0x0,0x2f 1831 181d | | Execute Package,Field_Execute,Field_Number 0x1d 1832 00e2 | | Load_Encached Integer_Cache 1833 03f1 | | Declare_Variable Discrete,With_Value 1834 e5ff | | Load 0x2,-0x1 1835 01dd | | Execute Vector,First 1836 00e2 | | Load_Encached Integer_Cache 1837 03f1 | | Declare_Variable Discrete,With_Value 1838 e030 | 0 | Load 0x0,0x30 1839 1b14 | | Execute Package,Field_Read,Field_Number 0x14 183a 0322 | " | Declare_Variable Record 183b e030 | 0 | Load 0x0,0x30 183c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 183d 0322 | " | Declare_Variable Record 183e 00e2 | | Load_Encached Integer_Cache 183f BODY_1820: 183f e407 | | Load 0x2,0x7 1840 7004 |p | Jump_Nonzero 0x1845 1841 e5ff | | Load 0x2,-0x1 1842 01dc | | Execute Vector,Last 1843 0a01 | | Execute_Immediate Plus,0x1 1844 c407 | | Store 0x2,0x7 1845 00e2 | | Load_Encached Integer_Cache 1846 e408 | | Load 0x2,0x8 1847 e2ae | | Load 0x1,0xae 1848 e408 | | Load 0x2,0x8 1849 e407 | | Load 0x2,0x7 184a 0aff | | Execute_Immediate Plus,-0x1 184b 00d8 | | Load_Top At_Offset_0 184c 00e2 | | Load_Encached Integer_Cache 184d 0260 | ` | Execute Discrete,In_Type 184e 7001 |p | Jump_Nonzero 0x1850 184f 0801 | | Execute_Immediate Raise,0x1 1850 e5ff | | Load 0x2,-0x1 1851 01cf | | Execute Vector,Slice_Read 1852 82af | | Call 0x1,0xaf 1853 c408 | | Store 0x2,0x8 1854 c402 | | Store 0x2,0x2 1855 e402 | | Load 0x2,0x2 1856 00d8 | | Load_Top At_Offset_0 1857 4801 |H | Short_Literal 0x1 1858 4807 |H | Short_Literal 0x7 1859 0262 | b | Execute Discrete,In_Range 185a 7015 |p | Jump_Nonzero 0x1870 185b 0b08 | | Execute_Immediate Case_Compare,0x8 185c 702e |p. | Jump_Nonzero 0x188b 185d 0f09 | | Execute_Immediate Equal,0x9 185e 7032 |p2 | Jump_Nonzero 0x1891 185f 00db | | Load_Top At_Offset_3 1860 e407 | | Load 0x2,0x7 1861 0aff | | Execute_Immediate Plus,-0x1 1862 00d8 | | Load_Top At_Offset_0 1863 00e2 | | Load_Encached Integer_Cache 1864 0260 | ` | Execute Discrete,In_Type 1865 7001 |p | Jump_Nonzero 0x1867 1866 0801 | | Execute_Immediate Raise,0x1 1867 e5ff | | Load 0x2,-0x1 1868 01cf | | Execute Vector,Slice_Read 1869 e030 | 0 | Load 0x0,0x30 186a 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 186b 00db | | Load_Top At_Offset_3 186c 017d | } | Execute Record,Structure_Write 186d e407 | | Load 0x2,0x7 186e a408 | | Store_Unchecked 0x2,0x8 186f 7827 |x' | Jump 0x1897 1870 00d1 | | Pop_Control Pop_Count_1 1871 e030 | 0 | Load 0x0,0x30 1872 1815 | | Execute Package,Field_Execute,Field_Number 0x15 1873 00db | | Load_Top At_Offset_3 1874 017d | } | Execute Record,Structure_Write 1875 e402 | | Load 0x2,0x2 1876 00db | | Load_Top At_Offset_3 1877 e030 | 0 | Load 0x0,0x30 1878 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 1879 0272 | r | Execute Discrete,Minus 187a c403 | | Store 0x2,0x3 187b e403 | | Load 0x2,0x3 187c 0c00 | | Execute_Immediate Greater_Equal,0x0 187d 6803 |h | Jump_Zero 0x1881 187e e403 | | Load 0x2,0x3 187f 0af9 | | Execute_Immediate Plus,-0x7 1880 c403 | | Store 0x2,0x3 1881 60be |` | Indirect_Literal Discrete,0x1940,{0x00000000, 0xa8c00000} 1882 e403 | | Load 0x2,0x3 1883 0271 | q | Execute Discrete,Times 1884 00d8 | | Load_Top At_Offset_0 1885 00e7 | | Load_Encached Duration_Cache 1886 0260 | ` | Execute Discrete,In_Type 1887 7001 |p | Jump_Nonzero 0x1889 1888 0801 | | Execute_Immediate Raise,0x1 1889 a404 | | Store_Unchecked 0x2,0x4 188a 780c |x | Jump 0x1897 188b 00d1 | | Pop_Control Pop_Count_1 188c e030 | 0 | Load 0x0,0x30 188d 1815 | | Execute Package,Field_Execute,Field_Number 0x15 188e 00db | | Load_Top At_Offset_3 188f 017d | } | Execute Record,Structure_Write 1890 7806 |x | Jump 0x1897 1891 e030 | 0 | Load 0x0,0x30 1892 1815 | | Execute Package,Field_Execute,Field_Number 0x15 1893 00db | | Load_Top At_Offset_3 1894 017d | } | Execute Record,Structure_Write 1895 60a6 |` | Indirect_Literal Discrete,0x193c,{0xffffffff, 0x57400000} 1896 a404 | | Store_Unchecked 0x2,0x4 1897 00db | | Load_Top At_Offset_3 1898 e407 | | Load 0x2,0x7 1899 027c | | | Execute Discrete,Less 189a 6801 |h | Jump_Zero 0x189c 189b 08e0 | | Execute_Immediate Raise,0xe0 189c e407 | | Load 0x2,0x7 189d e5ff | | Load 0x2,-0x1 189e 01dc | | Execute Vector,Last 189f 027c | | | Execute Discrete,Less 18a0 6844 |hD | Jump_Zero 0x18e5 18a1 e407 | | Load 0x2,0x7 18a2 0a02 | | Execute_Immediate Plus,0x2 18a3 c407 | | Store 0x2,0x7 18a4 00e2 | | Load_Encached Integer_Cache 18a5 e407 | | Load 0x2,0x7 18a6 e2ae | | Load 0x1,0xae 18a7 e5ff | | Load 0x2,-0x1 18a8 82af | | Call 0x1,0xaf 18a9 c407 | | Store 0x2,0x7 18aa c402 | | Store 0x2,0x2 18ab e402 | | Load 0x2,0x2 18ac 0b16 | | Execute_Immediate Case_Compare,0x16 18ad 7029 |p) | Jump_Nonzero 0x18d7 18ae 0f17 | | Execute_Immediate Equal,0x17 18af 702b |p+ | Jump_Nonzero 0x18db 18b0 e407 | | Load 0x2,0x7 18b1 e5ff | | Load 0x2,-0x1 18b2 01dc | | Execute Vector,Last 18b3 e5ff | | Load 0x2,-0x1 18b4 01cf | | Execute Vector,Slice_Read 18b5 e030 | 0 | Load 0x0,0x30 18b6 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 18b7 00da | | Load_Top At_Offset_2 18b8 017d | } | Execute Record,Structure_Write 18b9 e5ff | | Load 0x2,-0x1 18ba 01dc | | Execute Vector,Last 18bb 0a01 | | Execute_Immediate Plus,0x1 18bc c407 | | Store 0x2,0x7 18bd 00d9 | | Load_Top At_Offset_1 18be 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 18bf 480c |H | Short_Literal 0xc 18c0 026e | n | Execute Discrete,Modulo 18c1 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 18c2 00d9 | | Load_Top At_Offset_1 18c3 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 18c4 0f01 | | Execute_Immediate Equal,0x1 18c5 6803 |h | Jump_Zero 0x18c9 18c6 00d8 | | Load_Top At_Offset_0 18c7 0a0c | | Execute_Immediate Plus,0xc 18c8 0059 | Y | Store_Top Discrete,At_Offset_1 18c9 606e |`n | Indirect_Literal Discrete,0x1938,{0x00000000, 0x00000e10} 18ca 00d9 | | Load_Top At_Offset_1 18cb 0271 | q | Execute Discrete,Times 18cc 483c |H< | Short_Literal 0x3c 18cd 00db | | Load_Top At_Offset_3 18ce 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 18cf 0271 | q | Execute Discrete,Times 18d0 0273 | s | Execute Discrete,Plus 18d1 00da | | Load_Top At_Offset_2 18d2 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 18d3 0273 | s | Execute Discrete,Plus 18d4 090f | | Execute_Immediate Binary_Scale,0xf 18d5 a405 | | Store_Unchecked 0x2,0x5 18d6 7806 |x | Jump 0x18dd 18d7 00d1 | | Pop_Control Pop_Count_1 18d8 605b |`[ | Indirect_Literal Discrete,0x1934,{0x00000000, 0x54600000} 18d9 a405 | | Store_Unchecked 0x2,0x5 18da 7802 |x | Jump 0x18dd 18db 6064 |`d | Indirect_Literal Discrete,0x1940,{0x00000000, 0xa8c00000} 18dc a405 | | Store_Unchecked 0x2,0x5 18dd e405 | | Load 0x2,0x5 18de a406 | | Store_Unchecked 0x2,0x6 18df e407 | | Load 0x2,0x7 18e0 e5ff | | Load 0x2,-0x1 18e1 01dc | | Execute Vector,Last 18e2 027a | z | Execute Discrete,Less_Equal 18e3 6801 |h | Jump_Zero 0x18e5 18e4 08e0 | | Execute_Immediate Raise,0xe0 18e5 e404 | | Load 0x2,0x4 18e6 e405 | | Load 0x2,0x5 18e7 e004 | | Load 0x0,0x4 18e8 1b11 | | Execute Package,Field_Read,Field_Number 0x11 18e9 00d9 | | Load_Top At_Offset_1 18ea 00d0 | | Action Swap_Control 18eb 0260 | ` | Execute Discrete,In_Type 18ec 7001 |p | Jump_Nonzero 0x18ee 18ed 0801 | | Execute_Immediate Raise,0x1 18ee e409 | | Load 0x2,0x9 18ef 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 18f0 e409 | | Load 0x2,0x9 18f1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 18f2 0a01 | | Execute_Immediate Plus,0x1 18f3 00d8 | | Load_Top At_Offset_0 18f4 e004 | | Load 0x0,0x4 18f5 1b0f | | Execute Package,Field_Read,Field_Number 0xf 18f6 0260 | ` | Execute Discrete,In_Type 18f7 7001 |p | Jump_Nonzero 0x18f9 18f8 0801 | | Execute_Immediate Raise,0x1 18f9 e409 | | Load 0x2,0x9 18fa 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 18fb e004 | | Load 0x0,0x4 18fc 1818 | | Execute Package,Field_Execute,Field_Number 0x18 18fd 829a | | Call 0x1,0x9a 18fe c5fd | | Store 0x2,-0x3 18ff e404 | | Load 0x2,0x4 1900 e406 | | Load 0x2,0x6 1901 e004 | | Load 0x0,0x4 1902 1b11 | | Execute Package,Field_Read,Field_Number 0x11 1903 00d9 | | Load_Top At_Offset_1 1904 00d0 | | Action Swap_Control 1905 0260 | ` | Execute Discrete,In_Type 1906 7001 |p | Jump_Nonzero 0x1908 1907 0801 | | Execute_Immediate Raise,0x1 1908 e409 | | Load 0x2,0x9 1909 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 190a e409 | | Load 0x2,0x9 190b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 190c 0a01 | | Execute_Immediate Plus,0x1 190d 00d8 | | Load_Top At_Offset_0 190e e004 | | Load 0x0,0x4 190f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1910 0260 | ` | Execute Discrete,In_Type 1911 7001 |p | Jump_Nonzero 0x1913 1912 0801 | | Execute_Immediate Raise,0x1 1913 e409 | | Load 0x2,0x9 1914 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 1915 e004 | | Load 0x0,0x4 1916 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1917 829a | | Call 0x1,0x9a 1918 c5fe | | Store 0x2,-0x2 1919 4502 |E | Exit_Suprogram New_Top_Offset 0x2 191a TRAP_1820: 191a 0007 | | Action Break_Optional 191b e002 | | Load 0x0,0x2 191c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 191d 4801 |H | Short_Literal 0x1 191e 4801 |H | Short_Literal 0x1 191f e00e | | Load 0x0,0xe 1920 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1921 035b | [ | Declare_Type Array,Constrained 1922 0337 | 7 | Declare_Variable Array 1923 e5ff | | Load 0x2,-0x1 1924 e00e | | Load 0x0,0xe 1925 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1926 4801 |H | Short_Literal 0x1 1927 00da | | Load_Top At_Offset_2 1928 01d6 | | Execute Vector,Field_Write 1929 6006 |` | Indirect_Literal Discrete,0x1930,{0x00000000, 0x00002825} 192a e002 | | Load 0x0,0x2 192b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 192c c5fc | | Store 0x2,-0x4 192d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 192e 0000 0000 | | .XXX[0x2] 1930 0000 0000 | | .LITERAL {0x00000000, 0x00002825} 1934 0000 0000 | | .LITERAL {0x00000000, 0x54600000} 1938 0000 0000 | | .LITERAL {0x00000000, 0x00000e10} 193c ffff ffff | | .LITERAL {0xffffffff, 0x57400000} 1940 0000 0000 | | .LITERAL {0x00000000, 0xa8c00000} 1944 0000 0000 | | .BLANK 0000[0x4] 1948 ; -------------------------------------------------------------------------------------- 1948 ; SUBPROGRAM 1948 ; -------------------------------------------------------------------------------------- 1948 1961 | a | .CONST 0x1961 ; Address of begin 1949 0004 | | .CONST 0x0004 ; Address of exception handler 194a 0004 | | .CONST 0x0004 ; Number of locals 194b INIT_1948: 194b 4800 |H | Short_Literal 0x0 194c e5fe | | Load 0x2,-0x2 194d 0092 2c0f | , | Action Push_String_Extended,0x2c0f ; ".." 194f e02f | / | Load 0x0,0x2f 1950 181d | | Execute Package,Field_Execute,Field_Number 0x1d 1951 00e2 | | Load_Encached Integer_Cache 1952 03f1 | | Declare_Variable Discrete,With_Value 1953 00db | | Load_Top At_Offset_3 1954 e2aa | | Load 0x1,0xaa 1955 01d7 | | Execute Vector,Field_Read 1956 e5fc | | Load 0x2,-0x4 1957 01dc | | Execute Vector,Last 1958 e2ab | | Load 0x1,0xab 1959 1c08 | | Execute_Immediate Run_Utility,0x8 195a 00d8 | | Load_Top At_Offset_0 195b 1c00 | | Execute_Immediate Run_Utility,0x0 195c e004 | | Load 0x0,0x4 195d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 195e 02c7 | | Declare_Variable Any 195f 00d8 | | Load_Top At_Offset_0 1960 1c00 | | Execute_Immediate Run_Utility,0x0 1961 BODY_1948: 1961 00da | | Load_Top At_Offset_2 1962 0c01 | | Execute_Immediate Greater_Equal,0x1 1963 685e |h^ | Jump_Zero 0x19c2 1964 00da | | Load_Top At_Offset_2 1965 e5fe | | Load 0x2,-0x2 1966 01dd | | Execute Vector,First 1967 027f | | Execute Discrete,Equal 1968 6805 |h | Jump_Zero 0x196e 1969 e003 | | Load 0x0,0x3 196a 180f | | Execute Package,Field_Execute,Field_Number 0xf 196b 00da | | Load_Top At_Offset_2 196c 2a0c |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc 196d 7824 |x$ | Jump 0x1992 196e e5fb | | Load 0x2,-0x5 196f 00d9 | | Load_Top At_Offset_1 1970 0120 | | Execute Any,Is_Value 1971 6803 |h | Jump_Zero 0x1975 1972 e004 | | Load 0x0,0x4 1973 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1974 7801 |x | Jump 0x1976 1975 00d9 | | Load_Top At_Offset_1 1976 00db | | Load_Top At_Offset_3 1977 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 1978 0120 | | Execute Any,Is_Value 1979 6806 |h | Jump_Zero 0x1980 197a e004 | | Load 0x0,0x4 197b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 197c e403 | | Load 0x2,0x3 197d 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 197e 00d1 | | Pop_Control Pop_Count_1 197f 7802 |x | Jump 0x1982 1980 00db | | Load_Top At_Offset_3 1981 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 1982 e5fe | | Load 0x2,-0x2 1983 01dd | | Execute Vector,First 1984 e402 | | Load 0x2,0x2 1985 0aff | | Execute_Immediate Plus,-0x1 1986 00d8 | | Load_Top At_Offset_0 1987 00e2 | | Load_Encached Integer_Cache 1988 0260 | ` | Execute Discrete,In_Type 1989 7001 |p | Jump_Nonzero 0x198b 198a 0801 | | Execute_Immediate Raise,0x1 198b e5fe | | Load 0x2,-0x2 198c 01cf | | Execute Vector,Slice_Read 198d 82b0 | | Call 0x1,0xb0 198e e403 | | Load 0x2,0x3 198f 2a0c |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc 1990 c404 | | Store 0x2,0x4 1991 c5fb | | Store 0x2,-0x5 1992 00da | | Load_Top At_Offset_2 1993 0a02 | | Execute_Immediate Plus,0x2 1994 e5fe | | Load 0x2,-0x2 1995 01dc | | Execute Vector,Last 1996 027d | } | Execute Discrete,Greater 1997 6805 |h | Jump_Zero 0x199d 1998 e003 | | Load 0x0,0x3 1999 1810 | | Execute Package,Field_Execute,Field_Number 0x10 199a 00da | | Load_Top At_Offset_2 199b 2a0d |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd 199c 7845 |xE | Jump 0x19e2 199d e5fb | | Load 0x2,-0x5 199e 00da | | Load_Top At_Offset_2 199f 2e0d |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd 19a0 0120 | | Execute Any,Is_Value 19a1 6806 |h | Jump_Zero 0x19a8 19a2 e004 | | Load 0x0,0x4 19a3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 19a4 00db | | Load_Top At_Offset_3 19a5 2e0d |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd 19a6 00d1 | | Pop_Control Pop_Count_1 19a7 7802 |x | Jump 0x19aa 19a8 00da | | Load_Top At_Offset_2 19a9 2e0d |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd 19aa 00da | | Load_Top At_Offset_2 19ab 0120 | | Execute Any,Is_Value 19ac 6803 |h | Jump_Zero 0x19b0 19ad e004 | | Load 0x0,0x4 19ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd 19af 7801 |x | Jump 0x19b1 19b0 00da | | Load_Top At_Offset_2 19b1 e402 | | Load 0x2,0x2 19b2 0a02 | | Execute_Immediate Plus,0x2 19b3 00d8 | | Load_Top At_Offset_0 19b4 00e2 | | Load_Encached Integer_Cache 19b5 0260 | ` | Execute Discrete,In_Type 19b6 7001 |p | Jump_Nonzero 0x19b8 19b7 0801 | | Execute_Immediate Raise,0x1 19b8 e5fe | | Load 0x2,-0x2 19b9 01dc | | Execute Vector,Last 19ba e5fe | | Load 0x2,-0x2 19bb 01cf | | Execute Vector,Slice_Read 19bc 82b0 | | Call 0x1,0xb0 19bd c404 | | Store 0x2,0x4 19be 00db | | Load_Top At_Offset_3 19bf 2a0d |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd 19c0 c5fb | | Store 0x2,-0x5 19c1 7820 |x | Jump 0x19e2 19c2 e5fb | | Load 0x2,-0x5 19c3 00da | | Load_Top At_Offset_2 19c4 2e0d |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd 19c5 0120 | | Execute Any,Is_Value 19c6 6806 |h | Jump_Zero 0x19cd 19c7 e004 | | Load 0x0,0x4 19c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 19c9 00db | | Load_Top At_Offset_3 19ca 2e0d |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd 19cb 00d1 | | Pop_Control Pop_Count_1 19cc 7802 |x | Jump 0x19cf 19cd 00da | | Load_Top At_Offset_2 19ce 2e0d |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd 19cf 00db | | Load_Top At_Offset_3 19d0 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 19d1 0120 | | Execute Any,Is_Value 19d2 6806 |h | Jump_Zero 0x19d9 19d3 e004 | | Load 0x0,0x4 19d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 19d5 e403 | | Load 0x2,0x3 19d6 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 19d7 00d1 | | Pop_Control Pop_Count_1 19d8 7802 |x | Jump 0x19db 19d9 00db | | Load_Top At_Offset_3 19da 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 19db e5fe | | Load 0x2,-0x2 19dc 82b0 | | Call 0x1,0xb0 19dd e403 | | Load 0x2,0x3 19de 2a0c |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc 19df 00db | | Load_Top At_Offset_3 19e0 2a0d |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd 19e1 c5fb | | Store 0x2,-0x5 19e2 e5fc | | Load 0x2,-0x4 19e3 00da | | Load_Top At_Offset_2 19e4 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 19e5 00d9 | | Load_Top At_Offset_1 19e6 e2ac | | Load 0x1,0xac 19e7 03b6 | | Declare_Variable Access,By_Allocation,With_Value 19e8 a5fd | | Store_Unchecked 0x2,-0x3 19e9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 19ea 0000 0000 | | .BLANK 0000[0x6] 19f0 ; -------------------------------------------------------------------------------------- 19f0 ; SUBPROGRAM 19f0 ; -------------------------------------------------------------------------------------- 19f0 1a07 | | .CONST 0x1a07 ; Address of begin 19f1 0004 | | .CONST 0x0004 ; Address of exception handler 19f2 0003 | | .CONST 0x0003 ; Number of locals 19f3 INIT_19f0: 19f3 4800 |H | Short_Literal 0x0 19f4 e5fe | | Load 0x2,-0x2 19f5 0092 2c0f | , | Action Push_String_Extended,0x2c0f ; ".." 19f7 e02f | / | Load 0x0,0x2f 19f8 181d | | Execute Package,Field_Execute,Field_Number 0x1d 19f9 00e2 | | Load_Encached Integer_Cache 19fa 03f1 | | Declare_Variable Discrete,With_Value 19fb 00db | | Load_Top At_Offset_3 19fc e2aa | | Load 0x1,0xaa 19fd 01d7 | | Execute Vector,Field_Read 19fe e5fc | | Load 0x2,-0x4 19ff 01dc | | Execute Vector,Last 1a00 e2ab | | Load 0x1,0xab 1a01 1c08 | | Execute_Immediate Run_Utility,0x8 1a02 e2ac | | Load 0x1,0xac 1a03 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1a04 00d8 | | Load_Top At_Offset_0 1a05 0227 | ' | Execute Access,All_Reference 1a06 1c00 | | Execute_Immediate Run_Utility,0x0 1a07 BODY_19f0: 1a07 00d9 | | Load_Top At_Offset_1 1a08 0c01 | | Execute_Immediate Greater_Equal,0x1 1a09 6838 |h8 | Jump_Zero 0x1a42 1a0a 00d9 | | Load_Top At_Offset_1 1a0b e5fe | | Load 0x2,-0x2 1a0c 01dd | | Execute Vector,First 1a0d 027f | | Execute Discrete,Equal 1a0e 6805 |h | Jump_Zero 0x1a14 1a0f 6044 |`D | Indirect_Literal Discrete,0x1a54,{0xffffffff, 0x80000001} 1a10 00d9 | | Load_Top At_Offset_1 1a11 0227 | ' | Execute Access,All_Reference 1a12 2a0f |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf 1a13 7811 |x | Jump 0x1a25 1a14 e5fe | | Load 0x2,-0x2 1a15 01dd | | Execute Vector,First 1a16 00da | | Load_Top At_Offset_2 1a17 0aff | | Execute_Immediate Plus,-0x1 1a18 00d8 | | Load_Top At_Offset_0 1a19 00e2 | | Load_Encached Integer_Cache 1a1a 0260 | ` | Execute Discrete,In_Type 1a1b 7001 |p | Jump_Nonzero 0x1a1d 1a1c 0801 | | Execute_Immediate Raise,0x1 1a1d e5fe | | Load 0x2,-0x2 1a1e 01cf | | Execute Vector,Slice_Read 1a1f 00e2 | | Load_Encached Integer_Cache 1a20 00e0 | | Load_Encached Standard_Cache 1a21 1819 | | Execute Package,Field_Execute,Field_Number 0x19 1a22 00d9 | | Load_Top At_Offset_1 1a23 0227 | ' | Execute Access,All_Reference 1a24 2a0f |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf 1a25 00d9 | | Load_Top At_Offset_1 1a26 0a02 | | Execute_Immediate Plus,0x2 1a27 e5fe | | Load 0x2,-0x2 1a28 01dc | | Execute Vector,Last 1a29 027d | } | Execute Discrete,Greater 1a2a 6805 |h | Jump_Zero 0x1a30 1a2b 6024 |`$ | Indirect_Literal Discrete,0x1a50,{0x00000000, 0x7fffffff} 1a2c 00d9 | | Load_Top At_Offset_1 1a2d 0227 | ' | Execute Access,All_Reference 1a2e 2a10 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10 1a2f 7819 |x | Jump 0x1a49 1a30 00d9 | | Load_Top At_Offset_1 1a31 0a02 | | Execute_Immediate Plus,0x2 1a32 00d8 | | Load_Top At_Offset_0 1a33 00e2 | | Load_Encached Integer_Cache 1a34 0260 | ` | Execute Discrete,In_Type 1a35 7001 |p | Jump_Nonzero 0x1a37 1a36 0801 | | Execute_Immediate Raise,0x1 1a37 e5fe | | Load 0x2,-0x2 1a38 01dc | | Execute Vector,Last 1a39 e5fe | | Load 0x2,-0x2 1a3a 01cf | | Execute Vector,Slice_Read 1a3b 00e2 | | Load_Encached Integer_Cache 1a3c 00e0 | | Load_Encached Standard_Cache 1a3d 1819 | | Execute Package,Field_Execute,Field_Number 0x19 1a3e 00d9 | | Load_Top At_Offset_1 1a3f 0227 | ' | Execute Access,All_Reference 1a40 2a10 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10 1a41 7807 |x | Jump 0x1a49 1a42 e5fe | | Load 0x2,-0x2 1a43 00e2 | | Load_Encached Integer_Cache 1a44 00e0 | | Load_Encached Standard_Cache 1a45 1819 | | Execute Package,Field_Execute,Field_Number 0x19 1a46 00d9 | | Load_Top At_Offset_1 1a47 0227 | ' | Execute Access,All_Reference 1a48 2a0f |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf 1a49 e5fc | | Load 0x2,-0x4 1a4a 00d9 | | Load_Top At_Offset_1 1a4b 0227 | ' | Execute Access,All_Reference 1a4c 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1a4d 00d8 | | Load_Top At_Offset_0 1a4e a5fd | | Store_Unchecked 0x2,-0x3 1a4f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1a50 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 1a54 ffff ffff | | .LITERAL {0xffffffff, 0x80000001} 1a58 ; -------------------------------------------------------------------------------------- 1a58 ; SUBPROGRAM 1a58 ; -------------------------------------------------------------------------------------- 1a58 1a6d | m | .CONST 0x1a6d ; Address of begin 1a59 0004 | | .CONST 0x0004 ; Address of exception handler 1a5a 0003 | | .CONST 0x0003 ; Number of locals 1a5b INIT_1a58: 1a5b 4801 |H | Short_Literal 0x1 1a5c 00db | | Load_Top At_Offset_3 1a5d 01db | | Execute Vector,Length 1a5e 00d8 | | Load_Top At_Offset_0 1a5f 00e2 | | Load_Encached Integer_Cache 1a60 0260 | ` | Execute Discrete,In_Type 1a61 7001 |p | Jump_Nonzero 0x1a63 1a62 0801 | | Execute_Immediate Raise,0x1 1a63 00e9 | | Load_Encached String_Cache 1a64 035b | [ | Declare_Type Array,Constrained 1a65 0337 | 7 | Declare_Variable Array 1a66 00db | | Load_Top At_Offset_3 1a67 e02f | / | Load 0x0,0x2f 1a68 1814 | | Execute Package,Field_Execute,Field_Number 0x14 1a69 00d9 | | Load_Top At_Offset_1 1a6a 01d4 | | Execute Vector,Structure_Write 1a6b 00e2 | | Load_Encached Integer_Cache 1a6c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1a6d BODY_1a58: 1a6d 00cf | | Action Mark_Auxiliary 1a6e 00da | | Load_Top At_Offset_2 1a6f 01d9 | | Execute Vector,Reverse_Bounds 1a70 0263 | c | Execute Discrete,Above_Bound 1a71 701b |p | Jump_Nonzero 0x1a8d 1a72 00d8 | | Load_Top At_Offset_0 1a73 e402 | | Load 0x2,0x2 1a74 01d7 | | Execute Vector,Field_Read 1a75 00d8 | | Load_Top At_Offset_0 1a76 4809 |H | Short_Literal 0x9 1a77 4820 |H | Short_Literal 0x20 1a78 0262 | b | Execute Discrete,In_Range 1a79 6807 |h | Jump_Zero 0x1a81 1a7a 0b0b | | Execute_Immediate Case_Compare,0xb 1a7b 7005 |p | Jump_Nonzero 0x1a81 1a7c 480d |H | Short_Literal 0xd 1a7d 481f |H | Short_Literal 0x1f 1a7e 0262 | b | Execute Discrete,In_Range 1a7f 7002 |p | Jump_Nonzero 0x1a82 1a80 780a |x | Jump 0x1a8b 1a81 00d1 | | Pop_Control Pop_Count_1 1a82 00db | | Load_Top At_Offset_3 1a83 0a01 | | Execute_Immediate Plus,0x1 1a84 c403 | | Store 0x2,0x3 1a85 00d8 | | Load_Top At_Offset_0 1a86 e402 | | Load 0x2,0x2 1a87 01d7 | | Execute Vector,Field_Read 1a88 e403 | | Load 0x2,0x3 1a89 e402 | | Load 0x2,0x2 1a8a 01d6 | | Execute Vector,Field_Write 1a8b 00c8 | | Action Pop_Auxiliary_Range 1a8c 3fe5 |? | Loop_Increasing 0x1a72 1a8d 00ce | | Action Pop_Auxiliary 1a8e 4801 |H | Short_Literal 0x1 1a8f 00d9 | | Load_Top At_Offset_1 1a90 00db | | Load_Top At_Offset_3 1a91 01cf | | Execute Vector,Slice_Read 1a92 00e9 | | Load_Encached String_Cache 1a93 01c6 | | Execute Vector,Convert_To_Formal 1a94 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1a95 0000 0000 | | .XXX[0x3] 1a97 0000 | | 1a98 ; -------------------------------------------------------------------------------------- 1a98 ; SUBPROGRAM 1a98 ; -------------------------------------------------------------------------------------- 1a98 1aaa | | .CONST 0x1aaa ; Address of begin 1a99 0004 | | .CONST 0x0004 ; Address of exception handler 1a9a 0008 | | .CONST 0x0008 ; Number of locals 1a9b INIT_1a98: 1a9b e2ac | | Load 0x1,0xac 1a9c 0007 | | Action Break_Optional 1a9d e00d | | Load 0x0,0xd 1a9e 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 1a9f 02c7 | | Declare_Variable Any 1aa0 00d8 | | Load_Top At_Offset_0 1aa1 1c00 | | Execute_Immediate Run_Utility,0x0 1aa2 e00d | | Load 0x0,0xd 1aa3 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 1aa4 e2a1 | | Load 0x1,0xa1 1aa5 0007 | | Action Break_Optional 1aa6 e2a0 | | Load 0x1,0xa0 1aa7 0007 | | Action Break_Optional 1aa8 00e1 | | Load_Encached Boolean_Cache 1aa9 03e9 | | Declare_Variable Discrete,Duplicate 1aaa BODY_1a98: 1aaa e5ff | | Load 0x2,-0x1 1aab 4612 |F | Jump_Case 0x13 1aac 781c |x | Jump 0x1ac9 ; case 0x0 1aad 7872 |xr | Jump 0x1b20 ; case 0x1 1aae 7965 |ye | Jump 0x1c14 ; case 0x2 1aaf 7964 |yd | Jump 0x1c14 ; case 0x3 1ab0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x4 1ab1 7894 |x | Jump 0x1b46 ; case 0x5 1ab2 78fa |x | Jump 0x1bad ; case 0x6 1ab3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x7 1ab4 7982 |y | Jump 0x1c37 ; case 0x8 1ab5 7981 |y | Jump 0x1c37 ; case 0x9 1ab6 7980 |y | Jump 0x1c37 ; case 0xa 1ab7 797f |y | Jump 0x1c37 ; case 0xb 1ab8 797e |y~ | Jump 0x1c37 ; case 0xc 1ab9 7987 |y | Jump 0x1c41 ; case 0xd 1aba 7986 |y | Jump 0x1c41 ; case 0xe 1abb 7985 |y | Jump 0x1c41 ; case 0xf 1abc 7984 |y | Jump 0x1c41 ; case 0x10 1abd 7801 |x | Jump 0x1abf ; case 0x11 1abe 7800 |x | Jump 0x1abf ; case 0x12 1abf e5fb | | Load 0x2,-0x5 1ac0 e5fc | | Load 0x2,-0x4 1ac1 e2ac | | Load 0x1,0xac 1ac2 e5fe | | Load 0x2,-0x2 1ac3 e5ff | | Load 0x2,-0x1 1ac4 82b2 | | Call 0x1,0xb2 1ac5 c5fd | | Store 0x2,-0x3 1ac6 00d1 | | Pop_Control Pop_Count_1 1ac7 c5fb | | Store 0x2,-0x5 1ac8 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1ac9 e5fe | | Load 0x2,-0x2 1aca e00d | | Load 0x0,0xd 1acb 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 1acc c403 | | Store 0x2,0x3 1acd e403 | | Load 0x2,0x3 1ace e00d | | Load 0x0,0xd 1acf 181f | | Execute Package,Field_Execute,Field_Number 0x1f 1ad0 7025 |p% | Jump_Nonzero 0x1af6 1ad1 4804 |H | Short_Literal 0x4 1ad2 e5fc | | Load 0x2,-0x4 1ad3 01dc | | Execute Vector,Last 1ad4 e2ab | | Load 0x1,0xab 1ad5 1c08 | | Execute_Immediate Run_Utility,0x8 1ad6 e2ac | | Load 0x1,0xac 1ad7 00d9 | | Load_Top At_Offset_1 1ad8 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1ad9 e5fc | | Load 0x2,-0x4 1ada 00d9 | | Load_Top At_Offset_1 1adb 00d8 | | Load_Top At_Offset_0 1adc 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1add 00da | | Load_Top At_Offset_2 1ade 01da | | Execute Vector,Bounds 1adf 00da | | Load_Top At_Offset_2 1ae0 01da | | Execute Vector,Bounds 1ae1 00da | | Load_Top At_Offset_2 1ae2 027f | | Execute Discrete,Equal 1ae3 7001 |p | Jump_Nonzero 0x1ae5 1ae4 08e0 | | Execute_Immediate Raise,0xe0 1ae5 00cd | | Action Spare6_Action 1ae6 027f | | Execute Discrete,Equal 1ae7 7001 |p | Jump_Nonzero 0x1ae9 1ae8 08e0 | | Execute_Immediate Raise,0xe0 1ae9 00d2 | | Pop_Control Pop_Count_2 1aea 00d9 | | Load_Top At_Offset_1 1aeb 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1aec e403 | | Load 0x2,0x3 1aed e2ab | | Load 0x1,0xab 1aee 2306 |# | Execute Variant_Record,Field_Type,Field_Number 0x6 1aef 0119 | | Execute Any,Check_In_Formal_Type 1af0 00d9 | | Load_Top At_Offset_1 1af1 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 1af2 e2ac | | Load 0x1,0xac 1af3 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1af4 a5fd | | Store_Unchecked 0x2,-0x3 1af5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1af6 e5fe | | Load 0x2,-0x2 1af7 e00d | | Load 0x0,0xd 1af8 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 1af9 a404 | | Store_Unchecked 0x2,0x4 1afa e404 | | Load 0x2,0x4 1afb e00d | | Load 0x0,0xd 1afc 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 1afd 6960 |i` | Jump_Zero 0x1c5e 1afe 4805 |H | Short_Literal 0x5 1aff e5fc | | Load 0x2,-0x4 1b00 01dc | | Execute Vector,Last 1b01 e2ab | | Load 0x1,0xab 1b02 1c08 | | Execute_Immediate Run_Utility,0x8 1b03 e2ac | | Load 0x1,0xac 1b04 00d9 | | Load_Top At_Offset_1 1b05 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1b06 e5fc | | Load 0x2,-0x4 1b07 00d9 | | Load_Top At_Offset_1 1b08 00d8 | | Load_Top At_Offset_0 1b09 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1b0a 00da | | Load_Top At_Offset_2 1b0b 01da | | Execute Vector,Bounds 1b0c 00da | | Load_Top At_Offset_2 1b0d 01da | | Execute Vector,Bounds 1b0e 00da | | Load_Top At_Offset_2 1b0f 027f | | Execute Discrete,Equal 1b10 7001 |p | Jump_Nonzero 0x1b12 1b11 08e0 | | Execute_Immediate Raise,0xe0 1b12 00cd | | Action Spare6_Action 1b13 027f | | Execute Discrete,Equal 1b14 7001 |p | Jump_Nonzero 0x1b16 1b15 08e0 | | Execute_Immediate Raise,0xe0 1b16 00d2 | | Pop_Control Pop_Count_2 1b17 00d9 | | Load_Top At_Offset_1 1b18 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1b19 e404 | | Load 0x2,0x4 1b1a 00d9 | | Load_Top At_Offset_1 1b1b 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7 1b1c e2ac | | Load 0x1,0xac 1b1d 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1b1e a5fd | | Store_Unchecked 0x2,-0x3 1b1f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1b20 4806 |H | Short_Literal 0x6 1b21 e5fc | | Load 0x2,-0x4 1b22 01dc | | Execute Vector,Last 1b23 e2ab | | Load 0x1,0xab 1b24 1c08 | | Execute_Immediate Run_Utility,0x8 1b25 e2ac | | Load 0x1,0xac 1b26 00d9 | | Load_Top At_Offset_1 1b27 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1b28 e5fc | | Load 0x2,-0x4 1b29 00d9 | | Load_Top At_Offset_1 1b2a 00d8 | | Load_Top At_Offset_0 1b2b 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1b2c 00da | | Load_Top At_Offset_2 1b2d 01da | | Execute Vector,Bounds 1b2e 00da | | Load_Top At_Offset_2 1b2f 01da | | Execute Vector,Bounds 1b30 00da | | Load_Top At_Offset_2 1b31 027f | | Execute Discrete,Equal 1b32 7001 |p | Jump_Nonzero 0x1b34 1b33 08e0 | | Execute_Immediate Raise,0xe0 1b34 00cd | | Action Spare6_Action 1b35 027f | | Execute Discrete,Equal 1b36 7001 |p | Jump_Nonzero 0x1b38 1b37 08e0 | | Execute_Immediate Raise,0xe0 1b38 00d2 | | Pop_Control Pop_Count_2 1b39 00d9 | | Load_Top At_Offset_1 1b3a 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1b3b e5fe | | Load 0x2,-0x2 1b3c e00d | | Load 0x0,0xd 1b3d 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 1b3e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1b3f 1c02 | | Execute_Immediate Run_Utility,0x2 1b40 00d9 | | Load_Top At_Offset_1 1b41 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 1b42 e2ac | | Load 0x1,0xac 1b43 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1b44 a5fd | | Store_Unchecked 0x2,-0x3 1b45 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1b46 00e1 | | Load_Encached Boolean_Cache 1b47 00e1 | | Load_Encached Boolean_Cache 1b48 e2a3 | | Load 0x1,0xa3 1b49 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1b4a e5fe | | Load 0x2,-0x2 1b4b e2a3 | | Load 0x1,0xa3 1b4c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1b4d c406 | | Store 0x2,0x6 1b4e 005b | [ | Store_Top Discrete,At_Offset_3 1b4f 0059 | Y | Store_Top Discrete,At_Offset_1 1b50 00d9 | | Load_Top At_Offset_1 1b51 701c |p | Jump_Nonzero 0x1b6e 1b52 00d8 | | Load_Top At_Offset_0 1b53 701a |p | Jump_Nonzero 0x1b6e 1b54 e002 | | Load 0x0,0x2 1b55 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1b56 4801 |H | Short_Literal 0x1 1b57 4802 |H | Short_Literal 0x2 1b58 e00e | | Load 0x0,0xe 1b59 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1b5a 035b | [ | Declare_Type Array,Constrained 1b5b 0337 | 7 | Declare_Variable Array 1b5c e5fe | | Load 0x2,-0x2 1b5d e00e | | Load 0x0,0xe 1b5e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1b5f 4801 |H | Short_Literal 0x1 1b60 00da | | Load_Top At_Offset_2 1b61 01d6 | | Execute Vector,Field_Write 1b62 0092 2c10 | , | Action Push_String_Extended,0x2c10 ; "'IS" 1b64 e00e | | Load 0x0,0xe 1b65 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1b66 4802 |H | Short_Literal 0x2 1b67 00da | | Load_Top At_Offset_2 1b68 01d6 | | Execute Vector,Field_Write 1b69 60fa |` | Indirect_Literal Discrete,0x1c64,{0x00000000, 0x00002826} 1b6a e002 | | Load 0x0,0x2 1b6b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1b6c c5fb | | Store 0x2,-0x5 1b6d 781d |x | Jump 0x1b8b 1b6e 00d9 | | Load_Top At_Offset_1 1b6f 681b |h | Jump_Zero 0x1b8b 1b70 00d8 | | Load_Top At_Offset_0 1b71 7019 |p | Jump_Nonzero 0x1b8b 1b72 e002 | | Load 0x0,0x2 1b73 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1b74 4801 |H | Short_Literal 0x1 1b75 4802 |H | Short_Literal 0x2 1b76 e00e | | Load 0x0,0xe 1b77 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1b78 035b | [ | Declare_Type Array,Constrained 1b79 0337 | 7 | Declare_Variable Array 1b7a e5fe | | Load 0x2,-0x2 1b7b e00e | | Load 0x0,0xe 1b7c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1b7d 4801 |H | Short_Literal 0x1 1b7e 00da | | Load_Top At_Offset_2 1b7f 01d6 | | Execute Vector,Field_Write 1b80 0092 2c10 | , | Action Push_String_Extended,0x2c10 ; "'IS" 1b82 e00e | | Load 0x0,0xe 1b83 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1b84 4802 |H | Short_Literal 0x2 1b85 00da | | Load_Top At_Offset_2 1b86 01d6 | | Execute Vector,Field_Write 1b87 60d8 |` | Indirect_Literal Discrete,0x1c60,{0x00000000, 0x00002831} 1b88 e002 | | Load 0x0,0x2 1b89 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1b8a c5fb | | Store 0x2,-0x5 1b8b 4807 |H | Short_Literal 0x7 1b8c e5fc | | Load 0x2,-0x4 1b8d 01dc | | Execute Vector,Last 1b8e e2ab | | Load 0x1,0xab 1b8f 1c08 | | Execute_Immediate Run_Utility,0x8 1b90 e2ac | | Load 0x1,0xac 1b91 00d9 | | Load_Top At_Offset_1 1b92 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1b93 e5fc | | Load 0x2,-0x4 1b94 00d9 | | Load_Top At_Offset_1 1b95 00d8 | | Load_Top At_Offset_0 1b96 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1b97 00da | | Load_Top At_Offset_2 1b98 01da | | Execute Vector,Bounds 1b99 00da | | Load_Top At_Offset_2 1b9a 01da | | Execute Vector,Bounds 1b9b 00da | | Load_Top At_Offset_2 1b9c 027f | | Execute Discrete,Equal 1b9d 7001 |p | Jump_Nonzero 0x1b9f 1b9e 08e0 | | Execute_Immediate Raise,0xe0 1b9f 00cd | | Action Spare6_Action 1ba0 027f | | Execute Discrete,Equal 1ba1 7001 |p | Jump_Nonzero 0x1ba3 1ba2 08e0 | | Execute_Immediate Raise,0xe0 1ba3 00d2 | | Pop_Control Pop_Count_2 1ba4 00d9 | | Load_Top At_Offset_1 1ba5 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1ba6 00db | | Load_Top At_Offset_3 1ba7 00d9 | | Load_Top At_Offset_1 1ba8 2a09 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9 1ba9 e2ac | | Load 0x1,0xac 1baa 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1bab a5fd | | Store_Unchecked 0x2,-0x3 1bac 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1bad 00e1 | | Load_Encached Boolean_Cache 1bae 00e1 | | Load_Encached Boolean_Cache 1baf e2a4 | | Load 0x1,0xa4 1bb0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1bb1 e5fe | | Load 0x2,-0x2 1bb2 e2a4 | | Load 0x1,0xa4 1bb3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1bb4 c405 | | Store 0x2,0x5 1bb5 005b | [ | Store_Top Discrete,At_Offset_3 1bb6 0059 | Y | Store_Top Discrete,At_Offset_1 1bb7 00d9 | | Load_Top At_Offset_1 1bb8 701c |p | Jump_Nonzero 0x1bd5 1bb9 00d8 | | Load_Top At_Offset_0 1bba 701a |p | Jump_Nonzero 0x1bd5 1bbb e002 | | Load 0x0,0x2 1bbc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1bbd 4801 |H | Short_Literal 0x1 1bbe 4802 |H | Short_Literal 0x2 1bbf e00e | | Load 0x0,0xe 1bc0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1bc1 035b | [ | Declare_Type Array,Constrained 1bc2 0337 | 7 | Declare_Variable Array 1bc3 e5fe | | Load 0x2,-0x2 1bc4 e00e | | Load 0x0,0xe 1bc5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1bc6 4801 |H | Short_Literal 0x1 1bc7 00da | | Load_Top At_Offset_2 1bc8 01d6 | | Execute Vector,Field_Write 1bc9 0092 2c11 | , | Action Push_String_Extended,0x2c11 ; "'HAS" 1bcb e00e | | Load 0x0,0xe 1bcc 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1bcd 4802 |H | Short_Literal 0x2 1bce 00da | | Load_Top At_Offset_2 1bcf 01d6 | | Execute Vector,Field_Write 1bd0 6093 |` | Indirect_Literal Discrete,0x1c64,{0x00000000, 0x00002826} 1bd1 e002 | | Load 0x0,0x2 1bd2 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1bd3 c5fb | | Store 0x2,-0x5 1bd4 781d |x | Jump 0x1bf2 1bd5 00d9 | | Load_Top At_Offset_1 1bd6 681b |h | Jump_Zero 0x1bf2 1bd7 00d8 | | Load_Top At_Offset_0 1bd8 7019 |p | Jump_Nonzero 0x1bf2 1bd9 e002 | | Load 0x0,0x2 1bda 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1bdb 4801 |H | Short_Literal 0x1 1bdc 4802 |H | Short_Literal 0x2 1bdd e00e | | Load 0x0,0xe 1bde 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1bdf 035b | [ | Declare_Type Array,Constrained 1be0 0337 | 7 | Declare_Variable Array 1be1 e5fe | | Load 0x2,-0x2 1be2 e00e | | Load 0x0,0xe 1be3 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1be4 4801 |H | Short_Literal 0x1 1be5 00da | | Load_Top At_Offset_2 1be6 01d6 | | Execute Vector,Field_Write 1be7 0092 2c11 | , | Action Push_String_Extended,0x2c11 ; "'HAS" 1be9 e00e | | Load 0x0,0xe 1bea 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1beb 4802 |H | Short_Literal 0x2 1bec 00da | | Load_Top At_Offset_2 1bed 01d6 | | Execute Vector,Field_Write 1bee 6071 |`q | Indirect_Literal Discrete,0x1c60,{0x00000000, 0x00002831} 1bef e002 | | Load 0x0,0x2 1bf0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1bf1 c5fb | | Store 0x2,-0x5 1bf2 4808 |H | Short_Literal 0x8 1bf3 e5fc | | Load 0x2,-0x4 1bf4 01dc | | Execute Vector,Last 1bf5 e2ab | | Load 0x1,0xab 1bf6 1c08 | | Execute_Immediate Run_Utility,0x8 1bf7 e2ac | | Load 0x1,0xac 1bf8 00d9 | | Load_Top At_Offset_1 1bf9 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1bfa e5fc | | Load 0x2,-0x4 1bfb 00d9 | | Load_Top At_Offset_1 1bfc 00d8 | | Load_Top At_Offset_0 1bfd 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1bfe 00da | | Load_Top At_Offset_2 1bff 01da | | Execute Vector,Bounds 1c00 00da | | Load_Top At_Offset_2 1c01 01da | | Execute Vector,Bounds 1c02 00da | | Load_Top At_Offset_2 1c03 027f | | Execute Discrete,Equal 1c04 7001 |p | Jump_Nonzero 0x1c06 1c05 08e0 | | Execute_Immediate Raise,0xe0 1c06 00cd | | Action Spare6_Action 1c07 027f | | Execute Discrete,Equal 1c08 7001 |p | Jump_Nonzero 0x1c0a 1c09 08e0 | | Execute_Immediate Raise,0xe0 1c0a 00d2 | | Pop_Control Pop_Count_2 1c0b 00d9 | | Load_Top At_Offset_1 1c0c 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1c0d e405 | | Load 0x2,0x5 1c0e 00d9 | | Load_Top At_Offset_1 1c0f 2a0a |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa 1c10 e2ac | | Load 0x1,0xac 1c11 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1c12 a5fd | | Store_Unchecked 0x2,-0x3 1c13 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1c14 4815 |H | Short_Literal 0x15 1c15 e5fc | | Load 0x2,-0x4 1c16 01dc | | Execute Vector,Last 1c17 e2ab | | Load 0x1,0xab 1c18 1c08 | | Execute_Immediate Run_Utility,0x8 1c19 e2ac | | Load 0x1,0xac 1c1a 00d9 | | Load_Top At_Offset_1 1c1b 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1c1c e5fc | | Load 0x2,-0x4 1c1d 00d9 | | Load_Top At_Offset_1 1c1e 00d8 | | Load_Top At_Offset_0 1c1f 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1c20 00da | | Load_Top At_Offset_2 1c21 01da | | Execute Vector,Bounds 1c22 00da | | Load_Top At_Offset_2 1c23 01da | | Execute Vector,Bounds 1c24 00da | | Load_Top At_Offset_2 1c25 027f | | Execute Discrete,Equal 1c26 7001 |p | Jump_Nonzero 0x1c28 1c27 08e0 | | Execute_Immediate Raise,0xe0 1c28 00cd | | Action Spare6_Action 1c29 027f | | Execute Discrete,Equal 1c2a 7001 |p | Jump_Nonzero 0x1c2c 1c2b 08e0 | | Execute_Immediate Raise,0xe0 1c2c 00d2 | | Pop_Control Pop_Count_2 1c2d 00d9 | | Load_Top At_Offset_1 1c2e 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1c2f e5ff | | Load 0x2,-0x1 1c30 0f02 | | Execute_Immediate Equal,0x2 1c31 00d9 | | Load_Top At_Offset_1 1c32 2a11 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x11 1c33 e2ac | | Load 0x1,0xac 1c34 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1c35 a5fd | | Store_Unchecked 0x2,-0x3 1c36 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1c37 e5fb | | Load 0x2,-0x5 1c38 e5fc | | Load 0x2,-0x4 1c39 e2ac | | Load 0x1,0xac 1c3a e5fe | | Load 0x2,-0x2 1c3b e5ff | | Load 0x2,-0x1 1c3c 82b1 | | Call 0x1,0xb1 1c3d c5fd | | Store 0x2,-0x3 1c3e 00d1 | | Pop_Control Pop_Count_1 1c3f c5fb | | Store 0x2,-0x5 1c40 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1c41 e5ff | | Load 0x2,-0x1 1c42 e2aa | | Load 0x1,0xaa 1c43 01d7 | | Execute Vector,Field_Read 1c44 e5fc | | Load 0x2,-0x4 1c45 01dc | | Execute Vector,Last 1c46 e2ab | | Load 0x1,0xab 1c47 1c08 | | Execute_Immediate Run_Utility,0x8 1c48 e2ac | | Load 0x1,0xac 1c49 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1c4a 00d8 | | Load_Top At_Offset_0 1c4b 0227 | ' | Execute Access,All_Reference 1c4c 1c00 | | Execute_Immediate Run_Utility,0x0 1c4d a402 | | Store_Unchecked 0x2,0x2 1c4e e5fc | | Load 0x2,-0x4 1c4f e402 | | Load 0x2,0x2 1c50 0227 | ' | Execute Access,All_Reference 1c51 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1c52 e5fe | | Load 0x2,-0x2 1c53 e001 | | Load 0x0,0x1 1c54 1b17 | | Execute Package,Field_Read,Field_Number 0x17 1c55 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1c56 e031 | 1 | Load 0x0,0x31 1c57 180d | | Execute Package,Field_Execute,Field_Number 0xd 1c58 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 1c59 e402 | | Load 0x2,0x2 1c5a 0227 | ' | Execute Access,All_Reference 1c5b 2a0e |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe 1c5c e402 | | Load 0x2,0x2 1c5d a5fd | | Store_Unchecked 0x2,-0x3 1c5e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1c5f 0000 | | .XXX[0x1] 1c60 0000 0000 | | .LITERAL {0x00000000, 0x00002831} 1c64 0000 0000 | | .LITERAL {0x00000000, 0x00002826} 1c68 ; -------------------------------------------------------------------------------------- 1c68 ; SUBPROGRAM 1c68 ; -------------------------------------------------------------------------------------- 1c68 1c75 | u | .CONST 0x1c75 ; Address of begin 1c69 0004 | | .CONST 0x0004 ; Address of exception handler 1c6a 0006 | | .CONST 0x0006 ; Number of locals 1c6b INIT_1c68: 1c6b 00db | | Load_Top At_Offset_3 1c6c 01dd | | Execute Vector,First 1c6d 00e2 | | Load_Encached Integer_Cache 1c6e 03f1 | | Declare_Variable Discrete,With_Value 1c6f 00e2 | | Load_Encached Integer_Cache 1c70 e2ac | | Load 0x1,0xac 1c71 0007 | | Action Break_Optional 1c72 00d8 | | Load_Top At_Offset_0 1c73 0007 | | Action Break_Optional 1c74 e2ac | | Load 0x1,0xac 1c75 BODY_1c68: 1c75 00cf | | Action Mark_Auxiliary 1c76 7870 |xp | Jump 0x1ce7 1c77 4800 |H | Short_Literal 0x0 1c78 e402 | | Load 0x2,0x2 1c79 e5fe | | Load 0x2,-0x2 1c7a 01dc | | Execute Vector,Last 1c7b e5fe | | Load 0x2,-0x2 1c7c 01cf | | Execute Vector,Slice_Read 1c7d 482c |H, | Short_Literal 0x2c 1c7e e02f | / | Load 0x0,0x2f 1c7f 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1c80 a403 | | Store_Unchecked 0x2,0x3 1c81 e403 | | Load 0x2,0x3 1c82 7004 |p | Jump_Nonzero 0x1c87 1c83 e5fe | | Load 0x2,-0x2 1c84 01dc | | Execute Vector,Last 1c85 0a01 | | Execute_Immediate Plus,0x1 1c86 c403 | | Store 0x2,0x3 1c87 e402 | | Load 0x2,0x2 1c88 e5fe | | Load 0x2,-0x2 1c89 01d7 | | Execute Vector,Field_Read 1c8a 0f7e | ~ | Execute_Immediate Equal,0x7e 1c8b 683a |h: | Jump_Zero 0x1cc6 1c8c e5fb | | Load 0x2,-0x5 1c8d e5fc | | Load 0x2,-0x4 1c8e e2ac | | Load 0x1,0xac 1c8f e402 | | Load 0x2,0x2 1c90 0a01 | | Execute_Immediate Plus,0x1 1c91 00d8 | | Load_Top At_Offset_0 1c92 00e2 | | Load_Encached Integer_Cache 1c93 0260 | ` | Execute Discrete,In_Type 1c94 7001 |p | Jump_Nonzero 0x1c96 1c95 0801 | | Execute_Immediate Raise,0x1 1c96 e403 | | Load 0x2,0x3 1c97 0aff | | Execute_Immediate Plus,-0x1 1c98 00d8 | | Load_Top At_Offset_0 1c99 00e2 | | Load_Encached Integer_Cache 1c9a 0260 | ` | Execute Discrete,In_Type 1c9b 7001 |p | Jump_Nonzero 0x1c9d 1c9c 0801 | | Execute_Immediate Raise,0x1 1c9d e5fe | | Load 0x2,-0x2 1c9e 01cf | | Execute Vector,Slice_Read 1c9f e5ff | | Load 0x2,-0x1 1ca0 82b4 | | Call 0x1,0xb4 1ca1 c405 | | Store 0x2,0x5 1ca2 00d1 | | Pop_Control Pop_Count_1 1ca3 c5fb | | Store 0x2,-0x5 1ca4 4801 |H | Short_Literal 0x1 1ca5 e5fc | | Load 0x2,-0x4 1ca6 01dc | | Execute Vector,Last 1ca7 e2ab | | Load 0x1,0xab 1ca8 1c08 | | Execute_Immediate Run_Utility,0x8 1ca9 e2ac | | Load 0x1,0xac 1caa 00d9 | | Load_Top At_Offset_1 1cab 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1cac e5fc | | Load 0x2,-0x4 1cad 00d9 | | Load_Top At_Offset_1 1cae 00d8 | | Load_Top At_Offset_0 1caf 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1cb0 00da | | Load_Top At_Offset_2 1cb1 01da | | Execute Vector,Bounds 1cb2 00da | | Load_Top At_Offset_2 1cb3 01da | | Execute Vector,Bounds 1cb4 00da | | Load_Top At_Offset_2 1cb5 027f | | Execute Discrete,Equal 1cb6 7001 |p | Jump_Nonzero 0x1cb8 1cb7 08e0 | | Execute_Immediate Raise,0xe0 1cb8 00cd | | Action Spare6_Action 1cb9 027f | | Execute Discrete,Equal 1cba 7001 |p | Jump_Nonzero 0x1cbc 1cbb 08e0 | | Execute_Immediate Raise,0xe0 1cbc 00d2 | | Pop_Control Pop_Count_2 1cbd 00d9 | | Load_Top At_Offset_1 1cbe 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1cbf 00db | | Load_Top At_Offset_3 1cc0 00d9 | | Load_Top At_Offset_1 1cc1 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 1cc2 e2ac | | Load 0x1,0xac 1cc3 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1cc4 003b | ; | Store_Top Access,At_Offset_3 1cc5 7812 |x | Jump 0x1cd8 1cc6 e5fb | | Load 0x2,-0x5 1cc7 e5fc | | Load 0x2,-0x4 1cc8 e2ac | | Load 0x1,0xac 1cc9 e402 | | Load 0x2,0x2 1cca e403 | | Load 0x2,0x3 1ccb 0aff | | Execute_Immediate Plus,-0x1 1ccc 00d8 | | Load_Top At_Offset_0 1ccd 00e2 | | Load_Encached Integer_Cache 1cce 0260 | ` | Execute Discrete,In_Type 1ccf 7001 |p | Jump_Nonzero 0x1cd1 1cd0 0801 | | Execute_Immediate Raise,0x1 1cd1 e5fe | | Load 0x2,-0x2 1cd2 01cf | | Execute Vector,Slice_Read 1cd3 e5ff | | Load 0x2,-0x1 1cd4 82b4 | | Call 0x1,0xb4 1cd5 c405 | | Store 0x2,0x5 1cd6 00d1 | | Pop_Control Pop_Count_1 1cd7 c5fb | | Store 0x2,-0x5 1cd8 00d9 | | Load_Top At_Offset_1 1cd9 7003 |p | Jump_Nonzero 0x1cdd 1cda 00da | | Load_Top At_Offset_2 1cdb a404 | | Store_Unchecked 0x2,0x4 1cdc 7804 |x | Jump 0x1ce1 1cdd 00da | | Load_Top At_Offset_2 1cde 00da | | Load_Top At_Offset_2 1cdf 0227 | ' | Execute Access,All_Reference 1ce0 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1ce1 00da | | Load_Top At_Offset_2 1ce2 003a | : | Store_Top Access,At_Offset_2 1ce3 e403 | | Load 0x2,0x3 1ce4 0a01 | | Execute_Immediate Plus,0x1 1ce5 c402 | | Store 0x2,0x2 1ce6 00c9 | | Action Pop_Auxiliary_Loop 1ce7 e402 | | Load 0x2,0x2 1ce8 e5fe | | Load 0x2,-0x2 1ce9 01dc | | Execute Vector,Last 1cea 027a | z | Execute Discrete,Less_Equal 1ceb 778b |w | Jump_Nonzero 0x1c77 1cec 00ce | | Action Pop_Auxiliary 1ced 00da | | Load_Top At_Offset_2 1cee 00d9 | | Load_Top At_Offset_1 1cef 022e | . | Execute Access,Not_Equal 1cf0 6821 |h! | Jump_Zero 0x1d12 1cf1 4803 |H | Short_Literal 0x3 1cf2 e5fc | | Load 0x2,-0x4 1cf3 01dc | | Execute Vector,Last 1cf4 e2ab | | Load 0x1,0xab 1cf5 1c08 | | Execute_Immediate Run_Utility,0x8 1cf6 e2ac | | Load 0x1,0xac 1cf7 00d9 | | Load_Top At_Offset_1 1cf8 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1cf9 e5fc | | Load 0x2,-0x4 1cfa 00d9 | | Load_Top At_Offset_1 1cfb 00d8 | | Load_Top At_Offset_0 1cfc 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1cfd 00da | | Load_Top At_Offset_2 1cfe 01da | | Execute Vector,Bounds 1cff 00da | | Load_Top At_Offset_2 1d00 01da | | Execute Vector,Bounds 1d01 00da | | Load_Top At_Offset_2 1d02 027f | | Execute Discrete,Equal 1d03 7001 |p | Jump_Nonzero 0x1d05 1d04 08e0 | | Execute_Immediate Raise,0xe0 1d05 00cd | | Action Spare6_Action 1d06 027f | | Execute Discrete,Equal 1d07 7001 |p | Jump_Nonzero 0x1d09 1d08 08e0 | | Execute_Immediate Raise,0xe0 1d09 00d2 | | Pop_Control Pop_Count_2 1d0a 00d9 | | Load_Top At_Offset_1 1d0b 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1d0c 00db | | Load_Top At_Offset_3 1d0d 00d9 | | Load_Top At_Offset_1 1d0e 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 1d0f e2ac | | Load 0x1,0xac 1d10 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1d11 003b | ; | Store_Top Access,At_Offset_3 1d12 00da | | Load_Top At_Offset_2 1d13 a5fd | | Store_Unchecked 0x2,-0x3 1d14 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1d15 0000 0000 | | .XXX[0x3] 1d17 0000 | | 1d18 ; -------------------------------------------------------------------------------------- 1d18 ; SUBPROGRAM 1d18 ; -------------------------------------------------------------------------------------- 1d18 1d20 | | .CONST 0x1d20 ; Address of begin 1d19 0004 | | .CONST 0x0004 ; Address of exception handler 1d1a 0003 | | .CONST 0x0003 ; Number of locals 1d1b INIT_1d18: 1d1b 00da | | Load_Top At_Offset_2 1d1c 01dd | | Execute Vector,First 1d1d 00e2 | | Load_Encached Integer_Cache 1d1e 03f1 | | Declare_Variable Discrete,With_Value 1d1f 00e2 | | Load_Encached Integer_Cache 1d20 BODY_1d18: 1d20 e5fe | | Load 0x2,-0x2 1d21 01da | | Execute Vector,Bounds 1d22 e00c | | Load 0x0,0xc 1d23 1b18 | | Execute Package,Field_Read,Field_Number 0x18 1d24 035b | [ | Declare_Type Array,Constrained 1d25 0337 | 7 | Declare_Variable Array 1d26 00d8 | | Load_Top At_Offset_0 1d27 01d9 | | Execute Vector,Reverse_Bounds 1d28 0263 | c | Execute Discrete,Above_Bound 1d29 7005 |p | Jump_Nonzero 0x1d2f 1d2a 4800 |H | Short_Literal 0x0 1d2b 00d9 | | Load_Top At_Offset_1 1d2c e404 | | Load 0x2,0x4 1d2d 01d6 | | Execute Vector,Field_Write 1d2e 3ffb |? | Loop_Increasing 0x1d2a 1d2f e5fe | | Load 0x2,-0x2 1d30 01d4 | | Execute Vector,Structure_Write 1d31 00cf | | Action Mark_Auxiliary 1d32 7859 |xY | Jump 0x1d8c 1d33 4800 |H | Short_Literal 0x0 1d34 00db | | Load_Top At_Offset_3 1d35 e5ff | | Load 0x2,-0x1 1d36 01dc | | Execute Vector,Last 1d37 e5ff | | Load 0x2,-0x1 1d38 01cf | | Execute Vector,Slice_Read 1d39 482c |H, | Short_Literal 0x2c 1d3a e02f | / | Load 0x0,0x2f 1d3b 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1d3c 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 1d3d 00d9 | | Load_Top At_Offset_1 1d3e 7004 |p | Jump_Nonzero 0x1d43 1d3f e5ff | | Load 0x2,-0x1 1d40 01dc | | Execute Vector,Last 1d41 0a01 | | Execute_Immediate Plus,0x1 1d42 005a | Z | Store_Top Discrete,At_Offset_2 1d43 00cf | | Action Mark_Auxiliary 1d44 e5fe | | Load 0x2,-0x2 1d45 01d9 | | Execute Vector,Reverse_Bounds 1d46 0263 | c | Execute Discrete,Above_Bound 1d47 703f |p? | Jump_Nonzero 0x1d87 1d48 4800 |H | Short_Literal 0x0 1d49 e402 | | Load 0x2,0x2 1d4a e403 | | Load 0x2,0x3 1d4b 0aff | | Execute_Immediate Plus,-0x1 1d4c 00d8 | | Load_Top At_Offset_0 1d4d 00e2 | | Load_Encached Integer_Cache 1d4e 0260 | ` | Execute Discrete,In_Type 1d4f 7001 |p | Jump_Nonzero 0x1d51 1d50 0801 | | Execute_Immediate Raise,0x1 1d51 e5ff | | Load 0x2,-0x1 1d52 01cf | | Execute Vector,Slice_Read 1d53 00da | | Load_Top At_Offset_2 1d54 e00c | | Load 0x0,0xc 1d55 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1d56 e02f | / | Load 0x0,0x2f 1d57 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 1d58 6806 |h | Jump_Zero 0x1d5f 1d59 4801 |H | Short_Literal 0x1 1d5a 00d9 | | Load_Top At_Offset_1 1d5b e5fe | | Load 0x2,-0x2 1d5c 01d6 | | Execute Vector,Field_Write 1d5d 00d2 | | Pop_Control Pop_Count_2 1d5e 7828 |x( | Jump 0x1d87 1d5f 00d8 | | Load_Top At_Offset_0 1d60 e5fe | | Load 0x2,-0x2 1d61 01dc | | Execute Vector,Last 1d62 027f | | Execute Discrete,Equal 1d63 6821 |h! | Jump_Zero 0x1d85 1d64 e002 | | Load 0x0,0x2 1d65 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1d66 4801 |H | Short_Literal 0x1 1d67 4802 |H | Short_Literal 0x2 1d68 e00e | | Load 0x0,0xe 1d69 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1d6a 035b | [ | Declare_Type Array,Constrained 1d6b 0337 | 7 | Declare_Variable Array 1d6c e402 | | Load 0x2,0x2 1d6d e403 | | Load 0x2,0x3 1d6e 0aff | | Execute_Immediate Plus,-0x1 1d6f 00d8 | | Load_Top At_Offset_0 1d70 00e2 | | Load_Encached Integer_Cache 1d71 0260 | ` | Execute Discrete,In_Type 1d72 7001 |p | Jump_Nonzero 0x1d74 1d73 0801 | | Execute_Immediate Raise,0x1 1d74 e5ff | | Load 0x2,-0x1 1d75 01cf | | Execute Vector,Slice_Read 1d76 e00e | | Load 0x0,0xe 1d77 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1d78 4801 |H | Short_Literal 0x1 1d79 00da | | Load_Top At_Offset_2 1d7a 01d6 | | Execute Vector,Field_Write 1d7b e5ff | | Load 0x2,-0x1 1d7c e00e | | Load 0x0,0xe 1d7d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1d7e 4802 |H | Short_Literal 0x2 1d7f 00da | | Load_Top At_Offset_2 1d80 01d6 | | Execute Vector,Field_Write 1d81 6012 |` | Indirect_Literal Discrete,0x1d94,{0x00000000, 0x00002824} 1d82 e002 | | Load 0x0,0x2 1d83 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1d84 c5fd | | Store 0x2,-0x3 1d85 00c8 | | Action Pop_Auxiliary_Range 1d86 3fc1 |? | Loop_Increasing 0x1d48 1d87 00ce | | Action Pop_Auxiliary 1d88 00d9 | | Load_Top At_Offset_1 1d89 0a01 | | Execute_Immediate Plus,0x1 1d8a 005b | [ | Store_Top Discrete,At_Offset_3 1d8b 00c9 | | Action Pop_Auxiliary_Loop 1d8c 00da | | Load_Top At_Offset_2 1d8d e5ff | | Load 0x2,-0x1 1d8e 01dc | | Execute Vector,Last 1d8f 027a | z | Execute Discrete,Less_Equal 1d90 77a2 |w | Jump_Nonzero 0x1d33 1d91 4502 |E | Exit_Suprogram New_Top_Offset 0x2 1d92 0000 0000 | | .XXX[0x2] 1d94 0000 0000 | | .LITERAL {0x00000000, 0x00002824} 1d98 ; -------------------------------------------------------------------------------------- 1d98 ; SUBPROGRAM 1d98 ; -------------------------------------------------------------------------------------- 1d98 1dc9 | | .CONST 0x1dc9 ; Address of begin 1d99 0004 | | .CONST 0x0004 ; Address of exception handler 1d9a 0010 | | .CONST 0x0010 ; Number of locals 1d9b INIT_1d98: 1d9b 00da | | Load_Top At_Offset_2 1d9c 8032 | 2 | Call 0x0,0x32 1d9d 82b3 | | Call 0x1,0xb3 1d9e 4800 |H | Short_Literal 0x0 1d9f 00d9 | | Load_Top At_Offset_1 1da0 0092 2c12 | , | Action Push_String_Extended,0x2c12 ; "'" 1da2 e02f | / | Load 0x0,0x2f 1da3 181d | | Execute Package,Field_Execute,Field_Number 0x1d 1da4 00e2 | | Load_Encached Integer_Cache 1da5 03f1 | | Declare_Variable Discrete,With_Value 1da6 00d9 | | Load_Top At_Offset_1 1da7 01dc | | Execute Vector,Last 1da8 0a01 | | Execute_Immediate Plus,0x1 1da9 00e2 | | Load_Encached Integer_Cache 1daa 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1dab 00e2 | | Load_Encached Integer_Cache 1dac 00e2 | | Load_Encached Integer_Cache 1dad 00e2 | | Load_Encached Integer_Cache 1dae e29b | | Load 0x1,0x9b 1daf 0007 | | Action Break_Optional 1db0 00e1 | | Load_Encached Boolean_Cache 1db1 00e1 | | Load_Encached Boolean_Cache 1db2 e2ac | | Load 0x1,0xac 1db3 0007 | | Action Break_Optional 1db4 00d8 | | Load_Top At_Offset_0 1db5 0007 | | Action Break_Optional 1db6 e2ac | | Load 0x1,0xac 1db7 0007 | | Action Break_Optional 1db8 4800 |H | Short_Literal 0x0 1db9 e00c | | Load 0x0,0xc 1dba 1819 | | Execute Package,Field_Execute,Field_Number 0x19 1dbb 01dc | | Execute Vector,Last 1dbc e00c | | Load 0x0,0xc 1dbd 1b18 | | Execute Package,Field_Read,Field_Number 0x18 1dbe 035b | [ | Declare_Type Array,Constrained 1dbf 0337 | 7 | Declare_Variable Array 1dc0 e00c | | Load 0x0,0xc 1dc1 1819 | | Execute Package,Field_Execute,Field_Number 0x19 1dc2 00d9 | | Load_Top At_Offset_1 1dc3 01d4 | | Execute Vector,Structure_Write 1dc4 e002 | | Load 0x0,0x2 1dc5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1dc6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1dc7 00e1 | | Load_Encached Boolean_Cache 1dc8 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1dc9 BODY_1d98: 1dc9 e403 | | Load 0x2,0x3 1dca 0c01 | | Execute_Immediate Greater_Equal,0x1 1dcb 697c |i| | Jump_Zero 0x1f48 1dcc 00cf | | Action Mark_Auxiliary 1dcd 7917 |y | Jump 0x1ee5 1dce e403 | | Load 0x2,0x3 1dcf 0a01 | | Execute_Immediate Plus,0x1 1dd0 c403 | | Store 0x2,0x3 1dd1 4800 |H | Short_Literal 0x0 1dd2 e403 | | Load 0x2,0x3 1dd3 e402 | | Load 0x2,0x2 1dd4 01dc | | Execute Vector,Last 1dd5 e402 | | Load 0x2,0x2 1dd6 01cf | | Execute Vector,Slice_Read 1dd7 4827 |H' | Short_Literal 0x27 1dd8 e02f | / | Load 0x0,0x2f 1dd9 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1dda a407 | | Store_Unchecked 0x2,0x7 1ddb e407 | | Load 0x2,0x7 1ddc 7004 |p | Jump_Nonzero 0x1de1 1ddd e402 | | Load 0x2,0x2 1dde 01dc | | Execute Vector,Last 1ddf 0a01 | | Execute_Immediate Plus,0x1 1de0 c407 | | Store 0x2,0x7 1de1 4800 |H | Short_Literal 0x0 1de2 e403 | | Load 0x2,0x3 1de3 e407 | | Load 0x2,0x7 1de4 0aff | | Execute_Immediate Plus,-0x1 1de5 00d8 | | Load_Top At_Offset_0 1de6 00e2 | | Load_Encached Integer_Cache 1de7 0260 | ` | Execute Discrete,In_Type 1de8 7001 |p | Jump_Nonzero 0x1dea 1de9 0801 | | Execute_Immediate Raise,0x1 1dea e402 | | Load 0x2,0x2 1deb 01cf | | Execute Vector,Slice_Read 1dec 0092 2c13 | , | Action Push_String_Extended,0x2c13 ; "(" 1dee e02f | / | Load 0x0,0x2f 1def 181d | | Execute Package,Field_Execute,Field_Number 0x1d 1df0 a405 | | Store_Unchecked 0x2,0x5 1df1 e405 | | Load 0x2,0x5 1df2 7006 |p | Jump_Nonzero 0x1df9 1df3 e407 | | Load 0x2,0x7 1df4 a405 | | Store_Unchecked 0x2,0x5 1df5 e405 | | Load 0x2,0x5 1df6 0aff | | Execute_Immediate Plus,-0x1 1df7 c406 | | Store 0x2,0x6 1df8 7808 |x | Jump 0x1e01 1df9 e407 | | Load 0x2,0x7 1dfa 0aff | | Execute_Immediate Plus,-0x1 1dfb c406 | | Store 0x2,0x6 1dfc e406 | | Load 0x2,0x6 1dfd e402 | | Load 0x2,0x2 1dfe 01d7 | | Execute Vector,Field_Read 1dff 0e29 | ) | Execute_Immediate Not_Equal,0x29 1e00 70ee |p | Jump_Nonzero 0x1eef 1e01 00e1 | | Load_Encached Boolean_Cache 1e02 00e1 | | Load_Encached Boolean_Cache 1e03 e2a2 | | Load 0x1,0xa2 1e04 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1e05 e403 | | Load 0x2,0x3 1e06 e405 | | Load 0x2,0x5 1e07 0aff | | Execute_Immediate Plus,-0x1 1e08 00d8 | | Load_Top At_Offset_0 1e09 00e2 | | Load_Encached Integer_Cache 1e0a 0260 | ` | Execute Discrete,In_Type 1e0b 7001 |p | Jump_Nonzero 0x1e0d 1e0c 0801 | | Execute_Immediate Raise,0x1 1e0d e402 | | Load 0x2,0x2 1e0e 01cf | | Execute Vector,Slice_Read 1e0f e2a2 | | Load 0x1,0xa2 1e10 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1e11 c408 | | Store 0x2,0x8 1e12 c409 | | Store 0x2,0x9 1e13 c40a | | Store 0x2,0xa 1e14 e409 | | Load 0x2,0x9 1e15 7029 |p) | Jump_Nonzero 0x1e3f 1e16 e40a | | Load 0x2,0xa 1e17 7027 |p' | Jump_Nonzero 0x1e3f 1e18 e404 | | Load 0x2,0x4 1e19 e402 | | Load 0x2,0x2 1e1a 01dc | | Execute Vector,Last 1e1b 027a | z | Execute Discrete,Less_Equal 1e1c 68c4 |h | Jump_Zero 0x1ee1 1e1d e002 | | Load 0x0,0x2 1e1e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1e1f 4801 |H | Short_Literal 0x1 1e20 4802 |H | Short_Literal 0x2 1e21 e00e | | Load 0x0,0xe 1e22 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1e23 035b | [ | Declare_Type Array,Constrained 1e24 0337 | 7 | Declare_Variable Array 1e25 e403 | | Load 0x2,0x3 1e26 e405 | | Load 0x2,0x5 1e27 0aff | | Execute_Immediate Plus,-0x1 1e28 00d8 | | Load_Top At_Offset_0 1e29 00e2 | | Load_Encached Integer_Cache 1e2a 0260 | ` | Execute Discrete,In_Type 1e2b 7001 |p | Jump_Nonzero 0x1e2d 1e2c 0801 | | Execute_Immediate Raise,0x1 1e2d e402 | | Load 0x2,0x2 1e2e 01cf | | Execute Vector,Slice_Read 1e2f e00e | | Load 0x0,0xe 1e30 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1e31 4801 |H | Short_Literal 0x1 1e32 00da | | Load_Top At_Offset_2 1e33 01d6 | | Execute Vector,Field_Write 1e34 e5ff | | Load 0x2,-0x1 1e35 e00e | | Load 0x0,0xe 1e36 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1e37 4802 |H | Short_Literal 0x2 1e38 00da | | Load_Top At_Offset_2 1e39 01d6 | | Execute Vector,Field_Write 1e3a 6141 |aA | Indirect_Literal Discrete,0x1f7c,{0x00000000, 0x00002821} 1e3b e002 | | Load 0x0,0x2 1e3c 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1e3d 005b | [ | Store_Top Discrete,At_Offset_3 1e3e 78a2 |x | Jump 0x1ee1 1e3f e404 | | Load 0x2,0x4 1e40 e402 | | Load 0x2,0x2 1e41 01dc | | Execute Vector,Last 1e42 027a | z | Execute Discrete,Less_Equal 1e43 7004 |p | Jump_Nonzero 0x1e48 1e44 e408 | | Load 0x2,0x8 1e45 e29c | | Load 0x1,0x9c 1e46 025f | _ | Execute Discrete,Not_In_Type 1e47 6899 |h | Jump_Zero 0x1ee1 1e48 e404 | | Load 0x2,0x4 1e49 e402 | | Load 0x2,0x2 1e4a 01dc | | Execute Vector,Last 1e4b 027d | } | Execute Discrete,Greater 1e4c 6803 |h | Jump_Zero 0x1e50 1e4d e403 | | Load 0x2,0x3 1e4e 0aff | | Execute_Immediate Plus,-0x1 1e4f c404 | | Store 0x2,0x4 1e50 e409 | | Load 0x2,0x9 1e51 681e |h | Jump_Zero 0x1e70 1e52 e40a | | Load 0x2,0xa 1e53 701c |p | Jump_Nonzero 0x1e70 1e54 e002 | | Load 0x0,0x2 1e55 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1e56 4801 |H | Short_Literal 0x1 1e57 4802 |H | Short_Literal 0x2 1e58 e00e | | Load 0x0,0xe 1e59 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1e5a 035b | [ | Declare_Type Array,Constrained 1e5b 0337 | 7 | Declare_Variable Array 1e5c e403 | | Load 0x2,0x3 1e5d e406 | | Load 0x2,0x6 1e5e e402 | | Load 0x2,0x2 1e5f 01cf | | Execute Vector,Slice_Read 1e60 e00e | | Load 0x0,0xe 1e61 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1e62 4801 |H | Short_Literal 0x1 1e63 00da | | Load_Top At_Offset_2 1e64 01d6 | | Execute Vector,Field_Write 1e65 e5ff | | Load 0x2,-0x1 1e66 e00e | | Load 0x0,0xe 1e67 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1e68 4802 |H | Short_Literal 0x2 1e69 00da | | Load_Top At_Offset_2 1e6a 01d6 | | Execute Vector,Field_Write 1e6b 610c |a | Indirect_Literal Discrete,0x1f78,{0x00000000, 0x00002830} 1e6c e002 | | Load 0x0,0x2 1e6d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1e6e 005b | [ | Store_Top Discrete,At_Offset_3 1e6f 7871 |xq | Jump 0x1ee1 1e70 e408 | | Load 0x2,0x8 1e71 4802 |H | Short_Literal 0x2 1e72 4803 |H | Short_Literal 0x3 1e73 0262 | b | Execute Discrete,In_Range 1e74 e405 | | Load 0x2,0x5 1e75 e406 | | Load 0x2,0x6 1e76 027d | } | Execute Discrete,Greater 1e77 027e | ~ | Execute Discrete,Not_Equal 1e78 681c |h | Jump_Zero 0x1e95 1e79 e002 | | Load 0x0,0x2 1e7a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1e7b 4801 |H | Short_Literal 0x1 1e7c 4802 |H | Short_Literal 0x2 1e7d e00e | | Load 0x0,0xe 1e7e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1e7f 035b | [ | Declare_Type Array,Constrained 1e80 0337 | 7 | Declare_Variable Array 1e81 e403 | | Load 0x2,0x3 1e82 e406 | | Load 0x2,0x6 1e83 e402 | | Load 0x2,0x2 1e84 01cf | | Execute Vector,Slice_Read 1e85 e00e | | Load 0x0,0xe 1e86 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1e87 4801 |H | Short_Literal 0x1 1e88 00da | | Load_Top At_Offset_2 1e89 01d6 | | Execute Vector,Field_Write 1e8a e5ff | | Load 0x2,-0x1 1e8b e00e | | Load 0x0,0xe 1e8c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1e8d 4802 |H | Short_Literal 0x2 1e8e 00da | | Load_Top At_Offset_2 1e8f 01d6 | | Execute Vector,Field_Write 1e90 60e3 |` | Indirect_Literal Discrete,0x1f74,{0x00000000, 0x00002823} 1e91 e002 | | Load 0x0,0x2 1e92 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1e93 005b | [ | Store_Top Discrete,At_Offset_3 1e94 784c |xL | Jump 0x1ee1 1e95 e408 | | Load 0x2,0x8 1e96 0f04 | | Execute_Immediate Equal,0x4 1e97 6818 |h | Jump_Zero 0x1eb0 1e98 4801 |H | Short_Literal 0x1 1e99 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 1e9a 00da | | Load_Top At_Offset_2 1e9b e40e | | Load 0x2,0xe 1e9c e405 | | Load 0x2,0x5 1e9d 0a01 | | Execute_Immediate Plus,0x1 1e9e 00d8 | | Load_Top At_Offset_0 1e9f 00e2 | | Load_Encached Integer_Cache 1ea0 0260 | ` | Execute Discrete,In_Type 1ea1 7001 |p | Jump_Nonzero 0x1ea3 1ea2 0801 | | Execute_Immediate Raise,0x1 1ea3 e406 | | Load 0x2,0x6 1ea4 0aff | | Execute_Immediate Plus,-0x1 1ea5 00d8 | | Load_Top At_Offset_0 1ea6 00e2 | | Load_Encached Integer_Cache 1ea7 0260 | ` | Execute Discrete,In_Type 1ea8 7001 |p | Jump_Nonzero 0x1eaa 1ea9 0801 | | Execute_Immediate Raise,0x1 1eaa e402 | | Load 0x2,0x2 1eab 01cf | | Execute Vector,Slice_Read 1eac 82b6 | | Call 0x1,0xb6 1ead 00d1 | | Pop_Control Pop_Count_1 1eae 005b | [ | Store_Top Discrete,At_Offset_3 1eaf 7831 |x1 | Jump 0x1ee1 1eb0 e405 | | Load 0x2,0x5 1eb1 e406 | | Load 0x2,0x6 1eb2 027d | } | Execute Discrete,Greater 1eb3 680a |h | Jump_Zero 0x1ebe 1eb4 00da | | Load_Top At_Offset_2 1eb5 e40e | | Load 0x2,0xe 1eb6 e2ac | | Load 0x1,0xac 1eb7 00ea | | Load_Encached Null_String_Cache 1eb8 e408 | | Load 0x2,0x8 1eb9 82b4 | | Call 0x1,0xb4 1eba c40c | | Store 0x2,0xc 1ebb 00d1 | | Pop_Control Pop_Count_1 1ebc 005b | [ | Store_Top Discrete,At_Offset_3 1ebd 7818 |x | Jump 0x1ed6 1ebe 00da | | Load_Top At_Offset_2 1ebf e40e | | Load 0x2,0xe 1ec0 e2ac | | Load 0x1,0xac 1ec1 e405 | | Load 0x2,0x5 1ec2 0a01 | | Execute_Immediate Plus,0x1 1ec3 00d8 | | Load_Top At_Offset_0 1ec4 00e2 | | Load_Encached Integer_Cache 1ec5 0260 | ` | Execute Discrete,In_Type 1ec6 7001 |p | Jump_Nonzero 0x1ec8 1ec7 0801 | | Execute_Immediate Raise,0x1 1ec8 e406 | | Load 0x2,0x6 1ec9 0aff | | Execute_Immediate Plus,-0x1 1eca 00d8 | | Load_Top At_Offset_0 1ecb 00e2 | | Load_Encached Integer_Cache 1ecc 0260 | ` | Execute Discrete,In_Type 1ecd 7001 |p | Jump_Nonzero 0x1ecf 1ece 0801 | | Execute_Immediate Raise,0x1 1ecf e402 | | Load 0x2,0x2 1ed0 01cf | | Execute Vector,Slice_Read 1ed1 e408 | | Load 0x2,0x8 1ed2 82b5 | | Call 0x1,0xb5 1ed3 c40c | | Store 0x2,0xc 1ed4 00d1 | | Pop_Control Pop_Count_1 1ed5 005b | [ | Store_Top Discrete,At_Offset_3 1ed6 e40d | | Load 0x2,0xd 1ed7 7003 |p | Jump_Nonzero 0x1edb 1ed8 e40c | | Load 0x2,0xc 1ed9 a40b | | Store_Unchecked 0x2,0xb 1eda 7804 |x | Jump 0x1edf 1edb e40c | | Load 0x2,0xc 1edc e40d | | Load 0x2,0xd 1edd 0227 | ' | Execute Access,All_Reference 1ede 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1edf e40c | | Load 0x2,0xc 1ee0 a40d | | Store_Unchecked 0x2,0xd 1ee1 e406 | | Load 0x2,0x6 1ee2 0a01 | | Execute_Immediate Plus,0x1 1ee3 c403 | | Store 0x2,0x3 1ee4 00c9 | | Action Pop_Auxiliary_Loop 1ee5 e403 | | Load 0x2,0x3 1ee6 e402 | | Load 0x2,0x2 1ee7 01dc | | Execute Vector,Last 1ee8 027c | | | Execute Discrete,Less 1ee9 6805 |h | Jump_Zero 0x1eef 1eea e403 | | Load 0x2,0x3 1eeb e402 | | Load 0x2,0x2 1eec 01d7 | | Execute Vector,Field_Read 1eed 0f27 | ' | Execute_Immediate Equal,0x27 1eee 76df |v | Jump_Nonzero 0x1dce 1eef 00ce | | Action Pop_Auxiliary 1ef0 e403 | | Load 0x2,0x3 1ef1 e402 | | Load 0x2,0x2 1ef2 01dc | | Execute Vector,Last 1ef3 027c | | | Execute Discrete,Less 1ef4 6826 |h& | Jump_Zero 0x1f1b 1ef5 e002 | | Load 0x0,0x2 1ef6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1ef7 4801 |H | Short_Literal 0x1 1ef8 4802 |H | Short_Literal 0x2 1ef9 e00e | | Load 0x0,0xe 1efa 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1efb 035b | [ | Declare_Type Array,Constrained 1efc 0337 | 7 | Declare_Variable Array 1efd 4801 |H | Short_Literal 0x1 1efe e403 | | Load 0x2,0x3 1eff 0aff | | Execute_Immediate Plus,-0x1 1f00 00d8 | | Load_Top At_Offset_0 1f01 00e2 | | Load_Encached Integer_Cache 1f02 0260 | ` | Execute Discrete,In_Type 1f03 7001 |p | Jump_Nonzero 0x1f05 1f04 0801 | | Execute_Immediate Raise,0x1 1f05 e402 | | Load 0x2,0x2 1f06 01cf | | Execute Vector,Slice_Read 1f07 e00e | | Load 0x0,0xe 1f08 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1f09 4801 |H | Short_Literal 0x1 1f0a 00da | | Load_Top At_Offset_2 1f0b 01d6 | | Execute Vector,Field_Write 1f0c e403 | | Load 0x2,0x3 1f0d e402 | | Load 0x2,0x2 1f0e 01dc | | Execute Vector,Last 1f0f e402 | | Load 0x2,0x2 1f10 01cf | | Execute Vector,Slice_Read 1f11 e00e | | Load 0x0,0xe 1f12 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1f13 4802 |H | Short_Literal 0x2 1f14 00da | | Load_Top At_Offset_2 1f15 01d6 | | Execute Vector,Field_Write 1f16 6059 |`Y | Indirect_Literal Discrete,0x1f70,{0x00000000, 0x0000281e} 1f17 e002 | | Load 0x0,0x2 1f18 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1f19 005a | Z | Store_Top Discrete,At_Offset_2 1f1a 782d |x- | Jump 0x1f48 1f1b e40b | | Load 0x2,0xb 1f1c e40d | | Load 0x2,0xd 1f1d 022e | . | Execute Access,Not_Equal 1f1e 6822 |h" | Jump_Zero 0x1f41 1f1f 4802 |H | Short_Literal 0x2 1f20 00db | | Load_Top At_Offset_3 1f21 01dc | | Execute Vector,Last 1f22 e2ab | | Load 0x1,0xab 1f23 1c08 | | Execute_Immediate Run_Utility,0x8 1f24 e2ac | | Load 0x1,0xac 1f25 00d9 | | Load_Top At_Offset_1 1f26 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1f27 00db | | Load_Top At_Offset_3 1f28 00d9 | | Load_Top At_Offset_1 1f29 00d8 | | Load_Top At_Offset_0 1f2a 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1f2b 00da | | Load_Top At_Offset_2 1f2c 01da | | Execute Vector,Bounds 1f2d 00da | | Load_Top At_Offset_2 1f2e 01da | | Execute Vector,Bounds 1f2f 00da | | Load_Top At_Offset_2 1f30 027f | | Execute Discrete,Equal 1f31 7001 |p | Jump_Nonzero 0x1f33 1f32 08e0 | | Execute_Immediate Raise,0xe0 1f33 00cd | | Action Spare6_Action 1f34 027f | | Execute Discrete,Equal 1f35 7001 |p | Jump_Nonzero 0x1f37 1f36 08e0 | | Execute_Immediate Raise,0xe0 1f37 00d2 | | Pop_Control Pop_Count_2 1f38 00d9 | | Load_Top At_Offset_1 1f39 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1f3a e40b | | Load 0x2,0xb 1f3b 00d9 | | Load_Top At_Offset_1 1f3c 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 1f3d e2ac | | Load 0x1,0xac 1f3e 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1f3f a40b | | Store_Unchecked 0x2,0xb 1f40 7807 |x | Jump 0x1f48 1f41 e40b | | Load 0x2,0xb 1f42 7005 |p | Jump_Nonzero 0x1f48 1f43 00d8 | | Load_Top At_Offset_0 1f44 6803 |h | Jump_Zero 0x1f48 1f45 0092 2c14 | , | Action Push_String_Extended,0x2c14 ; "Warning: ON_MACHINES query attribute will be ignored." 1f47 801d | | Call 0x0,0x1d 1f48 e404 | | Load 0x2,0x4 1f49 0aff | | Execute_Immediate Plus,-0x1 1f4a e2ad | | Load 0x1,0xad 1f4b 1c08 | | Execute_Immediate Run_Utility,0x8 1f4c 00da | | Load_Top At_Offset_2 1f4d 00d9 | | Load_Top At_Offset_1 1f4e 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 1f4f 4801 |H | Short_Literal 0x1 1f50 e404 | | Load 0x2,0x4 1f51 0aff | | Execute_Immediate Plus,-0x1 1f52 00d8 | | Load_Top At_Offset_0 1f53 00e2 | | Load_Encached Integer_Cache 1f54 0260 | ` | Execute Discrete,In_Type 1f55 7001 |p | Jump_Nonzero 0x1f57 1f56 0801 | | Execute_Immediate Raise,0x1 1f57 e402 | | Load 0x2,0x2 1f58 01cf | | Execute Vector,Slice_Read 1f59 00d9 | | Load_Top At_Offset_1 1f5a 00d8 | | Load_Top At_Offset_0 1f5b 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1f5c 00da | | Load_Top At_Offset_2 1f5d 01da | | Execute Vector,Bounds 1f5e 00da | | Load_Top At_Offset_2 1f5f 01da | | Execute Vector,Bounds 1f60 00da | | Load_Top At_Offset_2 1f61 027f | | Execute Discrete,Equal 1f62 7001 |p | Jump_Nonzero 0x1f64 1f63 08e0 | | Execute_Immediate Raise,0xe0 1f64 00cd | | Action Spare6_Action 1f65 027f | | Execute Discrete,Equal 1f66 7001 |p | Jump_Nonzero 0x1f68 1f67 08e0 | | Execute_Immediate Raise,0xe0 1f68 00d2 | | Pop_Control Pop_Count_2 1f69 00d9 | | Load_Top At_Offset_1 1f6a 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1f6b e40b | | Load 0x2,0xb 1f6c 00d9 | | Load_Top At_Offset_1 1f6d 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1f6e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1f6f 0000 | | .XXX[0x1] 1f70 0000 0000 | | .LITERAL {0x00000000, 0x0000281e} 1f74 0000 0000 | | .LITERAL {0x00000000, 0x00002823} 1f78 0000 0000 | | .LITERAL {0x00000000, 0x00002830} 1f7c 0000 0000 | | .LITERAL {0x00000000, 0x00002821} 1f80 ; -------------------------------------------------------------------------------------- 1f80 ; SUBPROGRAM 1f80 ; -------------------------------------------------------------------------------------- 1f80 1f83 | | .CONST 0x1f83 ; Address of begin 1f81 0004 | | .CONST 0x0004 ; Address of exception handler 1f82 0001 | | .CONST 0x0001 ; Number of locals 1f83 BODY_1f80: 1f83 INIT_1f80: 1f83 00da | | Load_Top At_Offset_2 1f84 e5fe | | Load 0x2,-0x2 1f85 0227 | ' | Execute Access,All_Reference 1f86 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 1f87 e004 | | Load 0x0,0x4 1f88 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1f89 6807 |h | Jump_Zero 0x1f91 1f8a 00db | | Load_Top At_Offset_3 1f8b 0227 | ' | Execute Access,All_Reference 1f8c 2e0d |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd 1f8d 00db | | Load_Top At_Offset_3 1f8e e004 | | Load 0x0,0x4 1f8f 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1f90 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1f91 4800 |H | Short_Literal 0x0 1f92 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1f93 0000 0000 | | .BLANK 0000[0x5] 1f98 ; -------------------------------------------------------------------------------------- 1f98 ; SUBPROGRAM 1f98 ; -------------------------------------------------------------------------------------- 1f98 1f9b | | .CONST 0x1f9b ; Address of begin 1f99 0004 | | .CONST 0x0004 ; Address of exception handler 1f9a 0001 | | .CONST 0x0001 ; Number of locals 1f9b BODY_1f98: 1f9b INIT_1f98: 1f9b 00db | | Load_Top At_Offset_3 1f9c 0227 | ' | Execute Access,All_Reference 1f9d 2e0f |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xf 1f9e 00db | | Load_Top At_Offset_3 1f9f 027a | z | Execute Discrete,Less_Equal 1fa0 6806 |h | Jump_Zero 0x1fa7 1fa1 00da | | Load_Top At_Offset_2 1fa2 e5fe | | Load 0x2,-0x2 1fa3 0227 | ' | Execute Access,All_Reference 1fa4 2e10 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x10 1fa5 027a | z | Execute Discrete,Less_Equal 1fa6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1fa7 4800 |H | Short_Literal 0x0 1fa8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1fa9 0000 0000 | | .BLANK 0000[0x7] 1fb0 ; -------------------------------------------------------------------------------------- 1fb0 ; SUBPROGRAM 1fb0 ; -------------------------------------------------------------------------------------- 1fb0 1fc8 | | .CONST 0x1fc8 ; Address of begin 1fb1 0004 | | .CONST 0x0004 ; Address of exception handler 1fb2 0008 | | .CONST 0x0008 ; Number of locals 1fb3 INIT_1fb0: 1fb3 00e1 | | Load_Encached Boolean_Cache 1fb4 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 1fb5 e2ac | | Load 0x1,0xac 1fb6 0007 | | Action Break_Optional 1fb7 e00d | | Load 0x0,0xd 1fb8 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 1fb9 02c7 | | Declare_Variable Any 1fba 00d8 | | Load_Top At_Offset_0 1fbb 1c00 | | Execute_Immediate Run_Utility,0x0 1fbc e00d | | Load 0x0,0xd 1fbd 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 1fbe e00d | | Load 0x0,0xd 1fbf 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 1fc0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1fc1 e00d | | Load 0x0,0xd 1fc2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1fc3 02c7 | | Declare_Variable Any 1fc4 00d8 | | Load_Top At_Offset_0 1fc5 1c00 | | Execute_Immediate Run_Utility,0x0 1fc6 e00d | | Load 0x0,0xd 1fc7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1fc8 BODY_1fb0: 1fc8 e5ff | | Load 0x2,-0x1 1fc9 7003 |p | Jump_Nonzero 0x1fcd 1fca 4801 |H | Short_Literal 0x1 1fcb a5fd | | Store_Unchecked 0x2,-0x3 1fcc 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1fcd e5ff | | Load 0x2,-0x1 1fce 0227 | ' | Execute Access,All_Reference 1fcf 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 1fd0 4615 |F | Jump_Case 0x16 1fd1 7a8a |z | Jump 0x225c ; case 0x0 1fd2 781d |x | Jump 0x1ff0 ; case 0x1 1fd3 7829 |x) | Jump 0x1ffd ; case 0x2 1fd4 7840 |x@ | Jump 0x2015 ; case 0x3 1fd5 7859 |xY | Jump 0x202f ; case 0x4 1fd6 7872 |xr | Jump 0x2049 ; case 0x5 1fd7 7886 |x | Jump 0x205e ; case 0x6 1fd8 78cd |x | Jump 0x20a6 ; case 0x7 1fd9 790b |y | Jump 0x20e5 ; case 0x8 1fda 7957 |yW | Jump 0x2132 ; case 0x9 1fdb 798c |y | Jump 0x2168 ; case 0xa 1fdc 7992 |y | Jump 0x216f ; case 0xb 1fdd 7998 |y | Jump 0x2176 ; case 0xc 1fde 79b6 |y | Jump 0x2195 ; case 0xd 1fdf 79d4 |y | Jump 0x21b4 ; case 0xe 1fe0 79f3 |y | Jump 0x21d4 ; case 0xf 1fe1 79fe |y | Jump 0x21e0 ; case 0x10 1fe2 7a28 |z( | Jump 0x220b ; case 0x11 1fe3 7a3d |z= | Jump 0x2221 ; case 0x12 1fe4 7a52 |zR | Jump 0x2237 ; case 0x13 1fe5 7a70 |zp | Jump 0x2256 ; case 0x14 1fe6 7800 |x | Jump 0x1fe7 ; case 0x15 1fe7 e5fe | | Load 0x2,-0x2 1fe8 0217 | | Execute Heap_Access,All_Reference 1fe9 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 1fea e5ff | | Load 0x2,-0x1 1feb 0227 | ' | Execute Access,All_Reference 1fec 2e11 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x11 1fed 027f | | Execute Discrete,Equal 1fee a402 | | Store_Unchecked 0x2,0x2 1fef 7a6c |zl | Jump 0x225c 1ff0 e5fc | | Load 0x2,-0x4 1ff1 00e1 | | Load_Encached Boolean_Cache 1ff2 e5fe | | Load 0x2,-0x2 1ff3 e5ff | | Load 0x2,-0x1 1ff4 0227 | ' | Execute Access,All_Reference 1ff5 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 1ff6 82ba | | Call 0x1,0xba 1ff7 c402 | | Store 0x2,0x2 1ff8 c5fc | | Store 0x2,-0x4 1ff9 e402 | | Load 0x2,0x2 1ffa 0f00 | | Execute_Immediate Equal,0x0 1ffb a402 | | Store_Unchecked 0x2,0x2 1ffc 7a5f |z_ | Jump 0x225c 1ffd e5ff | | Load 0x2,-0x1 1ffe 0227 | ' | Execute Access,All_Reference 1fff 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 2000 a403 | | Store_Unchecked 0x2,0x3 2001 00cf | | Action Mark_Auxiliary 2002 780c |x | Jump 0x200f 2003 e5fc | | Load 0x2,-0x4 2004 00e1 | | Load_Encached Boolean_Cache 2005 e5fe | | Load 0x2,-0x2 2006 e403 | | Load 0x2,0x3 2007 82ba | | Call 0x1,0xba 2008 c402 | | Store 0x2,0x2 2009 c5fc | | Store 0x2,-0x4 200a e403 | | Load 0x2,0x3 200b 0227 | ' | Execute Access,All_Reference 200c 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 200d a403 | | Store_Unchecked 0x2,0x3 200e 00c9 | | Action Pop_Auxiliary_Loop 200f e403 | | Load 0x2,0x3 2010 6802 |h | Jump_Zero 0x2013 2011 e402 | | Load 0x2,0x2 2012 77f0 |w | Jump_Nonzero 0x2003 2013 00ce | | Action Pop_Auxiliary 2014 7a47 |zG | Jump 0x225c 2015 4800 |H | Short_Literal 0x0 2016 a402 | | Store_Unchecked 0x2,0x2 2017 e5ff | | Load 0x2,-0x1 2018 0227 | ' | Execute Access,All_Reference 2019 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 201a a403 | | Store_Unchecked 0x2,0x3 201b 00cf | | Action Mark_Auxiliary 201c 780c |x | Jump 0x2029 201d e5fc | | Load 0x2,-0x4 201e 00e1 | | Load_Encached Boolean_Cache 201f e5fe | | Load 0x2,-0x2 2020 e403 | | Load 0x2,0x3 2021 82ba | | Call 0x1,0xba 2022 c402 | | Store 0x2,0x2 2023 c5fc | | Store 0x2,-0x4 2024 e403 | | Load 0x2,0x3 2025 0227 | ' | Execute Access,All_Reference 2026 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 2027 a403 | | Store_Unchecked 0x2,0x3 2028 00c9 | | Action Pop_Auxiliary_Loop 2029 e403 | | Load 0x2,0x3 202a 6802 |h | Jump_Zero 0x202d 202b e402 | | Load 0x2,0x2 202c 6ff0 |o | Jump_Zero 0x201d 202d 00ce | | Action Pop_Auxiliary 202e 7a2d |z- | Jump 0x225c 202f e5fc | | Load 0x2,-0x4 2030 e404 | | Load 0x2,0x4 2031 0120 | | Execute Any,Is_Value 2032 6803 |h | Jump_Zero 0x2036 2033 e00d | | Load 0x0,0xd 2034 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 2035 7801 |x | Jump 0x2037 2036 e404 | | Load 0x2,0x4 2037 e5fe | | Load 0x2,-0x2 2038 e001 | | Load 0x0,0x1 2039 1b14 | | Execute Package,Field_Read,Field_Number 0x14 203a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 203b c404 | | Store 0x2,0x4 203c c5fc | | Store 0x2,-0x4 203d 4800 |H | Short_Literal 0x0 203e e5fc | | Load 0x2,-0x4 203f e002 | | Load 0x0,0x2 2040 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 2041 6a1a |j | Jump_Zero 0x225c 2042 e404 | | Load 0x2,0x4 2043 e5ff | | Load 0x2,-0x1 2044 0227 | ' | Execute Access,All_Reference 2045 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 2046 012f | / | Execute Any,Equal 2047 a402 | | Store_Unchecked 0x2,0x2 2048 7a13 |z | Jump 0x225c 2049 e5fc | | Load 0x2,-0x4 204a e00d | | Load 0x0,0xd 204b 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 204c e5fe | | Load 0x2,-0x2 204d e001 | | Load 0x0,0x1 204e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 204f 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 2050 c405 | | Store 0x2,0x5 2051 c5fc | | Store 0x2,-0x4 2052 4800 |H | Short_Literal 0x0 2053 e5fc | | Load 0x2,-0x4 2054 e002 | | Load 0x0,0x2 2055 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 2056 6a05 |j | Jump_Zero 0x225c 2057 00db | | Load_Top At_Offset_3 2058 e5ff | | Load 0x2,-0x1 2059 0227 | ' | Execute Access,All_Reference 205a 2e07 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7 205b 027f | | Execute Discrete,Equal 205c a402 | | Store_Unchecked 0x2,0x2 205d 79fe |y | Jump 0x225c 205e e5fc | | Load 0x2,-0x4 205f 00da | | Load_Top At_Offset_2 2060 0120 | | Execute Any,Is_Value 2061 6803 |h | Jump_Zero 0x2065 2062 e00d | | Load 0x0,0xd 2063 1b0f | | Execute Package,Field_Read,Field_Number 0xf 2064 7801 |x | Jump 0x2066 2065 00da | | Load_Top At_Offset_2 2066 e5fe | | Load 0x2,-0x2 2067 e001 | | Load 0x0,0x1 2068 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2069 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 206a c407 | | Store 0x2,0x7 206b c5fc | | Store 0x2,-0x4 206c 4800 |H | Short_Literal 0x0 206d e5fc | | Load 0x2,-0x4 206e e002 | | Load 0x0,0x2 206f 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 2070 69eb |i | Jump_Zero 0x225c 2071 e00d | | Load 0x0,0xd 2072 1b0d | | Execute Package,Field_Read,Field_Number 0xd 2073 e00d | | Load 0x0,0xd 2074 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 2075 1b0d | | Execute Package,Field_Read,Field_Number 0xd 2076 61ed |a | Indirect_Literal Discrete,0x2264,{0x00000000, 0x00004000} 2077 e022 | " | Load 0x0,0x22 2078 1b0e | | Execute Package,Field_Read,Field_Number 0xe 2079 4800 |H | Short_Literal 0x0 207a e407 | | Load 0x2,0x7 207b e00d | | Load 0x0,0xd 207c 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 207d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 207e e00d | | Load 0x0,0xd 207f 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 2080 180f | | Execute Package,Field_Execute,Field_Number 0xf 2081 c406 | | Store 0x2,0x6 2082 0059 | Y | Store_Top Discrete,At_Offset_1 2083 00d8 | | Load_Top At_Offset_0 2084 7007 |p | Jump_Nonzero 0x208c 2085 00da | | Load_Top At_Offset_2 2086 e5ff | | Load 0x2,-0x1 2087 0227 | ' | Execute Access,All_Reference 2088 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 2089 027f | | Execute Discrete,Equal 208a a402 | | Store_Unchecked 0x2,0x2 208b 79d0 |y | Jump 0x225c 208c e002 | | Load 0x0,0x2 208d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 208e 4801 |H | Short_Literal 0x1 208f 4802 |H | Short_Literal 0x2 2090 e00e | | Load 0x0,0xe 2091 1b0f | | Execute Package,Field_Read,Field_Number 0xf 2092 035b | [ | Declare_Type Array,Constrained 2093 0337 | 7 | Declare_Variable Array 2094 e5fe | | Load 0x2,-0x2 2095 e001 | | Load 0x0,0x1 2096 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2097 1810 | | Execute Package,Field_Execute,Field_Number 0x10 2098 4801 |H | Short_Literal 0x1 2099 00da | | Load_Top At_Offset_2 209a 01d6 | | Execute Vector,Field_Write 209b 00da | | Load_Top At_Offset_2 209c e00e | | Load 0x0,0xe 209d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 209e 4802 |H | Short_Literal 0x2 209f 00da | | Load_Top At_Offset_2 20a0 01d6 | | Execute Vector,Field_Write 20a1 61be |a | Indirect_Literal Discrete,0x2260,{0x00000000, 0x00002820} 20a2 e002 | | Load 0x0,0x2 20a3 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 20a4 c5fc | | Store 0x2,-0x4 20a5 79b6 |y | Jump 0x225c 20a6 e5ff | | Load 0x2,-0x1 20a7 0227 | ' | Execute Access,All_Reference 20a8 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 20a9 4604 |F | Jump_Case 0x5 20aa 7809 |x | Jump 0x20b4 ; case 0x0 20ab 780f |x | Jump 0x20bb ; case 0x1 20ac 7815 |x | Jump 0x20c2 ; case 0x2 20ad 781a |x | Jump 0x20c8 ; case 0x3 20ae 7800 |x | Jump 0x20af ; case 0x4 20af e5fe | | Load 0x2,-0x2 20b0 0217 | | Execute Heap_Access,All_Reference 20b1 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 20b2 a402 | | Store_Unchecked 0x2,0x2 20b3 79a8 |y | Jump 0x225c 20b4 4801 |H | Short_Literal 0x1 20b5 e5fe | | Load 0x2,-0x2 20b6 e001 | | Load 0x0,0x1 20b7 1b14 | | Execute Package,Field_Read,Field_Number 0x14 20b8 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 20b9 a402 | | Store_Unchecked 0x2,0x2 20ba 79a1 |y | Jump 0x225c 20bb 4802 |H | Short_Literal 0x2 20bc e5fe | | Load 0x2,-0x2 20bd e001 | | Load 0x0,0x1 20be 1b14 | | Execute Package,Field_Read,Field_Number 0x14 20bf 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 20c0 a402 | | Store_Unchecked 0x2,0x2 20c1 799a |y | Jump 0x225c 20c2 e5fe | | Load 0x2,-0x2 20c3 e001 | | Load 0x0,0x1 20c4 1b14 | | Execute Package,Field_Read,Field_Number 0x14 20c5 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 20c6 a402 | | Store_Unchecked 0x2,0x2 20c7 7994 |y | Jump 0x225c 20c8 4800 |H | Short_Literal 0x0 20c9 a402 | | Store_Unchecked 0x2,0x2 20ca 00cf | | Action Mark_Auxiliary 20cb e5ff | | Load 0x2,-0x1 20cc 0227 | ' | Execute Access,All_Reference 20cd 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 20ce 01d9 | | Execute Vector,Reverse_Bounds 20cf 0263 | c | Execute Discrete,Above_Bound 20d0 7012 |p | Jump_Nonzero 0x20e3 20d1 00d8 | | Load_Top At_Offset_0 20d2 e5ff | | Load 0x2,-0x1 20d3 0227 | ' | Execute Access,All_Reference 20d4 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 20d5 01d7 | | Execute Vector,Field_Read 20d6 680a |h | Jump_Zero 0x20e1 20d7 00d8 | | Load_Top At_Offset_0 20d8 e5fe | | Load 0x2,-0x2 20d9 e001 | | Load 0x0,0x1 20da 1b14 | | Execute Package,Field_Read,Field_Number 0x14 20db 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 20dc a402 | | Store_Unchecked 0x2,0x2 20dd e402 | | Load 0x2,0x2 20de 6802 |h | Jump_Zero 0x20e1 20df 00d2 | | Pop_Control Pop_Count_2 20e0 7802 |x | Jump 0x20e3 20e1 00c8 | | Action Pop_Auxiliary_Range 20e2 3fee |? | Loop_Increasing 0x20d1 20e3 00ce | | Action Pop_Auxiliary 20e4 7977 |yw | Jump 0x225c 20e5 e5ff | | Load 0x2,-0x1 20e6 0227 | ' | Execute Access,All_Reference 20e7 2e0a |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa 20e8 4603 |F | Jump_Case 0x4 20e9 7820 |x | Jump 0x210a ; case 0x0 20ea 7824 |x$ | Jump 0x210f ; case 0x1 20eb 7829 |x) | Jump 0x2115 ; case 0x2 20ec 7800 |x | Jump 0x20ed ; case 0x3 20ed 4800 |H | Short_Literal 0x0 20ee a402 | | Store_Unchecked 0x2,0x2 20ef 00cf | | Action Mark_Auxiliary 20f0 e5ff | | Load 0x2,-0x1 20f1 0227 | ' | Execute Access,All_Reference 20f2 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 20f3 01d9 | | Execute Vector,Reverse_Bounds 20f4 0263 | c | Execute Discrete,Above_Bound 20f5 7012 |p | Jump_Nonzero 0x2108 20f6 00d8 | | Load_Top At_Offset_0 20f7 e5ff | | Load 0x2,-0x1 20f8 0227 | ' | Execute Access,All_Reference 20f9 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 20fa 01d7 | | Execute Vector,Field_Read 20fb 680a |h | Jump_Zero 0x2106 20fc 00d8 | | Load_Top At_Offset_0 20fd e5fe | | Load 0x2,-0x2 20fe e001 | | Load 0x0,0x1 20ff 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2100 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 2101 a402 | | Store_Unchecked 0x2,0x2 2102 e402 | | Load 0x2,0x2 2103 6802 |h | Jump_Zero 0x2106 2104 00d2 | | Pop_Control Pop_Count_2 2105 7802 |x | Jump 0x2108 2106 00c8 | | Action Pop_Auxiliary_Range 2107 3fee |? | Loop_Increasing 0x20f6 2108 00ce | | Action Pop_Auxiliary 2109 7952 |yR | Jump 0x225c 210a e5fe | | Load 0x2,-0x2 210b 0217 | | Execute Heap_Access,All_Reference 210c 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 210d a402 | | Store_Unchecked 0x2,0x2 210e 794d |yM | Jump 0x225c 210f e5fe | | Load 0x2,-0x2 2110 e001 | | Load 0x0,0x1 2111 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2112 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 2113 a402 | | Store_Unchecked 0x2,0x2 2114 7947 |yG | Jump 0x225c 2115 4800 |H | Short_Literal 0x0 2116 a402 | | Store_Unchecked 0x2,0x2 2117 00cf | | Action Mark_Auxiliary 2118 e5ff | | Load 0x2,-0x1 2119 0227 | ' | Execute Access,All_Reference 211a 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 211b 01d9 | | Execute Vector,Reverse_Bounds 211c 0263 | c | Execute Discrete,Above_Bound 211d 7012 |p | Jump_Nonzero 0x2130 211e 00d8 | | Load_Top At_Offset_0 211f e5ff | | Load 0x2,-0x1 2120 0227 | ' | Execute Access,All_Reference 2121 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2122 01d7 | | Execute Vector,Field_Read 2123 680a |h | Jump_Zero 0x212e 2124 00d8 | | Load_Top At_Offset_0 2125 e5fe | | Load 0x2,-0x2 2126 e001 | | Load 0x0,0x1 2127 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2128 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 2129 a402 | | Store_Unchecked 0x2,0x2 212a e402 | | Load 0x2,0x2 212b 6802 |h | Jump_Zero 0x212e 212c 00d2 | | Pop_Control Pop_Count_2 212d 7802 |x | Jump 0x2130 212e 00c8 | | Action Pop_Auxiliary_Range 212f 3fee |? | Loop_Increasing 0x211e 2130 00ce | | Action Pop_Auxiliary 2131 792a |y* | Jump 0x225c 2132 4800 |H | Short_Literal 0x0 2133 a402 | | Store_Unchecked 0x2,0x2 2134 e5fe | | Load 0x2,-0x2 2135 e001 | | Load 0x0,0x1 2136 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2137 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 2138 6923 |i# | Jump_Zero 0x225c 2139 e5fe | | Load 0x2,-0x2 213a e001 | | Load 0x0,0x1 213b 1b14 | | Execute Package,Field_Read,Field_Number 0x14 213c 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 213d e5ff | | Load 0x2,-0x1 213e 0227 | ' | Execute Access,All_Reference 213f 2e0e |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe 2140 0217 | | Execute Heap_Access,All_Reference 2141 e033 | 3 | Load 0x0,0x33 2142 1812 | | Execute Package,Field_Execute,Field_Number 0x12 2143 6803 |h | Jump_Zero 0x2147 2144 4801 |H | Short_Literal 0x1 2145 a402 | | Store_Unchecked 0x2,0x2 2146 7915 |y | Jump 0x225c 2147 00cf | | Action Mark_Auxiliary 2148 e5ff | | Load 0x2,-0x1 2149 0227 | ' | Execute Access,All_Reference 214a 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 214b 01d9 | | Execute Vector,Reverse_Bounds 214c 0263 | c | Execute Discrete,Above_Bound 214d 7018 |p | Jump_Nonzero 0x2166 214e 00d8 | | Load_Top At_Offset_0 214f e5ff | | Load 0x2,-0x1 2150 0227 | ' | Execute Access,All_Reference 2151 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2152 01d7 | | Execute Vector,Field_Read 2153 6810 |h | Jump_Zero 0x2164 2154 00d8 | | Load_Top At_Offset_0 2155 e5fe | | Load 0x2,-0x2 2156 e001 | | Load 0x0,0x1 2157 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2158 1854 | T | Execute Package,Field_Execute,Field_Number 0x54 2159 e5ff | | Load 0x2,-0x1 215a 0227 | ' | Execute Access,All_Reference 215b 2e0e |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe 215c 0217 | | Execute Heap_Access,All_Reference 215d e033 | 3 | Load 0x0,0x33 215e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 215f a402 | | Store_Unchecked 0x2,0x2 2160 e402 | | Load 0x2,0x2 2161 6802 |h | Jump_Zero 0x2164 2162 00d2 | | Pop_Control Pop_Count_2 2163 7802 |x | Jump 0x2166 2164 00c8 | | Action Pop_Auxiliary_Range 2165 3fe8 |? | Loop_Increasing 0x214e 2166 00ce | | Action Pop_Auxiliary 2167 78f4 |x | Jump 0x225c 2168 e5ff | | Load 0x2,-0x1 2169 e5fe | | Load 0x2,-0x2 216a 0217 | | Execute Heap_Access,All_Reference 216b 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 216c 82b8 | | Call 0x1,0xb8 216d a402 | | Store_Unchecked 0x2,0x2 216e 78ed |x | Jump 0x225c 216f e5ff | | Load 0x2,-0x1 2170 e5fe | | Load 0x2,-0x2 2171 0217 | | Execute Heap_Access,All_Reference 2172 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 2173 82b8 | | Call 0x1,0xb8 2174 a402 | | Store_Unchecked 0x2,0x2 2175 78e6 |x | Jump 0x225c 2176 4800 |H | Short_Literal 0x0 2177 a402 | | Store_Unchecked 0x2,0x2 2178 00cf | | Action Mark_Auxiliary 2179 e5ff | | Load 0x2,-0x1 217a 0227 | ' | Execute Access,All_Reference 217b 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 217c 01d9 | | Execute Vector,Reverse_Bounds 217d 0263 | c | Execute Discrete,Above_Bound 217e 7014 |p | Jump_Nonzero 0x2193 217f 00d8 | | Load_Top At_Offset_0 2180 e5ff | | Load 0x2,-0x1 2181 0227 | ' | Execute Access,All_Reference 2182 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2183 01d7 | | Execute Vector,Field_Read 2184 680c |h | Jump_Zero 0x2191 2185 e5ff | | Load 0x2,-0x1 2186 00d9 | | Load_Top At_Offset_1 2187 e5fe | | Load 0x2,-0x2 2188 e001 | | Load 0x0,0x1 2189 1b14 | | Execute Package,Field_Read,Field_Number 0x14 218a 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 218b 82b8 | | Call 0x1,0xb8 218c a402 | | Store_Unchecked 0x2,0x2 218d e402 | | Load 0x2,0x2 218e 6802 |h | Jump_Zero 0x2191 218f 00d2 | | Pop_Control Pop_Count_2 2190 7802 |x | Jump 0x2193 2191 00c8 | | Action Pop_Auxiliary_Range 2192 3fec |? | Loop_Increasing 0x217f 2193 00ce | | Action Pop_Auxiliary 2194 78c7 |x | Jump 0x225c 2195 4800 |H | Short_Literal 0x0 2196 a402 | | Store_Unchecked 0x2,0x2 2197 00cf | | Action Mark_Auxiliary 2198 e5ff | | Load 0x2,-0x1 2199 0227 | ' | Execute Access,All_Reference 219a 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 219b 01d9 | | Execute Vector,Reverse_Bounds 219c 0263 | c | Execute Discrete,Above_Bound 219d 7014 |p | Jump_Nonzero 0x21b2 219e 00d8 | | Load_Top At_Offset_0 219f e5ff | | Load 0x2,-0x1 21a0 0227 | ' | Execute Access,All_Reference 21a1 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 21a2 01d7 | | Execute Vector,Field_Read 21a3 680c |h | Jump_Zero 0x21b0 21a4 e5ff | | Load 0x2,-0x1 21a5 00d9 | | Load_Top At_Offset_1 21a6 e5fe | | Load 0x2,-0x2 21a7 e001 | | Load 0x0,0x1 21a8 1b14 | | Execute Package,Field_Read,Field_Number 0x14 21a9 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 21aa 82b8 | | Call 0x1,0xb8 21ab a402 | | Store_Unchecked 0x2,0x2 21ac e402 | | Load 0x2,0x2 21ad 6802 |h | Jump_Zero 0x21b0 21ae 00d2 | | Pop_Control Pop_Count_2 21af 7802 |x | Jump 0x21b2 21b0 00c8 | | Action Pop_Auxiliary_Range 21b1 3fec |? | Loop_Increasing 0x219e 21b2 00ce | | Action Pop_Auxiliary 21b3 78a8 |x | Jump 0x225c 21b4 4800 |H | Short_Literal 0x0 21b5 a402 | | Store_Unchecked 0x2,0x2 21b6 00cf | | Action Mark_Auxiliary 21b7 e5ff | | Load 0x2,-0x1 21b8 0227 | ' | Execute Access,All_Reference 21b9 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 21ba 01d9 | | Execute Vector,Reverse_Bounds 21bb 0263 | c | Execute Discrete,Above_Bound 21bc 7015 |p | Jump_Nonzero 0x21d2 21bd 00d8 | | Load_Top At_Offset_0 21be e5ff | | Load 0x2,-0x1 21bf 0227 | ' | Execute Access,All_Reference 21c0 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 21c1 01d7 | | Execute Vector,Field_Read 21c2 680d |h | Jump_Zero 0x21d0 21c3 e5ff | | Load 0x2,-0x1 21c4 00d9 | | Load_Top At_Offset_1 21c5 4800 |H | Short_Literal 0x0 21c6 e5fe | | Load 0x2,-0x2 21c7 e001 | | Load 0x0,0x1 21c8 1b14 | | Execute Package,Field_Read,Field_Number 0x14 21c9 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 21ca 82b8 | | Call 0x1,0xb8 21cb a402 | | Store_Unchecked 0x2,0x2 21cc e402 | | Load 0x2,0x2 21cd 6802 |h | Jump_Zero 0x21d0 21ce 00d2 | | Pop_Control Pop_Count_2 21cf 7802 |x | Jump 0x21d2 21d0 00c8 | | Action Pop_Auxiliary_Range 21d1 3feb |? | Loop_Increasing 0x21bd 21d2 00ce | | Action Pop_Auxiliary 21d3 7888 |x | Jump 0x225c 21d4 e5fe | | Load 0x2,-0x2 21d5 e001 | | Load 0x0,0x1 21d6 1b14 | | Execute Package,Field_Read,Field_Number 0x14 21d7 181c | | Execute Package,Field_Execute,Field_Number 0x1c 21d8 e5ff | | Load 0x2,-0x1 21d9 0227 | ' | Execute Access,All_Reference 21da 2e0e |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe 21db 0217 | | Execute Heap_Access,All_Reference 21dc e033 | 3 | Load 0x0,0x33 21dd 1812 | | Execute Package,Field_Execute,Field_Number 0x12 21de a402 | | Store_Unchecked 0x2,0x2 21df 787c |x| | Jump 0x225c 21e0 4800 |H | Short_Literal 0x0 21e1 a402 | | Store_Unchecked 0x2,0x2 21e2 00cf | | Action Mark_Auxiliary 21e3 e5ff | | Load 0x2,-0x1 21e4 0227 | ' | Execute Access,All_Reference 21e5 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 21e6 01d9 | | Execute Vector,Reverse_Bounds 21e7 0263 | c | Execute Discrete,Above_Bound 21e8 7020 |p | Jump_Nonzero 0x2209 21e9 00d8 | | Load_Top At_Offset_0 21ea e5ff | | Load 0x2,-0x1 21eb 0227 | ' | Execute Access,All_Reference 21ec 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 21ed 01d7 | | Execute Vector,Field_Read 21ee 6818 |h | Jump_Zero 0x2207 21ef 00d8 | | Load_Top At_Offset_0 21f0 e5fe | | Load 0x2,-0x2 21f1 e001 | | Load 0x0,0x1 21f2 1b14 | | Execute Package,Field_Read,Field_Number 0x14 21f3 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 21f4 680c |h | Jump_Zero 0x2201 21f5 00d8 | | Load_Top At_Offset_0 21f6 e5fe | | Load 0x2,-0x2 21f7 e001 | | Load 0x0,0x1 21f8 1b14 | | Execute Package,Field_Read,Field_Number 0x14 21f9 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 21fa e5ff | | Load 0x2,-0x1 21fb 0227 | ' | Execute Access,All_Reference 21fc 2e0e |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe 21fd 0217 | | Execute Heap_Access,All_Reference 21fe e033 | 3 | Load 0x0,0x33 21ff 1812 | | Execute Package,Field_Execute,Field_Number 0x12 2200 7801 |x | Jump 0x2202 2201 4800 |H | Short_Literal 0x0 2202 a402 | | Store_Unchecked 0x2,0x2 2203 e402 | | Load 0x2,0x2 2204 6802 |h | Jump_Zero 0x2207 2205 00d2 | | Pop_Control Pop_Count_2 2206 7802 |x | Jump 0x2209 2207 00c8 | | Action Pop_Auxiliary_Range 2208 3fe0 |? | Loop_Increasing 0x21e9 2209 00ce | | Action Pop_Auxiliary 220a 7851 |xQ | Jump 0x225c 220b e5fe | | Load 0x2,-0x2 220c e001 | | Load 0x0,0x1 220d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 220e 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 220f 680e |h | Jump_Zero 0x221e 2210 e5fe | | Load 0x2,-0x2 2211 e001 | | Load 0x0,0x1 2212 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2213 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 2214 e001 | | Load 0x0,0x1 2215 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2216 181c | | Execute Package,Field_Execute,Field_Number 0x1c 2217 e5ff | | Load 0x2,-0x1 2218 0227 | ' | Execute Access,All_Reference 2219 2e0e |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe 221a 0217 | | Execute Heap_Access,All_Reference 221b e033 | 3 | Load 0x0,0x33 221c 1812 | | Execute Package,Field_Execute,Field_Number 0x12 221d 7801 |x | Jump 0x221f 221e 4800 |H | Short_Literal 0x0 221f a402 | | Store_Unchecked 0x2,0x2 2220 783b |x; | Jump 0x225c 2221 e5fe | | Load 0x2,-0x2 2222 e001 | | Load 0x0,0x1 2223 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2224 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 2225 680e |h | Jump_Zero 0x2234 2226 e5fe | | Load 0x2,-0x2 2227 e001 | | Load 0x0,0x1 2228 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2229 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 222a e001 | | Load 0x0,0x1 222b 1b14 | | Execute Package,Field_Read,Field_Number 0x14 222c 181c | | Execute Package,Field_Execute,Field_Number 0x1c 222d e5ff | | Load 0x2,-0x1 222e 0227 | ' | Execute Access,All_Reference 222f 2e0e |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe 2230 0217 | | Execute Heap_Access,All_Reference 2231 e033 | 3 | Load 0x0,0x33 2232 1812 | | Execute Package,Field_Execute,Field_Number 0x12 2233 7801 |x | Jump 0x2235 2234 4800 |H | Short_Literal 0x0 2235 a402 | | Store_Unchecked 0x2,0x2 2236 7825 |x% | Jump 0x225c 2237 4800 |H | Short_Literal 0x0 2238 a402 | | Store_Unchecked 0x2,0x2 2239 00cf | | Action Mark_Auxiliary 223a e5ff | | Load 0x2,-0x1 223b 0227 | ' | Execute Access,All_Reference 223c 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 223d 01d9 | | Execute Vector,Reverse_Bounds 223e 0263 | c | Execute Discrete,Above_Bound 223f 7014 |p | Jump_Nonzero 0x2254 2240 00d8 | | Load_Top At_Offset_0 2241 e5ff | | Load 0x2,-0x1 2242 0227 | ' | Execute Access,All_Reference 2243 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2244 01d7 | | Execute Vector,Field_Read 2245 680c |h | Jump_Zero 0x2252 2246 e5ff | | Load 0x2,-0x1 2247 00d9 | | Load_Top At_Offset_1 2248 e5fe | | Load 0x2,-0x2 2249 e001 | | Load 0x0,0x1 224a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 224b 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 224c 82b9 | | Call 0x1,0xb9 224d a402 | | Store_Unchecked 0x2,0x2 224e e402 | | Load 0x2,0x2 224f 6802 |h | Jump_Zero 0x2252 2250 00d2 | | Pop_Control Pop_Count_2 2251 7802 |x | Jump 0x2254 2252 00c8 | | Action Pop_Auxiliary_Range 2253 3fec |? | Loop_Increasing 0x2240 2254 00ce | | Action Pop_Auxiliary 2255 7806 |x | Jump 0x225c 2256 e5ff | | Load 0x2,-0x1 2257 e5fe | | Load 0x2,-0x2 2258 0217 | | Execute Heap_Access,All_Reference 2259 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 225a 82b9 | | Call 0x1,0xb9 225b a402 | | Store_Unchecked 0x2,0x2 225c e402 | | Load 0x2,0x2 225d a5fd | | Store_Unchecked 0x2,-0x3 225e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 225f 0000 | | .XXX[0x1] 2260 0000 0000 | | .LITERAL {0x00000000, 0x00002820} 2264 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 2268 ; -------------------------------------------------------------------------------------- 2268 ; SUBPROGRAM 2268 ; -------------------------------------------------------------------------------------- 2268 2278 |"x | .CONST 0x2278 ; Address of begin 2269 0004 | | .CONST 0x0004 ; Address of exception handler 226a 0005 | | .CONST 0x0005 ; Number of locals 226b INIT_2268: 226b 00da | | Load_Top At_Offset_2 226c e00d | | Load 0x0,0xd 226d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 226e 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 226f e5fd | | Load 0x2,-0x3 2270 e01b | | Load 0x0,0x1b 2271 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 2272 e5fd | | Load 0x2,-0x3 2273 0217 | | Execute Heap_Access,All_Reference 2274 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 2275 0007 | | Action Break_Optional 2276 e01b | | Load 0x0,0x1b 2277 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 2278 BODY_2268: 2278 e5ff | | Load 0x2,-0x1 2279 8026 | & | Call 0x0,0x26 227a 0f02 | | Execute_Immediate Equal,0x2 227b 00db | | Load_Top At_Offset_3 227c 0217 | | Execute Heap_Access,All_Reference 227d 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 227e 4800 |H | Short_Literal 0x0 227f e5fd | | Load 0x2,-0x3 2280 e403 | | Load 0x2,0x3 2281 e001 | | Load 0x0,0x1 2282 1b13 | | Execute Package,Field_Read,Field_Number 0x13 2283 0216 | | Execute Heap_Access,Convert 2284 e5ff | | Load 0x2,-0x1 2285 e02a | * | Load 0x0,0x2a 2286 1813 | | Execute Package,Field_Execute,Field_Number 0x13 2287 e5fd | | Load 0x2,-0x3 2288 0217 | | Execute Heap_Access,All_Reference 2289 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 228a 00db | | Load_Top At_Offset_3 228b 0217 | | Execute Heap_Access,All_Reference 228c 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 228d 00da | | Load_Top At_Offset_2 228e e5fd | | Load 0x2,-0x3 228f 0217 | | Execute Heap_Access,All_Reference 2290 380d |8 | Execute Record,Field_Write,Field_Number 0xd 2291 e5ff | | Load 0x2,-0x1 2292 00db | | Load_Top At_Offset_3 2293 0217 | | Execute Heap_Access,All_Reference 2294 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 2295 e5fd | | Load 0x2,-0x3 2296 e402 | | Load 0x2,0x2 2297 e020 | | Load 0x0,0x20 2298 180f | | Execute Package,Field_Execute,Field_Number 0xf 2299 00db | | Load_Top At_Offset_3 229a 0217 | | Execute Heap_Access,All_Reference 229b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 229c e5fe | | Load 0x2,-0x2 229d 00db | | Load_Top At_Offset_3 229e 0217 | | Execute Heap_Access,All_Reference 229f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 22a0 e5ff | | Load 0x2,-0x1 22a1 e5fe | | Load 0x2,-0x2 22a2 012f | / | Execute Any,Equal 22a3 680b |h | Jump_Zero 0x22af 22a4 00da | | Load_Top At_Offset_2 22a5 0217 | | Execute Heap_Access,All_Reference 22a6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 22a7 00db | | Load_Top At_Offset_3 22a8 0217 | | Execute Heap_Access,All_Reference 22a9 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 22aa 4800 |H | Short_Literal 0x0 22ab 00db | | Load_Top At_Offset_3 22ac 0217 | | Execute Heap_Access,All_Reference 22ad 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 22ae 780e |x | Jump 0x22bd 22af e5fe | | Load 0x2,-0x2 22b0 e00d | | Load 0x0,0xd 22b1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 22b2 700a |p | Jump_Nonzero 0x22bd 22b3 e5fd | | Load 0x2,-0x3 22b4 e5fe | | Load 0x2,-0x2 22b5 e00d | | Load 0x0,0xd 22b6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 22b7 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 22b8 e020 | | Load 0x0,0x20 22b9 180f | | Execute Package,Field_Execute,Field_Number 0xf 22ba 00db | | Load_Top At_Offset_3 22bb 0217 | | Execute Heap_Access,All_Reference 22bc 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 22bd 00cf | | Action Mark_Auxiliary 22be 781c |x | Jump 0x22db 22bf 00db | | Load_Top At_Offset_3 22c0 e001 | | Load 0x0,0x1 22c1 1b13 | | Execute Package,Field_Read,Field_Number 0x13 22c2 0216 | | Execute Heap_Access,Convert 22c3 e01b | | Load 0x0,0x1b 22c4 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 22c5 0032 | 2 | Store_Top Heap_Access,At_Offset_2 22c6 00da | | Load_Top At_Offset_2 22c7 0217 | | Execute Heap_Access,All_Reference 22c8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 22c9 00da | | Load_Top At_Offset_2 22ca 0217 | | Execute Heap_Access,All_Reference 22cb 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 22cc 00db | | Load_Top At_Offset_3 22cd 0217 | | Execute Heap_Access,All_Reference 22ce 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 22cf 00da | | Load_Top At_Offset_2 22d0 0217 | | Execute Heap_Access,All_Reference 22d1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 22d2 00d9 | | Load_Top At_Offset_1 22d3 e403 | | Load 0x2,0x3 22d4 0217 | | Execute Heap_Access,All_Reference 22d5 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 22d6 00da | | Load_Top At_Offset_2 22d7 0217 | | Execute Heap_Access,All_Reference 22d8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 22d9 0033 | 3 | Store_Top Heap_Access,At_Offset_3 22da 00c9 | | Action Pop_Auxiliary_Loop 22db 00da | | Load_Top At_Offset_2 22dc 77e2 |w | Jump_Nonzero 0x22bf 22dd 4504 |E | Exit_Suprogram New_Top_Offset 0x4 22de 0000 0000 | | .XXX[0x2] 22e0 ; -------------------------------------------------------------------------------------- 22e0 ; SUBPROGRAM 22e0 ; -------------------------------------------------------------------------------------- 22e0 22f0 |" | .CONST 0x22f0 ; Address of begin 22e1 0004 | | .CONST 0x0004 ; Address of exception handler 22e2 0004 | | .CONST 0x0004 ; Number of locals 22e3 INIT_22e0: 22e3 e00d | | Load 0x0,0xd 22e4 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 22e5 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 22e6 02c7 | | Declare_Variable Any 22e7 00d8 | | Load_Top At_Offset_0 22e8 1c00 | | Execute_Immediate Run_Utility,0x0 22e9 e00d | | Load 0x0,0xd 22ea 1b0d | | Execute Package,Field_Read,Field_Number 0xd 22eb e02a | * | Load 0x0,0x2a 22ec 1b0f | | Execute Package,Field_Read,Field_Number 0xf 22ed 02ff | | Declare_Variable Variant_Record 22ee 00d8 | | Load_Top At_Offset_0 22ef 1c00 | | Execute_Immediate Run_Utility,0x0 22f0 BODY_22e0: 22f0 e00d | | Load 0x0,0xd 22f1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 22f2 00db | | Load_Top At_Offset_3 22f3 0120 | | Execute Any,Is_Value 22f4 6804 |h | Jump_Zero 0x22f9 22f5 e00d | | Load 0x0,0xd 22f6 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 22f7 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 22f8 7801 |x | Jump 0x22fa 22f9 00db | | Load_Top At_Offset_3 22fa 602d |`- | Indirect_Literal Discrete,0x2328,{0x00000000, 0x00004000} 22fb e022 | " | Load 0x0,0x22 22fc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 22fd 4800 |H | Short_Literal 0x0 22fe e5ff | | Load 0x2,-0x1 22ff 0217 | | Execute Heap_Access,All_Reference 2300 340d |4 | Execute Record,Field_Reference,Field_Number 0xd 2301 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 2302 e00d | | Load 0x0,0xd 2303 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 2304 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 2305 c402 | | Store 0x2,0x2 2306 005a | Z | Store_Top Discrete,At_Offset_2 2307 00da | | Load_Top At_Offset_2 2308 e00d | | Load 0x0,0xd 2309 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 230a 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 230b 00db | | Load_Top At_Offset_3 230c e00d | | Load 0x0,0xd 230d 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 230e 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 230f 012e | . | Execute Any,Not_Equal 2310 6813 |h | Jump_Zero 0x2324 2311 4802 |H | Short_Literal 0x2 2312 e5fe | | Load 0x2,-0x2 2313 e402 | | Load 0x2,0x2 2314 e00d | | Load 0x0,0xd 2315 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 2316 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 2317 e02a | * | Load 0x0,0x2a 2318 1811 | | Execute Package,Field_Execute,Field_Number 0x11 2319 00d9 | | Load_Top At_Offset_1 231a 016d | m | Execute Variant_Record,Structure_Write 231b 00d8 | | Load_Top At_Offset_0 231c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 231d 0f02 | | Execute_Immediate Equal,0x2 231e 6805 |h | Jump_Zero 0x2324 231f 00d8 | | Load_Top At_Offset_0 2320 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 2321 0217 | | Execute Heap_Access,All_Reference 2322 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 2323 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 2324 e01b | | Load 0x0,0x1b 2325 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 2326 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 2327 0000 | | .XXX[0x1] 2328 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 232c 0000 0000 | | .BLANK 0000[0x4] 2330 ; -------------------------------------------------------------------------------------- 2330 ; SUBPROGRAM 2330 ; -------------------------------------------------------------------------------------- 2330 233d |#= | .CONST 0x233d ; Address of begin 2331 239b |# | .CONST 0x239b ; Address of exception handler 2332 0006 | | .CONST 0x0006 ; Number of locals 2333 INIT_2330: 2333 e01b | | Load 0x0,0x1b 2334 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 2335 e01b | | Load 0x0,0x1b 2336 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 2337 e01b | | Load 0x0,0x1b 2338 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 2339 e01b | | Load 0x0,0x1b 233a 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 233b 00e2 | | Load_Encached Integer_Cache 233c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 233d BODY_2330: 233d e5ff | | Load 0x2,-0x1 233e 0217 | | Execute Heap_Access,All_Reference 233f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 2340 0c01 | | Execute_Immediate Greater_Equal,0x1 2341 7009 |p | Jump_Nonzero 0x234b 2342 e5fd | | Load 0x2,-0x3 2343 0c02 | | Execute_Immediate Greater_Equal,0x2 2344 7006 |p | Jump_Nonzero 0x234b 2345 e5fd | | Load 0x2,-0x3 2346 0f01 | | Execute_Immediate Equal,0x1 2347 684e |hN | Jump_Zero 0x2396 2348 e5fe | | Load 0x2,-0x2 2349 0c02 | | Execute_Immediate Greater_Equal,0x2 234a 684b |hK | Jump_Zero 0x2396 234b e5ff | | Load 0x2,-0x1 234c 0217 | | Execute Heap_Access,All_Reference 234d 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 234e a402 | | Store_Unchecked 0x2,0x2 234f 00cf | | Action Mark_Auxiliary 2350 783d |x= | Jump 0x238e 2351 e402 | | Load 0x2,0x2 2352 0217 | | Execute Heap_Access,All_Reference 2353 3c14 |< | Execute Record,Field_Read,Field_Number 0x14 2354 a403 | | Store_Unchecked 0x2,0x3 2355 e402 | | Load 0x2,0x2 2356 0217 | | Execute Heap_Access,All_Reference 2357 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 2358 6830 |h0 | Jump_Zero 0x2389 2359 e5ff | | Load 0x2,-0x1 235a e402 | | Load 0x2,0x2 235b 82bc | | Call 0x1,0xbc 235c 0033 | 3 | Store_Top Heap_Access,At_Offset_3 235d 00da | | Load_Top At_Offset_2 235e 6827 |h' | Jump_Zero 0x2386 235f 00db | | Load_Top At_Offset_3 2360 7005 |p | Jump_Nonzero 0x2366 2361 e403 | | Load 0x2,0x3 2362 e5ff | | Load 0x2,-0x1 2363 0217 | | Execute Heap_Access,All_Reference 2364 380f |8 | Execute Record,Field_Write,Field_Number 0xf 2365 7804 |x | Jump 0x236a 2366 e403 | | Load 0x2,0x3 2367 e404 | | Load 0x2,0x4 2368 0217 | | Execute Heap_Access,All_Reference 2369 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 236a 4800 |H | Short_Literal 0x0 236b e402 | | Load 0x2,0x2 236c 0217 | | Execute Heap_Access,All_Reference 236d 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 236e 00da | | Load_Top At_Offset_2 236f e402 | | Load 0x2,0x2 2370 0217 | | Execute Heap_Access,All_Reference 2371 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 2372 e5ff | | Load 0x2,-0x1 2373 e402 | | Load 0x2,0x2 2374 e001 | | Load 0x0,0x1 2375 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2376 0216 | | Execute Heap_Access,Convert 2377 8264 | d | Call 0x1,0x64 2378 e5fb | | Load 0x2,-0x5 2379 e402 | | Load 0x2,0x2 237a 0217 | | Execute Heap_Access,All_Reference 237b 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 237c e5fc | | Load 0x2,-0x4 237d e402 | | Load 0x2,0x2 237e e001 | | Load 0x0,0x1 237f 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2380 0216 | | Execute Heap_Access,Convert 2381 e001 | | Load 0x0,0x1 2382 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2383 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 2384 c5fb | | Store 0x2,-0x5 2385 7803 |x | Jump 0x2389 2386 00d9 | | Load_Top At_Offset_1 2387 0a01 | | Execute_Immediate Plus,0x1 2388 005a | Z | Store_Top Discrete,At_Offset_2 2389 e402 | | Load 0x2,0x2 238a a404 | | Store_Unchecked 0x2,0x4 238b e403 | | Load 0x2,0x3 238c a402 | | Store_Unchecked 0x2,0x2 238d 00c9 | | Action Pop_Auxiliary_Loop 238e e402 | | Load 0x2,0x2 238f 77c1 |w | Jump_Nonzero 0x2351 2390 00ce | | Action Pop_Auxiliary 2391 00d8 | | Load_Top At_Offset_0 2392 e5ff | | Load 0x2,-0x1 2393 0217 | | Execute Heap_Access,All_Reference 2394 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 2395 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2396 4801 |H | Short_Literal 0x1 2397 e5ff | | Load 0x2,-0x1 2398 0217 | | Execute Heap_Access,All_Reference 2399 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 239a 4505 |E | Exit_Suprogram New_Top_Offset 0x5 239b TRAP_2330: 239b 4885 |H | Short_Literal 0x85 239c 010f | | Execute Exception,Equal 239d 6812 |h | Jump_Zero 0x23b0 239e e002 | | Load 0x0,0x2 239f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 23a0 4801 |H | Short_Literal 0x1 23a1 4801 |H | Short_Literal 0x1 23a2 e00e | | Load 0x0,0xe 23a3 1b0f | | Execute Package,Field_Read,Field_Number 0xf 23a4 035b | [ | Declare_Type Array,Constrained 23a5 0337 | 7 | Declare_Variable Array 23a6 e5ff | | Load 0x2,-0x1 23a7 825a | Z | Call 0x1,0x5a 23a8 4801 |H | Short_Literal 0x1 23a9 00da | | Load_Top At_Offset_2 23aa 01d6 | | Execute Vector,Field_Write 23ab 6008 |` | Indirect_Literal Discrete,0x23b4,{0x00000000, 0x00002836} 23ac e002 | | Load 0x0,0x2 23ad 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 23ae c5fb | | Store 0x2,-0x5 23af 4505 |E | Exit_Suprogram New_Top_Offset 0x5 23b0 0100 | | Execute Exception,Raise 23b1 0000 0000 | | .XXX[0x3] 23b3 0000 | | 23b4 0000 0000 | | .LITERAL {0x00000000, 0x00002836} 23b8 ; -------------------------------------------------------------------------------------- 23b8 ; SUBPROGRAM 23b8 ; -------------------------------------------------------------------------------------- 23b8 23c5 |# | .CONST 0x23c5 ; Address of begin 23b9 0004 | | .CONST 0x0004 ; Address of exception handler 23ba 0002 | | .CONST 0x0002 ; Number of locals 23bb INIT_23b8: 23bb e003 | | Load 0x0,0x3 23bc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 23bd 0337 | 7 | Declare_Variable Array 23be 00db | | Load_Top At_Offset_3 23bf 825f | _ | Call 0x1,0x5f 23c0 8226 | & | Call 0x1,0x26 23c1 e00c | | Load 0x0,0xc 23c2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 23c3 00d9 | | Load_Top At_Offset_1 23c4 01d4 | | Execute Vector,Structure_Write 23c5 BODY_23b8: 23c5 4800 |H | Short_Literal 0x0 23c6 00d9 | | Load_Top At_Offset_1 23c7 01d7 | | Execute Vector,Field_Read 23c8 0f00 | | Execute_Immediate Equal,0x0 23c9 4803 |H | Short_Literal 0x3 23ca e5ff | | Load 0x2,-0x1 23cb 0217 | | Execute Heap_Access,All_Reference 23cc 341a |4 | Execute Record,Field_Reference,Field_Number 0x1a 23cd 01d6 | | Execute Vector,Field_Write 23ce 4803 |H | Short_Literal 0x3 23cf 00d9 | | Load_Top At_Offset_1 23d0 01d7 | | Execute Vector,Field_Read 23d1 4804 |H | Short_Literal 0x4 23d2 e5ff | | Load 0x2,-0x1 23d3 0217 | | Execute Heap_Access,All_Reference 23d4 341a |4 | Execute Record,Field_Reference,Field_Number 0x1a 23d5 01d6 | | Execute Vector,Field_Write 23d6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 23d7 0000 | | .XXX[0x1] 23d8 ; -------------------------------------------------------------------------------------- 23d8 ; SUBPROGRAM 23d8 ; -------------------------------------------------------------------------------------- 23d8 2419 |$ | .CONST 0x2419 ; Address of begin 23d9 25ae |% | .CONST 0x25ae ; Address of exception handler 23da 000d | | .CONST 0x000d ; Number of locals 23db INIT_23d8: 23db 00da | | Load_Top At_Offset_2 23dc e00d | | Load 0x0,0xd 23dd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 23de 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 23df e5fe | | Load 0x2,-0x2 23e0 0217 | | Execute Heap_Access,All_Reference 23e1 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 23e2 0217 | | Execute Heap_Access,All_Reference 23e3 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 23e4 e020 | | Load 0x0,0x20 23e5 1812 | | Execute Package,Field_Execute,Field_Number 0x12 23e6 00d9 | | Load_Top At_Offset_1 23e7 01dd | | Execute Vector,First 23e8 00d9 | | Load_Top At_Offset_1 23e9 01db | | Execute Vector,Length 23ea 0273 | s | Execute Discrete,Plus 23eb 00d8 | | Load_Top At_Offset_0 23ec 00e2 | | Load_Encached Integer_Cache 23ed 0260 | ` | Execute Discrete,In_Type 23ee 7001 |p | Jump_Nonzero 0x23f0 23ef 0801 | | Execute_Immediate Raise,0x1 23f0 00da | | Load_Top At_Offset_2 23f1 01dc | | Execute Vector,Last 23f2 00db | | Load_Top At_Offset_3 23f3 01cf | | Execute Vector,Slice_Read 23f4 0007 | | Action Break_Optional 23f5 e020 | | Load 0x0,0x20 23f6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 23f7 e02a | * | Load 0x0,0x2a 23f8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 23f9 02ff | | Declare_Variable Variant_Record 23fa 00d8 | | Load_Top At_Offset_0 23fb 1c00 | | Execute_Immediate Run_Utility,0x0 23fc e00d | | Load 0x0,0xd 23fd 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 23fe 1b0e | | Execute Package,Field_Read,Field_Number 0xe 23ff 02c7 | | Declare_Variable Any 2400 00d8 | | Load_Top At_Offset_0 2401 1c00 | | Execute_Immediate Run_Utility,0x0 2402 e00d | | Load 0x0,0xd 2403 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 2404 1b0e | | Execute Package,Field_Read,Field_Number 0xe 2405 02c7 | | Declare_Variable Any 2406 00d8 | | Load_Top At_Offset_0 2407 1c00 | | Execute_Immediate Run_Utility,0x0 2408 e00d | | Load 0x0,0xd 2409 1b0f | | Execute Package,Field_Read,Field_Number 0xf 240a 02c7 | | Declare_Variable Any 240b 00d8 | | Load_Top At_Offset_0 240c 1c00 | | Execute_Immediate Run_Utility,0x0 240d e01b | | Load 0x0,0x1b 240e 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 240f e01b | | Load 0x0,0x1b 2410 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 2411 e00d | | Load 0x0,0xd 2412 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 2413 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 2414 02c7 | | Declare_Variable Any 2415 00d8 | | Load_Top At_Offset_0 2416 1c00 | | Execute_Immediate Run_Utility,0x0 2417 e00d | | Load 0x0,0xd 2418 1b0d | | Execute Package,Field_Read,Field_Number 0xd 2419 BODY_23d8: 2419 e403 | | Load 0x2,0x3 241a 01db | | Execute Vector,Length 241b e402 | | Load 0x2,0x2 241c 01db | | Execute Vector,Length 241d 027d | } | Execute Discrete,Greater 241e 7014 |p | Jump_Nonzero 0x2433 241f 4801 |H | Short_Literal 0x1 2420 e402 | | Load 0x2,0x2 2421 01dd | | Execute Vector,First 2422 e402 | | Load 0x2,0x2 2423 01dd | | Execute Vector,First 2424 e403 | | Load 0x2,0x3 2425 01db | | Execute Vector,Length 2426 0273 | s | Execute Discrete,Plus 2427 0aff | | Execute_Immediate Plus,-0x1 2428 00d8 | | Load_Top At_Offset_0 2429 00e2 | | Load_Encached Integer_Cache 242a 0260 | ` | Execute Discrete,In_Type 242b 7001 |p | Jump_Nonzero 0x242d 242c 0801 | | Execute_Immediate Raise,0x1 242d e402 | | Load 0x2,0x2 242e 01cf | | Execute Vector,Slice_Read 242f e403 | | Load 0x2,0x3 2430 e02f | / | Load 0x0,0x2f 2431 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 2432 7018 |p | Jump_Nonzero 0x244b 2433 e002 | | Load 0x0,0x2 2434 1b0d | | Execute Package,Field_Read,Field_Number 0xd 2435 4801 |H | Short_Literal 0x1 2436 4802 |H | Short_Literal 0x2 2437 e00e | | Load 0x0,0xe 2438 1b0f | | Execute Package,Field_Read,Field_Number 0xf 2439 035b | [ | Declare_Type Array,Constrained 243a 0337 | 7 | Declare_Variable Array 243b e5ff | | Load 0x2,-0x1 243c e00e | | Load 0x0,0xe 243d 181a | | Execute Package,Field_Execute,Field_Number 0x1a 243e 4801 |H | Short_Literal 0x1 243f 00da | | Load_Top At_Offset_2 2440 01d6 | | Execute Vector,Field_Write 2441 e5fe | | Load 0x2,-0x2 2442 825a | Z | Call 0x1,0x5a 2443 4802 |H | Short_Literal 0x2 2444 00da | | Load_Top At_Offset_2 2445 01d6 | | Execute Vector,Field_Write 2446 6189 |a | Indirect_Literal Discrete,0x25d0,{0x00000000, 0x0000281d} 2447 e002 | | Load 0x0,0x2 2448 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 2449 c5fa | | Store 0x2,-0x6 244a 7952 |yR | Jump 0x259d 244b e024 | $ | Load 0x0,0x24 244c 180e | | Execute Package,Field_Execute,Field_Number 0xe 244d e402 | | Load 0x2,0x2 244e 4801 |H | Short_Literal 0x1 244f 617c |a| | Indirect_Literal Discrete,0x25cc,{0x00000000, 0x0000281f} 2450 e002 | | Load 0x0,0x2 2451 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 2452 e5fe | | Load 0x2,-0x2 2453 e404 | | Load 0x2,0x4 2454 e020 | | Load 0x0,0x20 2455 180f | | Execute Package,Field_Execute,Field_Number 0xf 2456 a405 | | Store_Unchecked 0x2,0x5 2457 e5fe | | Load 0x2,-0x2 2458 e405 | | Load 0x2,0x5 2459 e025 | % | Load 0x0,0x25 245a 180f | | Execute Package,Field_Execute,Field_Number 0xf 245b a40a | | Store_Unchecked 0x2,0xa 245c 4802 |H | Short_Literal 0x2 245d e5fe | | Load 0x2,-0x2 245e e5ff | | Load 0x2,-0x1 245f e02a | * | Load 0x0,0x2a 2460 1811 | | Execute Package,Field_Execute,Field_Number 0x11 2461 e406 | | Load 0x2,0x6 2462 016d | m | Execute Variant_Record,Structure_Write 2463 00db | | Load_Top At_Offset_3 2464 681d |h | Jump_Zero 0x2482 2465 e406 | | Load 0x2,0x6 2466 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 2467 0f02 | | Execute_Immediate Equal,0x2 2468 6811 |h | Jump_Zero 0x247a 2469 00db | | Load_Top At_Offset_3 246a e001 | | Load 0x0,0x1 246b 1b10 | | Execute Package,Field_Read,Field_Number 0x10 246c 0216 | | Execute Heap_Access,Convert 246d a5fb | | Store_Unchecked 0x2,-0x5 246e e5fa | | Load 0x2,-0x6 246f e5fc | | Load 0x2,-0x4 2470 e5fd | | Load 0x2,-0x3 2471 e40a | | Load 0x2,0xa 2472 e001 | | Load 0x0,0x1 2473 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2474 0216 | | Execute Heap_Access,Convert 2475 e001 | | Load 0x0,0x1 2476 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2477 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 2478 c5fa | | Store 0x2,-0x6 2479 4505 |E | Exit_Suprogram New_Top_Offset 0x5 247a e5fa | | Load 0x2,-0x6 247b e5fe | | Load 0x2,-0x2 247c e40a | | Load 0x2,0xa 247d e001 | | Load 0x0,0x1 247e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 247f 0216 | | Execute Heap_Access,Convert 2480 8222 | " | Call 0x1,0x22 2481 c5fa | | Store 0x2,-0x6 2482 e5fe | | Load 0x2,-0x2 2483 e01b | | Load 0x0,0x1b 2484 181c | | Execute Package,Field_Execute,Field_Number 0x1c 2485 a40a | | Store_Unchecked 0x2,0xa 2486 00db | | Load_Top At_Offset_3 2487 e001 | | Load 0x0,0x1 2488 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2489 0216 | | Execute Heap_Access,Convert 248a a5fb | | Store_Unchecked 0x2,-0x5 248b e5fe | | Load 0x2,-0x2 248c 0217 | | Execute Heap_Access,All_Reference 248d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 248e 0a01 | | Execute_Immediate Plus,0x1 248f e5fe | | Load 0x2,-0x2 2490 0217 | | Execute Heap_Access,All_Reference 2491 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 2492 e5fe | | Load 0x2,-0x2 2493 0217 | | Execute Heap_Access,All_Reference 2494 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 2495 0a01 | | Execute_Immediate Plus,0x1 2496 e5fe | | Load 0x2,-0x2 2497 0217 | | Execute Heap_Access,All_Reference 2498 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 2499 e5fe | | Load 0x2,-0x2 249a 0217 | | Execute Heap_Access,All_Reference 249b 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 249c e40a | | Load 0x2,0xa 249d 0217 | | Execute Heap_Access,All_Reference 249e 380a |8 | Execute Record,Field_Write,Field_Number 0xa 249f e405 | | Load 0x2,0x5 24a0 e40a | | Load 0x2,0xa 24a1 0217 | | Execute Heap_Access,All_Reference 24a2 380b |8 | Execute Record,Field_Write,Field_Number 0xb 24a3 4800 |H | Short_Literal 0x0 24a4 e5fe | | Load 0x2,-0x2 24a5 e40a | | Load 0x2,0xa 24a6 e405 | | Load 0x2,0x5 24a7 e025 | % | Load 0x0,0x25 24a8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 24a9 e406 | | Load 0x2,0x6 24aa 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 24ab 0f02 | | Execute_Immediate Equal,0x2 24ac 6804 |h | Jump_Zero 0x24b1 24ad e406 | | Load 0x2,0x6 24ae 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 24af 0033 | 3 | Store_Top Heap_Access,At_Offset_3 24b0 7826 |x& | Jump 0x24d7 24b1 e5fe | | Load 0x2,-0x2 24b2 e01b | | Load 0x0,0x1b 24b3 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 24b4 0033 | 3 | Store_Top Heap_Access,At_Offset_3 24b5 e5fe | | Load 0x2,-0x2 24b6 0217 | | Execute Heap_Access,All_Reference 24b7 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 24b8 00db | | Load_Top At_Offset_3 24b9 0217 | | Execute Heap_Access,All_Reference 24ba 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 24bb e405 | | Load 0x2,0x5 24bc 00db | | Load_Top At_Offset_3 24bd 0217 | | Execute Heap_Access,All_Reference 24be 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 24bf e5ff | | Load 0x2,-0x1 24c0 00db | | Load_Top At_Offset_3 24c1 0217 | | Execute Heap_Access,All_Reference 24c2 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 24c3 e5fe | | Load 0x2,-0x2 24c4 0217 | | Execute Heap_Access,All_Reference 24c5 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 24c6 0217 | | Execute Heap_Access,All_Reference 24c7 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 24c8 00db | | Load_Top At_Offset_3 24c9 0217 | | Execute Heap_Access,All_Reference 24ca 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 24cb 00da | | Load_Top At_Offset_2 24cc e5fe | | Load 0x2,-0x2 24cd 0217 | | Execute Heap_Access,All_Reference 24ce 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 24cf 0217 | | Execute Heap_Access,All_Reference 24d0 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 24d1 4800 |H | Short_Literal 0x0 24d2 e5fe | | Load 0x2,-0x2 24d3 e40b | | Load 0x2,0xb 24d4 e5ff | | Load 0x2,-0x1 24d5 e02a | * | Load 0x0,0x2a 24d6 1814 | | Execute Package,Field_Execute,Field_Number 0x14 24d7 4801 |H | Short_Literal 0x1 24d8 00db | | Load_Top At_Offset_3 24d9 0217 | | Execute Heap_Access,All_Reference 24da 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 24db 00db | | Load_Top At_Offset_3 24dc 00db | | Load_Top At_Offset_3 24dd 0217 | | Execute Heap_Access,All_Reference 24de 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 24df 00da | | Load_Top At_Offset_2 24e0 e40a | | Load 0x2,0xa 24e1 0217 | | Execute Heap_Access,All_Reference 24e2 3817 |8 | Execute Record,Field_Write,Field_Number 0x17 24e3 4800 |H | Short_Literal 0x0 24e4 e40a | | Load 0x2,0xa 24e5 0217 | | Execute Heap_Access,All_Reference 24e6 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 24e7 00db | | Load_Top At_Offset_3 24e8 0219 | | Execute Heap_Access,All_Read 24e9 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 24ea e5fa | | Load 0x2,-0x6 24eb 00d9 | | Load_Top At_Offset_1 24ec 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 24ed 0120 | | Execute Any,Is_Value 24ee 6803 |h | Jump_Zero 0x24f2 24ef e00d | | Load 0x0,0xd 24f0 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 24f1 7802 |x | Jump 0x24f4 24f2 00d9 | | Load_Top At_Offset_1 24f3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 24f4 e40a | | Load 0x2,0xa 24f5 e001 | | Load 0x0,0x1 24f6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 24f7 0216 | | Execute Heap_Access,Convert 24f8 e001 | | Load 0x0,0x1 24f9 1b14 | | Execute Package,Field_Read,Field_Number 0x14 24fa 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 24fb 00da | | Load_Top At_Offset_2 24fc 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 24fd c5fa | | Store 0x2,-0x6 24fe 00d1 | | Pop_Control Pop_Count_1 24ff 00db | | Load_Top At_Offset_3 2500 0217 | | Execute Heap_Access,All_Reference 2501 340d |4 | Execute Record,Field_Reference,Field_Number 0xd 2502 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 2503 e00d | | Load 0x0,0xd 2504 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 2505 1814 | | Execute Package,Field_Execute,Field_Number 0x14 2506 012f | / | Execute Any,Equal 2507 688b |h | Jump_Zero 0x2593 2508 e5ff | | Load 0x2,-0x1 2509 e00d | | Load 0x0,0xd 250a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 250b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 250c c407 | | Store 0x2,0x7 250d 4800 |H | Short_Literal 0x0 250e e407 | | Load 0x2,0x7 250f e00d | | Load 0x0,0xd 2510 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 2511 1812 | | Execute Package,Field_Execute,Field_Number 0x12 2512 e40a | | Load 0x2,0xa 2513 0217 | | Execute Heap_Access,All_Reference 2514 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 2515 e00d | | Load 0x0,0xd 2516 1b0d | | Execute Package,Field_Read,Field_Number 0xd 2517 e408 | | Load 0x2,0x8 2518 0120 | | Execute Any,Is_Value 2519 6804 |h | Jump_Zero 0x251e 251a e00d | | Load 0x0,0xd 251b 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 251c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 251d 7801 |x | Jump 0x251f 251e e408 | | Load 0x2,0x8 251f 60a8 |` | Indirect_Literal Discrete,0x25c8,{0x00000000, 0x00004000} 2520 e022 | " | Load 0x0,0x22 2521 1b0e | | Execute Package,Field_Read,Field_Number 0xe 2522 e407 | | Load 0x2,0x7 2523 e00d | | Load 0x0,0xd 2524 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 2525 1814 | | Execute Package,Field_Execute,Field_Number 0x14 2526 c408 | | Store 0x2,0x8 2527 0059 | Y | Store_Top Discrete,At_Offset_1 2528 e408 | | Load 0x2,0x8 2529 e00d | | Load 0x0,0xd 252a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 252b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 252c c409 | | Store 0x2,0x9 252d e409 | | Load 0x2,0x9 252e e00d | | Load 0x0,0xd 252f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 2530 7023 |p# | Jump_Nonzero 0x2554 2531 4802 |H | Short_Literal 0x2 2532 e5fe | | Load 0x2,-0x2 2533 e409 | | Load 0x2,0x9 2534 e02a | * | Load 0x0,0x2a 2535 1811 | | Execute Package,Field_Execute,Field_Number 0x11 2536 e406 | | Load 0x2,0x6 2537 016d | m | Execute Variant_Record,Structure_Write 2538 e406 | | Load 0x2,0x6 2539 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 253a 0f02 | | Execute_Immediate Equal,0x2 253b 6818 |h | Jump_Zero 0x2554 253c e406 | | Load 0x2,0x6 253d 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 253e 0217 | | Execute Heap_Access,All_Reference 253f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 2540 e001 | | Load 0x0,0x1 2541 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2542 0216 | | Execute Heap_Access,Convert 2543 e001 | | Load 0x0,0x1 2544 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2545 180f | | Execute Package,Field_Execute,Field_Number 0xf 2546 700d |p | Jump_Nonzero 0x2554 2547 e406 | | Load 0x2,0x6 2548 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 2549 0217 | | Execute Heap_Access,All_Reference 254a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 254b e40a | | Load 0x2,0xa 254c 0217 | | Execute Heap_Access,All_Reference 254d 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 254e 00db | | Load_Top At_Offset_3 254f e40a | | Load 0x2,0xa 2550 0217 | | Execute Heap_Access,All_Reference 2551 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 2552 0217 | | Execute Heap_Access,All_Reference 2553 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 2554 e00d | | Load 0x0,0xd 2555 1b0d | | Execute Package,Field_Read,Field_Number 0xd 2556 00da | | Load_Top At_Offset_2 2557 0120 | | Execute Any,Is_Value 2558 6804 |h | Jump_Zero 0x255d 2559 e00d | | Load 0x0,0xd 255a 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 255b 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 255c 7801 |x | Jump 0x255e 255d 00da | | Load_Top At_Offset_2 255e 6069 |`i | Indirect_Literal Discrete,0x25c8,{0x00000000, 0x00004000} 255f e022 | " | Load 0x0,0x22 2560 1b0e | | Execute Package,Field_Read,Field_Number 0xe 2561 4800 |H | Short_Literal 0x0 2562 e40a | | Load 0x2,0xa 2563 0217 | | Execute Heap_Access,All_Reference 2564 340d |4 | Execute Record,Field_Reference,Field_Number 0xd 2565 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 2566 e00d | | Load 0x0,0xd 2567 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 2568 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 2569 c40c | | Store 0x2,0xc 256a 0059 | Y | Store_Top Discrete,At_Offset_1 256b 00d9 | | Load_Top At_Offset_1 256c e00d | | Load 0x0,0xd 256d 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 256e 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 256f 00da | | Load_Top At_Offset_2 2570 e00d | | Load 0x0,0xd 2571 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 2572 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 2573 012e | . | Execute Any,Not_Equal 2574 6822 |h" | Jump_Zero 0x2597 2575 4802 |H | Short_Literal 0x2 2576 e5fe | | Load 0x2,-0x2 2577 00db | | Load_Top At_Offset_3 2578 e00d | | Load 0x0,0xd 2579 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 257a 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 257b e02a | * | Load 0x0,0x2a 257c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 257d e406 | | Load 0x2,0x6 257e 016d | m | Execute Variant_Record,Structure_Write 257f e406 | | Load 0x2,0x6 2580 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 2581 0f02 | | Execute_Immediate Equal,0x2 2582 6808 |h | Jump_Zero 0x258b 2583 e406 | | Load 0x2,0x6 2584 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 2585 0217 | | Execute Heap_Access,All_Reference 2586 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 2587 e40a | | Load 0x2,0xa 2588 0217 | | Execute Heap_Access,All_Reference 2589 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 258a 780c |x | Jump 0x2597 258b e5f9 | | Load 0x2,-0x7 258c 0a01 | | Execute_Immediate Plus,0x1 258d c5f9 | | Store 0x2,-0x7 258e 4801 |H | Short_Literal 0x1 258f e40a | | Load 0x2,0xa 2590 0217 | | Execute Heap_Access,All_Reference 2591 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 2592 7804 |x | Jump 0x2597 2593 4800 |H | Short_Literal 0x0 2594 e40a | | Load 0x2,0xa 2595 0217 | | Execute Heap_Access,All_Reference 2596 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 2597 e5fe | | Load 0x2,-0x2 2598 e40a | | Load 0x2,0xa 2599 e001 | | Load 0x0,0x1 259a 1b10 | | Execute Package,Field_Read,Field_Number 0x10 259b 0216 | | Execute Heap_Access,Convert 259c 8264 | d | Call 0x1,0x64 259d 00db | | Load_Top At_Offset_3 259e e001 | | Load 0x0,0x1 259f 1b10 | | Execute Package,Field_Read,Field_Number 0x10 25a0 0216 | | Execute Heap_Access,Convert 25a1 82be | | Call 0x1,0xbe 25a2 e5fa | | Load 0x2,-0x6 25a3 e5fc | | Load 0x2,-0x4 25a4 e5fd | | Load 0x2,-0x3 25a5 e40a | | Load 0x2,0xa 25a6 e001 | | Load 0x0,0x1 25a7 1b10 | | Execute Package,Field_Read,Field_Number 0x10 25a8 0216 | | Execute Heap_Access,Convert 25a9 e001 | | Load 0x0,0x1 25aa 1b14 | | Execute Package,Field_Read,Field_Number 0x14 25ab 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 25ac c5fa | | Store 0x2,-0x6 25ad 4505 |E | Exit_Suprogram New_Top_Offset 0x5 25ae TRAP_23d8: 25ae 4885 |H | Short_Literal 0x85 25af 010f | | Execute Exception,Equal 25b0 6812 |h | Jump_Zero 0x25c3 25b1 e002 | | Load 0x0,0x2 25b2 1b0d | | Execute Package,Field_Read,Field_Number 0xd 25b3 4801 |H | Short_Literal 0x1 25b4 4801 |H | Short_Literal 0x1 25b5 e00e | | Load 0x0,0xe 25b6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 25b7 035b | [ | Declare_Type Array,Constrained 25b8 0337 | 7 | Declare_Variable Array 25b9 e5fe | | Load 0x2,-0x2 25ba 825a | Z | Call 0x1,0x5a 25bb 4801 |H | Short_Literal 0x1 25bc 00da | | Load_Top At_Offset_2 25bd 01d6 | | Execute Vector,Field_Write 25be 6005 |` | Indirect_Literal Discrete,0x25c4,{0x00000000, 0x00002836} 25bf e002 | | Load 0x0,0x2 25c0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 25c1 c5fa | | Store 0x2,-0x6 25c2 4505 |E | Exit_Suprogram New_Top_Offset 0x5 25c3 0100 | | Execute Exception,Raise 25c4 0000 0000 | | .LITERAL {0x00000000, 0x00002836} 25c8 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 25cc 0000 0000 | | .LITERAL {0x00000000, 0x0000281f} 25d0 0000 0000 | | .LITERAL {0x00000000, 0x0000281d} 25d4 0000 0000 | | .BLANK 0000[0x4] 25d8 ; -------------------------------------------------------------------------------------- 25d8 ; SUBPROGRAM 25d8 ; -------------------------------------------------------------------------------------- 25d8 25ea |% | .CONST 0x25ea ; Address of begin 25d9 0004 | | .CONST 0x0004 ; Address of exception handler 25da 0005 | | .CONST 0x0005 ; Number of locals 25db INIT_25d8: 25db e00d | | Load 0x0,0xd 25dc 1b0f | | Execute Package,Field_Read,Field_Number 0xf 25dd 02c7 | | Declare_Variable Any 25de 00d8 | | Load_Top At_Offset_0 25df 1c00 | | Execute_Immediate Run_Utility,0x0 25e0 e00d | | Load 0x0,0xd 25e1 1b0f | | Execute Package,Field_Read,Field_Number 0xf 25e2 02c7 | | Declare_Variable Any 25e3 00d8 | | Load_Top At_Offset_0 25e4 1c00 | | Execute_Immediate Run_Utility,0x0 25e5 e00d | | Load 0x0,0xd 25e6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 25e7 e002 | | Load 0x0,0x2 25e8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 25e9 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 25ea BODY_25d8: 25ea e00d | | Load 0x0,0xd 25eb 1b0d | | Execute Package,Field_Read,Field_Number 0xd 25ec 00db | | Load_Top At_Offset_3 25ed 0120 | | Execute Any,Is_Value 25ee 6803 |h | Jump_Zero 0x25f2 25ef e00d | | Load 0x0,0xd 25f0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 25f1 7801 |x | Jump 0x25f3 25f2 00db | | Load_Top At_Offset_3 25f3 e5ff | | Load 0x2,-0x1 25f4 e00d | | Load 0x0,0xd 25f5 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 25f6 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 25f7 c403 | | Store 0x2,0x3 25f8 005a | Z | Store_Top Discrete,At_Offset_2 25f9 00d8 | | Load_Top At_Offset_0 25fa e402 | | Load 0x2,0x2 25fb 0120 | | Execute Any,Is_Value 25fc 6803 |h | Jump_Zero 0x2600 25fd e00d | | Load 0x0,0xd 25fe 1b0f | | Execute Package,Field_Read,Field_Number 0xf 25ff 7801 |x | Jump 0x2601 2600 e402 | | Load 0x2,0x2 2601 e5fe | | Load 0x2,-0x2 2602 8217 | | Call 0x1,0x17 2603 c402 | | Store 0x2,0x2 2604 0059 | Y | Store_Top Discrete,At_Offset_1 2605 00da | | Load_Top At_Offset_2 2606 e402 | | Load 0x2,0x2 2607 012f | / | Execute Any,Equal 2608 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 2609 0000 0000 | | .BLANK 0000[0x7] 2610 ; -------------------------------------------------------------------------------------- 2610 ; SUBPROGRAM 2610 ; -------------------------------------------------------------------------------------- 2610 261d |& | .CONST 0x261d ; Address of begin 2611 0004 | | .CONST 0x0004 ; Address of exception handler 2612 0002 | | .CONST 0x0002 ; Number of locals 2613 INIT_2610: 2613 e02a | * | Load 0x0,0x2a 2614 1b0f | | Execute Package,Field_Read,Field_Number 0xf 2615 02ff | | Declare_Variable Variant_Record 2616 4801 |H | Short_Literal 0x1 2617 e5fe | | Load 0x2,-0x2 2618 e5ff | | Load 0x2,-0x1 2619 e02a | * | Load 0x0,0x2a 261a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 261b 00d9 | | Load_Top At_Offset_1 261c 016d | m | Execute Variant_Record,Structure_Write 261d BODY_2610: 261d e01b | | Load 0x0,0x1b 261e 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 261f a5fd | | Store_Unchecked 0x2,-0x3 2620 00d8 | | Load_Top At_Offset_0 2621 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 2622 0f01 | | Execute_Immediate Equal,0x1 2623 6807 |h | Jump_Zero 0x262b 2624 00d8 | | Load_Top At_Offset_0 2625 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 2626 e01b | | Load 0x0,0x1b 2627 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 2628 0216 | | Execute Heap_Access,Convert 2629 a5fd | | Store_Unchecked 0x2,-0x3 262a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 262b 00d8 | | Load_Top At_Offset_0 262c 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 262d 6016 |` | Indirect_Literal Discrete,0x2644,{0x00000000, 0x0000500a} 262e 027f | | Execute Discrete,Equal 262f 6813 |h | Jump_Zero 0x2643 2630 e002 | | Load 0x0,0x2 2631 1b0d | | Execute Package,Field_Read,Field_Number 0xd 2632 4801 |H | Short_Literal 0x1 2633 4801 |H | Short_Literal 0x1 2634 e00e | | Load 0x0,0xe 2635 1b0f | | Execute Package,Field_Read,Field_Number 0xf 2636 035b | [ | Declare_Type Array,Constrained 2637 0337 | 7 | Declare_Variable Array 2638 e5ff | | Load 0x2,-0x1 2639 e00e | | Load 0x0,0xe 263a 181a | | Execute Package,Field_Execute,Field_Number 0x1a 263b 4801 |H | Short_Literal 0x1 263c 00da | | Load_Top At_Offset_2 263d 01d6 | | Execute Vector,Field_Write 263e 00da | | Load_Top At_Offset_2 263f 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 2640 e002 | | Load 0x0,0x2 2641 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 2642 c5fc | | Store 0x2,-0x4 2643 4503 |E | Exit_Suprogram New_Top_Offset 0x3 2644 0000 0000 | | .LITERAL {0x00000000, 0x0000500a} 2648 ; -------------------------------------------------------------------------------------- 2648 ; SUBPROGRAM 2648 ; -------------------------------------------------------------------------------------- 2648 264b |&K | .CONST 0x264b ; Address of begin 2649 0004 | | .CONST 0x0004 ; Address of exception handler 264a 0001 | | .CONST 0x0001 ; Number of locals 264b BODY_2648: 264b INIT_2648: 264b 00cf | | Action Mark_Auxiliary 264c 00db | | Load_Top At_Offset_3 264d 01d9 | | Execute Vector,Reverse_Bounds 264e 0263 | c | Execute Discrete,Above_Bound 264f 7009 |p | Jump_Nonzero 0x2659 2650 e5fd | | Load 0x2,-0x3 2651 e5fe | | Load 0x2,-0x2 2652 00da | | Load_Top At_Offset_2 2653 e5ff | | Load 0x2,-0x1 2654 01d7 | | Execute Vector,Field_Read 2655 8231 | 1 | Call 0x1,0x31 2656 c5fd | | Store 0x2,-0x3 2657 00c8 | | Action Pop_Auxiliary_Range 2658 3ff7 |? | Loop_Increasing 0x2650 2659 4503 |E | Exit_Suprogram New_Top_Offset 0x3 265a 0000 0000 | | .BLANK 0000[0x6] 2660 ; -------------------------------------------------------------------------------------- 2660 ; SUBPROGRAM 2660 ; -------------------------------------------------------------------------------------- 2660 2663 |&c | .CONST 0x2663 ; Address of begin 2661 0004 | | .CONST 0x0004 ; Address of exception handler 2662 0001 | | .CONST 0x0001 ; Number of locals 2663 BODY_2660: 2663 INIT_2660: 2663 00cf | | Action Mark_Auxiliary 2664 00db | | Load_Top At_Offset_3 2665 01d9 | | Execute Vector,Reverse_Bounds 2666 0263 | c | Execute Discrete,Above_Bound 2667 7009 |p | Jump_Nonzero 0x2671 2668 e5fd | | Load 0x2,-0x3 2669 e5fe | | Load 0x2,-0x2 266a 00da | | Load_Top At_Offset_2 266b e5ff | | Load 0x2,-0x1 266c 01d7 | | Execute Vector,Field_Read 266d 8235 | 5 | Call 0x1,0x35 266e c5fd | | Store 0x2,-0x3 266f 00c8 | | Action Pop_Auxiliary_Range 2670 3ff7 |? | Loop_Increasing 0x2668 2671 4503 |E | Exit_Suprogram New_Top_Offset 0x3 2672 0000 0000 | | .BLANK 0000[0x6] 2678 ; -------------------------------------------------------------------------------------- 2678 ; SUBPROGRAM 2678 ; -------------------------------------------------------------------------------------- 2678 2681 |& | .CONST 0x2681 ; Address of begin 2679 0004 | | .CONST 0x0004 ; Address of exception handler 267a 0003 | | .CONST 0x0003 ; Number of locals 267b INIT_2678: 267b 00da | | Load_Top At_Offset_2 267c 0217 | | Execute Heap_Access,All_Reference 267d 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 267e 0007 | | Action Break_Optional 267f 00e2 | | Load_Encached Integer_Cache 2680 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 2681 BODY_2678: 2681 00cf | | Action Mark_Auxiliary 2682 7808 |x | Jump 0x268b 2683 00d9 | | Load_Top At_Offset_1 2684 0a01 | | Execute_Immediate Plus,0x1 2685 005a | Z | Store_Top Discrete,At_Offset_2 2686 00da | | Load_Top At_Offset_2 2687 0217 | | Execute Heap_Access,All_Reference 2688 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 2689 0033 | 3 | Store_Top Heap_Access,At_Offset_3 268a 00c9 | | Action Pop_Auxiliary_Loop 268b 00da | | Load_Top At_Offset_2 268c 77f6 |w | Jump_Nonzero 0x2683 268d 00ce | | Action Pop_Auxiliary 268e 00d8 | | Load_Top At_Offset_0 268f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 2690 ; -------------------------------------------------------------------------------------- 2690 ; SUBPROGRAM 2690 ; -------------------------------------------------------------------------------------- 2690 2695 |& | .CONST 0x2695 ; Address of begin 2691 0004 | | .CONST 0x0004 ; Address of exception handler 2692 0002 | | .CONST 0x0002 ; Number of locals 2693 INIT_2690: 2693 e01b | | Load 0x0,0x1b 2694 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 2695 BODY_2690: 2695 00db | | Load_Top At_Offset_3 2696 0217 | | Execute Heap_Access,All_Reference 2697 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 2698 0031 | 1 | Store_Top Heap_Access,At_Offset_1 2699 00cf | | Action Mark_Auxiliary 269a 780e |x | Jump 0x26a9 269b 00d9 | | Load_Top At_Offset_1 269c 0217 | | Execute Heap_Access,All_Reference 269d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 269e e5fe | | Load 0x2,-0x2 269f 027f | | Execute Discrete,Equal 26a0 6803 |h | Jump_Zero 0x26a4 26a1 00d9 | | Load_Top At_Offset_1 26a2 a5fc | | Store_Unchecked 0x2,-0x4 26a3 4504 |E | Exit_Suprogram New_Top_Offset 0x4 26a4 00d9 | | Load_Top At_Offset_1 26a5 0217 | | Execute Heap_Access,All_Reference 26a6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 26a7 0032 | 2 | Store_Top Heap_Access,At_Offset_2 26a8 00c9 | | Action Pop_Auxiliary_Loop 26a9 00d9 | | Load_Top At_Offset_1 26aa 77f0 |w | Jump_Nonzero 0x269b 26ab 00ce | | Action Pop_Auxiliary 26ac e5fd | | Load 0x2,-0x3 26ad 6813 |h | Jump_Zero 0x26c1 26ae 00db | | Load_Top At_Offset_3 26af e01b | | Load 0x0,0x1b 26b0 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 26b1 0031 | 1 | Store_Top Heap_Access,At_Offset_1 26b2 e5fe | | Load 0x2,-0x2 26b3 00d9 | | Load_Top At_Offset_1 26b4 0217 | | Execute Heap_Access,All_Reference 26b5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 26b6 00db | | Load_Top At_Offset_3 26b7 0217 | | Execute Heap_Access,All_Reference 26b8 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 26b9 00d9 | | Load_Top At_Offset_1 26ba 0217 | | Execute Heap_Access,All_Reference 26bb 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 26bc 00d8 | | Load_Top At_Offset_0 26bd e5ff | | Load 0x2,-0x1 26be 0217 | | Execute Heap_Access,All_Reference 26bf 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 26c0 7802 |x | Jump 0x26c3 26c1 6006 |` | Indirect_Literal Discrete,0x26c8,{0x00000000, 0x0000281a} 26c2 a5fb | | Store_Unchecked 0x2,-0x5 26c3 00d8 | | Load_Top At_Offset_0 26c4 a5fc | | Store_Unchecked 0x2,-0x4 26c5 4504 |E | Exit_Suprogram New_Top_Offset 0x4 26c6 0000 0000 | | .XXX[0x2] 26c8 0000 0000 | | .LITERAL {0x00000000, 0x0000281a} 26cc 0000 0000 | | .BLANK 0000[0x4] 26d0 ; -------------------------------------------------------------------------------------- 26d0 ; SUBPROGRAM 26d0 ; -------------------------------------------------------------------------------------- 26d0 26d3 |& | .CONST 0x26d3 ; Address of begin 26d1 0004 | | .CONST 0x0004 ; Address of exception handler 26d2 0001 | | .CONST 0x0001 ; Number of locals 26d3 BODY_26d0: 26d3 INIT_26d0: 26d3 00db | | Load_Top At_Offset_3 26d4 e034 | 4 | Load 0x0,0x34 26d5 1b17 | | Execute Package,Field_Read,Field_Number 0x17 26d6 00d9 | | Load_Top At_Offset_1 26d7 00d0 | | Action Swap_Control 26d8 0260 | ` | Execute Discrete,In_Type 26d9 7001 |p | Jump_Nonzero 0x26db 26da 0801 | | Execute_Immediate Raise,0x1 26db 00db | | Load_Top At_Offset_3 26dc e035 | 5 | Load 0x0,0x35 26dd e036 | 6 | Load 0x0,0x36 26de a037 | 7 | Store_Unchecked 0x0,0x37 26df e038 | 8 | Load 0x0,0x38 26e0 1819 | | Execute Package,Field_Execute,Field_Number 0x19 26e1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 26e2 0000 0000 | | .BLANK 0000[0x6] 26e8 ; -------------------------------------------------------------------------------------- 26e8 ; SUBPROGRAM 26e8 ; -------------------------------------------------------------------------------------- 26e8 26ed |& | .CONST 0x26ed ; Address of begin 26e9 0004 | | .CONST 0x0004 ; Address of exception handler 26ea 0002 | | .CONST 0x0002 ; Number of locals 26eb INIT_26e8: 26eb e01b | | Load 0x0,0x1b 26ec 1b16 | | Execute Package,Field_Read,Field_Number 0x16 26ed BODY_26e8: 26ed e5fb | | Load 0x2,-0x5 26ee e5fd | | Load 0x2,-0x3 26ef e299 | | Load 0x1,0x99 26f0 01d7 | | Execute Vector,Field_Read 26f1 e5ff | | Load 0x2,-0x1 26f2 e01b | | Load 0x0,0x1b 26f3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 26f4 c5fb | | Store 0x2,-0x5 26f5 e5fb | | Load 0x2,-0x5 26f6 702e |p. | Jump_Nonzero 0x2725 26f7 00db | | Load_Top At_Offset_3 26f8 0217 | | Execute Heap_Access,All_Reference 26f9 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 26fa 0031 | 1 | Store_Top Heap_Access,At_Offset_1 26fb 00cf | | Action Mark_Auxiliary 26fc 780e |x | Jump 0x270b 26fd 00d9 | | Load_Top At_Offset_1 26fe 0217 | | Execute Heap_Access,All_Reference 26ff 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 2700 e5fe | | Load 0x2,-0x2 2701 027f | | Execute Discrete,Equal 2702 6803 |h | Jump_Zero 0x2706 2703 00d9 | | Load_Top At_Offset_1 2704 a5fc | | Store_Unchecked 0x2,-0x4 2705 4504 |E | Exit_Suprogram New_Top_Offset 0x4 2706 00d9 | | Load_Top At_Offset_1 2707 0217 | | Execute Heap_Access,All_Reference 2708 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 2709 0032 | 2 | Store_Top Heap_Access,At_Offset_2 270a 00c9 | | Action Pop_Auxiliary_Loop 270b 00d9 | | Load_Top At_Offset_1 270c 77f0 |w | Jump_Nonzero 0x26fd 270d 00ce | | Action Pop_Auxiliary 270e e5fd | | Load 0x2,-0x3 270f 6813 |h | Jump_Zero 0x2723 2710 00db | | Load_Top At_Offset_3 2711 e01b | | Load 0x0,0x1b 2712 1817 | | Execute Package,Field_Execute,Field_Number 0x17 2713 0031 | 1 | Store_Top Heap_Access,At_Offset_1 2714 e5fe | | Load 0x2,-0x2 2715 00d9 | | Load_Top At_Offset_1 2716 0217 | | Execute Heap_Access,All_Reference 2717 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 2718 00db | | Load_Top At_Offset_3 2719 0217 | | Execute Heap_Access,All_Reference 271a 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 271b 00d9 | | Load_Top At_Offset_1 271c 0217 | | Execute Heap_Access,All_Reference 271d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 271e 00d8 | | Load_Top At_Offset_0 271f e5ff | | Load 0x2,-0x1 2720 0217 | | Execute Heap_Access,All_Reference 2721 3810 |8 | Execute Record,Field_Write,Field_Number 0x10 2722 7802 |x | Jump 0x2725 2723 6004 |` | Indirect_Literal Discrete,0x2728,{0x00000000, 0x0000281c} 2724 a5fb | | Store_Unchecked 0x2,-0x5 2725 00d8 | | Load_Top At_Offset_0 2726 a5fc | | Store_Unchecked 0x2,-0x4 2727 4504 |E | Exit_Suprogram New_Top_Offset 0x4 2728 0000 0000 | | .LITERAL {0x00000000, 0x0000281c} 272c 0000 0000 | | .BLANK 0000[0x4] 2730 ; -------------------------------------------------------------------------------------- 2730 ; SUBPROGRAM 2730 ; -------------------------------------------------------------------------------------- 2730 2733 |'3 | .CONST 0x2733 ; Address of begin 2731 0004 | | .CONST 0x0004 ; Address of exception handler 2732 0001 | | .CONST 0x0001 ; Number of locals 2733 BODY_2730: 2733 INIT_2730: 2733 00da | | Load_Top At_Offset_2 2734 e297 | | Load 0x1,0x97 2735 011c | | Execute Any,Convert_Unchecked 2736 1c01 | | Execute_Immediate Run_Utility,0x1 2737 e00e | | Load 0x0,0xe 2738 1810 | | Execute Package,Field_Execute,Field_Number 0x10 2739 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 273a 0000 0000 | | .BLANK 0000[0x6] 2740 ; -------------------------------------------------------------------------------------- 2740 ; SUBPROGRAM 2740 ; -------------------------------------------------------------------------------------- 2740 2748 |'H | .CONST 0x2748 ; Address of begin 2741 0004 | | .CONST 0x0004 ; Address of exception handler 2742 0003 | | .CONST 0x0003 ; Number of locals 2743 INIT_2740: 2743 e01b | | Load 0x0,0x1b 2744 1b16 | | Execute Package,Field_Read,Field_Number 0x16 2745 e002 | | Load 0x0,0x2 2746 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2747 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 2748 BODY_2740: 2748 00d8 | | Load_Top At_Offset_0 2749 e01b | | Load 0x0,0x1b 274a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 274b 4800 |H | Short_Literal 0x0 274c e5fd | | Load 0x2,-0x3 274d e5ff | | Load 0x2,-0x1 274e 82d5 | | Call 0x1,0xd5 274f 0033 | 3 | Store_Top Heap_Access,At_Offset_3 2750 0059 | Y | Store_Top Discrete,At_Offset_1 2751 00d8 | | Load_Top At_Offset_0 2752 7027 |p' | Jump_Nonzero 0x277a 2753 e5fe | | Load 0x2,-0x2 2754 4606 |F | Jump_Case 0x7 2755 781e |x | Jump 0x2774 ; case 0x0 2756 7805 |x | Jump 0x275c ; case 0x1 2757 780a |x | Jump 0x2762 ; case 0x2 2758 780f |x | Jump 0x2768 ; case 0x3 2759 7814 |x | Jump 0x276e ; case 0x4 275a 7839 |x9 | Jump 0x2794 ; case 0x5 275b 7838 |x8 | Jump 0x2794 ; case 0x6 275c 00d9 | | Load_Top At_Offset_1 275d 0217 | | Execute Heap_Access,All_Reference 275e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 275f e020 | | Load 0x0,0x20 2760 1812 | | Execute Package,Field_Execute,Field_Number 0x12 2761 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 2762 00d9 | | Load_Top At_Offset_1 2763 0217 | | Execute Heap_Access,All_Reference 2764 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 2765 e020 | | Load 0x0,0x20 2766 1812 | | Execute Package,Field_Execute,Field_Number 0x12 2767 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 2768 00d9 | | Load_Top At_Offset_1 2769 0217 | | Execute Heap_Access,All_Reference 276a 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 276b e020 | | Load 0x0,0x20 276c 1812 | | Execute Package,Field_Execute,Field_Number 0x12 276d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 276e 00d9 | | Load_Top At_Offset_1 276f 0217 | | Execute Heap_Access,All_Reference 2770 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 2771 e020 | | Load 0x0,0x20 2772 1812 | | Execute Package,Field_Execute,Field_Number 0x12 2773 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 2774 00d9 | | Load_Top At_Offset_1 2775 0217 | | Execute Heap_Access,All_Reference 2776 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 2777 e020 | | Load 0x0,0x20 2778 1812 | | Execute Package,Field_Execute,Field_Number 0x12 2779 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 277a 00d8 | | Load_Top At_Offset_0 277b 601c |` | Indirect_Literal Discrete,0x2798,{0x00000000, 0x0000281c} 277c 027f | | Execute Discrete,Equal 277d 6802 |h | Jump_Zero 0x2780 277e 00ea | | Load_Encached Null_String_Cache 277f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 2780 4801 |H | Short_Literal 0x1 2781 4802 |H | Short_Literal 0x2 2782 e00e | | Load 0x0,0xe 2783 1b0f | | Execute Package,Field_Read,Field_Number 0xf 2784 035b | [ | Declare_Type Array,Constrained 2785 0337 | 7 | Declare_Variable Array 2786 e5ff | | Load 0x2,-0x1 2787 825a | Z | Call 0x1,0x5a 2788 4801 |H | Short_Literal 0x1 2789 00da | | Load_Top At_Offset_2 278a 01d6 | | Execute Vector,Field_Write 278b e5fe | | Load 0x2,-0x2 278c 82d6 | | Call 0x1,0xd6 278d 4802 |H | Short_Literal 0x2 278e 00da | | Load_Top At_Offset_2 278f 01d6 | | Execute Vector,Field_Write 2790 00d9 | | Load_Top At_Offset_1 2791 e002 | | Load 0x0,0x2 2792 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 2793 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 2794 0831 | 1 | Execute_Immediate Raise,0x31 2795 0000 0000 | | .XXX[0x3] 2797 0000 | | 2798 0000 0000 | | .LITERAL {0x00000000, 0x0000281c} 279c 0000 0000 | | .BLANK 0000[0x4] 27a0 ; -------------------------------------------------------------------------------------- 27a0 ; SUBPROGRAM 27a0 ; -------------------------------------------------------------------------------------- 27a0 27a8 |' | .CONST 0x27a8 ; Address of begin 27a1 0004 | | .CONST 0x0004 ; Address of exception handler 27a2 0003 | | .CONST 0x0003 ; Number of locals 27a3 INIT_27a0: 27a3 e01b | | Load 0x0,0x1b 27a4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 27a5 e002 | | Load 0x0,0x2 27a6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 27a7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 27a8 BODY_27a0: 27a8 00d8 | | Load_Top At_Offset_0 27a9 e01b | | Load 0x0,0x1b 27aa 1b16 | | Execute Package,Field_Read,Field_Number 0x16 27ab 4801 |H | Short_Literal 0x1 27ac e5fc | | Load 0x2,-0x4 27ad e5ff | | Load 0x2,-0x1 27ae 82d5 | | Call 0x1,0xd5 27af 0033 | 3 | Store_Top Heap_Access,At_Offset_3 27b0 0059 | Y | Store_Top Discrete,At_Offset_1 27b1 00d8 | | Load_Top At_Offset_0 27b2 7059 |pY | Jump_Nonzero 0x280c 27b3 e5fe | | Load 0x2,-0x2 27b4 4606 |F | Jump_Case 0x7 27b5 7846 |xF | Jump 0x27fc ; case 0x0 27b6 7805 |x | Jump 0x27bc ; case 0x1 27b7 7814 |x | Jump 0x27cc ; case 0x2 27b8 7823 |x# | Jump 0x27dc ; case 0x3 27b9 7832 |x2 | Jump 0x27ec ; case 0x4 27ba 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; case 0x5 27bb 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; case 0x6 27bc e5ff | | Load 0x2,-0x1 27bd e5fd | | Load 0x2,-0x3 27be e020 | | Load 0x0,0x20 27bf 180f | | Execute Package,Field_Execute,Field_Number 0xf 27c0 00da | | Load_Top At_Offset_2 27c1 0217 | | Execute Heap_Access,All_Reference 27c2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 27c3 0092 2c15 | , | Action Push_String_Extended,0x2c15 ; "Target_Account has been set to \x22" 27c5 e5fd | | Load 0x2,-0x3 27c6 01cc | | Execute Vector,Catenate 27c7 0092 2c0d | , | Action Push_String_Extended,0x2c0d ; "\x22." 27c9 01cc | | Execute Vector,Catenate 27ca 801d | | Call 0x0,0x1d 27cb 4505 |E | Exit_Suprogram New_Top_Offset 0x5 27cc e5ff | | Load 0x2,-0x1 27cd e5fd | | Load 0x2,-0x3 27ce e020 | | Load 0x0,0x20 27cf 180f | | Execute Package,Field_Execute,Field_Number 0xf 27d0 00da | | Load_Top At_Offset_2 27d1 0217 | | Execute Heap_Access,All_Reference 27d2 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 27d3 0092 2c16 | , | Action Push_String_Extended,0x2c16 ; "Target_Directory has been set to \x22" 27d5 e5fd | | Load 0x2,-0x3 27d6 01cc | | Execute Vector,Catenate 27d7 0092 2c0d | , | Action Push_String_Extended,0x2c0d ; "\x22." 27d9 01cc | | Execute Vector,Catenate 27da 801d | | Call 0x0,0x1d 27db 4505 |E | Exit_Suprogram New_Top_Offset 0x5 27dc e5ff | | Load 0x2,-0x1 27dd e5fd | | Load 0x2,-0x3 27de e020 | | Load 0x0,0x20 27df 180f | | Execute Package,Field_Execute,Field_Number 0xf 27e0 00da | | Load_Top At_Offset_2 27e1 0217 | | Execute Heap_Access,All_Reference 27e2 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 27e3 0092 2c17 | , | Action Push_String_Extended,0x2c17 ; "Target_Library has been set to \x22" 27e5 e5fd | | Load 0x2,-0x3 27e6 01cc | | Execute Vector,Catenate 27e7 0092 2c0d | , | Action Push_String_Extended,0x2c0d ; "\x22." 27e9 01cc | | Execute Vector,Catenate 27ea 801d | | Call 0x0,0x1d 27eb 4505 |E | Exit_Suprogram New_Top_Offset 0x5 27ec e5ff | | Load 0x2,-0x1 27ed e5fd | | Load 0x2,-0x3 27ee e020 | | Load 0x0,0x20 27ef 180f | | Execute Package,Field_Execute,Field_Number 0xf 27f0 00da | | Load_Top At_Offset_2 27f1 0217 | | Execute Heap_Access,All_Reference 27f2 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 27f3 0092 2c18 | , | Action Push_String_Extended,0x2c18 ; "Configuration has been set to \x22" 27f5 e5fd | | Load 0x2,-0x3 27f6 01cc | | Execute Vector,Catenate 27f7 0092 2c0d | , | Action Push_String_Extended,0x2c0d ; "\x22." 27f9 01cc | | Execute Vector,Catenate 27fa 801d | | Call 0x0,0x1d 27fb 4505 |E | Exit_Suprogram New_Top_Offset 0x5 27fc e5ff | | Load 0x2,-0x1 27fd e5fd | | Load 0x2,-0x3 27fe e020 | | Load 0x0,0x20 27ff 180f | | Execute Package,Field_Execute,Field_Number 0xf 2800 00da | | Load_Top At_Offset_2 2801 0217 | | Execute Heap_Access,All_Reference 2802 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 2803 0092 2c19 | , | Action Push_String_Extended,0x2c19 ; "Target_Machine has been set to \x22" 2805 e5fd | | Load 0x2,-0x3 2806 01cc | | Execute Vector,Catenate 2807 0092 2c0d | , | Action Push_String_Extended,0x2c0d ; "\x22." 2809 01cc | | Execute Vector,Catenate 280a 801d | | Call 0x0,0x1d 280b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 280c e002 | | Load 0x0,0x2 280d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 280e 4801 |H | Short_Literal 0x1 280f 4804 |H | Short_Literal 0x4 2810 e00e | | Load 0x0,0xe 2811 1b0f | | Execute Package,Field_Read,Field_Number 0xf 2812 035b | [ | Declare_Type Array,Constrained 2813 0337 | 7 | Declare_Variable Array 2814 e5ff | | Load 0x2,-0x1 2815 825a | Z | Call 0x1,0x5a 2816 4801 |H | Short_Literal 0x1 2817 00da | | Load_Top At_Offset_2 2818 01d6 | | Execute Vector,Field_Write 2819 e5fc | | Load 0x2,-0x4 281a e00c | | Load 0x0,0xc 281b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 281c 4802 |H | Short_Literal 0x2 281d 00da | | Load_Top At_Offset_2 281e 01d6 | | Execute Vector,Field_Write 281f 00da | | Load_Top At_Offset_2 2820 e002 | | Load 0x0,0x2 2821 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 2822 4803 |H | Short_Literal 0x3 2823 00da | | Load_Top At_Offset_2 2824 01d6 | | Execute Vector,Field_Write 2825 e5fe | | Load 0x2,-0x2 2826 82d6 | | Call 0x1,0xd6 2827 4804 |H | Short_Literal 0x4 2828 00da | | Load_Top At_Offset_2 2829 01d6 | | Execute Vector,Field_Write 282a 6005 |` | Indirect_Literal Discrete,0x2830,{0x00000000, 0x0000282e} 282b e002 | | Load 0x0,0x2 282c 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 282d c5fb | | Store 0x2,-0x5 282e 4505 |E | Exit_Suprogram New_Top_Offset 0x5 282f 0000 | | .XXX[0x1] 2830 0000 0000 | | .LITERAL {0x00000000, 0x0000282e} 2834 0000 0000 | | .BLANK 0000[0x4] 2838 ; -------------------------------------------------------------------------------------- 2838 ; SUBPROGRAM 2838 ; -------------------------------------------------------------------------------------- 2838 2840 |(@ | .CONST 0x2840 ; Address of begin 2839 0004 | | .CONST 0x0004 ; Address of exception handler 283a 0003 | | .CONST 0x0003 ; Number of locals 283b INIT_2838: 283b e01b | | Load 0x0,0x1b 283c 1b16 | | Execute Package,Field_Read,Field_Number 0x16 283d e002 | | Load 0x0,0x2 283e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 283f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 2840 BODY_2838: 2840 00d8 | | Load_Top At_Offset_0 2841 e01b | | Load 0x0,0x1b 2842 1b16 | | Execute Package,Field_Read,Field_Number 0x16 2843 4800 |H | Short_Literal 0x0 2844 e5fd | | Load 0x2,-0x3 2845 e5ff | | Load 0x2,-0x1 2846 82d5 | | Call 0x1,0xd5 2847 0033 | 3 | Store_Top Heap_Access,At_Offset_3 2848 0059 | Y | Store_Top Discrete,At_Offset_1 2849 00d8 | | Load_Top At_Offset_0 284a 7011 |p | Jump_Nonzero 0x285c 284b e5fe | | Load 0x2,-0x2 284c 4606 |F | Jump_Case 0x7 284d 7828 |x( | Jump 0x2876 ; case 0x0 284e 7827 |x' | Jump 0x2876 ; case 0x1 284f 7826 |x& | Jump 0x2876 ; case 0x2 2850 7825 |x% | Jump 0x2876 ; case 0x3 2851 7824 |x$ | Jump 0x2876 ; case 0x4 2852 7805 |x | Jump 0x2858 ; case 0x5 2853 7800 |x | Jump 0x2854 ; case 0x6 2854 00d9 | | Load_Top At_Offset_1 2855 0217 | | Execute Heap_Access,All_Reference 2856 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 2857 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 2858 00d9 | | Load_Top At_Offset_1 2859 0217 | | Execute Heap_Access,All_Reference 285a 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 285b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 285c 00d8 | | Load_Top At_Offset_0 285d 601a |` | Indirect_Literal Discrete,0x2878,{0x00000000, 0x0000281c} 285e 027f | | Execute Discrete,Equal 285f 6802 |h | Jump_Zero 0x2862 2860 4800 |H | Short_Literal 0x0 2861 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 2862 4801 |H | Short_Literal 0x1 2863 4802 |H | Short_Literal 0x2 2864 e00e | | Load 0x0,0xe 2865 1b0f | | Execute Package,Field_Read,Field_Number 0xf 2866 035b | [ | Declare_Type Array,Constrained 2867 0337 | 7 | Declare_Variable Array 2868 e5ff | | Load 0x2,-0x1 2869 825a | Z | Call 0x1,0x5a 286a 4801 |H | Short_Literal 0x1 286b 00da | | Load_Top At_Offset_2 286c 01d6 | | Execute Vector,Field_Write 286d e5fe | | Load 0x2,-0x2 286e 82d6 | | Call 0x1,0xd6 286f 4802 |H | Short_Literal 0x2 2870 00da | | Load_Top At_Offset_2 2871 01d6 | | Execute Vector,Field_Write 2872 00d9 | | Load_Top At_Offset_1 2873 e002 | | Load 0x0,0x2 2874 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 2875 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 2876 0831 | 1 | Execute_Immediate Raise,0x31 2877 0000 | | .XXX[0x1] 2878 0000 0000 | | .LITERAL {0x00000000, 0x0000281c} 287c 0000 0000 | | .BLANK 0000[0x4] 2880 ; -------------------------------------------------------------------------------------- 2880 ; SUBPROGRAM 2880 ; -------------------------------------------------------------------------------------- 2880 2888 |( | .CONST 0x2888 ; Address of begin 2881 0004 | | .CONST 0x0004 ; Address of exception handler 2882 0003 | | .CONST 0x0003 ; Number of locals 2883 INIT_2880: 2883 e01b | | Load 0x0,0x1b 2884 1b16 | | Execute Package,Field_Read,Field_Number 0x16 2885 e002 | | Load 0x0,0x2 2886 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2887 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 2888 BODY_2880: 2888 00d8 | | Load_Top At_Offset_0 2889 e01b | | Load 0x0,0x1b 288a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 288b 4801 |H | Short_Literal 0x1 288c e5fc | | Load 0x2,-0x4 288d e5ff | | Load 0x2,-0x1 288e 82d5 | | Call 0x1,0xd5 288f 0033 | 3 | Store_Top Heap_Access,At_Offset_3 2890 0059 | Y | Store_Top Discrete,At_Offset_1 2891 00d8 | | Load_Top At_Offset_0 2892 7013 |p | Jump_Nonzero 0x28a6 2893 e5fe | | Load 0x2,-0x2 2894 4606 |F | Jump_Case 0x7 2895 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; case 0x0 2896 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; case 0x1 2897 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; case 0x2 2898 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; case 0x3 2899 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; case 0x4 289a 7806 |x | Jump 0x28a1 ; case 0x5 289b 7800 |x | Jump 0x289c ; case 0x6 289c e5fd | | Load 0x2,-0x3 289d 00da | | Load_Top At_Offset_2 289e 0217 | | Execute Heap_Access,All_Reference 289f 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 28a0 4505 |E | Exit_Suprogram New_Top_Offset 0x5 28a1 e5fd | | Load 0x2,-0x3 28a2 00da | | Load_Top At_Offset_2 28a3 0217 | | Execute Heap_Access,All_Reference 28a4 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 28a5 4505 |E | Exit_Suprogram New_Top_Offset 0x5 28a6 e002 | | Load 0x0,0x2 28a7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 28a8 4801 |H | Short_Literal 0x1 28a9 4804 |H | Short_Literal 0x4 28aa e00e | | Load 0x0,0xe 28ab 1b0f | | Execute Package,Field_Read,Field_Number 0xf 28ac 035b | [ | Declare_Type Array,Constrained 28ad 0337 | 7 | Declare_Variable Array 28ae e5ff | | Load 0x2,-0x1 28af 825a | Z | Call 0x1,0x5a 28b0 4801 |H | Short_Literal 0x1 28b1 00da | | Load_Top At_Offset_2 28b2 01d6 | | Execute Vector,Field_Write 28b3 e5fc | | Load 0x2,-0x4 28b4 e00c | | Load 0x0,0xc 28b5 181c | | Execute Package,Field_Execute,Field_Number 0x1c 28b6 4802 |H | Short_Literal 0x2 28b7 00da | | Load_Top At_Offset_2 28b8 01d6 | | Execute Vector,Field_Write 28b9 00da | | Load_Top At_Offset_2 28ba e002 | | Load 0x0,0x2 28bb 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 28bc 4803 |H | Short_Literal 0x3 28bd 00da | | Load_Top At_Offset_2 28be 01d6 | | Execute Vector,Field_Write 28bf e5fe | | Load 0x2,-0x2 28c0 82d6 | | Call 0x1,0xd6 28c1 4804 |H | Short_Literal 0x4 28c2 00da | | Load_Top At_Offset_2 28c3 01d6 | | Execute Vector,Field_Write 28c4 6007 |` | Indirect_Literal Discrete,0x28cc,{0x00000000, 0x0000282e} 28c5 e002 | | Load 0x0,0x2 28c6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 28c7 c5fb | | Store 0x2,-0x5 28c8 4505 |E | Exit_Suprogram New_Top_Offset 0x5 28c9 0000 0000 | | .XXX[0x3] 28cb 0000 | | 28cc 0000 0000 | | .LITERAL {0x00000000, 0x0000282e} 28d0 ; -------------------------------------------------------------------------------------- 28d0 ; SUBPROGRAM 28d0 ; -------------------------------------------------------------------------------------- 28d0 28d3 |( | .CONST 0x28d3 ; Address of begin 28d1 0004 | | .CONST 0x0004 ; Address of exception handler 28d2 0001 | | .CONST 0x0001 ; Number of locals 28d3 BODY_28d0: 28d3 INIT_28d0: 28d3 00db | | Load_Top At_Offset_3 28d4 e034 | 4 | Load 0x0,0x34 28d5 1b17 | | Execute Package,Field_Read,Field_Number 0x17 28d6 00d9 | | Load_Top At_Offset_1 28d7 00d0 | | Action Swap_Control 28d8 0260 | ` | Execute Discrete,In_Type 28d9 7001 |p | Jump_Nonzero 0x28db 28da 0801 | | Execute_Immediate Raise,0x1 28db 00db | | Load_Top At_Offset_3 28dc e039 | 9 | Load 0x0,0x39 28dd e03a | : | Load 0x0,0x3a 28de a03b | ; | Store_Unchecked 0x0,0x3b 28df e038 | 8 | Load 0x0,0x38 28e0 1819 | | Execute Package,Field_Execute,Field_Number 0x19 28e1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 28e2 0000 0000 | | .BLANK 0000[0x6] 28e8 ; -------------------------------------------------------------------------------------- 28e8 ; SUBPROGRAM 28e8 ; -------------------------------------------------------------------------------------- 28e8 28f4 |( | .CONST 0x28f4 ; Address of begin 28e9 2976 |)v | .CONST 0x2976 ; Address of exception handler 28ea 0004 | | .CONST 0x0004 ; Number of locals 28eb INIT_28e8: 28eb e03c | < | Load 0x0,0x3c 28ec 1b11 | | Execute Package,Field_Read,Field_Number 0x11 28ed 02c7 | | Declare_Variable Any 28ee 00d8 | | Load_Top At_Offset_0 28ef 1c00 | | Execute_Immediate Run_Utility,0x0 28f0 e20d | | Load 0x1,0xd 28f1 0007 | | Action Break_Optional 28f2 e01b | | Load 0x0,0x1b 28f3 1b16 | | Execute Package,Field_Read,Field_Number 0x16 28f4 BODY_28e8: 28f4 00be | | Action Activate_Tasks 28f5 e5f9 | | Load 0x2,-0x7 28f6 00db | | Load_Top At_Offset_3 28f7 e20d | | Load 0x1,0xd 28f8 e5fb | | Load 0x2,-0x5 28f9 e7ff | | Load 0x3,-0x1 28fa e01b | | Load 0x0,0x1b 28fb 180d | | Execute Package,Field_Execute,Field_Number 0xd 28fc c603 | | Store 0x3,0x3 28fd c602 | | Store 0x3,0x2 28fe c5f9 | | Store 0x2,-0x7 28ff 4800 |H | Short_Literal 0x0 2900 e5f9 | | Load 0x2,-0x7 2901 e002 | | Load 0x0,0x2 2902 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 2903 6871 |hq | Jump_Zero 0x2975 2904 00d9 | | Load_Top At_Offset_1 2905 e5fd | | Load 0x2,-0x3 2906 e020 | | Load 0x0,0x20 2907 180f | | Execute Package,Field_Execute,Field_Number 0xf 2908 00da | | Load_Top At_Offset_2 2909 0217 | | Execute Heap_Access,All_Reference 290a 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 290b 00d9 | | Load_Top At_Offset_1 290c e5fe | | Load 0x2,-0x2 290d e020 | | Load 0x0,0x20 290e 180f | | Execute Package,Field_Execute,Field_Number 0xf 290f 00da | | Load_Top At_Offset_2 2910 0217 | | Execute Heap_Access,All_Reference 2911 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 2912 e5fb | | Load 0x2,-0x5 2913 e00c | | Load 0x0,0xc 2914 180f | | Execute Package,Field_Execute,Field_Number 0xf 2915 00da | | Load_Top At_Offset_2 2916 0217 | | Execute Heap_Access,All_Reference 2917 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 2918 e5fb | | Load 0x2,-0x5 2919 00da | | Load_Top At_Offset_2 291a 0217 | | Execute Heap_Access,All_Reference 291b 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 291c 00cf | | Action Mark_Auxiliary 291d e5fa | | Load 0x2,-0x6 291e 01d9 | | Execute Vector,Reverse_Bounds 291f 0263 | c | Execute Discrete,Above_Bound 2920 7027 |p' | Jump_Nonzero 0x2948 2921 00d8 | | Load_Top At_Offset_0 2922 e5fa | | Load 0x2,-0x6 2923 01d7 | | Execute Vector,Field_Read 2924 6821 |h! | Jump_Zero 0x2946 2925 e603 | | Load 0x3,0x3 2926 e01b | | Load 0x0,0x1b 2927 1817 | | Execute Package,Field_Execute,Field_Number 0x17 2928 a604 | | Store_Unchecked 0x3,0x4 2929 e603 | | Load 0x3,0x3 292a 0217 | | Execute Heap_Access,All_Reference 292b 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 292c e604 | | Load 0x3,0x4 292d 0217 | | Execute Heap_Access,All_Reference 292e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 292f 00d8 | | Load_Top At_Offset_0 2930 e604 | | Load 0x3,0x4 2931 0217 | | Execute Heap_Access,All_Reference 2932 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 2933 e5fc | | Load 0x2,-0x4 2934 e604 | | Load 0x3,0x4 2935 0217 | | Execute Heap_Access,All_Reference 2936 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 2937 00db | | Load_Top At_Offset_3 2938 0219 | | Execute Heap_Access,All_Read 2939 00d8 | | Load_Top At_Offset_0 293a 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 293b e603 | | Load 0x3,0x3 293c e5fc | | Load 0x2,-0x4 293d e02b | + | Load 0x0,0x2b 293e 180e | | Execute Package,Field_Execute,Field_Number 0xe 293f 00d9 | | Load_Top At_Offset_1 2940 380a |8 | Execute Record,Field_Write,Field_Number 0xa 2941 00d1 | | Pop_Control Pop_Count_1 2942 00db | | Load_Top At_Offset_3 2943 e603 | | Load 0x3,0x3 2944 0217 | | Execute Heap_Access,All_Reference 2945 3810 |8 | Execute Record,Field_Write,Field_Number 0x10 2946 00c8 | | Action Pop_Auxiliary_Range 2947 3fd9 |? | Loop_Increasing 0x2921 2948 00ce | | Action Pop_Auxiliary 2949 00d9 | | Load_Top At_Offset_1 294a 0217 | | Execute Heap_Access,All_Reference 294b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 294c 0f02 | | Execute_Immediate Equal,0x2 294d 6809 |h | Jump_Zero 0x2957 294e 4801 |H | Short_Literal 0x1 294f 00da | | Load_Top At_Offset_2 2950 0217 | | Execute Heap_Access,All_Reference 2951 380b |8 | Execute Record,Field_Write,Field_Number 0xb 2952 00d9 | | Load_Top At_Offset_1 2953 e7ff | | Load 0x3,-0x1 2954 00d8 | | Load_Top At_Offset_0 2955 82bb | | Call 0x1,0xbb 2956 7806 |x | Jump 0x295d 2957 00d9 | | Load_Top At_Offset_1 2958 e7ff | | Load 0x3,-0x1 2959 6026 |`& | Indirect_Literal Discrete,0x2980,{0x00000000, 0x0000280a} 295a e7ff | | Load 0x3,-0x1 295b 8029 | ) | Call 0x0,0x29 295c 82bb | | Call 0x1,0xbb 295d 00d9 | | Load_Top At_Offset_1 295e 0217 | | Execute Heap_Access,All_Reference 295f 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 2960 00da | | Load_Top At_Offset_2 2961 0217 | | Execute Heap_Access,All_Reference 2962 380e |8 | Execute Record,Field_Write,Field_Number 0xe 2963 e03c | < | Load 0x0,0x3c 2964 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2965 00db | | Load_Top At_Offset_3 2966 e03c | < | Load 0x0,0x3c 2967 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 2968 c602 | | Store 0x3,0x2 2969 c404 | | Store 0x2,0x4 296a e404 | | Load 0x2,0x4 296b 7009 |p | Jump_Nonzero 0x2975 296c 0092 2c1a | , | Action Push_String_Extended,0x2c1a ; "State file for " 296e 00da | | Load_Top At_Offset_2 296f 8227 | ' | Call 0x1,0x27 2970 01cc | | Execute Vector,Catenate 2971 0092 2c1b | , | Action Push_String_Extended,0x2c1b ; " has been closed." 2973 01cc | | Execute Vector,Catenate 2974 801d | | Call 0x0,0x1d 2975 4502 |E | Exit_Suprogram New_Top_Offset 0x2 2976 TRAP_28e8: 2976 e002 | | Load 0x0,0x2 2977 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 2978 010f | | Execute Exception,Equal 2979 6804 |h | Jump_Zero 0x297e 297a e002 | | Load 0x0,0x2 297b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 297c a5f9 | | Store_Unchecked 0x2,-0x7 297d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 297e 0100 | | Execute Exception,Raise 297f 0000 | | .XXX[0x1] 2980 0000 0000 | | .LITERAL {0x00000000, 0x0000280a} 2984 0000 0000 | | .BLANK 0000[0x4] 2988 ; -------------------------------------------------------------------------------------- 2988 ; SUBPROGRAM 2988 ; -------------------------------------------------------------------------------------- 2988 2992 |) | .CONST 0x2992 ; Address of begin 2989 0004 | | .CONST 0x0004 ; Address of exception handler 298a 0003 | | .CONST 0x0003 ; Number of locals 298b INIT_2988: 298b e405 | | Load 0x2,0x5 298c e001 | | Load 0x0,0x1 298d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 298e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 298f 1c08 | | Execute_Immediate Run_Utility,0x8 2990 00e3 | | Load_Encached Natural_Cache 2991 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 2992 BODY_2988: 2992 e404 | | Load 0x2,0x4 2993 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 2994 00da | | Load_Top At_Offset_2 2995 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 2996 00cf | | Action Mark_Auxiliary 2997 7837 |x7 | Jump 0x29cf 2998 e00d | | Load 0x0,0xd 2999 1b0d | | Execute Package,Field_Read,Field_Number 0xd 299a e406 | | Load 0x2,0x6 299b 0120 | | Execute Any,Is_Value 299c 6803 |h | Jump_Zero 0x29a0 299d e00d | | Load 0x0,0xd 299e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 299f 7801 |x | Jump 0x29a1 29a0 e406 | | Load 0x2,0x6 29a1 e403 | | Load 0x2,0x3 29a2 e00d | | Load 0x0,0xd 29a3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 29a4 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 29a5 c406 | | Store 0x2,0x6 29a6 c402 | | Store 0x2,0x2 29a7 e402 | | Load 0x2,0x2 29a8 7020 |p | Jump_Nonzero 0x29c9 29a9 e5fe | | Load 0x2,-0x2 29aa e406 | | Load 0x2,0x6 29ab 82c0 | | Call 0x1,0xc0 29ac 681c |h | Jump_Zero 0x29c9 29ad 00da | | Load_Top At_Offset_2 29ae 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 29af 00da | | Load_Top At_Offset_2 29b0 e407 | | Load 0x2,0x7 29b1 e602 | | Load 0x3,0x2 29b2 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 29b3 e001 | | Load 0x0,0x1 29b4 1b14 | | Execute Package,Field_Read,Field_Number 0x14 29b5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 29b6 00db | | Load_Top At_Offset_3 29b7 e605 | | Load 0x3,0x5 29b8 01d7 | | Execute Vector,Field_Read 29b9 00d1 | | Pop_Control Pop_Count_1 29ba e5fc | | Load 0x2,-0x4 29bb e5fd | | Load 0x2,-0x3 29bc e5fe | | Load 0x2,-0x2 29bd e406 | | Load 0x2,0x6 29be 82bf | | Call 0x1,0xbf 29bf 00db | | Load_Top At_Offset_3 29c0 e605 | | Load 0x3,0x5 29c1 01d6 | | Execute Vector,Field_Write 29c2 e602 | | Load 0x3,0x2 29c3 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 29c4 c407 | | Store 0x2,0x7 29c5 00d2 | | Pop_Control Pop_Count_2 29c6 00d9 | | Load_Top At_Offset_1 29c7 0a01 | | Execute_Immediate Plus,0x1 29c8 005a | Z | Store_Top Discrete,At_Offset_2 29c9 e403 | | Load 0x2,0x3 29ca e00d | | Load 0x0,0xd 29cb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 29cc 181d | | Execute Package,Field_Execute,Field_Number 0x1d 29cd c403 | | Store 0x2,0x3 29ce 00c9 | | Action Pop_Auxiliary_Loop 29cf e403 | | Load 0x2,0x3 29d0 e00d | | Load 0x0,0xd 29d1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 29d2 181e | | Execute Package,Field_Execute,Field_Number 0x1e 29d3 6fc4 |o | Jump_Zero 0x2998 29d4 00ce | | Action Pop_Auxiliary 29d5 00d9 | | Load_Top At_Offset_1 29d6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 29d7 e5fd | | Load 0x2,-0x3 29d8 e407 | | Load 0x2,0x7 29d9 e405 | | Load 0x2,0x5 29da e5fe | | Load 0x2,-0x2 29db 82bd | | Call 0x1,0xbd 29dc 00da | | Load_Top At_Offset_2 29dd 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 29de e403 | | Load 0x2,0x3 29df e00d | | Load 0x0,0xd 29e0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 29e1 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 29e2 c403 | | Store 0x2,0x3 29e3 00d8 | | Load_Top At_Offset_0 29e4 0aff | | Execute_Immediate Plus,-0x1 29e5 e001 | | Load 0x0,0x1 29e6 1b14 | | Execute Package,Field_Read,Field_Number 0x14 29e7 1b14 | | Execute Package,Field_Read,Field_Number 0x14 29e8 1c08 | | Execute_Immediate Run_Utility,0x8 29e9 00da | | Load_Top At_Offset_2 29ea 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 29eb 00d9 | | Load_Top At_Offset_1 29ec 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 29ed 4801 |H | Short_Literal 0x1 29ee 00da | | Load_Top At_Offset_2 29ef 0aff | | Execute_Immediate Plus,-0x1 29f0 e602 | | Load 0x3,0x2 29f1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 29f2 01cf | | Execute Vector,Slice_Read 29f3 00d9 | | Load_Top At_Offset_1 29f4 00d8 | | Load_Top At_Offset_0 29f5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 29f6 00da | | Load_Top At_Offset_2 29f7 01da | | Execute Vector,Bounds 29f8 00da | | Load_Top At_Offset_2 29f9 01da | | Execute Vector,Bounds 29fa 00da | | Load_Top At_Offset_2 29fb 027f | | Execute Discrete,Equal 29fc 7001 |p | Jump_Nonzero 0x29fe 29fd 08e0 | | Execute_Immediate Raise,0xe0 29fe 00cd | | Action Spare6_Action 29ff 027f | | Execute Discrete,Equal 2a00 7001 |p | Jump_Nonzero 0x2a02 2a01 08e0 | | Execute_Immediate Raise,0xe0 2a02 00d2 | | Pop_Control Pop_Count_2 2a03 00d9 | | Load_Top At_Offset_1 2a04 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 2a05 00cb | | Action Pop_Block_With_Result 2a06 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 2a07 0000 | | .XXX[0x1] 2a08 ; -------------------------------------------------------------------------------------- 2a08 ; SUBPROGRAM 2a08 ; -------------------------------------------------------------------------------------- 2a08 2a22 |*" | .CONST 0x2a22 ; Address of begin 2a09 0004 | | .CONST 0x0004 ; Address of exception handler 2a0a 0002 | | .CONST 0x0002 ; Number of locals 2a0b INIT_2a08: 2a0b e402 | | Load 0x2,0x2 2a0c e403 | | Load 0x2,0x3 2a0d e00c | | Load 0x0,0xc 2a0e 1b18 | | Execute Package,Field_Read,Field_Number 0x18 2a0f 035b | [ | Declare_Type Array,Constrained 2a10 0337 | 7 | Declare_Variable Array 2a11 e402 | | Load 0x2,0x2 2a12 e403 | | Load 0x2,0x3 2a13 e00c | | Load 0x0,0xc 2a14 1b18 | | Execute Package,Field_Read,Field_Number 0x18 2a15 035b | [ | Declare_Type Array,Constrained 2a16 0337 | 7 | Declare_Variable Array 2a17 00d8 | | Load_Top At_Offset_0 2a18 01d9 | | Execute Vector,Reverse_Bounds 2a19 0263 | c | Execute Discrete,Above_Bound 2a1a 7005 |p | Jump_Nonzero 0x2a20 2a1b 4800 |H | Short_Literal 0x0 2a1c 00d9 | | Load_Top At_Offset_1 2a1d e603 | | Load 0x3,0x3 2a1e 01d6 | | Execute Vector,Field_Write 2a1f 3ffb |? | Loop_Increasing 0x2a1b 2a20 00d9 | | Load_Top At_Offset_1 2a21 01d4 | | Execute Vector,Structure_Write 2a22 BODY_2a08: 2a22 e5ff | | Load 0x2,-0x1 2a23 0217 | | Execute Heap_Access,All_Reference 2a24 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 2a25 a404 | | Store_Unchecked 0x2,0x4 2a26 00cf | | Action Mark_Auxiliary 2a27 780b |x | Jump 0x2a33 2a28 4801 |H | Short_Literal 0x1 2a29 e404 | | Load 0x2,0x4 2a2a 0217 | | Execute Heap_Access,All_Reference 2a2b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 2a2c 00db | | Load_Top At_Offset_3 2a2d 01d6 | | Execute Vector,Field_Write 2a2e e404 | | Load 0x2,0x4 2a2f 0217 | | Execute Heap_Access,All_Reference 2a30 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 2a31 a404 | | Store_Unchecked 0x2,0x4 2a32 00c9 | | Action Pop_Auxiliary_Loop 2a33 e404 | | Load 0x2,0x4 2a34 77f3 |w | Jump_Nonzero 0x2a28 2a35 00ce | | Action Pop_Auxiliary 2a36 00d8 | | Load_Top At_Offset_0 2a37 e00c | | Load 0x0,0xc 2a38 1b18 | | Execute Package,Field_Read,Field_Number 0x18 2a39 01c6 | | Execute Vector,Convert_To_Formal 2a3a 00cb | | Action Pop_Block_With_Result 2a3b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 2a3c 0000 0000 | | .BLANK 0000[0x4] 2a40 ; -------------------------------------------------------------------------------------- 2a40 ; SUBPROGRAM 2a40 ; -------------------------------------------------------------------------------------- 2a40 2a46 |*F | .CONST 0x2a46 ; Address of begin 2a41 0004 | | .CONST 0x0004 ; Address of exception handler 2a42 0002 | | .CONST 0x0002 ; Number of locals 2a43 INIT_2a40: 2a43 e5ff | | Load 0x2,-0x1 2a44 e5fd | | Load 0x2,-0x3 2a45 8276 | v | Call 0x1,0x76 2a46 BODY_2a40: 2a46 00cf | | Action Mark_Auxiliary 2a47 00d9 | | Load_Top At_Offset_1 2a48 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 2a49 4801 |H | Short_Literal 0x1 2a4a 0263 | c | Execute Discrete,Above_Bound 2a4b 7014 |p | Jump_Nonzero 0x2a60 2a4c e5fb | | Load 0x2,-0x5 2a4d e5fc | | Load 0x2,-0x4 2a4e e5fe | | Load 0x2,-0x2 2a4f 00db | | Load_Top At_Offset_3 2a50 e602 | | Load 0x3,0x2 2a51 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2a52 01d7 | | Execute Vector,Field_Read 2a53 e001 | | Load 0x0,0x1 2a54 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2a55 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 2a56 c5fb | | Store 0x2,-0x5 2a57 4800 |H | Short_Literal 0x0 2a58 e5fb | | Load 0x2,-0x5 2a59 e002 | | Load 0x0,0x2 2a5a 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 2a5b 7002 |p | Jump_Nonzero 0x2a5e 2a5c 00cc | | Action Pop_Block 2a5d 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2a5e 00c8 | | Action Pop_Auxiliary_Range 2a5f 3fec |? | Loop_Increasing 0x2a4c 2a60 00cc | | Action Pop_Block 2a61 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2a62 0000 0000 | | .BLANK 0000[0x6] 2a68 ; -------------------------------------------------------------------------------------- 2a68 ; SUBPROGRAM 2a68 ; -------------------------------------------------------------------------------------- 2a68 2a6e |*n | .CONST 0x2a6e ; Address of begin 2a69 0004 | | .CONST 0x0004 ; Address of exception handler 2a6a 0002 | | .CONST 0x0002 ; Number of locals 2a6b INIT_2a68: 2a6b e5ff | | Load 0x2,-0x1 2a6c e5fc | | Load 0x2,-0x4 2a6d 8276 | v | Call 0x1,0x76 2a6e BODY_2a68: 2a6e 00cf | | Action Mark_Auxiliary 2a6f 00d9 | | Load_Top At_Offset_1 2a70 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 2a71 4801 |H | Short_Literal 0x1 2a72 0263 | c | Execute Discrete,Above_Bound 2a73 7015 |p | Jump_Nonzero 0x2a89 2a74 e5fa | | Load 0x2,-0x6 2a75 e5fb | | Load 0x2,-0x5 2a76 e5fd | | Load 0x2,-0x3 2a77 e5fe | | Load 0x2,-0x2 2a78 e605 | | Load 0x3,0x5 2a79 e602 | | Load 0x3,0x2 2a7a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2a7b 01d7 | | Execute Vector,Field_Read 2a7c e001 | | Load 0x0,0x1 2a7d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2a7e 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 2a7f c5fa | | Store 0x2,-0x6 2a80 4800 |H | Short_Literal 0x0 2a81 e5fa | | Load 0x2,-0x6 2a82 e002 | | Load 0x0,0x2 2a83 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 2a84 7002 |p | Jump_Nonzero 0x2a87 2a85 00cc | | Action Pop_Block 2a86 4506 |E | Exit_Suprogram New_Top_Offset 0x6 2a87 00c8 | | Action Pop_Auxiliary_Range 2a88 3feb |? | Loop_Increasing 0x2a74 2a89 00cc | | Action Pop_Block 2a8a 4506 |E | Exit_Suprogram New_Top_Offset 0x6 2a8b 0000 0000 | | .BLANK 0000[0x5] 2a90 ; -------------------------------------------------------------------------------------- 2a90 ; SUBPROGRAM 2a90 ; -------------------------------------------------------------------------------------- 2a90 2a96 |* | .CONST 0x2a96 ; Address of begin 2a91 0004 | | .CONST 0x0004 ; Address of exception handler 2a92 0002 | | .CONST 0x0002 ; Number of locals 2a93 INIT_2a90: 2a93 e5ff | | Load 0x2,-0x1 2a94 e5fd | | Load 0x2,-0x3 2a95 8276 | v | Call 0x1,0x76 2a96 BODY_2a90: 2a96 00cf | | Action Mark_Auxiliary 2a97 00d9 | | Load_Top At_Offset_1 2a98 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 2a99 4801 |H | Short_Literal 0x1 2a9a 0263 | c | Execute Discrete,Above_Bound 2a9b 7014 |p | Jump_Nonzero 0x2ab0 2a9c e5fb | | Load 0x2,-0x5 2a9d e5fc | | Load 0x2,-0x4 2a9e e5fe | | Load 0x2,-0x2 2a9f 00db | | Load_Top At_Offset_3 2aa0 e602 | | Load 0x3,0x2 2aa1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2aa2 01d7 | | Execute Vector,Field_Read 2aa3 e001 | | Load 0x0,0x1 2aa4 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2aa5 1844 | D | Execute Package,Field_Execute,Field_Number 0x44 2aa6 c5fb | | Store 0x2,-0x5 2aa7 4800 |H | Short_Literal 0x0 2aa8 e5fb | | Load 0x2,-0x5 2aa9 e002 | | Load 0x0,0x2 2aaa 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 2aab 7002 |p | Jump_Nonzero 0x2aae 2aac 00cc | | Action Pop_Block 2aad 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2aae 00c8 | | Action Pop_Auxiliary_Range 2aaf 3fec |? | Loop_Increasing 0x2a9c 2ab0 00cc | | Action Pop_Block 2ab1 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2ab2 0000 0000 | | .BLANK 0000[0x6] 2ab8 ; -------------------------------------------------------------------------------------- 2ab8 ; SUBPROGRAM 2ab8 ; -------------------------------------------------------------------------------------- 2ab8 2abe |* | .CONST 0x2abe ; Address of begin 2ab9 0004 | | .CONST 0x0004 ; Address of exception handler 2aba 0002 | | .CONST 0x0002 ; Number of locals 2abb INIT_2ab8: 2abb e5ff | | Load 0x2,-0x1 2abc e5fd | | Load 0x2,-0x3 2abd 8276 | v | Call 0x1,0x76 2abe BODY_2ab8: 2abe 00cf | | Action Mark_Auxiliary 2abf 00d9 | | Load_Top At_Offset_1 2ac0 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 2ac1 4801 |H | Short_Literal 0x1 2ac2 0263 | c | Execute Discrete,Above_Bound 2ac3 7014 |p | Jump_Nonzero 0x2ad8 2ac4 e5fb | | Load 0x2,-0x5 2ac5 e5fc | | Load 0x2,-0x4 2ac6 e5fe | | Load 0x2,-0x2 2ac7 00db | | Load_Top At_Offset_3 2ac8 e602 | | Load 0x3,0x2 2ac9 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2aca 01d7 | | Execute Vector,Field_Read 2acb e001 | | Load 0x0,0x1 2acc 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2acd 1845 | E | Execute Package,Field_Execute,Field_Number 0x45 2ace c5fb | | Store 0x2,-0x5 2acf 4800 |H | Short_Literal 0x0 2ad0 e5fb | | Load 0x2,-0x5 2ad1 e002 | | Load 0x0,0x2 2ad2 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 2ad3 7002 |p | Jump_Nonzero 0x2ad6 2ad4 00cc | | Action Pop_Block 2ad5 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2ad6 00c8 | | Action Pop_Auxiliary_Range 2ad7 3fec |? | Loop_Increasing 0x2ac4 2ad8 00cc | | Action Pop_Block 2ad9 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2ada 0000 0000 | | .BLANK 0000[0x6] 2ae0 ; -------------------------------------------------------------------------------------- 2ae0 ; SUBPROGRAM 2ae0 ; -------------------------------------------------------------------------------------- 2ae0 2af5 |* | .CONST 0x2af5 ; Address of begin 2ae1 0004 | | .CONST 0x0004 ; Address of exception handler 2ae2 0005 | | .CONST 0x0005 ; Number of locals 2ae3 INIT_2ae0: 2ae3 605c |`\ | Indirect_Literal Discrete,0x2b40,{0x00000000, 0x0000282d} 2ae4 6057 |`W | Indirect_Literal Discrete,0x2b3c,{0x00000000, 0x0000282c} 2ae5 6052 |`R | Indirect_Literal Discrete,0x2b38,{0x00000000, 0x0000282b} 2ae6 e5fe | | Load 0x2,-0x2 2ae7 e402 | | Load 0x2,0x2 2ae8 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2ae9 802c | , | Call 0x0,0x2c 2aea 4801 |H | Short_Literal 0x1 2aeb 00d9 | | Load_Top At_Offset_1 2aec 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 2aed e001 | | Load 0x0,0x1 2aee 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2aef 1b13 | | Execute Package,Field_Read,Field_Number 0x13 2af0 035b | [ | Declare_Type Array,Constrained 2af1 0337 | 7 | Declare_Variable Array 2af2 00e2 | | Load_Encached Integer_Cache 2af3 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 2af4 00e1 | | Load_Encached Boolean_Cache 2af5 BODY_2ae0: 2af5 00db | | Load_Top At_Offset_3 2af6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 2af7 a403 | | Store_Unchecked 0x2,0x3 2af8 00cf | | Action Mark_Auxiliary 2af9 e602 | | Load 0x3,0x2 2afa 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2afb 01d9 | | Execute Vector,Reverse_Bounds 2afc 0263 | c | Execute Discrete,Above_Bound 2afd 7019 |p | Jump_Nonzero 0x2b17 2afe e403 | | Load 0x2,0x3 2aff 00e1 | | Load_Encached Boolean_Cache 2b00 00da | | Load_Top At_Offset_2 2b01 e602 | | Load 0x3,0x2 2b02 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2b03 01d7 | | Execute Vector,Field_Read 2b04 e402 | | Load 0x2,0x2 2b05 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 2b06 82ba | | Call 0x1,0xba 2b07 c605 | | Store 0x3,0x5 2b08 c403 | | Store 0x2,0x3 2b09 00db | | Load_Top At_Offset_3 2b0a 680a |h | Jump_Zero 0x2b15 2b0b e604 | | Load 0x3,0x4 2b0c 0a01 | | Execute_Immediate Plus,0x1 2b0d c604 | | Store 0x3,0x4 2b0e 00d8 | | Load_Top At_Offset_0 2b0f e602 | | Load 0x3,0x2 2b10 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2b11 01d7 | | Execute Vector,Field_Read 2b12 e604 | | Load 0x3,0x4 2b13 e603 | | Load 0x3,0x3 2b14 01d6 | | Execute Vector,Field_Write 2b15 00c8 | | Action Pop_Auxiliary_Range 2b16 3fe7 |? | Loop_Increasing 0x2afe 2b17 00ce | | Action Pop_Auxiliary 2b18 00d9 | | Load_Top At_Offset_1 2b19 e001 | | Load 0x0,0x1 2b1a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2b1b 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2b1c 1c08 | | Execute_Immediate Run_Utility,0x8 2b1d e403 | | Load 0x2,0x3 2b1e 00d9 | | Load_Top At_Offset_1 2b1f 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 2b20 4801 |H | Short_Literal 0x1 2b21 00db | | Load_Top At_Offset_3 2b22 e603 | | Load 0x3,0x3 2b23 01cf | | Execute Vector,Slice_Read 2b24 00d9 | | Load_Top At_Offset_1 2b25 00d8 | | Load_Top At_Offset_0 2b26 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2b27 00da | | Load_Top At_Offset_2 2b28 01da | | Execute Vector,Bounds 2b29 00da | | Load_Top At_Offset_2 2b2a 01da | | Execute Vector,Bounds 2b2b 00da | | Load_Top At_Offset_2 2b2c 027f | | Execute Discrete,Equal 2b2d 7001 |p | Jump_Nonzero 0x2b2f 2b2e 08e0 | | Execute_Immediate Raise,0xe0 2b2f 00cd | | Action Spare6_Action 2b30 027f | | Execute Discrete,Equal 2b31 7001 |p | Jump_Nonzero 0x2b33 2b32 08e0 | | Execute_Immediate Raise,0xe0 2b33 00d2 | | Pop_Control Pop_Count_2 2b34 00d9 | | Load_Top At_Offset_1 2b35 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 2b36 00cb | | Action Pop_Block_With_Result 2b37 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 2b38 0000 0000 | | .LITERAL {0x00000000, 0x0000282b} 2b3c 0000 0000 | | .LITERAL {0x00000000, 0x0000282c} 2b40 0000 0000 | | .LITERAL {0x00000000, 0x0000282d} 2b44 0000 0000 | | .BLANK 0000[0x4] 2b48 ; -------------------------------------------------------------------------------------- 2b48 ; SUBPROGRAM 2b48 ; -------------------------------------------------------------------------------------- 2b48 2b4b |+K | .CONST 0x2b4b ; Address of begin 2b49 0004 | | .CONST 0x0004 ; Address of exception handler 2b4a 0001 | | .CONST 0x0001 ; Number of locals 2b4b BODY_2b48: 2b4b INIT_2b48: 2b4b 4608 |F | Jump_Case 0x9 2b4c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 2b4d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 2b4e 7819 |x | Jump 0x2b68 ; case 0x2 2b4f 7818 |x | Jump 0x2b68 ; case 0x3 2b50 7817 |x | Jump 0x2b68 ; case 0x4 2b51 7816 |x | Jump 0x2b68 ; case 0x5 2b52 7815 |x | Jump 0x2b68 ; case 0x6 2b53 7801 |x | Jump 0x2b55 ; case 0x7 2b54 7809 |x | Jump 0x2b5e ; case 0x8 2b55 00db | | Load_Top At_Offset_3 2b56 4801 |H | Short_Literal 0x1 2b57 e5fe | | Load 0x2,-0x2 2b58 e20f | | Load 0x1,0xf 2b59 035b | [ | Declare_Type Array,Constrained 2b5a 4801 |H | Short_Literal 0x1 2b5b e5ff | | Load 0x2,-0x1 2b5c 031b | | Declare_Type Variant_Record,Constrained 2b5d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 2b5e 00db | | Load_Top At_Offset_3 2b5f 00db | | Load_Top At_Offset_3 2b60 02fc | | Declare_Variable Variant_Record,With_Constraint 2b61 4801 |H | Short_Literal 0x1 2b62 e5fe | | Load 0x2,-0x2 2b63 e20f | | Load 0x1,0xf 2b64 0334 | 4 | Declare_Variable Array,With_Constraint 2b65 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3 2b66 016a | j | QQ_execute Variant_Record,XXX 2b67 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 2b68 0869 | i | Execute_Immediate Raise,0x69 2b69 0000 0000 | | .BLANK 0000[0x7] 2b70 ; -------------------------------------------------------------------------------------- 2b70 ; SUBPROGRAM 2b70 ; -------------------------------------------------------------------------------------- 2b70 2b73 |+s | .CONST 0x2b73 ; Address of begin 2b71 0004 | | .CONST 0x0004 ; Address of exception handler 2b72 0001 | | .CONST 0x0001 ; Number of locals 2b73 BODY_2b70: 2b73 INIT_2b70: 2b73 4608 |F | Jump_Case 0x9 2b74 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 2b75 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 2b76 7819 |x | Jump 0x2b90 ; case 0x2 2b77 7818 |x | Jump 0x2b90 ; case 0x3 2b78 7817 |x | Jump 0x2b90 ; case 0x4 2b79 7816 |x | Jump 0x2b90 ; case 0x5 2b7a 7815 |x | Jump 0x2b90 ; case 0x6 2b7b 7801 |x | Jump 0x2b7d ; case 0x7 2b7c 7809 |x | Jump 0x2b86 ; case 0x8 2b7d 00db | | Load_Top At_Offset_3 2b7e 4801 |H | Short_Literal 0x1 2b7f e5fe | | Load 0x2,-0x2 2b80 e229 | ) | Load 0x1,0x29 2b81 035b | [ | Declare_Type Array,Constrained 2b82 4801 |H | Short_Literal 0x1 2b83 e5ff | | Load 0x2,-0x1 2b84 031b | | Declare_Type Variant_Record,Constrained 2b85 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 2b86 00db | | Load_Top At_Offset_3 2b87 00db | | Load_Top At_Offset_3 2b88 02fc | | Declare_Variable Variant_Record,With_Constraint 2b89 4801 |H | Short_Literal 0x1 2b8a e5fe | | Load 0x2,-0x2 2b8b e229 | ) | Load 0x1,0x29 2b8c 0334 | 4 | Declare_Variable Array,With_Constraint 2b8d 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3 2b8e 016a | j | QQ_execute Variant_Record,XXX 2b8f 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 2b90 0869 | i | Execute_Immediate Raise,0x69 2b91 0000 0000 | | .BLANK 0000[0x7] 2b98 ; -------------------------------------------------------------------------------------- 2b98 ; SUBPROGRAM 2b98 ; -------------------------------------------------------------------------------------- 2b98 2bad |+ | .CONST 0x2bad ; Address of begin 2b99 0004 | | .CONST 0x0004 ; Address of exception handler 2b9a 0017 | | .CONST 0x0017 ; Number of locals 2b9b INIT_2b98: 2b9b 029a 2bb3 | + | Declare_Subprogram INIT_2bb0,For_Outer_Call,Visible,Unelaborated 2b9d 029a 2bc3 | + | Declare_Subprogram INIT_2bc0,For_Outer_Call,Visible,Unelaborated 2b9f 00bf | | Action Accept_Activation 2ba0 e001 | | Load 0x0,0x1 2ba1 e002 | | Load 0x0,0x2 2ba2 e20f | | Load 0x1,0xf 2ba3 e210 | | Load 0x1,0x10 2ba4 e003 | | Load 0x0,0x3 2ba5 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 2ba6 0387 | | Declare_Variable Package 2ba7 00d8 | | Load_Top At_Offset_0 2ba8 020f | | Execute Module,Activate 2ba9 1d15 | | Execute_Immediate Reference_Lex_1,0x15 2baa 00c7 | | Action Elaborate_Subprogram 2bab 1d16 | | Execute_Immediate Reference_Lex_1,0x16 2bac 00c7 | | Action Elaborate_Subprogram 2bad BODY_2b98: 2bad 00bc | | Action Signal_Activated 2bae 00bb | | Action Signal_Completion 2baf 0000 | | .XXX[0x1] 2bb0 ; -------------------------------------------------------------------------------------- 2bb0 ; SUBPROGRAM 2bb0 ; -------------------------------------------------------------------------------------- 2bb0 2bb3 |+ | .CONST 0x2bb3 ; Address of begin 2bb1 0004 | | .CONST 0x0004 ; Address of exception handler 2bb2 0001 | | .CONST 0x0001 ; Number of locals 2bb3 BODY_2bb0: 2bb3 INIT_2bb0: 2bb3 00da | | Load_Top At_Offset_2 2bb4 0219 | | Execute Heap_Access,All_Read 2bb5 00d8 | | Load_Top At_Offset_0 2bb6 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 2bb7 e5ff | | Load 0x2,-0x1 2bb8 e5fe | | Load 0x2,-0x2 2bb9 e20f | | Load 0x1,0xf 2bba 0119 | | Execute Any,Check_In_Formal_Type 2bbb e217 | | Load 0x1,0x17 2bbc 1811 | | Execute Package,Field_Execute,Field_Number 0x11 2bbd 00d9 | | Load_Top At_Offset_1 2bbe 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 2bbf 4503 |E | Exit_Suprogram New_Top_Offset 0x3 2bc0 ; -------------------------------------------------------------------------------------- 2bc0 ; SUBPROGRAM 2bc0 ; -------------------------------------------------------------------------------------- 2bc0 2bc3 |+ | .CONST 0x2bc3 ; Address of begin 2bc1 2bcc |+ | .CONST 0x2bcc ; Address of exception handler 2bc2 0001 | | .CONST 0x0001 ; Number of locals 2bc3 BODY_2bc0: 2bc3 INIT_2bc0: 2bc3 00da | | Load_Top At_Offset_2 2bc4 0217 | | Execute Heap_Access,All_Reference 2bc5 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 2bc6 00db | | Load_Top At_Offset_3 2bc7 e217 | | Load 0x1,0x17 2bc8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 2bc9 e210 | | Load 0x1,0x10 2bca 0213 | | Execute Heap_Access,Check_In_Type 2bcb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 2bcc TRAP_2bc0: 2bcc 486b |Hk | Short_Literal 0x6b 2bcd 010f | | Execute Exception,Equal 2bce 6802 |h | Jump_Zero 0x2bd1 2bcf e210 | | Load 0x1,0x10 2bd0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 2bd1 0100 | | Execute Exception,Raise 2bd2 ; -------------------------------------------------------------------------------------- 2bd2 ; STRING TABLE 2bd2 ; -------------------------------------------------------------------------------------- 2bd2 0096 | | .STRTAB 0x0096->0x2c1d ; "TARGET_MACHINE_FIELD" 2bd3 00a8 | | .STRTAB 0x00a8->0x2c27 ; "TARGET_ACCOUNT_FIELD" 2bd4 00ba | | .STRTAB 0x00ba->0x2c31 ; "TARGET_DIRECTORY_FIELD" 2bd5 00ce | | .STRTAB 0x00ce->0x2c3c ; "TARGET_LIBRARY_FIELD" 2bd6 00e0 | | .STRTAB 0x00e0->0x2c46 ; "CONFIGURATION_FIELD" 2bd7 00f1 | | .STRTAB 0x00f1->0x2c4f ; "HAS_UNIT_CONFIGURATIONS_FIELD" 2bd8 010c | | .STRTAB 0x010c->0x2c5e ; "HAS_UNIT_BUILD_TIMES_FIELD" 2bd9 0124 | $ | .STRTAB 0x0124->0x2c6b ; "C" 2bda 0123 | # | .STRTAB 0x0123->0x2c6b ; "S" 2bdb 0122 | " | .STRTAB 0x0122->0x2c6c ; "SPEC_PART" 2bdc 0129 | ) | .STRTAB 0x0129->0x2c70 ; "BODY_PART" 2bdd 0130 | 0 | .STRTAB 0x0130->0x2c75 ; "ON_MACHINE" 2bde 0138 | 8 | .STRTAB 0x0138->0x2c7a ; "IS_ATTR" 2bdf 013d | = | .STRTAB 0x013d->0x2c7d ; "HAS_ATTR" 2be0 0143 | C | .STRTAB 0x0143->0x2c81 ; "CONFIG" 2be1 0147 | G | .STRTAB 0x0147->0x2c84 ; "REFRESHED" 2be2 014e | N | .STRTAB 0x014e->0x2c89 ; "UPDATED" 2be3 0153 | S | .STRTAB 0x0153->0x2c8c ; "DOWNLOADED" 2be4 015b | [ | .STRTAB 0x015b->0x2c91 ; "STAMPED" 2be5 0160 | ` | .STRTAB 0x0160->0x2c95 ; "BUILT" 2be6 0163 | c | .STRTAB 0x0163->0x2c97 ; "NAMED" 2be7 0166 | f | .STRTAB 0x0166->0x2c9a ; "TARGET_NAMED" 2be8 0170 | p | .STRTAB 0x0170->0x2ca0 ; "SECONDARY_NAMED" 2be9 017d | } | .STRTAB 0x017d->0x2ca7 ; "PRIMARY_NAMED" 2bea 0188 | | .STRTAB 0x0188->0x2cae ; "RETAINED" 2beb 018e | | .STRTAB 0x018e->0x2cb2 ; "SN" 2bec 018e | | .STRTAB 0x018e->0x2cb3 ; "BASIC_FRESH" 2bed 0197 | | .STRTAB 0x0197->0x2cb8 ; "FULL_FRESH" 2bee 019f | | .STRTAB 0x019f->0x2cbd ; "CONFIGURED" 2bef 01a7 | | .STRTAB 0x01a7->0x2cc2 ; "DOWNLOADABLE" 2bf0 01b1 | | .STRTAB 0x01b1->0x2cc8 ; "SECONDARY_UNIT" 2bf1 01bd | | .STRTAB 0x01bd->0x2ccf ; "SEPARATE_GENERIC_BODIES" 2bf2 01d2 | | .STRTAB 0x01d2->0x2cdb ; "SECONDARY_UNIT" 2bf3 01de | | .STRTAB 0x01de->0x2ce2 ; "TARGET_NAME" 2bf4 01e7 | | .STRTAB 0x01e7->0x2ce7 ; "TARGET_UNIT" 2bf5 01f0 | | .STRTAB 0x01f0->0x2ced ; "NIL" 2bf6 01f1 | | .STRTAB 0x01f1->0x2cee ; "NEGATE" 2bf7 01f5 | | .STRTAB 0x01f5->0x2cf1 ; "AND_THEN" 2bf8 01fb | | .STRTAB 0x01fb->0x2cf5 ; "OR_ELSE" 2bf9 0200 | | .STRTAB 0x0200->0x2cf9 ; "CLASS" 2bfa 0203 | | .STRTAB 0x0203->0x2cfb ; "SUBCLASS" 2bfb 0209 | | .STRTAB 0x0209->0x2cff ; "UNIT_STATE" 2bfc 0211 | | .STRTAB 0x0211->0x2d04 ; "IS_QUERY" 2bfd 0217 | | .STRTAB 0x0217->0x2d08 ; "HAS_QUERY" 2bfe 021e | | .STRTAB 0x021e->0x2d0d ; "CONFIG" 2bff 0222 | " | .STRTAB 0x0222->0x2d10 ; "REFRESHED" 2c00 0229 | ) | .STRTAB 0x0229->0x2d14 ; "UPDATED" 2c01 022e | . | .STRTAB 0x022e->0x2d18 ; "DOWNLOADED" 2c02 0236 | 6 | .STRTAB 0x0236->0x2d1d ; "STAMPED" 2c03 023b | ; | .STRTAB 0x023b->0x2d20 ; "BUILT" 2c04 023e | > | .STRTAB 0x023e->0x2d23 ; "NAMED" 2c05 0241 | A | .STRTAB 0x0241->0x2d25 ; "TARGET_NAMED" 2c06 024b | K | .STRTAB 0x024b->0x2d2b ; "SECONDARY_NAMED" 2c07 0258 | X | .STRTAB 0x0258->0x2d33 ; "PRIMARY_NAMED" 2c08 0263 | c | .STRTAB 0x0263->0x2d39 ; "RETAINED" 2c09 0269 | i | .STRTAB 0x0269->0x2d3d ; "SN" 2c0a 0269 | i | .STRTAB 0x0269->0x2d3e ; "UNIT_PART" 2c0b 0270 | p | .STRTAB 0x0270->0x2d43 ; ":MONDAY :TUESDAY :WEDNESDAY :THURSDAY :FRIDAY :SATURDAY :SUNDAY :TODAY :YESTERDAY :JANUARY :FEBRUARY :MARCH :APRIL :MAY :JUNE :JULY :AUGUST :SEPTEMBER :OCTOBER :NOVEMBER :DECEMBER :NOON :MIDNIGHT :AM :PM :" 2c0c 039b | | .STRTAB 0x039b->0x2dd9 ; "Created state file for world \x22" 2c0d 03b7 | | .STRTAB 0x03b7->0x2de8 ; "\x22." 2c0e 03b7 | | .STRTAB 0x03b7->0x2de9 ; "AT" 2c0f 03b7 | | .STRTAB 0x03b7->0x2dea ; ".." 2c10 03b7 | | .STRTAB 0x03b7->0x2deb ; "'IS" 2c11 03b8 | | .STRTAB 0x03b8->0x2ded ; "'HAS" 2c12 03ba | | .STRTAB 0x03ba->0x2def ; "'" 2c13 03b9 | | .STRTAB 0x03b9->0x2def ; "(" 2c14 03b8 | | .STRTAB 0x03b8->0x2df0 ; "Warning: ON_MACHINES query attribute will be ignored." 2c15 03eb | | .STRTAB 0x03eb->0x2e0a ; "Target_Account has been set to \x22" 2c16 0409 | | .STRTAB 0x0409->0x2e1a ; "Target_Directory has been set to \x22" 2c17 0429 | ) | .STRTAB 0x0429->0x2e2b ; "Target_Library has been set to \x22" 2c18 0447 | G | .STRTAB 0x0447->0x2e3b ; "Configuration has been set to \x22" 2c19 0464 | d | .STRTAB 0x0464->0x2e4b ; "Target_Machine has been set to \x22" 2c1a 0482 | | .STRTAB 0x0482->0x2e5b ; "State file for " 2c1b 048f | | .STRTAB 0x048f->0x2e62 ; " has been closed." 2c1c 049e | | .STREND 0x049e->0x2e6b 2c1d 5441 5247 |TARG| .STRTAB_STRINGS 2e6b 0000 0000 | | .BLANK 0000[0x5] 2e70 ; -------------------------------------------------------------------------------------- 2e70 ; Debug Table 2e70 ; -------------------------------------------------------------------------------------- 2e70 0004 000d | | .DEBUG4 0x0004,0x000d,0xd928,0x0000,0x0001,0x0000 2e76 0000 0800 | | .XXX[0x62] 2e78 0000 003e | >| 2e7a a5c1 006a | j| 2e7c 80e8 0000 | | 2e7e 0000 1000 | | 2e80 0000 007d | }| 2e82 4b82 00d5 |K | 2e84 8190 0000 | | 2e86 0000 2000 | | 2e88 0000 00fa | | 2e8a 9704 01ab | | 2e8c 0320 0000 | | 2e8e 0000 4000 | @ | 2e90 0000 01f5 | | 2e92 2e08 0356 |. V| 2e94 0640 0000 | @ | 2e96 0000 8000 | | 2e98 0000 03ea | | 2e9a 5c10 06ac |\ | 2e9c 0c80 0000 | | 2e9e 001e 8000 | | 2ea0 0000 005c | \| 2ea2 b820 0d58 | X| 2ea4 1900 0000 | | 2ea6 003d 0000 | = | 2ea8 0000 00b9 | | 2eaa 7040 1ab0 |p@ | 2eac 3200 0000 |2 | 2eae 007a 0000 | z | 2eb0 0000 0172 | r| 2eb2 e080 3560 | 5`| 2eb4 6400 0000 |d | 2eb6 00f4 0000 | | 2eb8 0000 02e5 | | 2eba c100 6ac0 | j | 2ebc c800 0000 | | 2ebe 01e8 0000 | | 2ec0 0000 05cb | | 2ec2 8200 d581 | | 2ec4 9000 0000 | | 2ec6 0020 0000 | | 2ec8 0000 fa97 | | 2eca 0401 ab03 | | 2ecc 2000 0000 | | 2ece 0040 0000 | @ | 2ed0 0001 f507 | | 2ed2 0103 57d7 | W | 2ed4 0000 0000 | | 2ed6 3504 6400 |5 d | 2ed8 0000 0000 | | .BLANK 0000[0x5] 2edd 0206 a86e | n| .XXX[0x2b] 2edf 01a9 a2f0 | | 2ee1 3539 000d |59 | 2ee3 432b 81a9 |C+ | 2ee5 cea0 6a1d | j | 2ee7 540d 4eaa |T N | 2ee9 0351 0a60 | Q `| 2eeb 6a76 f81a |jv | 2eed 8951 0353 | Q S| 2eef c500 d452 | R| 2ef1 781a 9e92 |x | 2ef3 06a2 d340 | @| 2ef5 d4f7 e035 | 5| 2ef7 1896 06a7 | | 2ef9 d981 a8d4 | | 2efb 9035 3fa0 | 5? | 2efd 0d47 2380 | G# | 2eff 0000 006a | j| 2f01 3d14 1c04 |= | 2f03 0d5f 5c00 | _\ | 2f05 0000 00d4 | | 2f07 e0b0 | | 2f08 0000 0000 | | .BLANK 0000[0x5] 2f0d 0008 1ab1 | | .XXX[0x7b] 2f0f b006 a80e | | 2f11 c0d5 1460 | `| 2f13 3520 8606 |5 | 2f15 a8bd 81a9 | | 2f17 1410 3546 | 5F| 2f19 c00d 491f | I | 2f1b 81aa 3ca0 | < | 2f1d 6a4c f40d |jL | 2f1f 521a 0352 |R R| 2f21 8760 6a92 | `j | 2f23 781a 9539 |x 9| 2f25 0354 a100 | T | 2f27 d4b1 b81a | | 2f29 a572 06a5 | r | 2f2b cd40 d52e | @ .| 2f2d e035 3066 | 50f| 2f2f 0000 0001 | | 2f31 a993 12e0 | | 2f33 8035 6c7c | 5l|| 2f35 0000 0000 | | 2f37 0800 0000 | | 2f39 003e a5c1 | > | 2f3b 006a d8f8 | j | 2f3d 0000 0002 | | 2f3f 2c00 0000 |, | 2f41 0006 cb82 | | 2f43 00d5 b1f0 | | 2f45 0000 0004 | | 2f47 6000 0000 |` | 2f49 000c 9704 | | 2f4b 01ab 63e0 | c | 2f4d 0000 0000 | | 2f4f 4000 0000 |@ | 2f51 01f5 2e08 | . | 2f53 0356 c7c0 | V | 2f55 0000 0000 | | 2f57 8000 0000 | | 2f59 03ea 5c10 | \ | 2f5b 06ad 8f80 | | 2f5d 0000 0001 | | 2f5f 0000 0000 | | 2f61 07d4 b820 | | 2f63 0d5b 1f00 | [ | 2f65 0000 0002 | | 2f67 0000 0000 | | 2f69 0fa9 7040 | p@| 2f6b 1ab6 3e00 | > | 2f6d 0000 0004 | | 2f6f 0000 0000 | | 2f71 1f52 e080 | R | 2f73 356c 7c00 |5l| | 2f75 0000 0008 | | 2f77 0000 0000 | | 2f79 3ea5 c100 |> | 2f7b 6ad8 f800 |j | 2f7d 0000 0010 | | 2f7f 0000 0000 | | 2f81 7d41 c040 |}A @| 2f83 d5f5 c000 | | 2f85 0000 0d51 | Q| 2f87 1100 | | 2f88 0000 0000 | | .BLANK 0000[0x5] 2f8d 0081 ab7b | {| .XXX[0x2b] 2f8f c06a c0cc | j | 2f91 0d59 4203 | YB | 2f93 54c8 e06a |T j| 2f95 cbb8 1aa7 | | 2f97 4503 566b |E Vk| 2f99 00d5 4218 | B | 2f9b 1ab3 c206 | | 2f9d aa50 40d5 | P@ | 2f9f a160 3554 | `5T| 2fa1 7e06 ad25 |~ %| 2fa3 81aa b3d0 | | 2fa5 356a 000d |5j | 2fa7 561d 81ab |V | 2fa9 56a0 6ab4 |V j | 2fab e40d 5aea | Z | 2fad 0355 c6e0 | U | 2faf 0000 001a | | 2fb1 af35 0701 | 5 | 2fb3 0357 d700 | W | 2fb5 0000 0035 | 5| 2fb7 6434 |d4 | 2fb8 0000 0000 | | .BLANK 0000[0x5] 2fbd 0002 0000 | | .XXX[0x3f] 2fbf 0001 ab63 | c| 2fc1 f3b1 7000 | p | 2fc3 0000 0000 | | 2fc5 0001 1a00 | | 2fc7 0000 0027 | '| 2fc9 62e0 6b14 |b k | 2fcb 3000 0000 |0 | 2fcd 00f0 0000 | | 2fcf 0000 4ec5 | N | 2fd1 c0d6 3680 | 6 | 2fd3 0000 0004 | | 2fd5 0000 0000 | | 2fd7 009d 8b81 | | 2fd9 ac6d 0000 | m | 2fdb 0000 0600 | | 2fdd 0000 0001 | | 2fdf 3b17 0359 |; Y| 2fe1 0300 0000 | | 2fe3 0016 8000 | | 2fe5 0000 0276 | v| 2fe7 2806 b2bc |( | 2fe9 8000 0000 | | 2feb 0880 0000 | | 2fed 0004 b820 | | 2fef 0d65 1a00 | e | 2ff1 0000 003e | >| 2ff3 8000 0000 | | 2ff5 0fb8 3808 | 8 | 2ff7 1ac2 d400 | | 2ff9 0000 01a6 | | 2ffb 1d80 | | 2ffc 0000 0000 | | .BLANK 0000[0x4]