|
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: 23552 (0x5c00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 2de8 |- | .CONST 0x2de8 ; 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 2ac3 | * | Declare_Subprogram INIT_2ac0,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 04eb | | Declare_Subprogram INIT_04e8,For_Outer_Call,Visible,Unelaborated 00bf c213 | | Store 0x1,0x13 00c0 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated 00c2 c291 | | Store 0x1,0x91 00c3 029a 059b | | Declare_Subprogram INIT_0598,For_Outer_Call,Visible,Unelaborated 00c5 c27e | ~ | Store 0x1,0x7e 00c6 029a 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call,Visible,Unelaborated 00c8 c214 | | Store 0x1,0x14 00c9 029a 05eb | | Declare_Subprogram INIT_05e8,For_Outer_Call,Visible,Unelaborated 00cb c215 | | Store 0x1,0x15 00cc 029a 05f3 | | Declare_Subprogram INIT_05f0,For_Outer_Call,Visible,Unelaborated 00ce c216 | | Store 0x1,0x16 00cf 029a 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call,Visible,Unelaborated 00d1 c217 | | Store 0x1,0x17 00d2 029a 0613 | | Declare_Subprogram INIT_0610,For_Outer_Call,Visible,Unelaborated 00d4 c218 | | Store 0x1,0x18 00d5 029a 061b | | Declare_Subprogram INIT_0618,For_Outer_Call,Visible,Unelaborated 00d7 c219 | | Store 0x1,0x19 00d8 029a 0623 | #| Declare_Subprogram INIT_0620,For_Outer_Call,Visible,Unelaborated 00da c27a | z | Store 0x1,0x7a 00db 029a 0633 | 3| Declare_Subprogram INIT_0630,For_Outer_Call,Visible,Unelaborated 00dd c27b | { | Store 0x1,0x7b 00de 029a 0643 | C| Declare_Subprogram INIT_0640,For_Outer_Call,Visible,Unelaborated 00e0 c27c | | | Store 0x1,0x7c 00e1 029a 0653 | S| Declare_Subprogram INIT_0650,For_Outer_Call,Visible,Unelaborated 00e3 c27d | } | Store 0x1,0x7d 00e4 029a 0663 | c| Declare_Subprogram INIT_0660,For_Outer_Call,Visible,Unelaborated 00e6 c28b | | Store 0x1,0x8b 00e7 029a 0683 | | Declare_Subprogram INIT_0680,For_Outer_Call,Visible,Unelaborated 00e9 c28c | | Store 0x1,0x8c 00ea 029a 06f3 | | Declare_Subprogram INIT_06f0,For_Outer_Call,Visible,Unelaborated 00ec c28d | | Store 0x1,0x8d 00ed 029a 071b | | Declare_Subprogram INIT_0718,For_Outer_Call,Visible,Unelaborated 00ef c28e | | Store 0x1,0x8e 00f0 029a 073b | ;| Declare_Subprogram INIT_0738,For_Outer_Call,Visible,Unelaborated 00f2 c28f | | Store 0x1,0x8f 00f3 029a 079b | | Declare_Subprogram INIT_0798,For_Outer_Call,Visible,Unelaborated 00f5 c290 | | Store 0x1,0x90 00f6 029a 081b | | Declare_Subprogram INIT_0818,For_Outer_Call,Visible,Unelaborated 00f8 c221 | ! | Store 0x1,0x21 00f9 029a 0833 | 3| Declare_Subprogram INIT_0830,For_Outer_Call,Visible,Unelaborated 00fb c222 | " | Store 0x1,0x22 00fc 029a 08c3 | | Declare_Subprogram INIT_08c0,For_Outer_Call,Visible,Unelaborated 00fe c26e | n | Store 0x1,0x6e 00ff 029a 08d3 | | Declare_Subprogram INIT_08d0,For_Outer_Call,Visible,Unelaborated 0101 c224 | $ | Store 0x1,0x24 0102 029a 08e3 | | Declare_Subprogram INIT_08e0,For_Outer_Call,Visible,Unelaborated 0104 c225 | % | Store 0x1,0x25 0105 029a 08eb | | Declare_Subprogram INIT_08e8,For_Outer_Call,Visible,Unelaborated 0107 c226 | & | Store 0x1,0x26 0108 029a 08f3 | | Declare_Subprogram INIT_08f0,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 2aeb | * | Declare_Subprogram INIT_2ae8,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 0903 | | Declare_Subprogram INIT_0900,For_Outer_Call,Visible,Unelaborated 012a c22b | + | Store 0x1,0x2b 012b 029a 091b | | Declare_Subprogram INIT_0918,For_Outer_Call,Visible,Unelaborated 012d c22c | , | Store 0x1,0x2c 012e 029a 0963 | c| Declare_Subprogram INIT_0960,For_Outer_Call,Visible,Unelaborated 0130 c22d | - | Store 0x1,0x2d 0131 029a 097b | {| Declare_Subprogram INIT_0978,For_Outer_Call,Visible,Unelaborated 0133 c22e | . | Store 0x1,0x2e 0134 029a 09a3 | | Declare_Subprogram INIT_09a0,For_Outer_Call,Visible,Unelaborated 0136 c22f | / | Store 0x1,0x2f 0137 029a 0a1b | | Declare_Subprogram INIT_0a18,For_Outer_Call,Visible,Unelaborated 0139 c230 | 0 | Store 0x1,0x30 013a 029a 0a2b | +| Declare_Subprogram INIT_0a28,For_Outer_Call,Visible,Unelaborated 013c c231 | 1 | Store 0x1,0x31 013d 029a 0ae3 | | Declare_Subprogram INIT_0ae0,For_Outer_Call,Visible,Unelaborated 013f c232 | 2 | Store 0x1,0x32 0140 029a 0b5b | [| Declare_Subprogram INIT_0b58,For_Outer_Call,Visible,Unelaborated 0142 c233 | 3 | Store 0x1,0x33 0143 029a 0b7b | {| Declare_Subprogram INIT_0b78,For_Outer_Call,Visible,Unelaborated 0145 c234 | 4 | Store 0x1,0x34 0146 029a 0b8b | | Declare_Subprogram INIT_0b88,For_Outer_Call,Visible,Unelaborated 0148 c235 | 5 | Store 0x1,0x35 0149 029a 0c8b | | Declare_Subprogram INIT_0c88,For_Outer_Call,Visible,Unelaborated 014b c236 | 6 | Store 0x1,0x36 014c 029a 0d03 | | Declare_Subprogram INIT_0d00,For_Outer_Call,Visible,Unelaborated 014e c237 | 7 | Store 0x1,0x37 014f 029a 0d13 | | Declare_Subprogram INIT_0d10,For_Outer_Call,Visible,Unelaborated 0151 c238 | 8 | Store 0x1,0x38 0152 029a 0d23 | #| Declare_Subprogram INIT_0d20,For_Outer_Call,Visible,Unelaborated 0154 c239 | 9 | Store 0x1,0x39 0155 029a 0d93 | | Declare_Subprogram INIT_0d90,For_Outer_Call,Visible,Unelaborated 0157 c23a | : | Store 0x1,0x3a 0158 029a 0e33 | 3| Declare_Subprogram INIT_0e30,For_Outer_Call,Visible,Unelaborated 015a c284 | | Store 0x1,0x84 015b 029a 0e43 | C| Declare_Subprogram INIT_0e40,For_Outer_Call,Visible,Unelaborated 015d c285 | | Store 0x1,0x85 015e 029a 0e5b | [| Declare_Subprogram INIT_0e58,For_Outer_Call,Visible,Unelaborated 0160 c23b | ; | Store 0x1,0x3b 0161 029a 0e6b | k| Declare_Subprogram INIT_0e68,For_Outer_Call,Visible,Unelaborated 0163 c23c | < | Store 0x1,0x3c 0164 029a 0e7b | {| Declare_Subprogram INIT_0e78,For_Outer_Call,Visible,Unelaborated 0166 c23d | = | Store 0x1,0x3d 0167 029a 0e8b | | Declare_Subprogram INIT_0e88,For_Outer_Call,Visible,Unelaborated 0169 c23e | > | Store 0x1,0x3e 016a 029a 0e9b | | Declare_Subprogram INIT_0e98,For_Outer_Call,Visible,Unelaborated 016c c287 | | Store 0x1,0x87 016d 029a 0ea3 | | Declare_Subprogram INIT_0ea0,For_Outer_Call,Visible,Unelaborated 016f c288 | | Store 0x1,0x88 0170 029a 0eab | | Declare_Subprogram INIT_0ea8,For_Outer_Call,Visible,Unelaborated 0172 c23f | ? | Store 0x1,0x3f 0173 029a 0ed3 | | Declare_Subprogram INIT_0ed0,For_Outer_Call,Visible,Unelaborated 0175 c240 | @ | Store 0x1,0x40 0176 029a 0f0b | | Declare_Subprogram INIT_0f08,For_Outer_Call,Visible,Unelaborated 0178 c241 | A | Store 0x1,0x41 0179 029a 0f3b | ;| Declare_Subprogram INIT_0f38,For_Outer_Call,Visible,Unelaborated 017b c242 | B | Store 0x1,0x42 017c 029a 0f4b | K| Declare_Subprogram INIT_0f48,For_Outer_Call,Visible,Unelaborated 017e c243 | C | Store 0x1,0x43 017f 029a 0f5b | [| Declare_Subprogram INIT_0f58,For_Outer_Call,Visible,Unelaborated 0181 c244 | D | Store 0x1,0x44 0182 029a 0f73 | s| Declare_Subprogram INIT_0f70,For_Outer_Call,Visible,Unelaborated 0184 c283 | | Store 0x1,0x83 0185 029a 0fa3 | | Declare_Subprogram INIT_0fa0,For_Outer_Call,Visible,Unelaborated 0187 c28a | | Store 0x1,0x8a 0188 029a 0fd3 | | Declare_Subprogram INIT_0fd0,For_Outer_Call,Visible,Unelaborated 018a c245 | E | Store 0x1,0x45 018b 029a 0fe3 | | Declare_Subprogram INIT_0fe0,For_Outer_Call,Visible,Unelaborated 018d c246 | F | Store 0x1,0x46 018e 029a 0feb | | Declare_Subprogram INIT_0fe8,For_Outer_Call,Visible,Unelaborated 0190 c247 | G | Store 0x1,0x47 0191 029a 1033 | 3| Declare_Subprogram INIT_1030,For_Outer_Call,Visible,Unelaborated 0193 c248 | H | Store 0x1,0x48 0194 029a 103b | ;| Declare_Subprogram INIT_1038,For_Outer_Call,Visible,Unelaborated 0196 c249 | I | Store 0x1,0x49 0197 029a 104b | K| Declare_Subprogram INIT_1048,For_Outer_Call,Visible,Unelaborated 0199 c24a | J | Store 0x1,0x4a 019a 029a 1053 | S| Declare_Subprogram INIT_1050,For_Outer_Call,Visible,Unelaborated 019c c24b | K | Store 0x1,0x4b 019d 029a 1063 | c| Declare_Subprogram INIT_1060,For_Outer_Call,Visible,Unelaborated 019f c24c | L | Store 0x1,0x4c 01a0 029a 106b | k| Declare_Subprogram INIT_1068,For_Outer_Call,Visible,Unelaborated 01a2 c24d | M | Store 0x1,0x4d 01a3 029a 107b | {| Declare_Subprogram INIT_1078,For_Outer_Call,Visible,Unelaborated 01a5 c24e | N | Store 0x1,0x4e 01a6 029a 1083 | | Declare_Subprogram INIT_1080,For_Outer_Call,Visible,Unelaborated 01a8 c24f | O | Store 0x1,0x4f 01a9 029a 1093 | | Declare_Subprogram INIT_1090,For_Outer_Call,Visible,Unelaborated 01ab c27f | | Store 0x1,0x7f 01ac 029a 109b | | Declare_Subprogram INIT_1098,For_Outer_Call,Visible,Unelaborated 01ae c280 | | Store 0x1,0x80 01af 029a 10a3 | | Declare_Subprogram INIT_10a0,For_Outer_Call,Visible,Unelaborated 01b1 c281 | | Store 0x1,0x81 01b2 029a 10ab | | Declare_Subprogram INIT_10a8,For_Outer_Call,Visible,Unelaborated 01b4 c282 | | Store 0x1,0x82 01b5 029a 10bb | | Declare_Subprogram INIT_10b8,For_Outer_Call,Visible,Unelaborated 01b7 c271 | q | Store 0x1,0x71 01b8 029a 10cb | | Declare_Subprogram INIT_10c8,For_Outer_Call,Visible,Unelaborated 01ba c272 | r | Store 0x1,0x72 01bb 029a 10db | | Declare_Subprogram INIT_10d8,For_Outer_Call,Visible,Unelaborated 01bd c273 | s | Store 0x1,0x73 01be 029a 10e3 | | Declare_Subprogram INIT_10e0,For_Outer_Call,Visible,Unelaborated 01c0 c274 | t | Store 0x1,0x74 01c1 029a 10f3 | | Declare_Subprogram INIT_10f0,For_Outer_Call,Visible,Unelaborated 01c3 c250 | P | Store 0x1,0x50 01c4 029a 10fb | | Declare_Subprogram INIT_10f8,For_Outer_Call,Visible,Unelaborated 01c6 c251 | Q | Store 0x1,0x51 01c7 029a 1173 | s| Declare_Subprogram INIT_1170,For_Outer_Call,Visible,Unelaborated 01c9 c252 | R | Store 0x1,0x52 01ca 029a 11bb | | Declare_Subprogram INIT_11b8,For_Outer_Call,Visible,Unelaborated 01cc c253 | S | Store 0x1,0x53 01cd 029a 120b | | Declare_Subprogram INIT_1208,For_Outer_Call,Visible,Unelaborated 01cf c254 | T | Store 0x1,0x54 01d0 029a 1253 | S| Declare_Subprogram INIT_1250,For_Outer_Call,Visible,Unelaborated 01d2 c293 | | Store 0x1,0x93 01d3 029a 12a3 | | Declare_Subprogram INIT_12a0,For_Outer_Call,Visible,Unelaborated 01d5 c256 | V | Store 0x1,0x56 01d6 029a 1303 | | Declare_Subprogram INIT_1300,For_Outer_Call,Visible,Unelaborated 01d8 c294 | | Store 0x1,0x94 01d9 029a 1353 | S| Declare_Subprogram INIT_1350,For_Outer_Call,Visible,Unelaborated 01db c295 | | Store 0x1,0x95 01dc 029a 13a3 | | Declare_Subprogram INIT_13a0,For_Outer_Call,Visible,Unelaborated 01de c296 | | Store 0x1,0x96 01df 029a 13f3 | | Declare_Subprogram INIT_13f0,For_Outer_Call,Visible,Unelaborated 01e1 c25a | Z | Store 0x1,0x5a 01e2 029a 1403 | | Declare_Subprogram INIT_1400,For_Outer_Call,Visible,Unelaborated 01e4 c25b | [ | Store 0x1,0x5b 01e5 029a 1413 | | Declare_Subprogram INIT_1410,For_Outer_Call,Visible,Unelaborated 01e7 c25c | \ | Store 0x1,0x5c 01e8 029a 1423 | #| Declare_Subprogram INIT_1420,For_Outer_Call,Visible,Unelaborated 01ea c275 | u | Store 0x1,0x75 01eb 029a 1463 | c| Declare_Subprogram INIT_1460,For_Outer_Call,Visible,Unelaborated 01ed c276 | v | Store 0x1,0x76 01ee 029a 14ab | | Declare_Subprogram INIT_14a8,For_Outer_Call,Visible,Unelaborated 01f0 c25f | _ | Store 0x1,0x5f 01f1 029a 14bb | | Declare_Subprogram INIT_14b8,For_Outer_Call,Visible,Unelaborated 01f3 c260 | ` | Store 0x1,0x60 01f4 029a 14cb | | Declare_Subprogram INIT_14c8,For_Outer_Call,Visible,Unelaborated 01f6 c261 | a | Store 0x1,0x61 01f7 4808 |H | Short_Literal 0x8 01f8 0093 2b13 | + | push_full_address INIT_2b10 01fa 02a0 | | Declare_Subprogram Null_Subprogram 01fb 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated 01fc c262 | b | Store 0x1,0x62 01fd 029a 14db | | Declare_Subprogram INIT_14d8,For_Outer_Call,Visible,Unelaborated 01ff c263 | c | Store 0x1,0x63 0200 029a 1553 | S| Declare_Subprogram INIT_1550,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 159b | | Declare_Subprogram INIT_1598,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 15c3 | | Declare_Subprogram INIT_15c0,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 15eb | | Declare_Subprogram INIT_15e8,For_Call 023b 03fd | | Declare_Type Discrete,Defined 023c 4800 |H | Short_Literal 0x0 023d 4803 |H | Short_Literal 0x3 023e 029f 1613 | | Declare_Subprogram INIT_1610,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 163b | ;| Declare_Subprogram INIT_1638,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 1663 | c| Declare_Subprogram INIT_1660,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 1663 | c| Declare_Subprogram INIT_1660,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 173b | ;| Declare_Subprogram INIT_1738,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 2b83 | + | Action Push_String_Extended,0x2b83 ; ":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 1763 | c| Declare_Subprogram INIT_1760,For_Outer_Call 031a 029d 17d3 | | Declare_Subprogram INIT_17d0,For_Outer_Call 031c 029d 18fb | | Declare_Subprogram INIT_18f8,For_Outer_Call 031e 029d 19a3 | | Declare_Subprogram INIT_19a0,For_Outer_Call 0320 029d 1a0b | | Declare_Subprogram INIT_1a08,For_Outer_Call 0322 029d 1a4b | K| Declare_Subprogram INIT_1a48,For_Outer_Call 0324 029d 1c1b | | Declare_Subprogram INIT_1c18,For_Outer_Call 0326 029d 1ccb | | Declare_Subprogram INIT_1cc8,For_Outer_Call 0328 029d 1d4b | K| Declare_Subprogram INIT_1d48,For_Outer_Call 032a 029d 1f33 | 3| Declare_Subprogram INIT_1f30,For_Outer_Call 032c 029d 1f4b | K| Declare_Subprogram INIT_1f48,For_Outer_Call 032e 029d 1f63 | c| Declare_Subprogram INIT_1f60,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 2213 | " | Declare_Subprogram INIT_2210,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 228b | " | Declare_Subprogram INIT_2288,For_Outer_Call 0358 029d 22db | " | Declare_Subprogram INIT_22d8,For_Outer_Call 035a 029d 2363 | #c| Declare_Subprogram INIT_2360,For_Outer_Call 035c 029d 2383 | # | Declare_Subprogram INIT_2380,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 2583 | % | Declare_Subprogram INIT_2580,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 25bb | % | Declare_Subprogram INIT_25b8,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 25f3 | % | Declare_Subprogram INIT_25f0,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 260b | & | Declare_Subprogram INIT_2608,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 2623 | &#| Declare_Subprogram INIT_2620,For_Outer_Call 03b2 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f 03b3 00c7 | | Action Elaborate_Subprogram 03b4 029d 263b | &;| Declare_Subprogram INIT_2638,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 267b | &{| Declare_Subprogram INIT_2678,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 2693 | & | Declare_Subprogram INIT_2690,For_Outer_Call 03e3 029d 26db | & | Declare_Subprogram INIT_26d8,For_Outer_Call 03e5 029d 26eb | & | Declare_Subprogram INIT_26e8,For_Outer_Call 03e7 029d 2743 | 'C| Declare_Subprogram INIT_2740,For_Outer_Call 03e9 029d 27db | ' | Declare_Subprogram INIT_27d8,For_Outer_Call 03eb 029d 2823 | (#| Declare_Subprogram INIT_2820,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 2873 | (s| Declare_Subprogram INIT_2870,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 288b | ( | Declare_Subprogram INIT_2888,For_Call 0482 BODY_0470: 0482 e5f9 | | Load 0x2,-0x7 0483 00db | | Load_Top At_Offset_3 0484 605f |`_ | Indirect_Literal Discrete,0x4e4,{0x00000000, 0x00002817} 0485 605a |`Z | Indirect_Literal Discrete,0x4e0,{0x00000000, 0x00002803} 0486 e5ff | | Load 0x2,-0x1 0487 801c | | Call 0x0,0x1c 0488 c403 | | Store 0x2,0x3 0489 c5f9 | | Store 0x2,-0x7 048a e5f9 | | Load 0x2,-0x7 048b 704c |pL | Jump_Nonzero 0x4d8 048c 00cf | | Action Mark_Auxiliary 048d 783f |x? | Jump 0x4cd 048e e00d | | Load 0x0,0xd 048f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0490 e402 | | Load 0x2,0x2 0491 0120 | | Execute Any,Is_Value 0492 6803 |h | Jump_Zero 0x496 0493 e00d | | Load 0x0,0xd 0494 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0495 7801 |x | Jump 0x497 0496 e402 | | Load 0x2,0x2 0497 e403 | | Load 0x2,0x3 0498 e00d | | Load 0x0,0xd 0499 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 049a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 049b c402 | | Store 0x2,0x2 049c 005b | [ | Store_Top Discrete,At_Offset_3 049d 00da | | Load_Top At_Offset_2 049e 681b |h | Jump_Zero 0x4ba 049f e002 | | Load 0x0,0x2 04a0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04a1 4801 |H | Short_Literal 0x1 04a2 4802 |H | Short_Literal 0x2 04a3 e00e | | Load 0x0,0xe 04a4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04a5 0334 | 4 | Declare_Variable Array,With_Constraint 04a6 e403 | | Load 0x2,0x3 04a7 e00d | | Load 0x0,0xd 04a8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04a9 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 04aa e00e | | Load 0x0,0xe 04ab 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04ac 4801 |H | Short_Literal 0x1 04ad 00da | | Load_Top At_Offset_2 04ae 01d6 | | Execute Vector,Field_Write 04af e404 | | Load 0x2,0x4 04b0 e00e | | Load 0x0,0xe 04b1 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 04b2 4802 |H | Short_Literal 0x2 04b3 00da | | Load_Top At_Offset_2 04b4 01d6 | | Execute Vector,Field_Write 04b5 6026 |`& | Indirect_Literal Discrete,0x4dc,{0x00000000, 0x00002808} 04b6 e002 | | Load 0x0,0x2 04b7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 04b8 c5f9 | | Store 0x2,-0x7 04b9 7802 |x | Jump 0x4bc 04ba e402 | | Load 0x2,0x2 04bb 8405 | | Call 0x2,0x5 04bc 0092 2b84 | + | Action Push_String_Extended,0x2b84 ; "Created state file for world \x22" 04be e403 | | Load 0x2,0x3 04bf e00d | | Load 0x0,0xd 04c0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04c1 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 04c2 01cc | | Execute Vector,Catenate 04c3 0092 2b85 | + | Action Push_String_Extended,0x2b85 ; "\x22." 04c5 01cc | | Execute Vector,Catenate 04c6 801d | | Call 0x0,0x1d 04c7 00db | | Load_Top At_Offset_3 04c8 e00d | | Load 0x0,0xd 04c9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04ca 181d | | Execute Package,Field_Execute,Field_Number 0x1d 04cb c403 | | Store 0x2,0x3 04cc 00c9 | | Action Pop_Auxiliary_Loop 04cd 00db | | Load_Top At_Offset_3 04ce e00d | | Load 0x0,0xd 04cf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04d0 181e | | Execute Package,Field_Execute,Field_Number 0x1e 04d1 6fbc |o | Jump_Zero 0x48e 04d2 00ce | | Action Pop_Auxiliary 04d3 00da | | Load_Top At_Offset_2 04d4 e00d | | Load 0x0,0xd 04d5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04d6 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 04d7 c403 | | Store 0x2,0x3 04d8 4507 |E | Exit_Suprogram New_Top_Offset 0x7 04d9 0000 0000 | | .XXX[0x3] 04db 0000 | | 04dc 0000 0000 | | .LITERAL {0x00000000, 0x00002808} 04e0 0000 0000 | | .LITERAL {0x00000000, 0x00002803} 04e4 0000 0000 | | .LITERAL {0x00000000, 0x00002817} 04e8 ; -------------------------------------------------------------------------------------- 04e8 ; SUBPROGRAM 04e8 ; -------------------------------------------------------------------------------------- 04e8 04f8 | | .CONST 0x04f8 ; Address of begin 04e9 0004 | | .CONST 0x0004 ; Address of exception handler 04ea 0004 | | .CONST 0x0004 ; Number of locals 04eb INIT_04e8: 04eb e00d | | Load 0x0,0xd 04ec 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04ed 02c7 | | Declare_Variable Any 04ee 00d8 | | Load_Top At_Offset_0 04ef 1c00 | | Execute_Immediate Run_Utility,0x0 04f0 e00d | | Load 0x0,0xd 04f1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04f2 1b18 | | Execute Package,Field_Read,Field_Number 0x18 04f3 02c7 | | Declare_Variable Any 04f4 00d8 | | Load_Top At_Offset_0 04f5 1c00 | | Execute_Immediate Run_Utility,0x0 04f6 e00d | | Load 0x0,0xd 04f7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04f8 BODY_04e8: 04f8 e5fd | | Load 0x2,-0x3 04f9 00da | | Load_Top At_Offset_2 04fa 6051 |`Q | Indirect_Literal Discrete,0x54c,{0x00000000, 0x00002818} 04fb 604c |`L | Indirect_Literal Discrete,0x548,{0x00000000, 0x00002806} 04fc e5ff | | Load 0x2,-0x1 04fd 801c | | Call 0x0,0x1c 04fe c403 | | Store 0x2,0x3 04ff c5fd | | Store 0x2,-0x3 0500 e5fd | | Load 0x2,-0x3 0501 7045 |pE | Jump_Nonzero 0x547 0502 00cf | | Action Mark_Auxiliary 0503 7838 |x8 | Jump 0x53c 0504 e00d | | Load 0x0,0xd 0505 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0506 e402 | | Load 0x2,0x2 0507 0120 | | Execute Any,Is_Value 0508 6803 |h | Jump_Zero 0x50c 0509 e00d | | Load 0x0,0xd 050a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 050b 7801 |x | Jump 0x50d 050c e402 | | Load 0x2,0x2 050d e403 | | Load 0x2,0x3 050e e00d | | Load 0x0,0xd 050f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0510 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0511 c402 | | Store 0x2,0x2 0512 005a | Z | Store_Top Discrete,At_Offset_2 0513 00d9 | | Load_Top At_Offset_1 0514 681b |h | Jump_Zero 0x530 0515 e002 | | Load 0x0,0x2 0516 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0517 4801 |H | Short_Literal 0x1 0518 4802 |H | Short_Literal 0x2 0519 e00e | | Load 0x0,0xe 051a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 051b 0334 | 4 | Declare_Variable Array,With_Constraint 051c e403 | | Load 0x2,0x3 051d e00d | | Load 0x0,0xd 051e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 051f 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0520 e00e | | Load 0x0,0xe 0521 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0522 4801 |H | Short_Literal 0x1 0523 00da | | Load_Top At_Offset_2 0524 01d6 | | Execute Vector,Field_Write 0525 00db | | Load_Top At_Offset_3 0526 e00e | | Load 0x0,0xe 0527 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0528 4802 |H | Short_Literal 0x2 0529 00da | | Load_Top At_Offset_2 052a 01d6 | | Execute Vector,Field_Write 052b 67b0 |g | Indirect_Literal Discrete,0x4dc,{0x00000000, 0x00002808} 052c e002 | | Load 0x0,0x2 052d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 052e c5fd | | Store 0x2,-0x3 052f 7806 |x | Jump 0x536 0530 e5fd | | Load 0x2,-0x3 0531 e5fe | | Load 0x2,-0x2 0532 e402 | | Load 0x2,0x2 0533 e01b | | Load 0x0,0x1b 0534 180e | | Execute Package,Field_Execute,Field_Number 0xe 0535 c5fd | | Store 0x2,-0x3 0536 00da | | Load_Top At_Offset_2 0537 e00d | | Load 0x0,0xd 0538 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0539 181d | | Execute Package,Field_Execute,Field_Number 0x1d 053a c403 | | Store 0x2,0x3 053b 00c9 | | Action Pop_Auxiliary_Loop 053c 00da | | Load_Top At_Offset_2 053d e00d | | Load 0x0,0xd 053e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 053f 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0540 6fc3 |o | Jump_Zero 0x504 0541 00ce | | Action Pop_Auxiliary 0542 00d9 | | Load_Top At_Offset_1 0543 e00d | | Load 0x0,0xd 0544 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0545 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0546 c403 | | Store 0x2,0x3 0547 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0548 0000 0000 | | .LITERAL {0x00000000, 0x00002806} 054c 0000 0000 | | .LITERAL {0x00000000, 0x00002818} 0550 ; -------------------------------------------------------------------------------------- 0550 ; SUBPROGRAM 0550 ; -------------------------------------------------------------------------------------- 0550 055f | _ | .CONST 0x055f ; Address of begin 0551 0004 | | .CONST 0x0004 ; Address of exception handler 0552 0004 | | .CONST 0x0004 ; Number of locals 0553 INIT_0550: 0553 e20d | | Load 0x1,0xd 0554 0007 | | Action Break_Optional 0555 e001 | | Load 0x0,0x1 0556 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0557 02c7 | | Declare_Variable Any 0558 00d8 | | Load_Top At_Offset_0 0559 1c00 | | Execute_Immediate Run_Utility,0x0 055a 6039 |`9 | Indirect_Literal Discrete,0x594,{0x00000000, 0x0000282a} 055b 6034 |`4 | Indirect_Literal Discrete,0x590,{0x00000000, 0x00002829} 055c 602f |`/ | Indirect_Literal Discrete,0x58c,{0x00000000, 0x00002828} 055d e5ff | | Load 0x2,-0x1 055e 801e | | Call 0x0,0x1e 055f BODY_0550: 055f 00be | | Action Activate_Tasks 0560 00d8 | | Load_Top At_Offset_0 0561 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0562 a5fc | | Store_Unchecked 0x2,-0x4 0563 00d8 | | Load_Top At_Offset_0 0564 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0565 7022 |p" | Jump_Nonzero 0x588 0566 00cf | | Action Mark_Auxiliary 0567 00d9 | | Load_Top At_Offset_1 0568 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0569 01d9 | | Execute Vector,Reverse_Bounds 056a 0263 | c | Execute Discrete,Above_Bound 056b 701b |p | Jump_Nonzero 0x587 056c e5fc | | Load 0x2,-0x4 056d e403 | | Load 0x2,0x3 056e e20d | | Load 0x1,0xd 056f 4801 |H | Short_Literal 0x1 0570 e5fd | | Load 0x2,-0x3 0571 e407 | | Load 0x2,0x7 0572 e404 | | Load 0x2,0x4 0573 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0574 01d7 | | Execute Vector,Field_Read 0575 4802 |H | Short_Literal 0x2 0576 e5fe | | Load 0x2,-0x2 0577 e001 | | Load 0x0,0x1 0578 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0579 c402 | | Store 0x2,0x2 057a c403 | | Store 0x2,0x3 057b c5fc | | Store 0x2,-0x4 057c e5fc | | Load 0x2,-0x4 057d e403 | | Load 0x2,0x3 057e e402 | | Load 0x2,0x2 057f 4800 |H | Short_Literal 0x0 0580 e001 | | Load 0x0,0x1 0581 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0582 c402 | | Store 0x2,0x2 0583 c403 | | Store 0x2,0x3 0584 c5fc | | Store 0x2,-0x4 0585 00c8 | | Action Pop_Auxiliary_Range 0586 3fe5 |? | Loop_Increasing 0x56c 0587 00ce | | Action Pop_Auxiliary 0588 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0589 0000 0000 | | .XXX[0x3] 058b 0000 | | 058c 0000 0000 | | .LITERAL {0x00000000, 0x00002828} 0590 0000 0000 | | .LITERAL {0x00000000, 0x00002829} 0594 0000 0000 | | .LITERAL {0x00000000, 0x0000282a} 0598 ; -------------------------------------------------------------------------------------- 0598 ; SUBPROGRAM 0598 ; -------------------------------------------------------------------------------------- 0598 05ae | | .CONST 0x05ae ; Address of begin 0599 0004 | | .CONST 0x0004 ; Address of exception handler 059a 0006 | | .CONST 0x0006 ; Number of locals 059b INIT_0598: 059b e20d | | Load 0x1,0xd 059c 0007 | | Action Break_Optional 059d e001 | | Load 0x0,0x1 059e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 059f 02c7 | | Declare_Variable Any 05a0 00d8 | | Load_Top At_Offset_0 05a1 1c00 | | Execute_Immediate Run_Utility,0x0 05a2 67f1 |g | Indirect_Literal Discrete,0x594,{0x00000000, 0x0000282a} 05a3 67ec |g | Indirect_Literal Discrete,0x590,{0x00000000, 0x00002829} 05a4 67e7 |g | Indirect_Literal Discrete,0x58c,{0x00000000, 0x00002828} 05a5 e5ff | | Load 0x2,-0x1 05a6 801e | | Call 0x0,0x1e 05a7 00d8 | | Load_Top At_Offset_0 05a8 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 05a9 e002 | | Load 0x0,0x2 05aa 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05ab 03f1 | | Declare_Variable Discrete,With_Value 05ac 00e1 | | Load_Encached Boolean_Cache 05ad 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 05ae BODY_0598: 05ae 00be | | Action Activate_Tasks 05af 00d9 | | Load_Top At_Offset_1 05b0 702b |p+ | Jump_Nonzero 0x5dc 05b1 00cf | | Action Mark_Auxiliary 05b2 00db | | Load_Top At_Offset_3 05b3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 05b4 01d9 | | Execute Vector,Reverse_Bounds 05b5 0263 | c | Execute Discrete,Above_Bound 05b6 7024 |p$ | Jump_Nonzero 0x5db 05b7 e405 | | Load 0x2,0x5 05b8 e403 | | Load 0x2,0x3 05b9 e20d | | Load 0x1,0xd 05ba e5fe | | Load 0x2,-0x2 05bb e409 | | Load 0x2,0x9 05bc e404 | | Load 0x2,0x4 05bd 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 05be 01d7 | | Execute Vector,Field_Read 05bf 4800 |H | Short_Literal 0x0 05c0 e01b | | Load 0x0,0x1b 05c1 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05c2 c402 | | Store 0x2,0x2 05c3 c403 | | Store 0x2,0x3 05c4 c405 | | Store 0x2,0x5 05c5 00d8 | | Load_Top At_Offset_0 05c6 e404 | | Load 0x2,0x4 05c7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 05c8 01d7 | | Execute Vector,Field_Read 05c9 e402 | | Load 0x2,0x2 05ca 801f | | Call 0x0,0x1f 05cb a406 | | Store_Unchecked 0x2,0x6 05cc e405 | | Load 0x2,0x5 05cd e403 | | Load 0x2,0x3 05ce e402 | | Load 0x2,0x2 05cf 4800 |H | Short_Literal 0x0 05d0 e001 | | Load 0x0,0x1 05d1 181f | | Execute Package,Field_Execute,Field_Number 0x1f 05d2 c402 | | Store 0x2,0x2 05d3 c403 | | Store 0x2,0x3 05d4 c405 | | Store 0x2,0x5 05d5 00db | | Load_Top At_Offset_3 05d6 7002 |p | Jump_Nonzero 0x5d9 05d7 00d2 | | Pop_Control Pop_Count_2 05d8 7802 |x | Jump 0x5db 05d9 00c8 | | Action Pop_Auxiliary_Range 05da 3fdc |? | Loop_Increasing 0x5b7 05db 00ce | | Action Pop_Auxiliary 05dc 00d8 | | Load_Top At_Offset_0 05dd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05de 0000 0000 | | .XXX[0x2] 05e0 ; -------------------------------------------------------------------------------------- 05e0 ; SUBPROGRAM 05e0 ; -------------------------------------------------------------------------------------- 05e0 05e3 | | .CONST 0x05e3 ; Address of begin 05e1 0004 | | .CONST 0x0004 ; Address of exception handler 05e2 0001 | | .CONST 0x0001 ; Number of locals 05e3 BODY_05e0: 05e3 INIT_05e0: 05e3 08e2 | | Execute_Immediate Raise,0xe2 05e4 0000 0000 | | .BLANK 0000[0x4] 05e8 ; -------------------------------------------------------------------------------------- 05e8 ; SUBPROGRAM 05e8 ; -------------------------------------------------------------------------------------- 05e8 05eb | | .CONST 0x05eb ; Address of begin 05e9 0004 | | .CONST 0x0004 ; Address of exception handler 05ea 0001 | | .CONST 0x0001 ; Number of locals 05eb BODY_05e8: 05eb INIT_05e8: 05eb 08e2 | | Execute_Immediate Raise,0xe2 05ec 0000 0000 | | .BLANK 0000[0x4] 05f0 ; -------------------------------------------------------------------------------------- 05f0 ; SUBPROGRAM 05f0 ; -------------------------------------------------------------------------------------- 05f0 05f3 | | .CONST 0x05f3 ; Address of begin 05f1 05f6 | | .CONST 0x05f6 ; Address of exception handler 05f2 0001 | | .CONST 0x0001 ; Number of locals 05f3 BODY_05f0: 05f3 INIT_05f0: 05f3 00da | | Load_Top At_Offset_2 05f4 021c | | Execute Heap_Access,Not_Null 05f5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05f6 TRAP_05f0: 05f6 0007 | | Action Break_Optional 05f7 4800 |H | Short_Literal 0x0 05f8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05f9 0000 0000 | | .BLANK 0000[0x7] 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 00da | | Load_Top At_Offset_2 0604 0217 | | Execute Heap_Access,All_Reference 0605 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0606 0217 | | Execute Heap_Access,All_Reference 0607 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0608 c5fe | | Store 0x2,-0x2 0609 4502 |E | Exit_Suprogram New_Top_Offset 0x2 060a 0000 0000 | | .BLANK 0000[0x6] 0610 ; -------------------------------------------------------------------------------------- 0610 ; SUBPROGRAM 0610 ; -------------------------------------------------------------------------------------- 0610 0613 | | .CONST 0x0613 ; Address of begin 0611 0004 | | .CONST 0x0004 ; Address of exception handler 0612 0001 | | .CONST 0x0001 ; Number of locals 0613 BODY_0610: 0613 INIT_0610: 0613 00da | | Load_Top At_Offset_2 0614 0217 | | Execute Heap_Access,All_Reference 0615 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0616 c5fe | | Store 0x2,-0x2 0617 4502 |E | Exit_Suprogram New_Top_Offset 0x2 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 00db | | Load_Top At_Offset_3 061c 00db | | Load_Top At_Offset_3 061d 0217 | | Execute Heap_Access,All_Reference 061e 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 061f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0620 ; -------------------------------------------------------------------------------------- 0620 ; SUBPROGRAM 0620 ; -------------------------------------------------------------------------------------- 0620 0623 | # | .CONST 0x0623 ; Address of begin 0621 0004 | | .CONST 0x0004 ; Address of exception handler 0622 0001 | | .CONST 0x0001 ; Number of locals 0623 BODY_0620: 0623 INIT_0620: 0623 00da | | Load_Top At_Offset_2 0624 0217 | | Execute Heap_Access,All_Reference 0625 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0626 e020 | | Load 0x0,0x20 0627 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0628 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0629 0000 0000 | | .BLANK 0000[0x7] 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 00da | | Load_Top At_Offset_2 0634 e5fe | | Load 0x2,-0x2 0635 e020 | | Load 0x0,0x20 0636 180f | | Execute Package,Field_Execute,Field_Number 0xf 0637 00db | | Load_Top At_Offset_3 0638 0217 | | Execute Heap_Access,All_Reference 0639 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 063a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 063b 0000 0000 | | .BLANK 0000[0x5] 0640 ; -------------------------------------------------------------------------------------- 0640 ; SUBPROGRAM 0640 ; -------------------------------------------------------------------------------------- 0640 0643 | C | .CONST 0x0643 ; Address of begin 0641 0004 | | .CONST 0x0004 ; Address of exception handler 0642 0001 | | .CONST 0x0001 ; Number of locals 0643 BODY_0640: 0643 INIT_0640: 0643 00da | | Load_Top At_Offset_2 0644 0217 | | Execute Heap_Access,All_Reference 0645 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0646 e020 | | Load 0x0,0x20 0647 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0648 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0649 0000 0000 | | .BLANK 0000[0x7] 0650 ; -------------------------------------------------------------------------------------- 0650 ; SUBPROGRAM 0650 ; -------------------------------------------------------------------------------------- 0650 0653 | S | .CONST 0x0653 ; Address of begin 0651 0004 | | .CONST 0x0004 ; Address of exception handler 0652 0001 | | .CONST 0x0001 ; Number of locals 0653 BODY_0650: 0653 INIT_0650: 0653 00da | | Load_Top At_Offset_2 0654 e5fe | | Load 0x2,-0x2 0655 e020 | | Load 0x0,0x20 0656 180f | | Execute Package,Field_Execute,Field_Number 0xf 0657 00db | | Load_Top At_Offset_3 0658 0217 | | Execute Heap_Access,All_Reference 0659 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 065a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 065b 0000 0000 | | .BLANK 0000[0x5] 0660 ; -------------------------------------------------------------------------------------- 0660 ; SUBPROGRAM 0660 ; -------------------------------------------------------------------------------------- 0660 0668 | h | .CONST 0x0668 ; Address of begin 0661 0004 | | .CONST 0x0004 ; Address of exception handler 0662 0003 | | .CONST 0x0003 ; Number of locals 0663 INIT_0660: 0663 e001 | | Load 0x0,0x1 0664 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0665 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0666 00e2 | | Load_Encached Integer_Cache 0667 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0668 BODY_0660: 0668 00d8 | | Load_Top At_Offset_0 0669 e5fb | | Load 0x2,-0x5 066a e001 | | Load 0x0,0x1 066b 1b14 | | Execute Package,Field_Read,Field_Number 0x14 066c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 066d e5fc | | Load 0x2,-0x4 066e e5fd | | Load 0x2,-0x3 066f e5fe | | Load 0x2,-0x2 0670 e5ff | | Load 0x2,-0x1 0671 82bf | | Call 0x1,0xbf 0672 c402 | | Store 0x2,0x2 0673 c5fb | | Store 0x2,-0x5 0674 0059 | Y | Store_Top Discrete,At_Offset_1 0675 e5fb | | Load 0x2,-0x5 0676 e5fd | | Load 0x2,-0x3 0677 00da | | Load_Top At_Offset_2 0678 4801 |H | Short_Literal 0x1 0679 e5fe | | Load 0x2,-0x2 067a 82bd | | Call 0x1,0xbd 067b c5fb | | Store 0x2,-0x5 067c 4505 |E | Exit_Suprogram New_Top_Offset 0x5 067d 0000 0000 | | .XXX[0x3] 067f 0000 | | 0680 ; -------------------------------------------------------------------------------------- 0680 ; SUBPROGRAM 0680 ; -------------------------------------------------------------------------------------- 0680 0691 | | .CONST 0x0691 ; Address of begin 0681 0004 | | .CONST 0x0004 ; Address of exception handler 0682 0006 | | .CONST 0x0006 ; Number of locals 0683 INIT_0680: 0683 e00d | | Load 0x0,0xd 0684 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0685 02c7 | | Declare_Variable Any 0686 00d8 | | Load_Top At_Offset_0 0687 1c00 | | Execute_Immediate Run_Utility,0x0 0688 e00d | | Load 0x0,0xd 0689 1b0d | | Execute Package,Field_Read,Field_Number 0xd 068a e001 | | Load 0x0,0x1 068b 1b14 | | Execute Package,Field_Read,Field_Number 0x14 068c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 068d 00e2 | | Load_Encached Integer_Cache 068e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 068f 00e2 | | Load_Encached Integer_Cache 0690 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0691 BODY_0680: 0691 00cf | | Action Mark_Auxiliary 0692 7842 |xB | Jump 0x6d5 0693 e00d | | Load 0x0,0xd 0694 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0695 e402 | | Load 0x2,0x2 0696 0120 | | Execute Any,Is_Value 0697 6803 |h | Jump_Zero 0x69b 0698 e00d | | Load 0x0,0xd 0699 1b0f | | Execute Package,Field_Read,Field_Number 0xf 069a 7801 |x | Jump 0x69c 069b e402 | | Load 0x2,0x2 069c e5fc | | Load 0x2,-0x4 069d e00d | | Load 0x0,0xd 069e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 069f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 06a0 c402 | | Store 0x2,0x2 06a1 c403 | | Store 0x2,0x3 06a2 e403 | | Load 0x2,0x3 06a3 7011 |p | Jump_Nonzero 0x6b5 06a4 00da | | Load_Top At_Offset_2 06a5 e5fb | | Load 0x2,-0x5 06a6 e001 | | Load 0x0,0x1 06a7 1b14 | | Execute Package,Field_Read,Field_Number 0x14 06a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06a9 e5fd | | Load 0x2,-0x3 06aa e5fe | | Load 0x2,-0x2 06ab e5ff | | Load 0x2,-0x1 06ac e402 | | Load 0x2,0x2 06ad 82bf | | Call 0x1,0xbf 06ae c404 | | Store 0x2,0x4 06af c5fb | | Store 0x2,-0x5 06b0 005b | [ | Store_Top Discrete,At_Offset_3 06b1 00d9 | | Load_Top At_Offset_1 06b2 0a01 | | Execute_Immediate Plus,0x1 06b3 005a | Z | Store_Top Discrete,At_Offset_2 06b4 781a |x | Jump 0x6cf 06b5 e002 | | Load 0x0,0x2 06b6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06b7 4801 |H | Short_Literal 0x1 06b8 4802 |H | Short_Literal 0x2 06b9 e00e | | Load 0x0,0xe 06ba 1b0f | | Execute Package,Field_Read,Field_Number 0xf 06bb 0334 | 4 | Declare_Variable Array,With_Constraint 06bc e5fc | | Load 0x2,-0x4 06bd e00d | | Load 0x0,0xd 06be 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06bf 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 06c0 e00e | | Load 0x0,0xe 06c1 1810 | | Execute Package,Field_Execute,Field_Number 0x10 06c2 4801 |H | Short_Literal 0x1 06c3 00da | | Load_Top At_Offset_2 06c4 01d6 | | Execute Vector,Field_Write 06c5 e403 | | Load 0x2,0x3 06c6 e00e | | Load 0x0,0xe 06c7 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 06c8 4802 |H | Short_Literal 0x2 06c9 00da | | Load_Top At_Offset_2 06ca 01d6 | | Execute Vector,Field_Write 06cb 601c |` | Indirect_Literal Discrete,0x6e8,{0x00000000, 0x00002808} 06cc e002 | | Load 0x0,0x2 06cd 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 06ce c5fb | | Store 0x2,-0x5 06cf e5fc | | Load 0x2,-0x4 06d0 e00d | | Load 0x0,0xd 06d1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06d2 181d | | Execute Package,Field_Execute,Field_Number 0x1d 06d3 c5fc | | Store 0x2,-0x4 06d4 00c9 | | Action Pop_Auxiliary_Loop 06d5 e5fc | | Load 0x2,-0x4 06d6 e00d | | Load 0x0,0xd 06d7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06d8 181e | | Execute Package,Field_Execute,Field_Number 0x1e 06d9 6fb9 |o | Jump_Zero 0x693 06da 00ce | | Action Pop_Auxiliary 06db e5fb | | Load 0x2,-0x5 06dc e5fe | | Load 0x2,-0x2 06dd 00db | | Load_Top At_Offset_3 06de 00db | | Load_Top At_Offset_3 06df e5ff | | Load 0x2,-0x1 06e0 82bd | | Call 0x1,0xbd 06e1 c5fb | | Store 0x2,-0x5 06e2 e5fc | | Load 0x2,-0x4 06e3 e00d | | Load 0x0,0xd 06e4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06e5 181c | | Execute Package,Field_Execute,Field_Number 0x1c 06e6 c5fc | | Store 0x2,-0x4 06e7 4504 |E | Exit_Suprogram New_Top_Offset 0x4 06e8 0000 0000 | | .LITERAL {0x00000000, 0x00002808} 06ec 0000 0000 | | .BLANK 0000[0x4] 06f0 ; -------------------------------------------------------------------------------------- 06f0 ; SUBPROGRAM 06f0 ; -------------------------------------------------------------------------------------- 06f0 06f9 | | .CONST 0x06f9 ; Address of begin 06f1 0004 | | .CONST 0x0004 ; Address of exception handler 06f2 0002 | | .CONST 0x0002 ; Number of locals 06f3 INIT_06f0: 06f3 e00d | | Load 0x0,0xd 06f4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 06f5 1b18 | | Execute Package,Field_Read,Field_Number 0x18 06f6 02c7 | | Declare_Variable Any 06f7 00d8 | | Load_Top At_Offset_0 06f8 1c00 | | Execute_Immediate Run_Utility,0x0 06f9 BODY_06f0: 06f9 e5fb | | Load 0x2,-0x5 06fa 00d9 | | Load_Top At_Offset_1 06fb 6018 |` | Indirect_Literal Discrete,0x714,{0x00000000, 0x0000281b} 06fc 6013 |` | Indirect_Literal Discrete,0x710,{0x00000000, 0x00002809} 06fd e5ff | | Load 0x2,-0x1 06fe e5fe | | Load 0x2,-0x2 06ff 8021 | ! | Call 0x0,0x21 0700 801c | | Call 0x0,0x1c 0701 c402 | | Store 0x2,0x2 0702 c5fb | | Store 0x2,-0x5 0703 e5fb | | Load 0x2,-0x5 0704 7008 |p | Jump_Nonzero 0x70d 0705 e5fb | | Load 0x2,-0x5 0706 00d9 | | Load_Top At_Offset_1 0707 e5fc | | Load 0x2,-0x4 0708 e5fd | | Load 0x2,-0x3 0709 e5fe | | Load 0x2,-0x2 070a 828c | | Call 0x1,0x8c 070b c402 | | Store 0x2,0x2 070c c5fb | | Store 0x2,-0x5 070d 4505 |E | Exit_Suprogram New_Top_Offset 0x5 070e 0000 0000 | | .XXX[0x2] 0710 0000 0000 | | .LITERAL {0x00000000, 0x00002809} 0714 0000 0000 | | .LITERAL {0x00000000, 0x0000281b} 0718 ; -------------------------------------------------------------------------------------- 0718 ; SUBPROGRAM 0718 ; -------------------------------------------------------------------------------------- 0718 071d | | .CONST 0x071d ; Address of begin 0719 0004 | | .CONST 0x0004 ; Address of exception handler 071a 0002 | | .CONST 0x0002 ; Number of locals 071b INIT_0718: 071b 00e2 | | Load_Encached Integer_Cache 071c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 071d BODY_0718: 071d 00d8 | | Load_Top At_Offset_0 071e e5fa | | Load 0x2,-0x6 071f e001 | | Load 0x0,0x1 0720 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0721 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0722 e5fc | | Load 0x2,-0x4 0723 e5fd | | Load 0x2,-0x3 0724 e5fe | | Load 0x2,-0x2 0725 e5ff | | Load 0x2,-0x1 0726 82bf | | Call 0x1,0xbf 0727 c5fb | | Store 0x2,-0x5 0728 c5fa | | Store 0x2,-0x6 0729 0059 | Y | Store_Top Discrete,At_Offset_1 072a e5fa | | Load 0x2,-0x6 072b e5fd | | Load 0x2,-0x3 072c 00da | | Load_Top At_Offset_2 072d 4801 |H | Short_Literal 0x1 072e e5fe | | Load 0x2,-0x2 072f 82bd | | Call 0x1,0xbd 0730 c5fa | | Store 0x2,-0x6 0731 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0732 0000 0000 | | .BLANK 0000[0x6] 0738 ; -------------------------------------------------------------------------------------- 0738 ; SUBPROGRAM 0738 ; -------------------------------------------------------------------------------------- 0738 0745 | E | .CONST 0x0745 ; Address of begin 0739 0004 | | .CONST 0x0004 ; Address of exception handler 073a 0004 | | .CONST 0x0004 ; Number of locals 073b INIT_0738: 073b e00d | | Load 0x0,0xd 073c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 073d 02c7 | | Declare_Variable Any 073e 00d8 | | Load_Top At_Offset_0 073f 1c00 | | Execute_Immediate Run_Utility,0x0 0740 e00d | | Load 0x0,0xd 0741 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0742 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0743 00e2 | | Load_Encached Integer_Cache 0744 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0745 BODY_0738: 0745 e00d | | Load 0x0,0xd 0746 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0747 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0748 00db | | Load_Top At_Offset_3 0749 0120 | | Execute Any,Is_Value 074a 6803 |h | Jump_Zero 0x74e 074b e00d | | Load 0x0,0xd 074c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 074d 7801 |x | Jump 0x74f 074e 00db | | Load_Top At_Offset_3 074f 6040 |`@ | Indirect_Literal Discrete,0x790,{0x00000000, 0x00004000} 0750 e022 | " | Load 0x0,0x22 0751 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0752 e023 | # | Load 0x0,0x23 0753 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0754 e00d | | Load 0x0,0xd 0755 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0756 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0757 e5ff | | Load 0x2,-0x1 0758 e5fe | | Load 0x2,-0x2 0759 8021 | ! | Call 0x0,0x21 075a e00d | | Load 0x0,0xd 075b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 075c 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 075d c402 | | Store 0x2,0x2 075e 005a | Z | Store_Top Discrete,At_Offset_2 075f 00d9 | | Load_Top At_Offset_1 0760 7015 |p | Jump_Nonzero 0x776 0761 00d8 | | Load_Top At_Offset_0 0762 e5fa | | Load 0x2,-0x6 0763 e001 | | Load 0x0,0x1 0764 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0765 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0766 e5fc | | Load 0x2,-0x4 0767 e5fd | | Load 0x2,-0x3 0768 e5fe | | Load 0x2,-0x2 0769 e402 | | Load 0x2,0x2 076a 82bf | | Call 0x1,0xbf 076b c5fb | | Store 0x2,-0x5 076c c5fa | | Store 0x2,-0x6 076d 0059 | Y | Store_Top Discrete,At_Offset_1 076e e5fa | | Load 0x2,-0x6 076f e5fd | | Load 0x2,-0x3 0770 00da | | Load_Top At_Offset_2 0771 4801 |H | Short_Literal 0x1 0772 e5fe | | Load 0x2,-0x2 0773 82bd | | Call 0x1,0xbd 0774 c5fa | | Store 0x2,-0x6 0775 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0776 e002 | | Load 0x0,0x2 0777 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0778 4801 |H | Short_Literal 0x1 0779 4801 |H | Short_Literal 0x1 077a e00e | | Load 0x0,0xe 077b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 077c 0334 | 4 | Declare_Variable Array,With_Constraint 077d e5ff | | Load 0x2,-0x1 077e e403 | | Load 0x2,0x3 077f e00e | | Load 0x0,0xe 0780 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0781 4801 |H | Short_Literal 0x1 0782 00da | | Load_Top At_Offset_2 0783 01d6 | | Execute Vector,Field_Write 0784 6007 |` | Indirect_Literal Discrete,0x78c,{0x00000000, 0x00002809} 0785 e002 | | Load 0x0,0x2 0786 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0787 c5fa | | Store 0x2,-0x6 0788 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0789 0000 0000 | | .XXX[0x3] 078b 0000 | | 078c 0000 0000 | | .LITERAL {0x00000000, 0x00002809} 0790 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0794 0000 0000 | | .BLANK 0000[0x4] 0798 ; -------------------------------------------------------------------------------------- 0798 ; SUBPROGRAM 0798 ; -------------------------------------------------------------------------------------- 0798 07b3 | | .CONST 0x07b3 ; Address of begin 0799 0004 | | .CONST 0x0004 ; Address of exception handler 079a 0008 | | .CONST 0x0008 ; Number of locals 079b INIT_0798: 079b e00d | | Load 0x0,0xd 079c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 079d e00d | | Load 0x0,0xd 079e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 079f 1b18 | | Execute Package,Field_Read,Field_Number 0x18 07a0 02c7 | | Declare_Variable Any 07a1 00d8 | | Load_Top At_Offset_0 07a2 1c00 | | Execute_Immediate Run_Utility,0x0 07a3 4800 |H | Short_Literal 0x0 07a4 e001 | | Load 0x0,0x1 07a5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 07a6 1b14 | | Execute Package,Field_Read,Field_Number 0x14 07a7 1c08 | | Execute_Immediate Run_Utility,0x8 07a8 00e2 | | Load_Encached Integer_Cache 07a9 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 07aa e00d | | Load 0x0,0xd 07ab 1b0f | | Execute Package,Field_Read,Field_Number 0xf 07ac 02c7 | | Declare_Variable Any 07ad 00d8 | | Load_Top At_Offset_0 07ae 1c00 | | Execute_Immediate Run_Utility,0x0 07af 00e2 | | Load_Encached Integer_Cache 07b0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 07b1 029f 2923 | )#| Declare_Subprogram INIT_2920,For_Call 07b3 BODY_0798: 07b3 e404 | | Load 0x2,0x4 07b4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 07b5 e403 | | Load 0x2,0x3 07b6 605d |`] | Indirect_Literal Discrete,0x814,{0x00000000, 0x0000281b} 07b7 67d4 |g | Indirect_Literal Discrete,0x78c,{0x00000000, 0x00002809} 07b8 e5ff | | Load 0x2,-0x1 07b9 e5fe | | Load 0x2,-0x2 07ba 8021 | ! | Call 0x0,0x21 07bb 801c | | Call 0x0,0x1c 07bc c403 | | Store 0x2,0x3 07bd e404 | | Load 0x2,0x4 07be 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 07bf e404 | | Load 0x2,0x4 07c0 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 07c1 7044 |pD | Jump_Nonzero 0x806 07c2 00cf | | Action Mark_Auxiliary 07c3 7836 |x6 | Jump 0x7fa 07c4 e00d | | Load 0x0,0xd 07c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 07c6 e406 | | Load 0x2,0x6 07c7 0120 | | Execute Any,Is_Value 07c8 6803 |h | Jump_Zero 0x7cc 07c9 e00d | | Load 0x0,0xd 07ca 1b0f | | Execute Package,Field_Read,Field_Number 0xf 07cb 7801 |x | Jump 0x7cd 07cc e406 | | Load 0x2,0x6 07cd e403 | | Load 0x2,0x3 07ce e00d | | Load 0x0,0xd 07cf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 07d0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 07d1 c406 | | Store 0x2,0x6 07d2 c402 | | Store 0x2,0x2 07d3 e402 | | Load 0x2,0x2 07d4 7004 |p | Jump_Nonzero 0x7d9 07d5 e405 | | Load 0x2,0x5 07d6 0a01 | | Execute_Immediate Plus,0x1 07d7 c405 | | Store 0x2,0x5 07d8 781b |x | Jump 0x7f4 07d9 e002 | | Load 0x0,0x2 07da 1b0d | | Execute Package,Field_Read,Field_Number 0xd 07db 4801 |H | Short_Literal 0x1 07dc 4802 |H | Short_Literal 0x2 07dd e00e | | Load 0x0,0xe 07de 1b0f | | Execute Package,Field_Read,Field_Number 0xf 07df 0334 | 4 | Declare_Variable Array,With_Constraint 07e0 e403 | | Load 0x2,0x3 07e1 e00d | | Load 0x0,0xd 07e2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 07e3 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 07e4 e00e | | Load 0x0,0xe 07e5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 07e6 4801 |H | Short_Literal 0x1 07e7 00da | | Load_Top At_Offset_2 07e8 01d6 | | Execute Vector,Field_Write 07e9 e402 | | Load 0x2,0x2 07ea e00e | | Load 0x0,0xe 07eb 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 07ec 4802 |H | Short_Literal 0x2 07ed 00da | | Load_Top At_Offset_2 07ee 01d6 | | Execute Vector,Field_Write 07ef 6020 |` | Indirect_Literal Discrete,0x810,{0x00000000, 0x00002808} 07f0 e002 | | Load 0x0,0x2 07f1 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 07f2 e404 | | Load 0x2,0x4 07f3 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 07f4 e403 | | Load 0x2,0x3 07f5 e00d | | Load 0x0,0xd 07f6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 07f7 181d | | Execute Package,Field_Execute,Field_Number 0x1d 07f8 c403 | | Store 0x2,0x3 07f9 00c9 | | Action Pop_Auxiliary_Loop 07fa e403 | | Load 0x2,0x3 07fb e00d | | Load 0x0,0xd 07fc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 07fd 181e | | Execute Package,Field_Execute,Field_Number 0x1e 07fe 6fc5 |o | Jump_Zero 0x7c4 07ff 00ce | | Action Pop_Auxiliary 0800 e403 | | Load 0x2,0x3 0801 e00d | | Load 0x0,0xd 0802 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0803 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0804 c403 | | Store 0x2,0x3 0805 8408 | | Call 0x2,0x8 0806 e403 | | Load 0x2,0x3 0807 e00d | | Load 0x0,0xd 0808 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0809 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 080a c403 | | Store 0x2,0x3 080b e404 | | Load 0x2,0x4 080c 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 080d 0000 0000 | | .XXX[0x3] 080f 0000 | | 0810 0000 0000 | | .LITERAL {0x00000000, 0x00002808} 0814 0000 0000 | | .LITERAL {0x00000000, 0x0000281b} 0818 ; -------------------------------------------------------------------------------------- 0818 ; SUBPROGRAM 0818 ; -------------------------------------------------------------------------------------- 0818 081b | | .CONST 0x081b ; Address of begin 0819 0004 | | .CONST 0x0004 ; Address of exception handler 081a 0001 | | .CONST 0x0001 ; Number of locals 081b BODY_0818: 081b INIT_0818: 081b 00da | | Load_Top At_Offset_2 081c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 081d a5fd | | Store_Unchecked 0x2,-0x3 081e 00cf | | Action Mark_Auxiliary 081f 00db | | Load_Top At_Offset_3 0820 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0821 01d9 | | Execute Vector,Reverse_Bounds 0822 0263 | c | Execute Discrete,Above_Bound 0823 700a |p | Jump_Nonzero 0x82e 0824 e5fd | | Load 0x2,-0x3 0825 e5fe | | Load 0x2,-0x2 0826 00da | | Load_Top At_Offset_2 0827 e5ff | | Load 0x2,-0x1 0828 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0829 01d7 | | Execute Vector,Field_Read 082a 8222 | " | Call 0x1,0x22 082b c5fd | | Store 0x2,-0x3 082c 00c8 | | Action Pop_Auxiliary_Range 082d 3ff6 |? | Loop_Increasing 0x824 082e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 082f 0000 | | .XXX[0x1] 0830 ; -------------------------------------------------------------------------------------- 0830 ; SUBPROGRAM 0830 ; -------------------------------------------------------------------------------------- 0830 083d | = | .CONST 0x083d ; Address of begin 0831 0004 | | .CONST 0x0004 ; Address of exception handler 0832 0005 | | .CONST 0x0005 ; Number of locals 0833 INIT_0830: 0833 e01b | | Load 0x0,0x1b 0834 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 0835 e01b | | Load 0x0,0x1b 0836 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 0837 e5ff | | Load 0x2,-0x1 0838 0217 | | Execute Heap_Access,All_Reference 0839 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b 083a 0007 | | Action Break_Optional 083b e01b | | Load 0x0,0x1b 083c 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 083d BODY_0830: 083d e024 | $ | Load 0x0,0x24 083e 180e | | Execute Package,Field_Execute,Field_Number 0xe 083f e5ff | | Load 0x2,-0x1 0840 0217 | | Execute Heap_Access,All_Reference 0841 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0842 e020 | | Load 0x0,0x20 0843 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0844 4801 |H | Short_Literal 0x1 0845 6076 |`v | Indirect_Literal Discrete,0x8bc,{0x00000000, 0x00002822} 0846 e002 | | Load 0x0,0x2 0847 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 0848 e5ff | | Load 0x2,-0x1 0849 0217 | | Execute Heap_Access,All_Reference 084a 3c15 |< | Execute Record,Field_Read,Field_Number 0x15 084b a402 | | Store_Unchecked 0x2,0x2 084c 00cf | | Action Mark_Auxiliary 084d 780f |x | Jump 0x85d 084e e402 | | Load 0x2,0x2 084f 0217 | | Execute Heap_Access,All_Reference 0850 3c14 |< | Execute Record,Field_Read,Field_Number 0x14 0851 a403 | | Store_Unchecked 0x2,0x3 0852 e5fd | | Load 0x2,-0x3 0853 e5fe | | Load 0x2,-0x2 0854 e402 | | Load 0x2,0x2 0855 e001 | | Load 0x0,0x1 0856 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0857 0216 | | Execute Heap_Access,Convert 0858 8222 | " | Call 0x1,0x22 0859 c5fd | | Store 0x2,-0x3 085a 00db | | Load_Top At_Offset_3 085b a402 | | Store_Unchecked 0x2,0x2 085c 00c9 | | Action Pop_Auxiliary_Loop 085d e402 | | Load 0x2,0x2 085e 77ef |w | Jump_Nonzero 0x84e 085f 00ce | | Action Pop_Auxiliary 0860 e5ff | | Load 0x2,-0x1 0861 0217 | | Execute Heap_Access,All_Reference 0862 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 0863 a402 | | Store_Unchecked 0x2,0x2 0864 00cf | | Action Mark_Auxiliary 0865 780f |x | Jump 0x875 0866 e402 | | Load 0x2,0x2 0867 0217 | | Execute Heap_Access,All_Reference 0868 3c14 |< | Execute Record,Field_Read,Field_Number 0x14 0869 a403 | | Store_Unchecked 0x2,0x3 086a e5fd | | Load 0x2,-0x3 086b e5fe | | Load 0x2,-0x2 086c e402 | | Load 0x2,0x2 086d e001 | | Load 0x0,0x1 086e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 086f 0216 | | Execute Heap_Access,Convert 0870 8222 | " | Call 0x1,0x22 0871 c5fd | | Store 0x2,-0x3 0872 00db | | Load_Top At_Offset_3 0873 a402 | | Store_Unchecked 0x2,0x2 0874 00c9 | | Action Pop_Auxiliary_Loop 0875 e402 | | Load 0x2,0x2 0876 77ef |w | Jump_Nonzero 0x866 0877 00c9 | | Action Pop_Auxiliary_Loop 0878 780b |x | Jump 0x884 0879 00da | | Load_Top At_Offset_2 087a 0217 | | Execute Heap_Access,All_Reference 087b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 087c 0032 | 2 | Store_Top Heap_Access,At_Offset_2 087d 00da | | Load_Top At_Offset_2 087e e01b | | Load 0x0,0x1b 087f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0880 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0881 00d9 | | Load_Top At_Offset_1 0882 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0883 00c9 | | Action Pop_Auxiliary_Loop 0884 00da | | Load_Top At_Offset_2 0885 77f3 |w | Jump_Nonzero 0x879 0886 00ce | | Action Pop_Auxiliary 0887 e5fd | | Load 0x2,-0x3 0888 e001 | | Load 0x0,0x1 0889 1b15 | | Execute Package,Field_Read,Field_Number 0x15 088a 1b18 | | Execute Package,Field_Read,Field_Number 0x18 088b e5ff | | Load 0x2,-0x1 088c e001 | | Load 0x0,0x1 088d 1b15 | | Execute Package,Field_Read,Field_Number 0x15 088e 1b22 | " | Execute Package,Field_Read,Field_Number 0x22 088f e001 | | Load 0x0,0x1 0890 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0891 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0892 c5fd | | Store 0x2,-0x3 0893 e5ff | | Load 0x2,-0x1 0894 0217 | | Execute Heap_Access,All_Reference 0895 3c17 |< | Execute Record,Field_Read,Field_Number 0x17 0896 6807 |h | Jump_Zero 0x89e 0897 e01b | | Load 0x0,0x1b 0898 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 0899 e5ff | | Load 0x2,-0x1 089a 0217 | | Execute Heap_Access,All_Reference 089b 3c17 |< | Execute Record,Field_Read,Field_Number 0x17 089c 0217 | | Execute Heap_Access,All_Reference 089d 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 089e e5ff | | Load 0x2,-0x1 089f 0217 | | Execute Heap_Access,All_Reference 08a0 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 08a1 6807 |h | Jump_Zero 0x8a9 08a2 e01b | | Load 0x0,0x1b 08a3 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 08a4 e5ff | | Load 0x2,-0x1 08a5 0217 | | Execute Heap_Access,All_Reference 08a6 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 08a7 0217 | | Execute Heap_Access,All_Reference 08a8 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 08a9 e5fe | | Load 0x2,-0x2 08aa e5ff | | Load 0x2,-0x1 08ab 8263 | c | Call 0x1,0x63 08ac e5ff | | Load 0x2,-0x1 08ad e01b | | Load 0x0,0x1b 08ae 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 08af 0216 | | Execute Heap_Access,Convert 08b0 a402 | | Store_Unchecked 0x2,0x2 08b1 e5fe | | Load 0x2,-0x2 08b2 e402 | | Load 0x2,0x2 08b3 0217 | | Execute Heap_Access,All_Reference 08b4 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 08b5 e025 | % | Load 0x0,0x25 08b6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 08b7 00db | | Load_Top At_Offset_3 08b8 e01b | | Load 0x0,0x1b 08b9 181d | | Execute Package,Field_Execute,Field_Number 0x1d 08ba c402 | | Store 0x2,0x2 08bb 4503 |E | Exit_Suprogram New_Top_Offset 0x3 08bc 0000 0000 | | .LITERAL {0x00000000, 0x00002822} 08c0 ; -------------------------------------------------------------------------------------- 08c0 ; SUBPROGRAM 08c0 ; -------------------------------------------------------------------------------------- 08c0 08c3 | | .CONST 0x08c3 ; Address of begin 08c1 0004 | | .CONST 0x0004 ; Address of exception handler 08c2 0001 | | .CONST 0x0001 ; Number of locals 08c3 BODY_08c0: 08c3 INIT_08c0: 08c3 e5fd | | Load 0x2,-0x3 08c4 e5fe | | Load 0x2,-0x2 08c5 00d8 | | Load_Top At_Offset_0 08c6 e5ff | | Load 0x2,-0x1 08c7 e5fe | | Load 0x2,-0x2 08c8 8021 | ! | Call 0x0,0x21 08c9 8276 | v | Call 0x1,0x76 08ca 8221 | ! | Call 0x1,0x21 08cb c5fd | | Store 0x2,-0x3 08cc 4503 |E | Exit_Suprogram New_Top_Offset 0x3 08cd 0000 0000 | | .XXX[0x3] 08cf 0000 | | 08d0 ; -------------------------------------------------------------------------------------- 08d0 ; SUBPROGRAM 08d0 ; -------------------------------------------------------------------------------------- 08d0 08d3 | | .CONST 0x08d3 ; Address of begin 08d1 0004 | | .CONST 0x0004 ; Address of exception handler 08d2 0001 | | .CONST 0x0001 ; Number of locals 08d3 BODY_08d0: 08d3 INIT_08d0: 08d3 00da | | Load_Top At_Offset_2 08d4 0217 | | Execute Heap_Access,All_Reference 08d5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 08d6 e001 | | Load 0x0,0x1 08d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08d8 00d9 | | Load_Top At_Offset_1 08d9 00d0 | | Action Swap_Control 08da 0260 | ` | Execute Discrete,In_Type 08db 7001 |p | Jump_Nonzero 0x8dd 08dc 0801 | | Execute_Immediate Raise,0x1 08dd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08de 0000 0000 | | .XXX[0x2] 08e0 ; -------------------------------------------------------------------------------------- 08e0 ; SUBPROGRAM 08e0 ; -------------------------------------------------------------------------------------- 08e0 08e3 | | .CONST 0x08e3 ; Address of begin 08e1 0004 | | .CONST 0x0004 ; Address of exception handler 08e2 0001 | | .CONST 0x0001 ; Number of locals 08e3 BODY_08e0: 08e3 INIT_08e0: 08e3 00da | | Load_Top At_Offset_2 08e4 0217 | | Execute Heap_Access,All_Reference 08e5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 08e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08e7 0000 | | .XXX[0x1] 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 00da | | Load_Top At_Offset_2 08ec 0217 | | Execute Heap_Access,All_Reference 08ed 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 08ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08ef 0000 | | .XXX[0x1] 08f0 ; -------------------------------------------------------------------------------------- 08f0 ; SUBPROGRAM 08f0 ; -------------------------------------------------------------------------------------- 08f0 08f3 | | .CONST 0x08f3 ; Address of begin 08f1 0004 | | .CONST 0x0004 ; Address of exception handler 08f2 0001 | | .CONST 0x0001 ; Number of locals 08f3 BODY_08f0: 08f3 INIT_08f0: 08f3 00da | | Load_Top At_Offset_2 08f4 0217 | | Execute Heap_Access,All_Reference 08f5 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 08f6 0217 | | Execute Heap_Access,All_Reference 08f7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 08f8 e020 | | Load 0x0,0x20 08f9 1812 | | Execute Package,Field_Execute,Field_Number 0x12 08fa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08fb 0000 0000 | | .BLANK 0000[0x5] 0900 ; -------------------------------------------------------------------------------------- 0900 ; SUBPROGRAM 0900 ; -------------------------------------------------------------------------------------- 0900 0906 | | .CONST 0x0906 ; Address of begin 0901 0004 | | .CONST 0x0004 ; Address of exception handler 0902 0002 | | .CONST 0x0002 ; Number of locals 0903 INIT_0900: 0903 e002 | | Load 0x0,0x2 0904 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0905 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0906 BODY_0900: 0906 00d8 | | Load_Top At_Offset_0 0907 4800 |H | Short_Literal 0x0 0908 e5ff | | Load 0x2,-0x1 0909 e01b | | Load 0x0,0x1b 090a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 090b 0059 | Y | Store_Top Discrete,At_Offset_1 090c 00d8 | | Load_Top At_Offset_0 090d 7004 |p | Jump_Nonzero 0x912 090e 00db | | Load_Top At_Offset_3 090f 0217 | | Execute Heap_Access,All_Reference 0910 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0911 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0912 e00e | | Load 0x0,0xe 0913 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0914 00d9 | | Load_Top At_Offset_1 0915 e002 | | Load 0x0,0x2 0916 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 0917 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0918 ; -------------------------------------------------------------------------------------- 0918 ; SUBPROGRAM 0918 ; -------------------------------------------------------------------------------------- 0918 0920 | | .CONST 0x0920 ; Address of begin 0919 0004 | | .CONST 0x0004 ; Address of exception handler 091a 0003 | | .CONST 0x0003 ; Number of locals 091b INIT_0918: 091b e002 | | Load 0x0,0x2 091c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 091d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 091e e01b | | Load 0x0,0x1b 091f 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0920 BODY_0918: 0920 00d9 | | Load_Top At_Offset_1 0921 4802 |H | Short_Literal 0x2 0922 e5ff | | Load 0x2,-0x1 0923 e01b | | Load 0x0,0x1b 0924 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0925 005a | Z | Store_Top Discrete,At_Offset_2 0926 00d9 | | Load_Top At_Offset_1 0927 7024 |p$ | Jump_Nonzero 0x94c 0928 e5fe | | Load 0x2,-0x2 0929 e5ff | | Load 0x2,-0x1 092a 0217 | | Execute Heap_Access,All_Reference 092b 380b |8 | Execute Record,Field_Write,Field_Number 0xb 092c e5fe | | Load 0x2,-0x2 092d 701d |p | Jump_Nonzero 0x94b 092e e5ff | | Load 0x2,-0x1 092f 0217 | | Execute Heap_Access,All_Reference 0930 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0931 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0932 00cf | | Action Mark_Auxiliary 0933 7814 |x | Jump 0x948 0934 00d9 | | Load_Top At_Offset_1 0935 0217 | | Execute Heap_Access,All_Reference 0936 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0937 e5ff | | Load 0x2,-0x1 0938 0217 | | Execute Heap_Access,All_Reference 0939 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 093a 0217 | | Execute Heap_Access,All_Reference 093b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 093c 012e | . | Execute Any,Not_Equal 093d 6805 |h | Jump_Zero 0x943 093e e00d | | Load 0x0,0xd 093f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0940 00da | | Load_Top At_Offset_2 0941 0217 | | Execute Heap_Access,All_Reference 0942 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0943 00d9 | | Load_Top At_Offset_1 0944 0217 | | Execute Heap_Access,All_Reference 0945 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0946 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0947 00c9 | | Action Pop_Auxiliary_Loop 0948 00d9 | | Load_Top At_Offset_1 0949 77ea |w | Jump_Nonzero 0x934 094a 00ce | | Action Pop_Auxiliary 094b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 094c e002 | | Load 0x0,0x2 094d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 094e 4801 |H | Short_Literal 0x1 094f 4801 |H | Short_Literal 0x1 0950 e00e | | Load 0x0,0xe 0951 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0952 0334 | 4 | Declare_Variable Array,With_Constraint 0953 e5ff | | Load 0x2,-0x1 0954 825a | Z | Call 0x1,0x5a 0955 4801 |H | Short_Literal 0x1 0956 00da | | Load_Top At_Offset_2 0957 01d6 | | Execute Vector,Field_Write 0958 00db | | Load_Top At_Offset_3 0959 e002 | | Load 0x0,0x2 095a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 095b c5fd | | Store 0x2,-0x3 095c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 095d 0000 0000 | | .XXX[0x3] 095f 0000 | | 0960 ; -------------------------------------------------------------------------------------- 0960 ; SUBPROGRAM 0960 ; -------------------------------------------------------------------------------------- 0960 0966 | f | .CONST 0x0966 ; Address of begin 0961 0004 | | .CONST 0x0004 ; Address of exception handler 0962 0002 | | .CONST 0x0002 ; Number of locals 0963 INIT_0960: 0963 e002 | | Load 0x0,0x2 0964 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0965 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0966 BODY_0960: 0966 00d8 | | Load_Top At_Offset_0 0967 4800 |H | Short_Literal 0x0 0968 e5ff | | Load 0x2,-0x1 0969 e01b | | Load 0x0,0x1b 096a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 096b 0059 | Y | Store_Top Discrete,At_Offset_1 096c 00d8 | | Load_Top At_Offset_0 096d 7004 |p | Jump_Nonzero 0x972 096e 00db | | Load_Top At_Offset_3 096f 0217 | | Execute Heap_Access,All_Reference 0970 3c0c |< | Execute Record,Field_Read,Field_Number 0xc 0971 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0972 e00e | | Load 0x0,0xe 0973 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0974 00d9 | | Load_Top At_Offset_1 0975 e002 | | Load 0x0,0x2 0976 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 0977 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0978 ; -------------------------------------------------------------------------------------- 0978 ; SUBPROGRAM 0978 ; -------------------------------------------------------------------------------------- 0978 097e | ~ | .CONST 0x097e ; Address of begin 0979 0004 | | .CONST 0x0004 ; Address of exception handler 097a 0002 | | .CONST 0x0002 ; Number of locals 097b INIT_0978: 097b e002 | | Load 0x0,0x2 097c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 097d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 097e BODY_0978: 097e 00d8 | | Load_Top At_Offset_0 097f 4802 |H | Short_Literal 0x2 0980 e5ff | | Load 0x2,-0x1 0981 e01b | | Load 0x0,0x1b 0982 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0983 0059 | Y | Store_Top Discrete,At_Offset_1 0984 00d8 | | Load_Top At_Offset_0 0985 7005 |p | Jump_Nonzero 0x98b 0986 e5fe | | Load 0x2,-0x2 0987 e5ff | | Load 0x2,-0x1 0988 0217 | | Execute Heap_Access,All_Reference 0989 380c |8 | Execute Record,Field_Write,Field_Number 0xc 098a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 098b e002 | | Load 0x0,0x2 098c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 098d 4801 |H | Short_Literal 0x1 098e 4801 |H | Short_Literal 0x1 098f e00e | | Load 0x0,0xe 0990 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0991 0334 | 4 | Declare_Variable Array,With_Constraint 0992 e5ff | | Load 0x2,-0x1 0993 825a | Z | Call 0x1,0x5a 0994 4801 |H | Short_Literal 0x1 0995 00da | | Load_Top At_Offset_2 0996 01d6 | | Execute Vector,Field_Write 0997 00da | | Load_Top At_Offset_2 0998 e002 | | Load 0x0,0x2 0999 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 099a c5fd | | Store 0x2,-0x3 099b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 099c 0000 0000 | | .BLANK 0000[0x4] 09a0 ; -------------------------------------------------------------------------------------- 09a0 ; SUBPROGRAM 09a0 ; -------------------------------------------------------------------------------------- 09a0 09ad | | .CONST 0x09ad ; Address of begin 09a1 0004 | | .CONST 0x0004 ; Address of exception handler 09a2 0004 | | .CONST 0x0004 ; 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 4801 |H | Short_Literal 0x1 09a7 4a00 |J | Short_Literal 0x200 09a8 e229 | ) | Load 0x1,0x29 09a9 035b | [ | Declare_Type Array,Constrained 09aa 0337 | 7 | Declare_Variable Array 09ab e01b | | Load 0x0,0x1b 09ac 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 09ad BODY_09a0: 09ad 00da | | Load_Top At_Offset_2 09ae 4800 |H | Short_Literal 0x0 09af e5ff | | Load 0x2,-0x1 09b0 e01b | | Load 0x0,0x1b 09b1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 09b2 005b | [ | Store_Top Discrete,At_Offset_3 09b3 00da | | Load_Top At_Offset_2 09b4 7037 |p7 | Jump_Nonzero 0x9ec 09b5 e5ff | | Load 0x2,-0x1 09b6 0217 | | Execute Heap_Access,All_Reference 09b7 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 09b8 0031 | 1 | Store_Top Heap_Access,At_Offset_1 09b9 00cf | | Action Mark_Auxiliary 09ba 00da | | Load_Top At_Offset_2 09bb 01d9 | | Execute Vector,Reverse_Bounds 09bc 0007 | | Action Break_Optional 09bd 00db | | Load_Top At_Offset_3 09be 701f |p | Jump_Nonzero 0x9de 09bf 00d8 | | Load_Top At_Offset_0 09c0 0aff | | Execute_Immediate Plus,-0x1 09c1 e22a | * | Load 0x1,0x2a 09c2 1c08 | | Execute_Immediate Run_Utility,0x8 09c3 4800 |H | Short_Literal 0x0 09c4 00d9 | | Load_Top At_Offset_1 09c5 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 09c6 4801 |H | Short_Literal 0x1 09c7 00da | | Load_Top At_Offset_2 09c8 0aff | | Execute_Immediate Plus,-0x1 09c9 e403 | | Load 0x2,0x3 09ca 01cf | | Execute Vector,Slice_Read 09cb 00d9 | | Load_Top At_Offset_1 09cc 00d8 | | Load_Top At_Offset_0 09cd 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 09ce 00da | | Load_Top At_Offset_2 09cf 01da | | Execute Vector,Bounds 09d0 00da | | Load_Top At_Offset_2 09d1 01da | | Execute Vector,Bounds 09d2 00da | | Load_Top At_Offset_2 09d3 027f | | Execute Discrete,Equal 09d4 7001 |p | Jump_Nonzero 0x9d6 09d5 08e0 | | Execute_Immediate Raise,0xe0 09d6 00cd | | Action Spare6_Action 09d7 027f | | Execute Discrete,Equal 09d8 7001 |p | Jump_Nonzero 0x9da 09d9 08e0 | | Execute_Immediate Raise,0xe0 09da 00d2 | | Pop_Control Pop_Count_2 09db 00d9 | | Load_Top At_Offset_1 09dc 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 09dd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09de 00db | | Load_Top At_Offset_3 09df e001 | | Load 0x0,0x1 09e0 1b13 | | Execute Package,Field_Read,Field_Number 0x13 09e1 0216 | | Execute Heap_Access,Convert 09e2 00d9 | | Load_Top At_Offset_1 09e3 e403 | | Load 0x2,0x3 09e4 01d6 | | Execute Vector,Field_Write 09e5 00db | | Load_Top At_Offset_3 09e6 0217 | | Execute Heap_Access,All_Reference 09e7 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 09e8 a404 | | Store_Unchecked 0x2,0x4 09e9 00c8 | | Action Pop_Auxiliary_Range 09ea 3fd2 |? | Loop_Increasing 0x9bd 09eb 00ce | | Action Pop_Auxiliary 09ec 4800 |H | Short_Literal 0x0 09ed e22a | * | Load 0x1,0x2a 09ee 1c08 | | Execute_Immediate Run_Utility,0x8 09ef 4801 |H | Short_Literal 0x1 09f0 4801 |H | Short_Literal 0x1 09f1 e00e | | Load 0x0,0xe 09f2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 09f3 0334 | 4 | Declare_Variable Array,With_Constraint 09f4 e5ff | | Load 0x2,-0x1 09f5 825a | Z | Call 0x1,0x5a 09f6 4801 |H | Short_Literal 0x1 09f7 00da | | Load_Top At_Offset_2 09f8 01d6 | | Execute Vector,Field_Write 09f9 e402 | | Load 0x2,0x2 09fa e002 | | Load 0x0,0x2 09fb 1813 | | Execute Package,Field_Execute,Field_Number 0x13 09fc 00d9 | | Load_Top At_Offset_1 09fd 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 09fe 4801 |H | Short_Literal 0x1 09ff 4800 |H | Short_Literal 0x0 0a00 e229 | ) | Load 0x1,0x29 0a01 0334 | 4 | Declare_Variable Array,With_Constraint 0a02 00d9 | | Load_Top At_Offset_1 0a03 00d8 | | Load_Top At_Offset_0 0a04 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0a05 00da | | Load_Top At_Offset_2 0a06 01da | | Execute Vector,Bounds 0a07 00da | | Load_Top At_Offset_2 0a08 01da | | Execute Vector,Bounds 0a09 00da | | Load_Top At_Offset_2 0a0a 027f | | Execute Discrete,Equal 0a0b 7001 |p | Jump_Nonzero 0xa0d 0a0c 08e0 | | Execute_Immediate Raise,0xe0 0a0d 00cd | | Action Spare6_Action 0a0e 027f | | Execute Discrete,Equal 0a0f 7001 |p | Jump_Nonzero 0xa11 0a10 08e0 | | Execute_Immediate Raise,0xe0 0a11 00d2 | | Pop_Control Pop_Count_2 0a12 00d9 | | Load_Top At_Offset_1 0a13 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 0a14 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a15 0000 0000 | | .XXX[0x3] 0a17 0000 | | 0a18 ; -------------------------------------------------------------------------------------- 0a18 ; SUBPROGRAM 0a18 ; -------------------------------------------------------------------------------------- 0a18 0a1b | | .CONST 0x0a1b ; Address of begin 0a19 0004 | | .CONST 0x0004 ; Address of exception handler 0a1a 0001 | | .CONST 0x0001 ; Number of locals 0a1b BODY_0a18: 0a1b INIT_0a18: 0a1b e5fd | | Load 0x2,-0x3 0a1c e5fe | | Load 0x2,-0x2 0a1d e5ff | | Load 0x2,-0x1 0a1e 0217 | | Execute Heap_Access,All_Reference 0a1f 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0a20 0217 | | Execute Heap_Access,All_Reference 0a21 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0a22 8231 | 1 | Call 0x1,0x31 0a23 c5fd | | Store 0x2,-0x3 0a24 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a25 0000 0000 | | .XXX[0x3] 0a27 0000 | | 0a28 ; -------------------------------------------------------------------------------------- 0a28 ; SUBPROGRAM 0a28 ; -------------------------------------------------------------------------------------- 0a28 0a3d | = | .CONST 0x0a3d ; Address of begin 0a29 0ac7 | | .CONST 0x0ac7 ; Address of exception handler 0a2a 0006 | | .CONST 0x0006 ; Number of locals 0a2b INIT_0a28: 0a2b 00da | | Load_Top At_Offset_2 0a2c 8026 | & | Call 0x0,0x26 0a2d e027 | ' | Load 0x0,0x27 0a2e 03f1 | | Declare_Variable Discrete,With_Value 0a2f e00d | | Load 0x0,0xd 0a30 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0a31 02c7 | | Declare_Variable Any 0a32 00d8 | | Load_Top At_Offset_0 0a33 1c00 | | Execute_Immediate Run_Utility,0x0 0a34 e00d | | Load 0x0,0xd 0a35 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0a36 02c7 | | Declare_Variable Any 0a37 00d8 | | Load_Top At_Offset_0 0a38 1c00 | | Execute_Immediate Run_Utility,0x0 0a39 e01b | | Load 0x0,0x1b 0a3a 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0a3b e01b | | Load 0x0,0x1b 0a3c 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0a3d BODY_0a28: 0a3d e402 | | Load 0x2,0x2 0a3e 4604 |F | Jump_Case 0x5 0a3f 781c |x | Jump 0xa5c ; case 0x0 0a40 780f |x | Jump 0xa50 ; case 0x1 0a41 780b |x | Jump 0xa4d ; case 0x2 0a42 7814 |x | Jump 0xa57 ; case 0x3 0a43 7800 |x | Jump 0xa44 ; case 0x4 0a44 e5fd | | Load 0x2,-0x3 0a45 e5fe | | Load 0x2,-0x2 0a46 6095 |` | Indirect_Literal Discrete,0xadc,{0x00000000, 0x0000280c} 0a47 4801 |H | Short_Literal 0x1 0a48 e5ff | | Load 0x2,-0x1 0a49 8028 | ( | Call 0x0,0x28 0a4a 82c2 | | Call 0x1,0xc2 0a4b c5fd | | Store 0x2,-0x3 0a4c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a4d e5ff | | Load 0x2,-0x1 0a4e c403 | | Store 0x2,0x3 0a4f 7814 |x | Jump 0xa64 0a50 e5ff | | Load 0x2,-0x1 0a51 c404 | | Store 0x2,0x4 0a52 6085 |` | Indirect_Literal Discrete,0xad8,{0x00000000, 0x0000280b} 0a53 00db | | Load_Top At_Offset_3 0a54 8029 | ) | Call 0x0,0x29 0a55 c403 | | Store 0x2,0x3 0a56 780d |x | Jump 0xa64 0a57 e5ff | | Load 0x2,-0x1 0a58 c403 | | Store 0x2,0x3 0a59 e5ff | | Load 0x2,-0x1 0a5a c404 | | Store 0x2,0x4 0a5b 7808 |x | Jump 0xa64 0a5c e5fd | | Load 0x2,-0x3 0a5d e5fe | | Load 0x2,-0x2 0a5e 6075 |`u | Indirect_Literal Discrete,0xad4,{0x00000000, 0x00002815} 0a5f e5ff | | Load 0x2,-0x1 0a60 8029 | ) | Call 0x0,0x29 0a61 8231 | 1 | Call 0x1,0x31 0a62 c5fd | | Store 0x2,-0x3 0a63 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a64 e5fd | | Load 0x2,-0x3 0a65 e01b | | Load 0x0,0x1b 0a66 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0a67 e5fe | | Load 0x2,-0x2 0a68 e403 | | Load 0x2,0x3 0a69 82c1 | | Call 0x1,0xc1 0a6a 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0a6b c5fd | | Store 0x2,-0x3 0a6c e5fd | | Load 0x2,-0x3 0a6d 7058 |pX | Jump_Nonzero 0xac6 0a6e 00d9 | | Load_Top At_Offset_1 0a6f 7005 |p | Jump_Nonzero 0xa75 0a70 e5fe | | Load 0x2,-0x2 0a71 00db | | Load_Top At_Offset_3 0a72 e403 | | Load 0x2,0x3 0a73 82bb | | Call 0x1,0xbb 0a74 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a75 e5fe | | Load 0x2,-0x2 0a76 0217 | | Execute Heap_Access,All_Reference 0a77 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0a78 684d |hM | Jump_Zero 0xac6 0a79 00da | | Load_Top At_Offset_2 0a7a e00d | | Load 0x0,0xd 0a7b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0a7c 6817 |h | Jump_Zero 0xa94 0a7d e002 | | Load 0x0,0x2 0a7e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0a7f 4801 |H | Short_Literal 0x1 0a80 4802 |H | Short_Literal 0x2 0a81 e00e | | Load 0x0,0xe 0a82 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0a83 0334 | 4 | Declare_Variable Array,With_Constraint 0a84 e403 | | Load 0x2,0x3 0a85 e00e | | Load 0x0,0xe 0a86 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0a87 4801 |H | Short_Literal 0x1 0a88 00da | | Load_Top At_Offset_2 0a89 01d6 | | Execute Vector,Field_Write 0a8a e5fe | | Load 0x2,-0x2 0a8b 825a | Z | Call 0x1,0x5a 0a8c 4802 |H | Short_Literal 0x2 0a8d 00da | | Load_Top At_Offset_2 0a8e 01d6 | | Execute Vector,Field_Write 0a8f 6040 |`@ | Indirect_Literal Discrete,0xad0,{0x00000000, 0x00002816} 0a90 e002 | | Load 0x0,0x2 0a91 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0a92 c5fd | | Store 0x2,-0x3 0a93 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a94 00da | | Load_Top At_Offset_2 0a95 00da | | Load_Top At_Offset_2 0a96 0217 | | Execute Heap_Access,All_Reference 0a97 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0a98 012e | . | Execute Any,Not_Equal 0a99 682c |h, | Jump_Zero 0xac6 0a9a 00da | | Load_Top At_Offset_2 0a9b 00da | | Load_Top At_Offset_2 0a9c 0217 | | Execute Heap_Access,All_Reference 0a9d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0a9e 00db | | Load_Top At_Offset_3 0a9f 00db | | Load_Top At_Offset_3 0aa0 012e | . | Execute Any,Not_Equal 0aa1 680b |h | Jump_Zero 0xaad 0aa2 e5fe | | Load 0x2,-0x2 0aa3 00db | | Load_Top At_Offset_3 0aa4 e00d | | Load 0x0,0xd 0aa5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0aa6 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0aa7 e020 | | Load 0x0,0x20 0aa8 180f | | Execute Package,Field_Execute,Field_Number 0xf 0aa9 00da | | Load_Top At_Offset_2 0aaa 0217 | | Execute Heap_Access,All_Reference 0aab 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0aac 7806 |x | Jump 0xab3 0aad 00d9 | | Load_Top At_Offset_1 0aae 0217 | | Execute Heap_Access,All_Reference 0aaf 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0ab0 00da | | Load_Top At_Offset_2 0ab1 0217 | | Execute Heap_Access,All_Reference 0ab2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0ab3 00d9 | | Load_Top At_Offset_1 0ab4 0217 | | Execute Heap_Access,All_Reference 0ab5 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0ab6 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0ab7 00cf | | Action Mark_Auxiliary 0ab8 780a |x | Jump 0xac3 0ab9 e003 | | Load 0x0,0x3 0aba 180f | | Execute Package,Field_Execute,Field_Number 0xf 0abb 00da | | Load_Top At_Offset_2 0abc 0217 | | Execute Heap_Access,All_Reference 0abd 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0abe 00d9 | | Load_Top At_Offset_1 0abf 0217 | | Execute Heap_Access,All_Reference 0ac0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0ac1 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0ac2 00c9 | | Action Pop_Auxiliary_Loop 0ac3 00d9 | | Load_Top At_Offset_1 0ac4 77f4 |w | Jump_Nonzero 0xab9 0ac5 00ce | | Action Pop_Auxiliary 0ac6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0ac7 TRAP_0a28: 0ac7 e002 | | Load 0x0,0x2 0ac8 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0ac9 010f | | Execute Exception,Equal 0aca 6804 |h | Jump_Zero 0xacf 0acb e002 | | Load 0x0,0x2 0acc 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0acd a5fd | | Store_Unchecked 0x2,-0x3 0ace 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0acf 0100 | | Execute Exception,Raise 0ad0 0000 0000 | | .LITERAL {0x00000000, 0x00002816} 0ad4 0000 0000 | | .LITERAL {0x00000000, 0x00002815} 0ad8 0000 0000 | | .LITERAL {0x00000000, 0x0000280b} 0adc 0000 0000 | | .LITERAL {0x00000000, 0x0000280c} 0ae0 ; -------------------------------------------------------------------------------------- 0ae0 ; SUBPROGRAM 0ae0 ; -------------------------------------------------------------------------------------- 0ae0 0af0 | | .CONST 0x0af0 ; Address of begin 0ae1 0b3f | ? | .CONST 0x0b3f ; Address of exception handler 0ae2 0004 | | .CONST 0x0004 ; Number of locals 0ae3 INIT_0ae0: 0ae3 e00d | | Load 0x0,0xd 0ae4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0ae5 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0ae6 02c7 | | Declare_Variable Any 0ae7 00d8 | | Load_Top At_Offset_0 0ae8 1c00 | | Execute_Immediate Run_Utility,0x0 0ae9 e00d | | Load 0x0,0xd 0aea 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0aeb 02c7 | | Declare_Variable Any 0aec 00d8 | | Load_Top At_Offset_0 0aed 1c00 | | Execute_Immediate Run_Utility,0x0 0aee e00d | | Load 0x0,0xd 0aef 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0af0 BODY_0ae0: 0af0 e5fd | | Load 0x2,-0x3 0af1 00db | | Load_Top At_Offset_3 0af2 605d |`] | Indirect_Literal Discrete,0xb50,{0x00000000, 0x00002819} 0af3 6058 |`X | Indirect_Literal Discrete,0xb4c,{0x00000000, 0x00002807} 0af4 e5ff | | Load 0x2,-0x1 0af5 801c | | Call 0x0,0x1c 0af6 c402 | | Store 0x2,0x2 0af7 c5fd | | Store 0x2,-0x3 0af8 e5fd | | Load 0x2,-0x3 0af9 703f |p? | Jump_Nonzero 0xb39 0afa 00cf | | Action Mark_Auxiliary 0afb 7837 |x7 | Jump 0xb33 0afc e00d | | Load 0x0,0xd 0afd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0afe 00db | | Load_Top At_Offset_3 0aff 0120 | | Execute Any,Is_Value 0b00 6803 |h | Jump_Zero 0xb04 0b01 e00d | | Load 0x0,0xd 0b02 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b03 7801 |x | Jump 0xb05 0b04 00db | | Load_Top At_Offset_3 0b05 e402 | | Load 0x2,0x2 0b06 e00d | | Load 0x0,0xd 0b07 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b08 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0b09 c403 | | Store 0x2,0x3 0b0a 005a | Z | Store_Top Discrete,At_Offset_2 0b0b 00d9 | | Load_Top At_Offset_1 0b0c 7006 |p | Jump_Nonzero 0xb13 0b0d e5fd | | Load 0x2,-0x3 0b0e e5fe | | Load 0x2,-0x2 0b0f e403 | | Load 0x2,0x3 0b10 8231 | 1 | Call 0x1,0x31 0b11 c5fd | | Store 0x2,-0x3 0b12 781a |x | Jump 0xb2d 0b13 e002 | | Load 0x0,0x2 0b14 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0b15 4801 |H | Short_Literal 0x1 0b16 4802 |H | Short_Literal 0x2 0b17 e00e | | Load 0x0,0xe 0b18 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b19 0334 | 4 | Declare_Variable Array,With_Constraint 0b1a e402 | | Load 0x2,0x2 0b1b e00d | | Load 0x0,0xd 0b1c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b1d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0b1e e00e | | Load 0x0,0xe 0b1f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0b20 4801 |H | Short_Literal 0x1 0b21 00da | | Load_Top At_Offset_2 0b22 01d6 | | Execute Vector,Field_Write 0b23 00db | | Load_Top At_Offset_3 0b24 e00e | | Load 0x0,0xe 0b25 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0b26 4802 |H | Short_Literal 0x2 0b27 00da | | Load_Top At_Offset_2 0b28 01d6 | | Execute Vector,Field_Write 0b29 601e |` | Indirect_Literal Discrete,0xb48,{0x00000000, 0x00002812} 0b2a e002 | | Load 0x0,0x2 0b2b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0b2c c5fd | | Store 0x2,-0x3 0b2d 00db | | Load_Top At_Offset_3 0b2e e00d | | Load 0x0,0xd 0b2f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b30 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0b31 c402 | | Store 0x2,0x2 0b32 00c9 | | Action Pop_Auxiliary_Loop 0b33 00db | | Load_Top At_Offset_3 0b34 e00d | | Load 0x0,0xd 0b35 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b36 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0b37 6fc4 |o | Jump_Zero 0xafc 0b38 00ce | | Action Pop_Auxiliary 0b39 00da | | Load_Top At_Offset_2 0b3a e00d | | Load 0x0,0xd 0b3b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b3c 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0b3d c402 | | Store 0x2,0x2 0b3e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0b3f TRAP_0ae0: 0b3f 0007 | | Action Break_Optional 0b40 00db | | Load_Top At_Offset_3 0b41 e00d | | Load 0x0,0xd 0b42 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b43 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0b44 c402 | | Store 0x2,0x2 0b45 00d8 | | Load_Top At_Offset_0 0b46 0101 | | Execute Exception,Reraise 0b47 0000 | | .XXX[0x1] 0b48 0000 0000 | | .LITERAL {0x00000000, 0x00002812} 0b4c 0000 0000 | | .LITERAL {0x00000000, 0x00002807} 0b50 0000 0000 | | .LITERAL {0x00000000, 0x00002819} 0b54 0000 0000 | | .BLANK 0000[0x4] 0b58 ; -------------------------------------------------------------------------------------- 0b58 ; SUBPROGRAM 0b58 ; -------------------------------------------------------------------------------------- 0b58 0b5b | [ | .CONST 0x0b5b ; Address of begin 0b59 0004 | | .CONST 0x0004 ; Address of exception handler 0b5a 0001 | | .CONST 0x0001 ; Number of locals 0b5b BODY_0b58: 0b5b INIT_0b58: 0b5b 00da | | Load_Top At_Offset_2 0b5c 0217 | | Execute Heap_Access,All_Reference 0b5d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0b5e e00d | | Load 0x0,0xd 0b5f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0b60 6808 |h | Jump_Zero 0xb69 0b61 e5fd | | Load 0x2,-0x3 0b62 e5fe | | Load 0x2,-0x2 0b63 e5ff | | Load 0x2,-0x1 0b64 0217 | | Execute Heap_Access,All_Reference 0b65 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b66 8231 | 1 | Call 0x1,0x31 0b67 c5fd | | Store 0x2,-0x3 0b68 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0b69 e5fd | | Load 0x2,-0x3 0b6a e5fe | | Load 0x2,-0x2 0b6b e5ff | | Load 0x2,-0x1 0b6c 0217 | | Execute Heap_Access,All_Reference 0b6d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0b6e 8231 | 1 | Call 0x1,0x31 0b6f c5fd | | Store 0x2,-0x3 0b70 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0b71 0000 0000 | | .BLANK 0000[0x7] 0b78 ; -------------------------------------------------------------------------------------- 0b78 ; SUBPROGRAM 0b78 ; -------------------------------------------------------------------------------------- 0b78 0b7b | { | .CONST 0x0b7b ; Address of begin 0b79 0004 | | .CONST 0x0004 ; Address of exception handler 0b7a 0001 | | .CONST 0x0001 ; Number of locals 0b7b BODY_0b78: 0b7b INIT_0b78: 0b7b e5fd | | Load 0x2,-0x3 0b7c e5fe | | Load 0x2,-0x2 0b7d e5ff | | Load 0x2,-0x1 0b7e 0217 | | Execute Heap_Access,All_Reference 0b7f 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0b80 0217 | | Execute Heap_Access,All_Reference 0b81 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0b82 8235 | 5 | Call 0x1,0x35 0b83 c5fd | | Store 0x2,-0x3 0b84 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0b85 0000 0000 | | .XXX[0x3] 0b87 0000 | | 0b88 ; -------------------------------------------------------------------------------------- 0b88 ; SUBPROGRAM 0b88 ; -------------------------------------------------------------------------------------- 0b88 0bae | | .CONST 0x0bae ; Address of begin 0b89 0004 | | .CONST 0x0004 ; Address of exception handler 0b8a 000e | | .CONST 0x000e ; Number of locals 0b8b INIT_0b88: 0b8b 00da | | Load_Top At_Offset_2 0b8c 8026 | & | Call 0x0,0x26 0b8d e027 | ' | Load 0x0,0x27 0b8e 03f1 | | Declare_Variable Discrete,With_Value 0b8f e00d | | Load 0x0,0xd 0b90 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b91 02c7 | | Declare_Variable Any 0b92 00d8 | | Load_Top At_Offset_0 0b93 1c00 | | Execute_Immediate Run_Utility,0x0 0b94 e5fe | | Load 0x2,-0x2 0b95 0217 | | Execute Heap_Access,All_Reference 0b96 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 0b97 0007 | | Action Break_Optional 0b98 00d8 | | Load_Top At_Offset_0 0b99 0217 | | Execute Heap_Access,All_Reference 0b9a 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0b9b 0007 | | Action Break_Optional 0b9c e01b | | Load 0x0,0x1b 0b9d 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0b9e e01b | | Load 0x0,0x1b 0b9f 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 0ba0 e01b | | Load 0x0,0x1b 0ba1 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 0ba2 e01b | | Load 0x0,0x1b 0ba3 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0ba4 e01b | | Load 0x0,0x1b 0ba5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0ba6 e01b | | Load 0x0,0x1b 0ba7 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0ba8 e01b | | Load 0x0,0x1b 0ba9 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0baa e01b | | Load 0x0,0x1b 0bab 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 0bac e01b | | Load 0x0,0x1b 0bad 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 0bae BODY_0b88: 0bae e402 | | Load 0x2,0x2 0baf 4604 |F | Jump_Case 0x5 0bb0 7815 |x | Jump 0xbc6 ; case 0x0 0bb1 780f |x | Jump 0xbc1 ; case 0x1 0bb2 780b |x | Jump 0xbbe ; case 0x2 0bb3 780a |x | Jump 0xbbe ; case 0x3 0bb4 7800 |x | Jump 0xbb5 ; case 0x4 0bb5 e5fd | | Load 0x2,-0x3 0bb6 e5fe | | Load 0x2,-0x2 0bb7 60c8 |` | Indirect_Literal Discrete,0xc80,{0x00000000, 0x0000280d} 0bb8 4800 |H | Short_Literal 0x0 0bb9 e5ff | | Load 0x2,-0x1 0bba 8028 | ( | Call 0x0,0x28 0bbb 82c3 | | Call 0x1,0xc3 0bbc c5fd | | Store 0x2,-0x3 0bbd 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0bbe e5ff | | Load 0x2,-0x1 0bbf c403 | | Store 0x2,0x3 0bc0 780d |x | Jump 0xbce 0bc1 60ba |` | Indirect_Literal Discrete,0xc7c,{0x00000000, 0x0000280b} 0bc2 e5ff | | Load 0x2,-0x1 0bc3 8029 | ) | Call 0x0,0x29 0bc4 c403 | | Store 0x2,0x3 0bc5 7808 |x | Jump 0xbce 0bc6 e5fd | | Load 0x2,-0x3 0bc7 e5fe | | Load 0x2,-0x2 0bc8 60af |` | Indirect_Literal Discrete,0xc78,{0x00000000, 0x00002815} 0bc9 e5ff | | Load 0x2,-0x1 0bca 8029 | ) | Call 0x0,0x29 0bcb 8235 | 5 | Call 0x1,0x35 0bcc c5fd | | Store 0x2,-0x3 0bcd 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0bce 00cf | | Action Mark_Auxiliary 0bcf 789f |x | Jump 0xc6f 0bd0 e404 | | Load 0x2,0x4 0bd1 0217 | | Execute Heap_Access,All_Reference 0bd2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0bd3 e403 | | Load 0x2,0x3 0bd4 012f | / | Execute Any,Equal 0bd5 6890 |h | Jump_Zero 0xc66 0bd6 e404 | | Load 0x2,0x4 0bd7 e5fe | | Load 0x2,-0x2 0bd8 0217 | | Execute Heap_Access,All_Reference 0bd9 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0bda 021e | | Execute Heap_Access,Maximum 0bdb 6895 |h | Jump_Zero 0xc71 0bdc e406 | | Load 0x2,0x6 0bdd 7007 |p | Jump_Nonzero 0xbe5 0bde e404 | | Load 0x2,0x4 0bdf 0217 | | Execute Heap_Access,All_Reference 0be0 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0be1 e5fe | | Load 0x2,-0x2 0be2 0217 | | Execute Heap_Access,All_Reference 0be3 380d |8 | Execute Record,Field_Write,Field_Number 0xd 0be4 7806 |x | Jump 0xbeb 0be5 e404 | | Load 0x2,0x4 0be6 0217 | | Execute Heap_Access,All_Reference 0be7 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0be8 e406 | | Load 0x2,0x6 0be9 0217 | | Execute Heap_Access,All_Reference 0bea 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0beb e404 | | Load 0x2,0x4 0bec 0217 | | Execute Heap_Access,All_Reference 0bed 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0bee a407 | | Store_Unchecked 0x2,0x7 0bef 00cf | | Action Mark_Auxiliary 0bf0 7859 |xY | Jump 0xc4a 0bf1 e407 | | Load 0x2,0x7 0bf2 0217 | | Execute Heap_Access,All_Reference 0bf3 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0bf4 a408 | | Store_Unchecked 0x2,0x8 0bf5 e407 | | Load 0x2,0x7 0bf6 0217 | | Execute Heap_Access,All_Reference 0bf7 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0bf8 a409 | | Store_Unchecked 0x2,0x9 0bf9 00cf | | Action Mark_Auxiliary 0bfa 783f |x? | Jump 0xc3a 0bfb e409 | | Load 0x2,0x9 0bfc 0217 | | Execute Heap_Access,All_Reference 0bfd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0bfe a40a | | Store_Unchecked 0x2,0xa 0bff e409 | | Load 0x2,0x9 0c00 0217 | | Execute Heap_Access,All_Reference 0c01 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c02 0217 | | Execute Heap_Access,All_Reference 0c03 3c19 |< | Execute Record,Field_Read,Field_Number 0x19 0c04 a40d | | Store_Unchecked 0x2,0xd 0c05 00cf | | Action Mark_Auxiliary 0c06 7829 |x) | Jump 0xc30 0c07 e40d | | Load 0x2,0xd 0c08 0217 | | Execute Heap_Access,All_Reference 0c09 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0c0a e407 | | Load 0x2,0x7 0c0b 021f | | Execute Heap_Access,Equal 0c0c 681c |h | Jump_Zero 0xc29 0c0d e40e | | Load 0x2,0xe 0c0e 7009 |p | Jump_Nonzero 0xc18 0c0f e40d | | Load 0x2,0xd 0c10 0217 | | Execute Heap_Access,All_Reference 0c11 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c12 e409 | | Load 0x2,0x9 0c13 0217 | | Execute Heap_Access,All_Reference 0c14 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c15 0217 | | Execute Heap_Access,All_Reference 0c16 3819 |8 | Execute Record,Field_Write,Field_Number 0x19 0c17 7806 |x | Jump 0xc1e 0c18 e40d | | Load 0x2,0xd 0c19 0217 | | Execute Heap_Access,All_Reference 0c1a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c1b e40e | | Load 0x2,0xe 0c1c 0217 | | Execute Heap_Access,All_Reference 0c1d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0c1e e40d | | Load 0x2,0xd 0c1f e01b | | Load 0x0,0x1b 0c20 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0c21 c40d | | Store 0x2,0xd 0c22 4800 |H | Short_Literal 0x0 0c23 e409 | | Load 0x2,0x9 0c24 0217 | | Execute Heap_Access,All_Reference 0c25 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c26 0217 | | Execute Heap_Access,All_Reference 0c27 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 0c28 7809 |x | Jump 0xc32 0c29 e40d | | Load 0x2,0xd 0c2a a40e | | Store_Unchecked 0x2,0xe 0c2b e40d | | Load 0x2,0xd 0c2c 0217 | | Execute Heap_Access,All_Reference 0c2d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0c2e a40d | | Store_Unchecked 0x2,0xd 0c2f 00c9 | | Action Pop_Auxiliary_Loop 0c30 e40d | | Load 0x2,0xd 0c31 77d5 |w | Jump_Nonzero 0xc07 0c32 00ce | | Action Pop_Auxiliary 0c33 e409 | | Load 0x2,0x9 0c34 e01b | | Load 0x0,0x1b 0c35 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0c36 c409 | | Store 0x2,0x9 0c37 e40a | | Load 0x2,0xa 0c38 a409 | | Store_Unchecked 0x2,0x9 0c39 00c9 | | Action Pop_Auxiliary_Loop 0c3a e409 | | Load 0x2,0x9 0c3b 77bf |w | Jump_Nonzero 0xbfb 0c3c 00ce | | Action Pop_Auxiliary 0c3d e5fe | | Load 0x2,-0x2 0c3e e407 | | Load 0x2,0x7 0c3f 0217 | | Execute Heap_Access,All_Reference 0c40 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0c41 e02a | * | Load 0x0,0x2a 0c42 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0c43 e407 | | Load 0x2,0x7 0c44 e01b | | Load 0x0,0x1b 0c45 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0c46 c407 | | Store 0x2,0x7 0c47 e408 | | Load 0x2,0x8 0c48 a407 | | Store_Unchecked 0x2,0x7 0c49 00c9 | | Action Pop_Auxiliary_Loop 0c4a e407 | | Load 0x2,0x7 0c4b 77a5 |w | Jump_Nonzero 0xbf1 0c4c 00ce | | Action Pop_Auxiliary 0c4d e404 | | Load 0x2,0x4 0c4e 0217 | | Execute Heap_Access,All_Reference 0c4f 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0c50 a40b | | Store_Unchecked 0x2,0xb 0c51 00cf | | Action Mark_Auxiliary 0c52 780b |x | Jump 0xc5e 0c53 e40b | | Load 0x2,0xb 0c54 0217 | | Execute Heap_Access,All_Reference 0c55 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0c56 a40c | | Store_Unchecked 0x2,0xc 0c57 e40b | | Load 0x2,0xb 0c58 e01b | | Load 0x0,0x1b 0c59 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0c5a c40b | | Store 0x2,0xb 0c5b e40c | | Load 0x2,0xc 0c5c a40b | | Store_Unchecked 0x2,0xb 0c5d 00c9 | | Action Pop_Auxiliary_Loop 0c5e e40b | | Load 0x2,0xb 0c5f 77f3 |w | Jump_Nonzero 0xc53 0c60 00ce | | Action Pop_Auxiliary 0c61 e404 | | Load 0x2,0x4 0c62 e01b | | Load 0x0,0x1b 0c63 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0c64 c404 | | Store 0x2,0x4 0c65 780b |x | Jump 0xc71 0c66 e404 | | Load 0x2,0x4 0c67 a406 | | Store_Unchecked 0x2,0x6 0c68 e405 | | Load 0x2,0x5 0c69 a404 | | Store_Unchecked 0x2,0x4 0c6a e404 | | Load 0x2,0x4 0c6b 0217 | | Execute Heap_Access,All_Reference 0c6c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0c6d a405 | | Store_Unchecked 0x2,0x5 0c6e 00c9 | | Action Pop_Auxiliary_Loop 0c6f e404 | | Load 0x2,0x4 0c70 775f |w_ | Jump_Nonzero 0xbd0 0c71 00ce | | Action Pop_Auxiliary 0c72 e5fe | | Load 0x2,-0x2 0c73 e403 | | Load 0x2,0x3 0c74 e02a | * | Load 0x0,0x2a 0c75 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0c76 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0c77 0000 | | .XXX[0x1] 0c78 0000 0000 | | .LITERAL {0x00000000, 0x00002815} 0c7c 0000 0000 | | .LITERAL {0x00000000, 0x0000280b} 0c80 0000 0000 | | .LITERAL {0x00000000, 0x0000280d} 0c84 0000 0000 | | .BLANK 0000[0x4] 0c88 ; -------------------------------------------------------------------------------------- 0c88 ; SUBPROGRAM 0c88 ; -------------------------------------------------------------------------------------- 0c88 0c98 | | .CONST 0x0c98 ; Address of begin 0c89 0ce7 | | .CONST 0x0ce7 ; Address of exception handler 0c8a 0004 | | .CONST 0x0004 ; Number of locals 0c8b INIT_0c88: 0c8b e00d | | Load 0x0,0xd 0c8c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0c8d 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0c8e 02c7 | | Declare_Variable Any 0c8f 00d8 | | Load_Top At_Offset_0 0c90 1c00 | | Execute_Immediate Run_Utility,0x0 0c91 e00d | | Load 0x0,0xd 0c92 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0c93 e00d | | Load 0x0,0xd 0c94 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0c95 02c7 | | Declare_Variable Any 0c96 00d8 | | Load_Top At_Offset_0 0c97 1c00 | | Execute_Immediate Run_Utility,0x0 0c98 BODY_0c88: 0c98 e5fd | | Load 0x2,-0x3 0c99 00db | | Load_Top At_Offset_3 0c9a 605d |`] | Indirect_Literal Discrete,0xcf8,{0x00000000, 0x00002819} 0c9b 6058 |`X | Indirect_Literal Discrete,0xcf4,{0x00000000, 0x00002807} 0c9c e5ff | | Load 0x2,-0x1 0c9d 801c | | Call 0x0,0x1c 0c9e c402 | | Store 0x2,0x2 0c9f c5fd | | Store 0x2,-0x3 0ca0 e5fd | | Load 0x2,-0x3 0ca1 703f |p? | Jump_Nonzero 0xce1 0ca2 00cf | | Action Mark_Auxiliary 0ca3 7837 |x7 | Jump 0xcdb 0ca4 e00d | | Load 0x0,0xd 0ca5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0ca6 00da | | Load_Top At_Offset_2 0ca7 0120 | | Execute Any,Is_Value 0ca8 6803 |h | Jump_Zero 0xcac 0ca9 e00d | | Load 0x0,0xd 0caa 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0cab 7801 |x | Jump 0xcad 0cac 00da | | Load_Top At_Offset_2 0cad e402 | | Load 0x2,0x2 0cae e00d | | Load 0x0,0xd 0caf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0cb0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0cb1 c404 | | Store 0x2,0x4 0cb2 005b | [ | Store_Top Discrete,At_Offset_3 0cb3 00da | | Load_Top At_Offset_2 0cb4 7006 |p | Jump_Nonzero 0xcbb 0cb5 e5fd | | Load 0x2,-0x3 0cb6 e5fe | | Load 0x2,-0x2 0cb7 00db | | Load_Top At_Offset_3 0cb8 8235 | 5 | Call 0x1,0x35 0cb9 c5fd | | Store 0x2,-0x3 0cba 781a |x | Jump 0xcd5 0cbb e002 | | Load 0x0,0x2 0cbc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0cbd 4801 |H | Short_Literal 0x1 0cbe 4802 |H | Short_Literal 0x2 0cbf e00e | | Load 0x0,0xe 0cc0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0cc1 0334 | 4 | Declare_Variable Array,With_Constraint 0cc2 e402 | | Load 0x2,0x2 0cc3 e00d | | Load 0x0,0xd 0cc4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0cc5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0cc6 e00e | | Load 0x0,0xe 0cc7 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0cc8 4801 |H | Short_Literal 0x1 0cc9 00da | | Load_Top At_Offset_2 0cca 01d6 | | Execute Vector,Field_Write 0ccb e403 | | Load 0x2,0x3 0ccc e00e | | Load 0x0,0xe 0ccd 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0cce 4802 |H | Short_Literal 0x2 0ccf 00da | | Load_Top At_Offset_2 0cd0 01d6 | | Execute Vector,Field_Write 0cd1 601e |` | Indirect_Literal Discrete,0xcf0,{0x00000000, 0x00002812} 0cd2 e002 | | Load 0x0,0x2 0cd3 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0cd4 c5fd | | Store 0x2,-0x3 0cd5 00db | | Load_Top At_Offset_3 0cd6 e00d | | Load 0x0,0xd 0cd7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0cd8 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0cd9 c402 | | Store 0x2,0x2 0cda 00c9 | | Action Pop_Auxiliary_Loop 0cdb 00db | | Load_Top At_Offset_3 0cdc e00d | | Load 0x0,0xd 0cdd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0cde 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0cdf 6fc4 |o | Jump_Zero 0xca4 0ce0 00ce | | Action Pop_Auxiliary 0ce1 00da | | Load_Top At_Offset_2 0ce2 e00d | | Load 0x0,0xd 0ce3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0ce4 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0ce5 c402 | | Store 0x2,0x2 0ce6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0ce7 TRAP_0c88: 0ce7 0007 | | Action Break_Optional 0ce8 00db | | Load_Top At_Offset_3 0ce9 e00d | | Load 0x0,0xd 0cea 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0ceb 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0cec c402 | | Store 0x2,0x2 0ced 00d8 | | Load_Top At_Offset_0 0cee 0101 | | Execute Exception,Reraise 0cef 0000 | | .XXX[0x1] 0cf0 0000 0000 | | .LITERAL {0x00000000, 0x00002812} 0cf4 0000 0000 | | .LITERAL {0x00000000, 0x00002807} 0cf8 0000 0000 | | .LITERAL {0x00000000, 0x00002819} 0cfc 0000 0000 | | .BLANK 0000[0x4] 0d00 ; -------------------------------------------------------------------------------------- 0d00 ; SUBPROGRAM 0d00 ; -------------------------------------------------------------------------------------- 0d00 0d03 | | .CONST 0x0d03 ; Address of begin 0d01 0004 | | .CONST 0x0004 ; Address of exception handler 0d02 0001 | | .CONST 0x0001 ; Number of locals 0d03 BODY_0d00: 0d03 INIT_0d00: 0d03 e5fd | | Load 0x2,-0x3 0d04 e5fe | | Load 0x2,-0x2 0d05 e5ff | | Load 0x2,-0x1 0d06 0217 | | Execute Heap_Access,All_Reference 0d07 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0d08 8235 | 5 | Call 0x1,0x35 0d09 c5fd | | Store 0x2,-0x3 0d0a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0d0b 0000 0000 | | .BLANK 0000[0x5] 0d10 ; -------------------------------------------------------------------------------------- 0d10 ; SUBPROGRAM 0d10 ; -------------------------------------------------------------------------------------- 0d10 0d13 | | .CONST 0x0d13 ; Address of begin 0d11 0004 | | .CONST 0x0004 ; Address of exception handler 0d12 0001 | | .CONST 0x0001 ; Number of locals 0d13 BODY_0d10: 0d13 INIT_0d10: 0d13 e5fc | | Load 0x2,-0x4 0d14 e228 | ( | Load 0x1,0x28 0d15 e5fe | | Load 0x2,-0x2 0d16 e5ff | | Load 0x2,-0x1 0d17 0217 | | Execute Heap_Access,All_Reference 0d18 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0d19 0217 | | Execute Heap_Access,All_Reference 0d1a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0d1b 8239 | 9 | Call 0x1,0x39 0d1c c5fd | | Store 0x2,-0x3 0d1d c5fc | | Store 0x2,-0x4 0d1e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0d1f 0000 | | .XXX[0x1] 0d20 ; -------------------------------------------------------------------------------------- 0d20 ; SUBPROGRAM 0d20 ; -------------------------------------------------------------------------------------- 0d20 0d2e | . | .CONST 0x0d2e ; Address of begin 0d21 0004 | | .CONST 0x0004 ; Address of exception handler 0d22 0004 | | .CONST 0x0004 ; Number of locals 0d23 INIT_0d20: 0d23 00da | | Load_Top At_Offset_2 0d24 8026 | & | Call 0x0,0x26 0d25 e027 | ' | Load 0x0,0x27 0d26 03f1 | | Declare_Variable Discrete,With_Value 0d27 e00d | | Load 0x0,0xd 0d28 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0d29 02c7 | | Declare_Variable Any 0d2a 00d8 | | Load_Top At_Offset_0 0d2b 1c00 | | Execute_Immediate Run_Utility,0x0 0d2c e01b | | Load 0x0,0x1b 0d2d 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0d2e BODY_0d20: 0d2e 00da | | Load_Top At_Offset_2 0d2f 4604 |F | Jump_Case 0x5 0d30 781e |x | Jump 0xd4f ; case 0x0 0d31 7818 |x | Jump 0xd4a ; case 0x1 0d32 7814 |x | Jump 0xd47 ; case 0x2 0d33 7813 |x | Jump 0xd47 ; case 0x3 0d34 7800 |x | Jump 0xd35 ; case 0x4 0d35 e002 | | Load 0x0,0x2 0d36 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0d37 4801 |H | Short_Literal 0x1 0d38 4801 |H | Short_Literal 0x1 0d39 e00e | | Load 0x0,0xe 0d3a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0d3b 0334 | 4 | Declare_Variable Array,With_Constraint 0d3c e5ff | | Load 0x2,-0x1 0d3d e00e | | Load 0x0,0xe 0d3e 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0d3f 4801 |H | Short_Literal 0x1 0d40 00da | | Load_Top At_Offset_2 0d41 01d6 | | Execute Vector,Field_Write 0d42 6049 |`I | Indirect_Literal Discrete,0xd8c,{0x00000000, 0x00002801} 0d43 e002 | | Load 0x0,0x2 0d44 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0d45 c5fc | | Store 0x2,-0x4 0d46 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0d47 e5ff | | Load 0x2,-0x1 0d48 c403 | | Store 0x2,0x3 0d49 780f |x | Jump 0xd59 0d4a 603d |`= | Indirect_Literal Discrete,0xd88,{0x00000000, 0x0000280b} 0d4b e5ff | | Load 0x2,-0x1 0d4c 8029 | ) | Call 0x0,0x29 0d4d c403 | | Store 0x2,0x3 0d4e 780a |x | Jump 0xd59 0d4f e5fc | | Load 0x2,-0x4 0d50 e228 | ( | Load 0x1,0x28 0d51 e5fe | | Load 0x2,-0x2 0d52 6031 |`1 | Indirect_Literal Discrete,0xd84,{0x00000000, 0x00002815} 0d53 e5ff | | Load 0x2,-0x1 0d54 8029 | ) | Call 0x0,0x29 0d55 8239 | 9 | Call 0x1,0x39 0d56 c5fd | | Store 0x2,-0x3 0d57 c5fc | | Store 0x2,-0x4 0d58 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0d59 e5fc | | Load 0x2,-0x4 0d5a e01b | | Load 0x0,0x1b 0d5b 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0d5c e5fe | | Load 0x2,-0x2 0d5d e403 | | Load 0x2,0x3 0d5e 82c1 | | Call 0x1,0xc1 0d5f 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0d60 c5fc | | Store 0x2,-0x4 0d61 00d8 | | Load_Top At_Offset_0 0d62 7017 |p | Jump_Nonzero 0xd7a 0d63 e002 | | Load 0x0,0x2 0d64 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0d65 4801 |H | Short_Literal 0x1 0d66 4802 |H | Short_Literal 0x2 0d67 e00e | | Load 0x0,0xe 0d68 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0d69 0334 | 4 | Declare_Variable Array,With_Constraint 0d6a 00db | | Load_Top At_Offset_3 0d6b e00e | | Load 0x0,0xe 0d6c 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0d6d 4801 |H | Short_Literal 0x1 0d6e 00da | | Load_Top At_Offset_2 0d6f 01d6 | | Execute Vector,Field_Write 0d70 e5ff | | Load 0x2,-0x1 0d71 e00e | | Load 0x0,0xe 0d72 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0d73 4802 |H | Short_Literal 0x2 0d74 00da | | Load_Top At_Offset_2 0d75 01d6 | | Execute Vector,Field_Write 0d76 6009 |` | Indirect_Literal Discrete,0xd80,{0x00000000, 0x00002814} 0d77 e002 | | Load 0x0,0x2 0d78 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0d79 c5fc | | Store 0x2,-0x4 0d7a 00d8 | | Load_Top At_Offset_0 0d7b e001 | | Load 0x0,0x1 0d7c 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0d7d 0216 | | Execute Heap_Access,Convert 0d7e a5fd | | Store_Unchecked 0x2,-0x3 0d7f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0d80 0000 0000 | | .LITERAL {0x00000000, 0x00002814} 0d84 0000 0000 | | .LITERAL {0x00000000, 0x00002815} 0d88 0000 0000 | | .LITERAL {0x00000000, 0x0000280b} 0d8c 0000 0000 | | .LITERAL {0x00000000, 0x00002801} 0d90 ; -------------------------------------------------------------------------------------- 0d90 ; SUBPROGRAM 0d90 ; -------------------------------------------------------------------------------------- 0d90 0da0 | | .CONST 0x0da0 ; Address of begin 0d91 0e11 | | .CONST 0x0e11 ; Address of exception handler 0d92 0004 | | .CONST 0x0004 ; Number of locals 0d93 INIT_0d90: 0d93 e00d | | Load 0x0,0xd 0d94 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0d95 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0d96 02c7 | | Declare_Variable Any 0d97 00d8 | | Load_Top At_Offset_0 0d98 1c00 | | Execute_Immediate Run_Utility,0x0 0d99 e00d | | Load 0x0,0xd 0d9a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0d9b 02c7 | | Declare_Variable Any 0d9c 00d8 | | Load_Top At_Offset_0 0d9d 1c00 | | Execute_Immediate Run_Utility,0x0 0d9e e00d | | Load 0x0,0xd 0d9f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0da0 BODY_0d90: 0da0 e5fc | | Load 0x2,-0x4 0da1 00db | | Load_Top At_Offset_3 0da2 6085 |` | Indirect_Literal Discrete,0xe28,{0x00000000, 0x00002819} 0da3 6080 |` | Indirect_Literal Discrete,0xe24,{0x00000000, 0x00002807} 0da4 e5ff | | Load 0x2,-0x1 0da5 801c | | Call 0x0,0x1c 0da6 c402 | | Store 0x2,0x2 0da7 c5fc | | Store 0x2,-0x4 0da8 e5fc | | Load 0x2,-0x4 0da9 7061 |pa | Jump_Nonzero 0xe0b 0daa e00d | | Load 0x0,0xd 0dab 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0dac 00da | | Load_Top At_Offset_2 0dad 0120 | | Execute Any,Is_Value 0dae 6803 |h | Jump_Zero 0xdb2 0daf e00d | | Load 0x0,0xd 0db0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0db1 7801 |x | Jump 0xdb3 0db2 00da | | Load_Top At_Offset_2 0db3 e402 | | Load 0x2,0x2 0db4 e00d | | Load 0x0,0xd 0db5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0db6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0db7 c403 | | Store 0x2,0x3 0db8 0059 | Y | Store_Top Discrete,At_Offset_1 0db9 00d8 | | Load_Top At_Offset_0 0dba 7036 |p6 | Jump_Nonzero 0xdf1 0dbb 00da | | Load_Top At_Offset_2 0dbc e00d | | Load 0x0,0xd 0dbd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0dbe 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0dbf c402 | | Store 0x2,0x2 0dc0 00da | | Load_Top At_Offset_2 0dc1 e00d | | Load 0x0,0xd 0dc2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0dc3 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0dc4 7024 |p$ | Jump_Nonzero 0xde9 0dc5 e002 | | Load 0x0,0x2 0dc6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0dc7 4801 |H | Short_Literal 0x1 0dc8 4803 |H | Short_Literal 0x3 0dc9 e00e | | Load 0x0,0xe 0dca 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0dcb 0334 | 4 | Declare_Variable Array,With_Constraint 0dcc e5ff | | Load 0x2,-0x1 0dcd e00e | | Load 0x0,0xe 0dce 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0dcf 4801 |H | Short_Literal 0x1 0dd0 00da | | Load_Top At_Offset_2 0dd1 01d6 | | Execute Vector,Field_Write 0dd2 00db | | Load_Top At_Offset_3 0dd3 e00d | | Load 0x0,0xd 0dd4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0dd5 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0dd6 e00e | | Load 0x0,0xe 0dd7 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0dd8 4802 |H | Short_Literal 0x2 0dd9 00da | | Load_Top At_Offset_2 0dda 01d6 | | Execute Vector,Field_Write 0ddb e402 | | Load 0x2,0x2 0ddc e00d | | Load 0x0,0xd 0ddd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0dde 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0ddf e00e | | Load 0x0,0xe 0de0 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0de1 4803 |H | Short_Literal 0x3 0de2 00da | | Load_Top At_Offset_2 0de3 01d6 | | Execute Vector,Field_Write 0de4 603b |`; | Indirect_Literal Discrete,0xe20,{0x00000000, 0x00002813} 0de5 e002 | | Load 0x0,0x2 0de6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0de7 c5fc | | Store 0x2,-0x4 0de8 7822 |x" | Jump 0xe0b 0de9 e5fc | | Load 0x2,-0x4 0dea e228 | ( | Load 0x1,0x28 0deb e5fe | | Load 0x2,-0x2 0dec e403 | | Load 0x2,0x3 0ded 8239 | 9 | Call 0x1,0x39 0dee c5fd | | Store 0x2,-0x3 0def c5fc | | Store 0x2,-0x4 0df0 781a |x | Jump 0xe0b 0df1 e002 | | Load 0x0,0x2 0df2 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0df3 4801 |H | Short_Literal 0x1 0df4 4802 |H | Short_Literal 0x2 0df5 e00e | | Load 0x0,0xe 0df6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0df7 0334 | 4 | Declare_Variable Array,With_Constraint 0df8 e402 | | Load 0x2,0x2 0df9 e00d | | Load 0x0,0xd 0dfa 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0dfb 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0dfc e00e | | Load 0x0,0xe 0dfd 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0dfe 4801 |H | Short_Literal 0x1 0dff 00da | | Load_Top At_Offset_2 0e00 01d6 | | Execute Vector,Field_Write 0e01 00da | | Load_Top At_Offset_2 0e02 e00e | | Load 0x0,0xe 0e03 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0e04 4802 |H | Short_Literal 0x2 0e05 00da | | Load_Top At_Offset_2 0e06 01d6 | | Execute Vector,Field_Write 0e07 6014 |` | Indirect_Literal Discrete,0xe1c,{0x00000000, 0x00002812} 0e08 e002 | | Load 0x0,0x2 0e09 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0e0a c5fc | | Store 0x2,-0x4 0e0b 00da | | Load_Top At_Offset_2 0e0c e00d | | Load 0x0,0xd 0e0d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0e0e 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0e0f c402 | | Store 0x2,0x2 0e10 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0e11 TRAP_0d90: 0e11 0007 | | Action Break_Optional 0e12 00db | | Load_Top At_Offset_3 0e13 e00d | | Load 0x0,0xd 0e14 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0e15 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0e16 c402 | | Store 0x2,0x2 0e17 00d8 | | Load_Top At_Offset_0 0e18 0101 | | Execute Exception,Reraise 0e19 0000 0000 | | .XXX[0x3] 0e1b 0000 | | 0e1c 0000 0000 | | .LITERAL {0x00000000, 0x00002812} 0e20 0000 0000 | | .LITERAL {0x00000000, 0x00002813} 0e24 0000 0000 | | .LITERAL {0x00000000, 0x00002807} 0e28 0000 0000 | | .LITERAL {0x00000000, 0x00002819} 0e2c 0000 0000 | | .BLANK 0000[0x4] 0e30 ; -------------------------------------------------------------------------------------- 0e30 ; SUBPROGRAM 0e30 ; -------------------------------------------------------------------------------------- 0e30 0e33 | 3 | .CONST 0x0e33 ; Address of begin 0e31 0004 | | .CONST 0x0004 ; Address of exception handler 0e32 0001 | | .CONST 0x0001 ; Number of locals 0e33 BODY_0e30: 0e33 INIT_0e30: 0e33 00db | | Load_Top At_Offset_3 0e34 00db | | Load_Top At_Offset_3 0e35 0217 | | Execute Heap_Access,All_Reference 0e36 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 0e37 0217 | | Execute Heap_Access,All_Reference 0e38 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e39 8285 | | Call 0x1,0x85 0e3a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0e3b 0000 0000 | | .BLANK 0000[0x5] 0e40 ; -------------------------------------------------------------------------------------- 0e40 ; SUBPROGRAM 0e40 ; -------------------------------------------------------------------------------------- 0e40 0e4d | M | .CONST 0x0e4d ; Address of begin 0e41 0004 | | .CONST 0x0004 ; Address of exception handler 0e42 0002 | | .CONST 0x0002 ; Number of locals 0e43 INIT_0e40: 0e43 e02a | * | Load 0x0,0x2a 0e44 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0e45 02ff | | Declare_Variable Variant_Record 0e46 4801 |H | Short_Literal 0x1 0e47 e5fe | | Load 0x2,-0x2 0e48 e5ff | | Load 0x2,-0x1 0e49 e02a | * | Load 0x0,0x2a 0e4a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0e4b 00d9 | | Load_Top At_Offset_1 0e4c 016d | m | Execute Variant_Record,Structure_Write 0e4d BODY_0e40: 0e4d 00d8 | | Load_Top At_Offset_0 0e4e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0e4f 0f01 | | Execute_Immediate Equal,0x1 0e50 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0e51 0000 0000 | | .BLANK 0000[0x7] 0e58 ; -------------------------------------------------------------------------------------- 0e58 ; SUBPROGRAM 0e58 ; -------------------------------------------------------------------------------------- 0e58 0e5b | [ | .CONST 0x0e5b ; Address of begin 0e59 0004 | | .CONST 0x0004 ; Address of exception handler 0e5a 0001 | | .CONST 0x0001 ; Number of locals 0e5b BODY_0e58: 0e5b INIT_0e58: 0e5b 00da | | Load_Top At_Offset_2 0e5c 0217 | | Execute Heap_Access,All_Reference 0e5d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0e5e 00d8 | | Load_Top At_Offset_0 0e5f 0120 | | Execute Any,Is_Value 0e60 7002 |p | Jump_Nonzero 0xe63 0e61 00d8 | | Load_Top At_Offset_0 0e62 011e | | Execute Any,Convert 0e63 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0e64 0000 0000 | | .BLANK 0000[0x4] 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 00da | | Load_Top At_Offset_2 0e6c 0217 | | Execute Heap_Access,All_Reference 0e6d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0e6e e020 | | Load 0x0,0x20 0e6f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0e70 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0e71 0000 0000 | | .BLANK 0000[0x7] 0e78 ; -------------------------------------------------------------------------------------- 0e78 ; SUBPROGRAM 0e78 ; -------------------------------------------------------------------------------------- 0e78 0e7b | { | .CONST 0x0e7b ; Address of begin 0e79 0004 | | .CONST 0x0004 ; Address of exception handler 0e7a 0001 | | .CONST 0x0001 ; Number of locals 0e7b BODY_0e78: 0e7b INIT_0e78: 0e7b 00da | | Load_Top At_Offset_2 0e7c 0217 | | Execute Heap_Access,All_Reference 0e7d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0e7e 00d8 | | Load_Top At_Offset_0 0e7f 0120 | | Execute Any,Is_Value 0e80 7002 |p | Jump_Nonzero 0xe83 0e81 00d8 | | Load_Top At_Offset_0 0e82 011e | | Execute Any,Convert 0e83 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0e84 0000 0000 | | .BLANK 0000[0x4] 0e88 ; -------------------------------------------------------------------------------------- 0e88 ; SUBPROGRAM 0e88 ; -------------------------------------------------------------------------------------- 0e88 0e8b | | .CONST 0x0e8b ; Address of begin 0e89 0004 | | .CONST 0x0004 ; Address of exception handler 0e8a 0001 | | .CONST 0x0001 ; Number of locals 0e8b BODY_0e88: 0e8b INIT_0e88: 0e8b 00da | | Load_Top At_Offset_2 0e8c 0217 | | Execute Heap_Access,All_Reference 0e8d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0e8e e00d | | Load 0x0,0xd 0e8f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0e90 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0e91 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0e92 0000 0000 | | .BLANK 0000[0x6] 0e98 ; -------------------------------------------------------------------------------------- 0e98 ; SUBPROGRAM 0e98 ; -------------------------------------------------------------------------------------- 0e98 0e9b | | .CONST 0x0e9b ; Address of begin 0e99 0004 | | .CONST 0x0004 ; Address of exception handler 0e9a 0001 | | .CONST 0x0001 ; Number of locals 0e9b BODY_0e98: 0e9b INIT_0e98: 0e9b 00da | | Load_Top At_Offset_2 0e9c 0217 | | Execute Heap_Access,All_Reference 0e9d 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0e9e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0e9f 0000 | | .XXX[0x1] 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 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0ea6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ea7 0000 | | .XXX[0x1] 0ea8 ; -------------------------------------------------------------------------------------- 0ea8 ; SUBPROGRAM 0ea8 ; -------------------------------------------------------------------------------------- 0ea8 0eb5 | | .CONST 0x0eb5 ; Address of begin 0ea9 0004 | | .CONST 0x0004 ; Address of exception handler 0eaa 0003 | | .CONST 0x0003 ; Number of locals 0eab INIT_0ea8: 0eab 00da | | Load_Top At_Offset_2 0eac 0217 | | Execute Heap_Access,All_Reference 0ead 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0eae 0007 | | Action Break_Optional 0eaf 00db | | Load_Top At_Offset_3 0eb0 82c4 | | Call 0x1,0xc4 0eb1 e001 | | Load 0x0,0x1 0eb2 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0eb3 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 0eb4 1c08 | | Execute_Immediate Run_Utility,0x8 0eb5 BODY_0ea8: 0eb5 4800 |H | Short_Literal 0x0 0eb6 00d9 | | Load_Top At_Offset_1 0eb7 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0eb8 00cf | | Action Mark_Auxiliary 0eb9 00d9 | | Load_Top At_Offset_1 0eba 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0ebb 01d9 | | Execute Vector,Reverse_Bounds 0ebc 0263 | c | Execute Discrete,Above_Bound 0ebd 700b |p | Jump_Nonzero 0xec9 0ebe e402 | | Load 0x2,0x2 0ebf 00d9 | | Load_Top At_Offset_1 0ec0 e403 | | Load 0x2,0x3 0ec1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0ec2 01d6 | | Execute Vector,Field_Write 0ec3 e402 | | Load 0x2,0x2 0ec4 0217 | | Execute Heap_Access,All_Reference 0ec5 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0ec6 a402 | | Store_Unchecked 0x2,0x2 0ec7 00c8 | | Action Pop_Auxiliary_Range 0ec8 3ff5 |? | Loop_Increasing 0xebe 0ec9 00ce | | Action Pop_Auxiliary 0eca 00d8 | | Load_Top At_Offset_0 0ecb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ecc 0000 0000 | | .BLANK 0000[0x4] 0ed0 ; -------------------------------------------------------------------------------------- 0ed0 ; SUBPROGRAM 0ed0 ; -------------------------------------------------------------------------------------- 0ed0 0ed8 | | .CONST 0x0ed8 ; Address of begin 0ed1 0004 | | .CONST 0x0004 ; Address of exception handler 0ed2 0003 | | .CONST 0x0003 ; Number of locals 0ed3 INIT_0ed0: 0ed3 e01b | | Load 0x0,0x1b 0ed4 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0ed5 e002 | | Load 0x0,0x2 0ed6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0ed7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0ed8 BODY_0ed0: 0ed8 00d8 | | Load_Top At_Offset_0 0ed9 e01b | | Load 0x0,0x1b 0eda 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0edb 4800 |H | Short_Literal 0x0 0edc e5fe | | Load 0x2,-0x2 0edd e5ff | | Load 0x2,-0x1 0ede 82c5 | | Call 0x1,0xc5 0edf 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0ee0 0059 | Y | Store_Top Discrete,At_Offset_1 0ee1 00d8 | | Load_Top At_Offset_0 0ee2 7009 |p | Jump_Nonzero 0xeec 0ee3 00d9 | | Load_Top At_Offset_1 0ee4 0217 | | Execute Heap_Access,All_Reference 0ee5 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0ee6 00d8 | | Load_Top At_Offset_0 0ee7 0120 | | Execute Any,Is_Value 0ee8 7002 |p | Jump_Nonzero 0xeeb 0ee9 00d8 | | Load_Top At_Offset_0 0eea 011e | | Execute Any,Convert 0eeb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0eec 00d8 | | Load_Top At_Offset_0 0eed 6016 |` | Indirect_Literal Discrete,0xf04,{0x00000000, 0x0000281a} 0eee 027f | | Execute Discrete,Equal 0eef 6803 |h | Jump_Zero 0xef3 0ef0 e003 | | Load 0x0,0x3 0ef1 180f | | Execute Package,Field_Execute,Field_Number 0xf 0ef2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0ef3 4801 |H | Short_Literal 0x1 0ef4 4801 |H | Short_Literal 0x1 0ef5 e00e | | Load 0x0,0xe 0ef6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0ef7 0334 | 4 | Declare_Variable Array,With_Constraint 0ef8 e5ff | | Load 0x2,-0x1 0ef9 8242 | B | Call 0x1,0x42 0efa 4801 |H | Short_Literal 0x1 0efb 00da | | Load_Top At_Offset_2 0efc 01d6 | | Execute Vector,Field_Write 0efd 00d9 | | Load_Top At_Offset_1 0efe e002 | | Load 0x0,0x2 0eff 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0f00 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0f01 0000 0000 | | .XXX[0x3] 0f03 0000 | | 0f04 0000 0000 | | .LITERAL {0x00000000, 0x0000281a} 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 e5fd | | Load 0x2,-0x3 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 7005 |p | Jump_Nonzero 0xf20 0f1b e5fe | | Load 0x2,-0x2 0f1c 00da | | Load_Top At_Offset_2 0f1d 0217 | | Execute Heap_Access,All_Reference 0f1e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0f1f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0f20 e002 | | Load 0x0,0x2 0f21 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0f22 4801 |H | Short_Literal 0x1 0f23 4801 |H | Short_Literal 0x1 0f24 e00e | | Load 0x0,0xe 0f25 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0f26 0334 | 4 | Declare_Variable Array,With_Constraint 0f27 e5ff | | Load 0x2,-0x1 0f28 8242 | B | Call 0x1,0x42 0f29 4801 |H | Short_Literal 0x1 0f2a 00da | | Load_Top At_Offset_2 0f2b 01d6 | | Execute Vector,Field_Write 0f2c 00da | | Load_Top At_Offset_2 0f2d e002 | | Load 0x0,0x2 0f2e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0f2f c5fc | | Store 0x2,-0x4 0f30 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0f31 0000 0000 | | .BLANK 0000[0x7] 0f38 ; -------------------------------------------------------------------------------------- 0f38 ; SUBPROGRAM 0f38 ; -------------------------------------------------------------------------------------- 0f38 0f3b | ; | .CONST 0x0f3b ; Address of begin 0f39 0004 | | .CONST 0x0004 ; Address of exception handler 0f3a 0001 | | .CONST 0x0001 ; Number of locals 0f3b BODY_0f38: 0f3b INIT_0f38: 0f3b 00da | | Load_Top At_Offset_2 0f3c e2c6 | | Load 0x1,0xc6 0f3d e2c7 | | Load 0x1,0xc7 0f3e 1dc8 | | Execute_Immediate Reference_Lex_1,0xc8 0f3f 1dc9 | | Execute_Immediate Reference_Lex_1,0xc9 0f40 1dca | | Execute_Immediate Reference_Lex_1,0xca 0f41 e00e | | Load 0x0,0xe 0f42 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 0f43 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0f44 0000 0000 | | .BLANK 0000[0x4] 0f48 ; -------------------------------------------------------------------------------------- 0f48 ; SUBPROGRAM 0f48 ; -------------------------------------------------------------------------------------- 0f48 0f4b | K | .CONST 0x0f4b ; Address of begin 0f49 0004 | | .CONST 0x0004 ; Address of exception handler 0f4a 0001 | | .CONST 0x0001 ; Number of locals 0f4b BODY_0f48: 0f4b INIT_0f48: 0f4b 00da | | Load_Top At_Offset_2 0f4c e2ce | | Load 0x1,0xce 0f4d e2cf | | Load 0x1,0xcf 0f4e 1dd0 | | Execute_Immediate Reference_Lex_1,0xd0 0f4f e2d1 | | Load 0x1,0xd1 0f50 1dd2 | | Execute_Immediate Reference_Lex_1,0xd2 0f51 e00e | | Load 0x0,0xe 0f52 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 0f53 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0f54 0000 0000 | | .BLANK 0000[0x4] 0f58 ; -------------------------------------------------------------------------------------- 0f58 ; SUBPROGRAM 0f58 ; -------------------------------------------------------------------------------------- 0f58 0f5b | [ | .CONST 0x0f5b ; Address of begin 0f59 0004 | | .CONST 0x0004 ; Address of exception handler 0f5a 0001 | | .CONST 0x0001 ; Number of locals 0f5b BODY_0f58: 0f5b INIT_0f58: 0f5b 00da | | Load_Top At_Offset_2 0f5c 0217 | | Execute Heap_Access,All_Reference 0f5d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0f5e e020 | | Load 0x0,0x20 0f5f 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0f60 7006 |p | Jump_Nonzero 0xf67 0f61 00da | | Load_Top At_Offset_2 0f62 0217 | | Execute Heap_Access,All_Reference 0f63 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0f64 e020 | | Load 0x0,0x20 0f65 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0f66 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0f67 00da | | Load_Top At_Offset_2 0f68 0217 | | Execute Heap_Access,All_Reference 0f69 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0f6a e020 | | Load 0x0,0x20 0f6b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0f6c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0f6d 0000 0000 | | .XXX[0x3] 0f6f 0000 | | 0f70 ; -------------------------------------------------------------------------------------- 0f70 ; SUBPROGRAM 0f70 ; -------------------------------------------------------------------------------------- 0f70 0f75 | u | .CONST 0x0f75 ; Address of begin 0f71 0004 | | .CONST 0x0004 ; Address of exception handler 0f72 0002 | | .CONST 0x0002 ; Number of locals 0f73 INIT_0f70: 0f73 e020 | | Load 0x0,0x20 0f74 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0f75 BODY_0f70: 0f75 00db | | Load_Top At_Offset_3 0f76 0217 | | Execute Heap_Access,All_Reference 0f77 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0f78 e001 | | Load 0x0,0x1 0f79 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0f7a 0216 | | Execute Heap_Access,Convert 0f7b e001 | | Load 0x0,0x1 0f7c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0f7d 180f | | Execute Package,Field_Execute,Field_Number 0xf 0f7e 7007 |p | Jump_Nonzero 0xf86 0f7f 00db | | Load_Top At_Offset_3 0f80 0217 | | Execute Heap_Access,All_Reference 0f81 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0f82 e001 | | Load 0x0,0x1 0f83 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0f84 0216 | | Execute Heap_Access,Convert 0f85 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0f86 e5fe | | Load 0x2,-0x2 0f87 e5ff | | Load 0x2,-0x1 0f88 e001 | | Load 0x0,0x1 0f89 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0f8a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0f8b e020 | | Load 0x0,0x20 0f8c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0f8d 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0f8e 00d8 | | Load_Top At_Offset_0 0f8f e020 | | Load 0x0,0x20 0f90 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0f91 7008 |p | Jump_Nonzero 0xf9a 0f92 e5fe | | Load 0x2,-0x2 0f93 00d9 | | Load_Top At_Offset_1 0f94 e025 | % | Load 0x0,0x25 0f95 180f | | Execute Package,Field_Execute,Field_Number 0xf 0f96 e001 | | Load 0x0,0x1 0f97 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0f98 0216 | | Execute Heap_Access,Convert 0f99 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0f9a e001 | | Load 0x0,0x1 0f9b 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0f9c 180e | | Execute Package,Field_Execute,Field_Number 0xe 0f9d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0f9e 0000 0000 | | .XXX[0x2] 0fa0 ; -------------------------------------------------------------------------------------- 0fa0 ; SUBPROGRAM 0fa0 ; -------------------------------------------------------------------------------------- 0fa0 0faa | | .CONST 0x0faa ; Address of begin 0fa1 0004 | | .CONST 0x0004 ; Address of exception handler 0fa2 0004 | | .CONST 0x0004 ; Number of locals 0fa3 INIT_0fa0: 0fa3 e228 | ( | Load 0x1,0x28 0fa4 0007 | | Action Break_Optional 0fa5 e002 | | Load 0x0,0x2 0fa6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0fa7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0fa8 e01b | | Load 0x0,0x1b 0fa9 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 0faa BODY_0fa0: 0faa 00d9 | | Load_Top At_Offset_1 0fab e228 | ( | Load 0x1,0x28 0fac e5ff | | Load 0x2,-0x1 0fad e5fe | | Load 0x2,-0x2 0fae 825f | _ | Call 0x1,0x5f 0faf 8238 | 8 | Call 0x1,0x38 0fb0 c402 | | Store 0x2,0x2 0fb1 005a | Z | Store_Top Discrete,At_Offset_2 0fb2 00da | | Load_Top At_Offset_2 0fb3 0217 | | Execute Heap_Access,All_Reference 0fb4 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0fb5 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0fb6 00cf | | Action Mark_Auxiliary 0fb7 780d |x | Jump 0xfc5 0fb8 e5fe | | Load 0x2,-0x2 0fb9 0217 | | Execute Heap_Access,All_Reference 0fba 3c0b |< | Execute Record,Field_Read,Field_Number 0xb 0fbb 00da | | Load_Top At_Offset_2 0fbc 0217 | | Execute Heap_Access,All_Reference 0fbd 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0fbe 021f | | Execute Heap_Access,Equal 0fbf 7007 |p | Jump_Nonzero 0xfc7 0fc0 00d9 | | Load_Top At_Offset_1 0fc1 0217 | | Execute Heap_Access,All_Reference 0fc2 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0fc3 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0fc4 00c9 | | Action Pop_Auxiliary_Loop 0fc5 00d9 | | Load_Top At_Offset_1 0fc6 77f1 |w | Jump_Nonzero 0xfb8 0fc7 00ce | | Action Pop_Auxiliary 0fc8 00d8 | | Load_Top At_Offset_0 0fc9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0fca 0000 0000 | | .BLANK 0000[0x6] 0fd0 ; -------------------------------------------------------------------------------------- 0fd0 ; SUBPROGRAM 0fd0 ; -------------------------------------------------------------------------------------- 0fd0 0fd3 | | .CONST 0x0fd3 ; Address of begin 0fd1 0004 | | .CONST 0x0004 ; Address of exception handler 0fd2 0001 | | .CONST 0x0001 ; Number of locals 0fd3 BODY_0fd0: 0fd3 INIT_0fd0: 0fd3 00da | | Load_Top At_Offset_2 0fd4 0217 | | Execute Heap_Access,All_Reference 0fd5 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0fd6 e001 | | Load 0x0,0x1 0fd7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0fd8 00d9 | | Load_Top At_Offset_1 0fd9 00d0 | | Action Swap_Control 0fda 0260 | ` | Execute Discrete,In_Type 0fdb 7001 |p | Jump_Nonzero 0xfdd 0fdc 0801 | | Execute_Immediate Raise,0x1 0fdd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0fde 0000 0000 | | .XXX[0x2] 0fe0 ; -------------------------------------------------------------------------------------- 0fe0 ; SUBPROGRAM 0fe0 ; -------------------------------------------------------------------------------------- 0fe0 0fe3 | | .CONST 0x0fe3 ; Address of begin 0fe1 0004 | | .CONST 0x0004 ; Address of exception handler 0fe2 0001 | | .CONST 0x0001 ; Number of locals 0fe3 BODY_0fe0: 0fe3 INIT_0fe0: 0fe3 00db | | Load_Top At_Offset_3 0fe4 00db | | Load_Top At_Offset_3 0fe5 0217 | | Execute Heap_Access,All_Reference 0fe6 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0fe7 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0fe8 ; -------------------------------------------------------------------------------------- 0fe8 ; SUBPROGRAM 0fe8 ; -------------------------------------------------------------------------------------- 0fe8 0ff6 | | .CONST 0x0ff6 ; Address of begin 0fe9 0004 | | .CONST 0x0004 ; Address of exception handler 0fea 0005 | | .CONST 0x0005 ; Number of locals 0feb INIT_0fe8: 0feb e00c | | Load 0x0,0xc 0fec 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0fed 06ff | | Execute_Immediate Set_Value_Unchecked,0xff 0fee e00c | | Load 0x0,0xc 0fef 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ff0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0ff1 e5ff | | Load 0x2,-0x1 0ff2 0217 | | Execute Heap_Access,All_Reference 0ff3 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 0ff4 029f 29a3 | ) | Declare_Subprogram INIT_29a0,For_Call 0ff6 BODY_0fe8: 0ff6 00cf | | Action Mark_Auxiliary 0ff7 7819 |x | Jump 0x1011 0ff8 00da | | Load_Top At_Offset_2 0ff9 0217 | | Execute Heap_Access,All_Reference 0ffa 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0ffb e402 | | Load 0x2,0x2 0ffc 027c | | | Execute Discrete,Less 0ffd 6804 |h | Jump_Zero 0x1002 0ffe 00da | | Load_Top At_Offset_2 0fff 0217 | | Execute Heap_Access,All_Reference 1000 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1001 a402 | | Store_Unchecked 0x2,0x2 1002 00da | | Load_Top At_Offset_2 1003 0217 | | Execute Heap_Access,All_Reference 1004 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 1005 e403 | | Load 0x2,0x3 1006 027d | } | Execute Discrete,Greater 1007 6804 |h | Jump_Zero 0x100c 1008 00da | | Load_Top At_Offset_2 1009 0217 | | Execute Heap_Access,All_Reference 100a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 100b a403 | | Store_Unchecked 0x2,0x3 100c 00da | | Load_Top At_Offset_2 100d 0217 | | Execute Heap_Access,All_Reference 100e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 100f 0033 | 3 | Store_Top Heap_Access,At_Offset_3 1010 00c9 | | Action Pop_Auxiliary_Loop 1011 00da | | Load_Top At_Offset_2 1012 77e5 |w | Jump_Nonzero 0xff8 1013 00ce | | Action Pop_Auxiliary 1014 00db | | Load_Top At_Offset_3 1015 00db | | Load_Top At_Offset_3 1016 027c | | | Execute Discrete,Less 1017 6802 |h | Jump_Zero 0x101a 1018 8405 | | Call 0x2,0x5 1019 780f |x | Jump 0x1029 101a 00db | | Load_Top At_Offset_3 101b 00db | | Load_Top At_Offset_3 101c e00c | | Load 0x0,0xc 101d 1b18 | | Execute Package,Field_Read,Field_Number 0x18 101e 0334 | 4 | Declare_Variable Array,With_Constraint 101f 00d8 | | Load_Top At_Offset_0 1020 01d9 | | Execute Vector,Reverse_Bounds 1021 0263 | c | Execute Discrete,Above_Bound 1022 7005 |p | Jump_Nonzero 0x1028 1023 4801 |H | Short_Literal 0x1 1024 00d9 | | Load_Top At_Offset_1 1025 e406 | | Load 0x2,0x6 1026 01d6 | | Execute Vector,Field_Write 1027 3ffb |? | Loop_Increasing 0x1023 1028 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1029 0831 | 1 | Execute_Immediate Raise,0x31 102a 0000 0000 | | .BLANK 0000[0x6] 1030 ; -------------------------------------------------------------------------------------- 1030 ; SUBPROGRAM 1030 ; -------------------------------------------------------------------------------------- 1030 1033 | 3 | .CONST 0x1033 ; Address of begin 1031 0004 | | .CONST 0x0004 ; Address of exception handler 1032 0001 | | .CONST 0x0001 ; Number of locals 1033 BODY_1030: 1033 INIT_1030: 1033 00db | | Load_Top At_Offset_3 1034 4800 |H | Short_Literal 0x0 1035 e5ff | | Load 0x2,-0x1 1036 82d7 | | Call 0x1,0xd7 1037 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1038 ; -------------------------------------------------------------------------------------- 1038 ; SUBPROGRAM 1038 ; -------------------------------------------------------------------------------------- 1038 103b | ; | .CONST 0x103b ; Address of begin 1039 0004 | | .CONST 0x0004 ; Address of exception handler 103a 0001 | | .CONST 0x0001 ; Number of locals 103b BODY_1038: 103b INIT_1038: 103b e5fc | | Load 0x2,-0x4 103c e5fd | | Load 0x2,-0x3 103d e5fe | | Load 0x2,-0x2 103e 4800 |H | Short_Literal 0x0 103f e5ff | | Load 0x2,-0x1 1040 82d8 | | Call 0x1,0xd8 1041 c5fc | | Store 0x2,-0x4 1042 4504 |E | Exit_Suprogram New_Top_Offset 0x4 1043 0000 0000 | | .BLANK 0000[0x5] 1048 ; -------------------------------------------------------------------------------------- 1048 ; SUBPROGRAM 1048 ; -------------------------------------------------------------------------------------- 1048 104b | K | .CONST 0x104b ; Address of begin 1049 0004 | | .CONST 0x0004 ; Address of exception handler 104a 0001 | | .CONST 0x0001 ; Number of locals 104b BODY_1048: 104b INIT_1048: 104b 00db | | Load_Top At_Offset_3 104c 4801 |H | Short_Literal 0x1 104d e5ff | | Load 0x2,-0x1 104e 82d7 | | Call 0x1,0xd7 104f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1050 ; -------------------------------------------------------------------------------------- 1050 ; SUBPROGRAM 1050 ; -------------------------------------------------------------------------------------- 1050 1053 | S | .CONST 0x1053 ; Address of begin 1051 0004 | | .CONST 0x0004 ; Address of exception handler 1052 0001 | | .CONST 0x0001 ; Number of locals 1053 BODY_1050: 1053 INIT_1050: 1053 e5fc | | Load 0x2,-0x4 1054 e5fd | | Load 0x2,-0x3 1055 e5fe | | Load 0x2,-0x2 1056 4801 |H | Short_Literal 0x1 1057 e5ff | | Load 0x2,-0x1 1058 82d8 | | Call 0x1,0xd8 1059 c5fc | | Store 0x2,-0x4 105a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 105b 0000 0000 | | .BLANK 0000[0x5] 1060 ; -------------------------------------------------------------------------------------- 1060 ; SUBPROGRAM 1060 ; -------------------------------------------------------------------------------------- 1060 1063 | c | .CONST 0x1063 ; Address of begin 1061 0004 | | .CONST 0x0004 ; Address of exception handler 1062 0001 | | .CONST 0x0001 ; Number of locals 1063 BODY_1060: 1063 INIT_1060: 1063 00db | | Load_Top At_Offset_3 1064 4802 |H | Short_Literal 0x2 1065 e5ff | | Load 0x2,-0x1 1066 82d7 | | Call 0x1,0xd7 1067 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 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 e5fc | | Load 0x2,-0x4 106c e5fd | | Load 0x2,-0x3 106d e5fe | | Load 0x2,-0x2 106e 4802 |H | Short_Literal 0x2 106f e5ff | | Load 0x2,-0x1 1070 82d8 | | Call 0x1,0xd8 1071 c5fc | | Store 0x2,-0x4 1072 4504 |E | Exit_Suprogram New_Top_Offset 0x4 1073 0000 0000 | | .BLANK 0000[0x5] 1078 ; -------------------------------------------------------------------------------------- 1078 ; SUBPROGRAM 1078 ; -------------------------------------------------------------------------------------- 1078 107b | { | .CONST 0x107b ; Address of begin 1079 0004 | | .CONST 0x0004 ; Address of exception handler 107a 0001 | | .CONST 0x0001 ; Number of locals 107b BODY_1078: 107b INIT_1078: 107b 00db | | Load_Top At_Offset_3 107c 4803 |H | Short_Literal 0x3 107d e5ff | | Load 0x2,-0x1 107e 82d7 | | Call 0x1,0xd7 107f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 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 e5fc | | Load 0x2,-0x4 1084 e5fd | | Load 0x2,-0x3 1085 e5fe | | Load 0x2,-0x2 1086 4803 |H | Short_Literal 0x3 1087 e5ff | | Load 0x2,-0x1 1088 82d8 | | Call 0x1,0xd8 1089 c5fc | | Store 0x2,-0x4 108a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 108b 0000 0000 | | .BLANK 0000[0x5] 1090 ; -------------------------------------------------------------------------------------- 1090 ; SUBPROGRAM 1090 ; -------------------------------------------------------------------------------------- 1090 1093 | | .CONST 0x1093 ; Address of begin 1091 0004 | | .CONST 0x0004 ; Address of exception handler 1092 0001 | | .CONST 0x0001 ; Number of locals 1093 BODY_1090: 1093 INIT_1090: 1093 00da | | Load_Top At_Offset_2 1094 0217 | | Execute Heap_Access,All_Reference 1095 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 1096 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1097 0000 | | .XXX[0x1] 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 00db | | Load_Top At_Offset_3 109d 0217 | | Execute Heap_Access,All_Reference 109e 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 109f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 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 00db | | Load_Top At_Offset_3 10a4 4805 |H | Short_Literal 0x5 10a5 e5ff | | Load 0x2,-0x1 10a6 82d9 | | Call 0x1,0xd9 10a7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 10a8 ; -------------------------------------------------------------------------------------- 10a8 ; SUBPROGRAM 10a8 ; -------------------------------------------------------------------------------------- 10a8 10ab | | .CONST 0x10ab ; Address of begin 10a9 0004 | | .CONST 0x0004 ; Address of exception handler 10aa 0001 | | .CONST 0x0001 ; Number of locals 10ab BODY_10a8: 10ab INIT_10a8: 10ab e5fc | | Load 0x2,-0x4 10ac e5fd | | Load 0x2,-0x3 10ad e5fe | | Load 0x2,-0x2 10ae 4805 |H | Short_Literal 0x5 10af e5ff | | Load 0x2,-0x1 10b0 82da | | Call 0x1,0xda 10b1 c5fc | | Store 0x2,-0x4 10b2 4504 |E | Exit_Suprogram New_Top_Offset 0x4 10b3 0000 0000 | | .BLANK 0000[0x5] 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 00da | | Load_Top At_Offset_2 10bc 0217 | | Execute Heap_Access,All_Reference 10bd 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 10be e020 | | Load 0x0,0x20 10bf 1812 | | Execute Package,Field_Execute,Field_Number 0x12 10c0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 10c1 0000 0000 | | .BLANK 0000[0x7] 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 e5fe | | Load 0x2,-0x2 10cd e020 | | Load 0x0,0x20 10ce 180f | | Execute Package,Field_Execute,Field_Number 0xf 10cf 00db | | Load_Top At_Offset_3 10d0 0217 | | Execute Heap_Access,All_Reference 10d1 380a |8 | Execute Record,Field_Write,Field_Number 0xa 10d2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 10d3 0000 0000 | | .BLANK 0000[0x5] 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 4804 |H | Short_Literal 0x4 10dd e5ff | | Load 0x2,-0x1 10de 82d7 | | Call 0x1,0xd7 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 4804 |H | Short_Literal 0x4 10e7 e5ff | | Load 0x2,-0x1 10e8 82d8 | | Call 0x1,0xd8 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 00db | | Load_Top At_Offset_3 10f4 4806 |H | Short_Literal 0x6 10f5 e5ff | | Load 0x2,-0x1 10f6 82d9 | | Call 0x1,0xd9 10f7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 10f8 ; -------------------------------------------------------------------------------------- 10f8 ; SUBPROGRAM 10f8 ; -------------------------------------------------------------------------------------- 10f8 1100 | | .CONST 0x1100 ; Address of begin 10f9 0004 | | .CONST 0x0004 ; Address of exception handler 10fa 0003 | | .CONST 0x0003 ; Number of locals 10fb INIT_10f8: 10fb e01b | | Load 0x0,0x1b 10fc 1b16 | | Execute Package,Field_Read,Field_Number 0x16 10fd e002 | | Load 0x0,0x2 10fe 1b10 | | Execute Package,Field_Read,Field_Number 0x10 10ff 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1100 BODY_10f8: 1100 00d8 | | Load_Top At_Offset_0 1101 e01b | | Load 0x0,0x1b 1102 1b16 | | Execute Package,Field_Read,Field_Number 0x16 1103 4801 |H | Short_Literal 0x1 1104 e5fd | | Load 0x2,-0x3 1105 e5ff | | Load 0x2,-0x1 1106 82d5 | | Call 0x1,0xd5 1107 0033 | 3 | Store_Top Heap_Access,At_Offset_3 1108 0059 | Y | Store_Top Discrete,At_Offset_1 1109 00d8 | | Load_Top At_Offset_0 110a 7049 |pI | Jump_Nonzero 0x1154 110b e5fe | | Load 0x2,-0x2 110c 00da | | Load_Top At_Offset_2 110d 0217 | | Execute Heap_Access,All_Reference 110e 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 110f 027e | ~ | Execute Discrete,Not_Equal 1110 6842 |hB | Jump_Zero 0x1153 1111 e5ff | | Load 0x2,-0x1 1112 8224 | $ | Call 0x1,0x24 1113 7022 |p" | Jump_Nonzero 0x1136 1114 e5fe | | Load 0x2,-0x2 1115 00da | | Load_Top At_Offset_2 1116 0217 | | Execute Heap_Access,All_Reference 1117 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 1118 00d9 | | Load_Top At_Offset_1 1119 0217 | | Execute Heap_Access,All_Reference 111a 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 111b 680c |h | Jump_Zero 0x1128 111c 00d9 | | Load_Top At_Offset_1 111d 0219 | | Execute Heap_Access,All_Read 111e 00d8 | | Load_Top At_Offset_0 111f 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 1120 e5ff | | Load 0x2,-0x1 1121 4800 |H | Short_Literal 0x0 1122 e02b | + | Load 0x0,0x2b 1123 180e | | Execute Package,Field_Execute,Field_Number 0xe 1124 00d9 | | Load_Top At_Offset_1 1125 380a |8 | Execute Record,Field_Write,Field_Number 0xa 1126 00d1 | | Pop_Control Pop_Count_1 1127 4504 |E | Exit_Suprogram New_Top_Offset 0x4 1128 00d9 | | Load_Top At_Offset_1 1129 0219 | | Execute Heap_Access,All_Read 112a 00d8 | | Load_Top At_Offset_0 112b 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 112c e5ff | | Load 0x2,-0x1 112d e402 | | Load 0x2,0x2 112e 0217 | | Execute Heap_Access,All_Reference 112f 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 1130 e02b | + | Load 0x0,0x2b 1131 180e | | Execute Package,Field_Execute,Field_Number 0xe 1132 00d9 | | Load_Top At_Offset_1 1133 380a |8 | Execute Record,Field_Write,Field_Number 0xa 1134 00d1 | | Pop_Control Pop_Count_1 1135 4504 |E | Exit_Suprogram New_Top_Offset 0x4 1136 e002 | | Load 0x0,0x2 1137 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1138 4801 |H | Short_Literal 0x1 1139 4803 |H | Short_Literal 0x3 113a e00e | | Load 0x0,0xe 113b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 113c 0334 | 4 | Declare_Variable Array,With_Constraint 113d e5ff | | Load 0x2,-0x1 113e 825a | Z | Call 0x1,0x5a 113f 4801 |H | Short_Literal 0x1 1140 00da | | Load_Top At_Offset_2 1141 01d6 | | Execute Vector,Field_Write 1142 e5fd | | Load 0x2,-0x3 1143 e00c | | Load 0x0,0xc 1144 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1145 4802 |H | Short_Literal 0x2 1146 00da | | Load_Top At_Offset_2 1147 01d6 | | Execute Vector,Field_Write 1148 e5ff | | Load 0x2,-0x1 1149 8224 | $ | Call 0x1,0x24 114a e00e | | Load 0x0,0xe 114b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 114c 4803 |H | Short_Literal 0x3 114d 00da | | Load_Top At_Offset_2 114e 01d6 | | Execute Vector,Field_Write 114f 601c |` | Indirect_Literal Discrete,0x116c,{0x00000000, 0x00002835} 1150 e002 | | Load 0x0,0x2 1151 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1152 c5fc | | Store 0x2,-0x4 1153 4504 |E | Exit_Suprogram New_Top_Offset 0x4 1154 e002 | | Load 0x0,0x2 1155 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1156 4801 |H | Short_Literal 0x1 1157 4802 |H | Short_Literal 0x2 1158 e00e | | Load 0x0,0xe 1159 1b0f | | Execute Package,Field_Read,Field_Number 0xf 115a 0334 | 4 | Declare_Variable Array,With_Constraint 115b e5ff | | Load 0x2,-0x1 115c 825a | Z | Call 0x1,0x5a 115d 4801 |H | Short_Literal 0x1 115e 00da | | Load_Top At_Offset_2 115f 01d6 | | Execute Vector,Field_Write 1160 e5fd | | Load 0x2,-0x3 1161 e00c | | Load 0x0,0xc 1162 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1163 4802 |H | Short_Literal 0x2 1164 00da | | Load_Top At_Offset_2 1165 01d6 | | Execute Vector,Field_Write 1166 00da | | Load_Top At_Offset_2 1167 e002 | | Load 0x0,0x2 1168 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1169 c5fc | | Store 0x2,-0x4 116a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 116b 0000 | | .XXX[0x1] 116c 0000 0000 | | .LITERAL {0x00000000, 0x00002835} 1170 ; -------------------------------------------------------------------------------------- 1170 ; SUBPROGRAM 1170 ; -------------------------------------------------------------------------------------- 1170 1178 | x | .CONST 0x1178 ; Address of begin 1171 0004 | | .CONST 0x0004 ; Address of exception handler 1172 0003 | | .CONST 0x0003 ; Number of locals 1173 INIT_1170: 1173 e01b | | Load 0x0,0x1b 1174 1b16 | | Execute Package,Field_Read,Field_Number 0x16 1175 e002 | | Load 0x0,0x2 1176 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1177 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1178 BODY_1170: 1178 00d8 | | Load_Top At_Offset_0 1179 e01b | | Load 0x0,0x1b 117a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 117b 4800 |H | Short_Literal 0x0 117c e5fe | | Load 0x2,-0x2 117d e5ff | | Load 0x2,-0x1 117e 82d5 | | Call 0x1,0xd5 117f 0033 | 3 | Store_Top Heap_Access,At_Offset_3 1180 0059 | Y | Store_Top Discrete,At_Offset_1 1181 00d8 | | Load_Top At_Offset_0 1182 7009 |p | Jump_Nonzero 0x118c 1183 00d9 | | Load_Top At_Offset_1 1184 0217 | | Execute Heap_Access,All_Reference 1185 3c09 |< | Execute Record,Field_Read,Field_Number 0x9 1186 00d8 | | Load_Top At_Offset_0 1187 00e4 | | Load_Encached Positive_Cache 1188 0260 | ` | Execute Discrete,In_Type 1189 7001 |p | Jump_Nonzero 0x118b 118a 0801 | | Execute_Immediate Raise,0x1 118b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 118c 00d8 | | Load_Top At_Offset_0 118d 6022 |`" | Indirect_Literal Discrete,0x11b0,{0x00000000, 0x0000281c} 118e 027f | | Execute Discrete,Equal 118f 6807 |h | Jump_Zero 0x1197 1190 4800 |H | Short_Literal 0x0 1191 00d8 | | Load_Top At_Offset_0 1192 00e4 | | Load_Encached Positive_Cache 1193 0260 | ` | Execute Discrete,In_Type 1194 7001 |p | Jump_Nonzero 0x1196 1195 0801 | | Execute_Immediate Raise,0x1 1196 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1197 4801 |H | Short_Literal 0x1 1198 4802 |H | Short_Literal 0x2 1199 e00e | | Load 0x0,0xe 119a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 119b 0334 | 4 | Declare_Variable Array,With_Constraint 119c e5ff | | Load 0x2,-0x1 119d 825a | Z | Call 0x1,0x5a 119e 4801 |H | Short_Literal 0x1 119f 00da | | Load_Top At_Offset_2 11a0 01d6 | | Execute Vector,Field_Write 11a1 e5fe | | Load 0x2,-0x2 11a2 e00c | | Load 0x0,0xc 11a3 181c | | Execute Package,Field_Execute,Field_Number 0x1c 11a4 4802 |H | Short_Literal 0x2 11a5 00da | | Load_Top At_Offset_2 11a6 01d6 | | Execute Vector,Field_Write 11a7 00d9 | | Load_Top At_Offset_1 11a8 e002 | | Load 0x0,0x2 11a9 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 11aa 00d8 | | Load_Top At_Offset_0 11ab 00e4 | | Load_Encached Positive_Cache 11ac 0260 | ` | Execute Discrete,In_Type 11ad 7001 |p | Jump_Nonzero 0x11af 11ae 0801 | | Execute_Immediate Raise,0x1 11af 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 11b0 0000 0000 | | .LITERAL {0x00000000, 0x0000281c} 11b4 0000 0000 | | .BLANK 0000[0x4] 11b8 ; -------------------------------------------------------------------------------------- 11b8 ; SUBPROGRAM 11b8 ; -------------------------------------------------------------------------------------- 11b8 11c0 | | .CONST 0x11c0 ; Address of begin 11b9 0004 | | .CONST 0x0004 ; Address of exception handler 11ba 0003 | | .CONST 0x0003 ; Number of locals 11bb INIT_11b8: 11bb e01b | | Load 0x0,0x1b 11bc 1b16 | | Execute Package,Field_Read,Field_Number 0x16 11bd e002 | | Load 0x0,0x2 11be 1b10 | | Execute Package,Field_Read,Field_Number 0x10 11bf 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 11c0 BODY_11b8: 11c0 00d8 | | Load_Top At_Offset_0 11c1 4802 |H | Short_Literal 0x2 11c2 e5ff | | Load 0x2,-0x1 11c3 e01b | | Load 0x0,0x1b 11c4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 11c5 0059 | Y | Store_Top Discrete,At_Offset_1 11c6 00d8 | | Load_Top At_Offset_0 11c7 7021 |p! | Jump_Nonzero 0x11e9 11c8 00d8 | | Load_Top At_Offset_0 11c9 e01b | | Load 0x0,0x1b 11ca 1b16 | | Execute Package,Field_Read,Field_Number 0x16 11cb 4801 |H | Short_Literal 0x1 11cc e5fd | | Load 0x2,-0x3 11cd e5ff | | Load 0x2,-0x1 11ce 82d5 | | Call 0x1,0xd5 11cf 0033 | 3 | Store_Top Heap_Access,At_Offset_3 11d0 0059 | Y | Store_Top Discrete,At_Offset_1 11d1 00d8 | | Load_Top At_Offset_0 11d2 7016 |p | Jump_Nonzero 0x11e9 11d3 00d9 | | Load_Top At_Offset_1 11d4 0217 | | Execute Heap_Access,All_Reference 11d5 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 11d6 6803 |h | Jump_Zero 0x11da 11d7 6028 |`( | Indirect_Literal Discrete,0x1200,{0x00000000, 0x0000282f} 11d8 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 11d9 780f |x | Jump 0x11e9 11da e5fe | | Load 0x2,-0x2 11db 00da | | Load_Top At_Offset_2 11dc 0217 | | Execute Heap_Access,All_Reference 11dd 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 11de 00d9 | | Load_Top At_Offset_1 11df 0219 | | Execute Heap_Access,All_Read 11e0 00d8 | | Load_Top At_Offset_0 11e1 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 11e2 e5ff | | Load 0x2,-0x1 11e3 e5fe | | Load 0x2,-0x2 11e4 e02b | + | Load 0x0,0x2b 11e5 180e | | Execute Package,Field_Execute,Field_Number 0xe 11e6 00d9 | | Load_Top At_Offset_1 11e7 380a |8 | Execute Record,Field_Write,Field_Number 0xa 11e8 4504 |E | Exit_Suprogram New_Top_Offset 0x4 11e9 e002 | | Load 0x0,0x2 11ea 1b0d | | Execute Package,Field_Read,Field_Number 0xd 11eb 4801 |H | Short_Literal 0x1 11ec 4802 |H | Short_Literal 0x2 11ed e00e | | Load 0x0,0xe 11ee 1b0f | | Execute Package,Field_Read,Field_Number 0xf 11ef 0334 | 4 | Declare_Variable Array,With_Constraint 11f0 e5ff | | Load 0x2,-0x1 11f1 825a | Z | Call 0x1,0x5a 11f2 4801 |H | Short_Literal 0x1 11f3 00da | | Load_Top At_Offset_2 11f4 01d6 | | Execute Vector,Field_Write 11f5 e5fd | | Load 0x2,-0x3 11f6 e00c | | Load 0x0,0xc 11f7 181c | | Execute Package,Field_Execute,Field_Number 0x1c 11f8 4802 |H | Short_Literal 0x2 11f9 00da | | Load_Top At_Offset_2 11fa 01d6 | | Execute Vector,Field_Write 11fb 00da | | Load_Top At_Offset_2 11fc e002 | | Load 0x0,0x2 11fd 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 11fe c5fc | | Store 0x2,-0x4 11ff 4504 |E | Exit_Suprogram New_Top_Offset 0x4 1200 0000 0000 | | .LITERAL {0x00000000, 0x0000282f} 1204 0000 0000 | | .BLANK 0000[0x4] 1208 ; -------------------------------------------------------------------------------------- 1208 ; SUBPROGRAM 1208 ; -------------------------------------------------------------------------------------- 1208 1210 | | .CONST 0x1210 ; Address of begin 1209 0004 | | .CONST 0x0004 ; Address of exception handler 120a 0003 | | .CONST 0x0003 ; Number of locals 120b INIT_1208: 120b e01b | | Load 0x0,0x1b 120c 1b16 | | Execute Package,Field_Read,Field_Number 0x16 120d e002 | | Load 0x0,0x2 120e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 120f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1210 BODY_1208: 1210 00d8 | | Load_Top At_Offset_0 1211 4800 |H | Short_Literal 0x0 1212 e5ff | | Load 0x2,-0x1 1213 e01b | | Load 0x0,0x1b 1214 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1215 0059 | Y | Store_Top Discrete,At_Offset_1 1216 00d8 | | Load_Top At_Offset_0 1217 7017 |p | Jump_Nonzero 0x122f 1218 00d8 | | Load_Top At_Offset_0 1219 e01b | | Load 0x0,0x1b 121a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 121b 4800 |H | Short_Literal 0x0 121c e5fe | | Load 0x2,-0x2 121d e5ff | | Load 0x2,-0x1 121e 82d5 | | Call 0x1,0xd5 121f 0033 | 3 | Store_Top Heap_Access,At_Offset_3 1220 0059 | Y | Store_Top Discrete,At_Offset_1 1221 00d8 | | Load_Top At_Offset_0 1222 7006 |p | Jump_Nonzero 0x1229 1223 00d9 | | Load_Top At_Offset_1 1224 0217 | | Execute Heap_Access,All_Reference 1225 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 1226 e02b | + | Load 0x0,0x2b 1227 180f | | Execute Package,Field_Execute,Field_Number 0xf 1228 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1229 00d8 | | Load_Top At_Offset_0 122a 601d |` | Indirect_Literal Discrete,0x1248,{0x00000000, 0x0000281c} 122b 027f | | Execute Discrete,Equal 122c 6802 |h | Jump_Zero 0x122f 122d 4800 |H | Short_Literal 0x0 122e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 122f 4801 |H | Short_Literal 0x1 1230 4802 |H | Short_Literal 0x2 1231 e00e | | Load 0x0,0xe 1232 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1233 0334 | 4 | Declare_Variable Array,With_Constraint 1234 e5ff | | Load 0x2,-0x1 1235 825a | Z | Call 0x1,0x5a 1236 4801 |H | Short_Literal 0x1 1237 00da | | Load_Top At_Offset_2 1238 01d6 | | Execute Vector,Field_Write 1239 e5fe | | Load 0x2,-0x2 123a e00c | | Load 0x0,0xc 123b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 123c 4802 |H | Short_Literal 0x2 123d 00da | | Load_Top At_Offset_2 123e 01d6 | | Execute Vector,Field_Write 123f 00d9 | | Load_Top At_Offset_1 1240 e002 | | Load 0x0,0x2 1241 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 1242 00d8 | | Load_Top At_Offset_0 1243 00e3 | | Load_Encached Natural_Cache 1244 0260 | ` | Execute Discrete,In_Type 1245 7001 |p | Jump_Nonzero 0x1247 1246 0801 | | Execute_Immediate Raise,0x1 1247 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1248 0000 0000 | | .LITERAL {0x00000000, 0x0000281c} 124c 0000 0000 | | .BLANK 0000[0x4] 1250 ; -------------------------------------------------------------------------------------- 1250 ; SUBPROGRAM 1250 ; -------------------------------------------------------------------------------------- 1250 125a | Z | .CONST 0x125a ; Address of begin 1251 0004 | | .CONST 0x0004 ; Address of exception handler 1252 0004 | | .CONST 0x0004 ; Number of locals 1253 INIT_1250: 1253 e01b | | Load 0x0,0x1b 1254 1b16 | | Execute Package,Field_Read,Field_Number 0x16 1255 e002 | | Load 0x0,0x2 1256 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1257 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1258 029f 29db | ) | Declare_Subprogram INIT_29d8,For_Call 125a BODY_1250: 125a 00d9 | | Load_Top At_Offset_1 125b 4802 |H | Short_Literal 0x2 125c e5ff | | Load 0x2,-0x1 125d e01b | | Load 0x0,0x1b 125e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 125f 005a | Z | Store_Top Discrete,At_Offset_2 1260 00d9 | | Load_Top At_Offset_1 1261 7020 |p | Jump_Nonzero 0x1282 1262 00d9 | | Load_Top At_Offset_1 1263 e01b | | Load 0x0,0x1b 1264 1b16 | | Execute Package,Field_Read,Field_Number 0x16 1265 4801 |H | Short_Literal 0x1 1266 e5fc | | Load 0x2,-0x4 1267 e5ff | | Load 0x2,-0x1 1268 82d5 | | Call 0x1,0xd5 1269 c402 | | Store 0x2,0x2 126a 005a | Z | Store_Top Discrete,At_Offset_2 126b 00d9 | | Load_Top At_Offset_1 126c 7015 |p | Jump_Nonzero 0x1282 126d 00da | | Load_Top At_Offset_2 126e 0217 | | Execute Heap_Access,All_Reference 126f 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 1270 6802 |h | Jump_Zero 0x1273 1271 8404 | | Call 0x2,0x4 1272 780f |x | Jump 0x1282 1273 00da | | Load_Top At_Offset_2 1274 0219 | | Execute Heap_Access,All_Read 1275 00da | | Load_Top At_Offset_2 1276 00d9 | | Load_Top At_Offset_1 1277 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 1278 e5fe | | Load 0x2,-0x2 1279 e02b | + | Load 0x0,0x2b 127a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 127b 00da | | Load_Top At_Offset_2 127c 380a |8 | Execute Record,Field_Write,Field_Number 0xa 127d 005b | [ | Store_Top Discrete,At_Offset_3 127e 00d1 | | Pop_Control Pop_Count_1 127f 00d9 | | Load_Top At_Offset_1 1280 7001 |p | Jump_Nonzero 0x1282 1281 4505 |E | Exit_Suprogram New_Top_Offset 0x5 1282 e002 | | Load 0x0,0x2 1283 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1284 4801 |H | Short_Literal 0x1 1285 4802 |H | Short_Literal 0x2 1286 e00e | | Load 0x0,0xe 1287 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1288 0334 | 4 | Declare_Variable Array,With_Constraint 1289 e5ff | | Load 0x2,-0x1 128a 825a | Z | Call 0x1,0x5a 128b 4801 |H | Short_Literal 0x1 128c 00da | | Load_Top At_Offset_2 128d 01d6 | | Execute Vector,Field_Write 128e e5fc | | Load 0x2,-0x4 128f e00c | | Load 0x0,0xc 1290 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1291 4802 |H | Short_Literal 0x2 1292 00da | | Load_Top At_Offset_2 1293 01d6 | | Execute Vector,Field_Write 1294 00db | | Load_Top At_Offset_3 1295 e002 | | Load 0x0,0x2 1296 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1297 c5fb | | Store 0x2,-0x5 1298 4505 |E | Exit_Suprogram New_Top_Offset 0x5 1299 0000 0000 | | .BLANK 0000[0x7] 12a0 ; -------------------------------------------------------------------------------------- 12a0 ; SUBPROGRAM 12a0 ; -------------------------------------------------------------------------------------- 12a0 12ad | | .CONST 0x12ad ; Address of begin 12a1 0004 | | .CONST 0x0004 ; Address of exception handler 12a2 0004 | | .CONST 0x0004 ; Number of locals 12a3 INIT_12a0: 12a3 e01b | | Load 0x0,0x1b 12a4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 12a5 e002 | | Load 0x0,0x2 12a6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 12a7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 12a8 e004 | | Load 0x0,0x4 12a9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 12aa 02c7 | | Declare_Variable Any 12ab 00d8 | | Load_Top At_Offset_0 12ac 1c00 | | Execute_Immediate Run_Utility,0x0 12ad BODY_12a0: 12ad 00d9 | | Load_Top At_Offset_1 12ae 4800 |H | Short_Literal 0x0 12af e5ff | | Load 0x2,-0x1 12b0 e01b | | Load 0x0,0x1b 12b1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 12b2 005a | Z | Store_Top Discrete,At_Offset_2 12b3 00d9 | | Load_Top At_Offset_1 12b4 702d |p- | Jump_Nonzero 0x12e2 12b5 00d9 | | Load_Top At_Offset_1 12b6 e01b | | Load 0x0,0x1b 12b7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 12b8 4800 |H | Short_Literal 0x0 12b9 e5fd | | Load 0x2,-0x3 12ba e5ff | | Load 0x2,-0x1 12bb 82d5 | | Call 0x1,0xd5 12bc c402 | | Store 0x2,0x2 12bd 005a | Z | Store_Top Discrete,At_Offset_2 12be 00d9 | | Load_Top At_Offset_1 12bf 701b |p | Jump_Nonzero 0x12db 12c0 00da | | Load_Top At_Offset_2 12c1 0219 | | Execute Heap_Access,All_Read 12c2 00da | | Load_Top At_Offset_2 12c3 00da | | Load_Top At_Offset_2 12c4 0120 | | Execute Any,Is_Value 12c5 6803 |h | Jump_Zero 0x12c9 12c6 e004 | | Load 0x0,0x4 12c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 12c8 7801 |x | Jump 0x12ca 12c9 00da | | Load_Top At_Offset_2 12ca 00da | | Load_Top At_Offset_2 12cb 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 12cc e5fe | | Load 0x2,-0x2 12cd e02b | + | Load 0x0,0x2b 12ce 1811 | | Execute Package,Field_Execute,Field_Number 0x11 12cf 00db | | Load_Top At_Offset_3 12d0 380a |8 | Execute Record,Field_Write,Field_Number 0xa 12d1 c404 | | Store 0x2,0x4 12d2 005b | [ | Store_Top Discrete,At_Offset_3 12d3 00d1 | | Pop_Control Pop_Count_1 12d4 00d9 | | Load_Top At_Offset_1 12d5 7002 |p | Jump_Nonzero 0x12d8 12d6 00d8 | | Load_Top At_Offset_0 12d7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 12d8 e003 | | Load 0x0,0x3 12d9 180f | | Execute Package,Field_Execute,Field_Number 0xf 12da 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 12db 00d9 | | Load_Top At_Offset_1 12dc 601b |` | Indirect_Literal Discrete,0x12f8,{0x00000000, 0x0000281c} 12dd 027f | | Execute Discrete,Equal 12de 6803 |h | Jump_Zero 0x12e2 12df e003 | | Load 0x0,0x3 12e0 180f | | Execute Package,Field_Execute,Field_Number 0xf 12e1 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 12e2 4801 |H | Short_Literal 0x1 12e3 4802 |H | Short_Literal 0x2 12e4 e00e | | Load 0x0,0xe 12e5 1b0f | | Execute Package,Field_Read,Field_Number 0xf 12e6 0334 | 4 | Declare_Variable Array,With_Constraint 12e7 e5ff | | Load 0x2,-0x1 12e8 825a | Z | Call 0x1,0x5a 12e9 4801 |H | Short_Literal 0x1 12ea 00da | | Load_Top At_Offset_2 12eb 01d6 | | Execute Vector,Field_Write 12ec e5fd | | Load 0x2,-0x3 12ed e00c | | Load 0x0,0xc 12ee 181c | | Execute Package,Field_Execute,Field_Number 0x1c 12ef 4802 |H | Short_Literal 0x2 12f0 00da | | Load_Top At_Offset_2 12f1 01d6 | | Execute Vector,Field_Write 12f2 00da | | Load_Top At_Offset_2 12f3 e002 | | Load 0x0,0x2 12f4 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 12f5 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 12f6 0000 0000 | | .XXX[0x2] 12f8 0000 0000 | | .LITERAL {0x00000000, 0x0000281c} 12fc 0000 0000 | | .BLANK 0000[0x4] 1300 ; -------------------------------------------------------------------------------------- 1300 ; SUBPROGRAM 1300 ; -------------------------------------------------------------------------------------- 1300 130a | | .CONST 0x130a ; Address of begin 1301 0004 | | .CONST 0x0004 ; Address of exception handler 1302 0004 | | .CONST 0x0004 ; Number of locals 1303 INIT_1300: 1303 e01b | | Load 0x0,0x1b 1304 1b16 | | Execute Package,Field_Read,Field_Number 0x16 1305 e002 | | Load 0x0,0x2 1306 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1307 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1308 029f 29fb | ) | Declare_Subprogram INIT_29f8,For_Call 130a BODY_1300: 130a 00d9 | | Load_Top At_Offset_1 130b 4802 |H | Short_Literal 0x2 130c e5ff | | Load 0x2,-0x1 130d e01b | | Load 0x0,0x1b 130e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 130f 005a | Z | Store_Top Discrete,At_Offset_2 1310 00d9 | | Load_Top At_Offset_1 1311 7021 |p! | Jump_Nonzero 0x1333 1312 00d9 | | Load_Top At_Offset_1 1313 e01b | | Load 0x0,0x1b 1314 1b16 | | Execute Package,Field_Read,Field_Number 0x16 1315 4801 |H | Short_Literal 0x1 1316 e5fb | | Load 0x2,-0x5 1317 e5ff | | Load 0x2,-0x1 1318 82d5 | | Call 0x1,0xd5 1319 c402 | | Store 0x2,0x2 131a 005a | Z | Store_Top Discrete,At_Offset_2 131b 00d9 | | Load_Top At_Offset_1 131c 7016 |p | Jump_Nonzero 0x1333 131d 00da | | Load_Top At_Offset_2 131e 0217 | | Execute Heap_Access,All_Reference 131f 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 1320 6802 |h | Jump_Zero 0x1323 1321 8404 | | Call 0x2,0x4 1322 7810 |x | Jump 0x1333 1323 00da | | Load_Top At_Offset_2 1324 0219 | | Execute Heap_Access,All_Read 1325 00da | | Load_Top At_Offset_2 1326 00d9 | | Load_Top At_Offset_1 1327 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 1328 e5fe | | Load 0x2,-0x2 1329 e5fd | | Load 0x2,-0x3 132a e02b | + | Load 0x0,0x2b 132b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 132c 00da | | Load_Top At_Offset_2 132d 380a |8 | Execute Record,Field_Write,Field_Number 0xa 132e 005b | [ | Store_Top Discrete,At_Offset_3 132f 00d1 | | Pop_Control Pop_Count_1 1330 00d9 | | Load_Top At_Offset_1 1331 7001 |p | Jump_Nonzero 0x1333 1332 4506 |E | Exit_Suprogram New_Top_Offset 0x6 1333 e002 | | Load 0x0,0x2 1334 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1335 4801 |H | Short_Literal 0x1 1336 4802 |H | Short_Literal 0x2 1337 e00e | | Load 0x0,0xe 1338 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1339 0334 | 4 | Declare_Variable Array,With_Constraint 133a e5ff | | Load 0x2,-0x1 133b 825a | Z | Call 0x1,0x5a 133c 4801 |H | Short_Literal 0x1 133d 00da | | Load_Top At_Offset_2 133e 01d6 | | Execute Vector,Field_Write 133f e5fb | | Load 0x2,-0x5 1340 e00c | | Load 0x0,0xc 1341 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1342 4802 |H | Short_Literal 0x2 1343 00da | | Load_Top At_Offset_2 1344 01d6 | | Execute Vector,Field_Write 1345 00db | | Load_Top At_Offset_3 1346 e002 | | Load 0x0,0x2 1347 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1348 c5fa | | Store 0x2,-0x6 1349 4506 |E | Exit_Suprogram New_Top_Offset 0x6 134a 0000 0000 | | .BLANK 0000[0x6] 1350 ; -------------------------------------------------------------------------------------- 1350 ; SUBPROGRAM 1350 ; -------------------------------------------------------------------------------------- 1350 135a | Z | .CONST 0x135a ; Address of begin 1351 0004 | | .CONST 0x0004 ; Address of exception handler 1352 0004 | | .CONST 0x0004 ; Number of locals 1353 INIT_1350: 1353 e01b | | Load 0x0,0x1b 1354 1b16 | | Execute Package,Field_Read,Field_Number 0x16 1355 e002 | | Load 0x0,0x2 1356 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1357 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1358 029f 2a1b | * | Declare_Subprogram INIT_2a18,For_Call 135a BODY_1350: 135a 00d9 | | Load_Top At_Offset_1 135b 4802 |H | Short_Literal 0x2 135c e5ff | | Load 0x2,-0x1 135d e01b | | Load 0x0,0x1b 135e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 135f 005a | Z | Store_Top Discrete,At_Offset_2 1360 00d9 | | Load_Top At_Offset_1 1361 7020 |p | Jump_Nonzero 0x1382 1362 00d9 | | Load_Top At_Offset_1 1363 e01b | | Load 0x0,0x1b 1364 1b16 | | Execute Package,Field_Read,Field_Number 0x16 1365 4801 |H | Short_Literal 0x1 1366 e5fc | | Load 0x2,-0x4 1367 e5ff | | Load 0x2,-0x1 1368 82d5 | | Call 0x1,0xd5 1369 c402 | | Store 0x2,0x2 136a 005a | Z | Store_Top Discrete,At_Offset_2 136b 00d9 | | Load_Top At_Offset_1 136c 7015 |p | Jump_Nonzero 0x1382 136d 00da | | Load_Top At_Offset_2 136e 0217 | | Execute Heap_Access,All_Reference 136f 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 1370 6802 |h | Jump_Zero 0x1373 1371 8404 | | Call 0x2,0x4 1372 780f |x | Jump 0x1382 1373 00da | | Load_Top At_Offset_2 1374 0219 | | Execute Heap_Access,All_Read 1375 00da | | Load_Top At_Offset_2 1376 00d9 | | Load_Top At_Offset_1 1377 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 1378 e5fe | | Load 0x2,-0x2 1379 e02b | + | Load 0x0,0x2b 137a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 137b 00da | | Load_Top At_Offset_2 137c 380a |8 | Execute Record,Field_Write,Field_Number 0xa 137d 005b | [ | Store_Top Discrete,At_Offset_3 137e 00d1 | | Pop_Control Pop_Count_1 137f 00d9 | | Load_Top At_Offset_1 1380 7001 |p | Jump_Nonzero 0x1382 1381 4505 |E | Exit_Suprogram New_Top_Offset 0x5 1382 e002 | | Load 0x0,0x2 1383 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1384 4801 |H | Short_Literal 0x1 1385 4802 |H | Short_Literal 0x2 1386 e00e | | Load 0x0,0xe 1387 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1388 0334 | 4 | Declare_Variable Array,With_Constraint 1389 e5ff | | Load 0x2,-0x1 138a 825a | Z | Call 0x1,0x5a 138b 4801 |H | Short_Literal 0x1 138c 00da | | Load_Top At_Offset_2 138d 01d6 | | Execute Vector,Field_Write 138e e5fc | | Load 0x2,-0x4 138f e00c | | Load 0x0,0xc 1390 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1391 4802 |H | Short_Literal 0x2 1392 00da | | Load_Top At_Offset_2 1393 01d6 | | Execute Vector,Field_Write 1394 00db | | Load_Top At_Offset_3 1395 e002 | | Load 0x0,0x2 1396 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1397 c5fb | | Store 0x2,-0x5 1398 4505 |E | Exit_Suprogram New_Top_Offset 0x5 1399 0000 0000 | | .BLANK 0000[0x7] 13a0 ; -------------------------------------------------------------------------------------- 13a0 ; SUBPROGRAM 13a0 ; -------------------------------------------------------------------------------------- 13a0 13aa | | .CONST 0x13aa ; Address of begin 13a1 0004 | | .CONST 0x0004 ; Address of exception handler 13a2 0004 | | .CONST 0x0004 ; Number of locals 13a3 INIT_13a0: 13a3 e01b | | Load 0x0,0x1b 13a4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 13a5 e002 | | Load 0x0,0x2 13a6 1b10 | | Execute Package,Field_Read,Field_Number 0x10 13a7 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 13a8 029f 2a3b | *;| Declare_Subprogram INIT_2a38,For_Call 13aa BODY_13a0: 13aa 00d9 | | Load_Top At_Offset_1 13ab 4802 |H | Short_Literal 0x2 13ac e5ff | | Load 0x2,-0x1 13ad e01b | | Load 0x0,0x1b 13ae 1811 | | Execute Package,Field_Execute,Field_Number 0x11 13af 005a | Z | Store_Top Discrete,At_Offset_2 13b0 00d9 | | Load_Top At_Offset_1 13b1 7020 |p | Jump_Nonzero 0x13d2 13b2 00d9 | | Load_Top At_Offset_1 13b3 e01b | | Load 0x0,0x1b 13b4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 13b5 4801 |H | Short_Literal 0x1 13b6 e5fc | | Load 0x2,-0x4 13b7 e5ff | | Load 0x2,-0x1 13b8 82d5 | | Call 0x1,0xd5 13b9 c402 | | Store 0x2,0x2 13ba 005a | Z | Store_Top Discrete,At_Offset_2 13bb 00d9 | | Load_Top At_Offset_1 13bc 7015 |p | Jump_Nonzero 0x13d2 13bd 00da | | Load_Top At_Offset_2 13be 0217 | | Execute Heap_Access,All_Reference 13bf 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 13c0 6802 |h | Jump_Zero 0x13c3 13c1 8404 | | Call 0x2,0x4 13c2 780f |x | Jump 0x13d2 13c3 00da | | Load_Top At_Offset_2 13c4 0219 | | Execute Heap_Access,All_Read 13c5 00da | | Load_Top At_Offset_2 13c6 00d9 | | Load_Top At_Offset_1 13c7 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 13c8 e5fe | | Load 0x2,-0x2 13c9 e02b | + | Load 0x0,0x2b 13ca 1814 | | Execute Package,Field_Execute,Field_Number 0x14 13cb 00da | | Load_Top At_Offset_2 13cc 380a |8 | Execute Record,Field_Write,Field_Number 0xa 13cd 005b | [ | Store_Top Discrete,At_Offset_3 13ce 00d1 | | Pop_Control Pop_Count_1 13cf 00d9 | | Load_Top At_Offset_1 13d0 7001 |p | Jump_Nonzero 0x13d2 13d1 4505 |E | Exit_Suprogram New_Top_Offset 0x5 13d2 e002 | | Load 0x0,0x2 13d3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 13d4 4801 |H | Short_Literal 0x1 13d5 4802 |H | Short_Literal 0x2 13d6 e00e | | Load 0x0,0xe 13d7 1b0f | | Execute Package,Field_Read,Field_Number 0xf 13d8 0334 | 4 | Declare_Variable Array,With_Constraint 13d9 e5ff | | Load 0x2,-0x1 13da 825a | Z | Call 0x1,0x5a 13db 4801 |H | Short_Literal 0x1 13dc 00da | | Load_Top At_Offset_2 13dd 01d6 | | Execute Vector,Field_Write 13de e5fc | | Load 0x2,-0x4 13df e00c | | Load 0x0,0xc 13e0 181c | | Execute Package,Field_Execute,Field_Number 0x1c 13e1 4802 |H | Short_Literal 0x2 13e2 00da | | Load_Top At_Offset_2 13e3 01d6 | | Execute Vector,Field_Write 13e4 00db | | Load_Top At_Offset_3 13e5 e002 | | Load 0x0,0x2 13e6 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 13e7 c5fb | | Store 0x2,-0x5 13e8 4505 |E | Exit_Suprogram New_Top_Offset 0x5 13e9 0000 0000 | | .BLANK 0000[0x7] 13f0 ; -------------------------------------------------------------------------------------- 13f0 ; SUBPROGRAM 13f0 ; -------------------------------------------------------------------------------------- 13f0 13f3 | | .CONST 0x13f3 ; Address of begin 13f1 0004 | | .CONST 0x0004 ; Address of exception handler 13f2 0001 | | .CONST 0x0001 ; Number of locals 13f3 BODY_13f0: 13f3 INIT_13f0: 13f3 00da | | Load_Top At_Offset_2 13f4 e2db | | Load 0x1,0xdb 13f5 e2dc | | Load 0x1,0xdc 13f6 1ddd | | Execute_Immediate Reference_Lex_1,0xdd 13f7 1dde | | Execute_Immediate Reference_Lex_1,0xde 13f8 1ddf | | Execute_Immediate Reference_Lex_1,0xdf 13f9 e00e | | Load 0x0,0xe 13fa 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 13fb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 13fc 0000 0000 | | .BLANK 0000[0x4] 1400 ; -------------------------------------------------------------------------------------- 1400 ; SUBPROGRAM 1400 ; -------------------------------------------------------------------------------------- 1400 1403 | | .CONST 0x1403 ; Address of begin 1401 0004 | | .CONST 0x0004 ; Address of exception handler 1402 0001 | | .CONST 0x0001 ; Number of locals 1403 BODY_1400: 1403 INIT_1400: 1403 00da | | Load_Top At_Offset_2 1404 e2e3 | | Load 0x1,0xe3 1405 e2e4 | | Load 0x1,0xe4 1406 1de5 | | Execute_Immediate Reference_Lex_1,0xe5 1407 e2e6 | | Load 0x1,0xe6 1408 1de7 | | Execute_Immediate Reference_Lex_1,0xe7 1409 e00e | | Load 0x0,0xe 140a 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 140b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 140c 0000 0000 | | .BLANK 0000[0x4] 1410 ; -------------------------------------------------------------------------------------- 1410 ; SUBPROGRAM 1410 ; -------------------------------------------------------------------------------------- 1410 1413 | | .CONST 0x1413 ; Address of begin 1411 141b | | .CONST 0x141b ; Address of exception handler 1412 0001 | | .CONST 0x0001 ; Number of locals 1413 BODY_1410: 1413 INIT_1410: 1413 00da | | Load_Top At_Offset_2 1414 0217 | | Execute Heap_Access,All_Reference 1415 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 1416 e001 | | Load 0x0,0x1 1417 1b13 | | Execute Package,Field_Read,Field_Number 0x13 1418 0216 | | Execute Heap_Access,Convert 1419 8244 | D | Call 0x1,0x44 141a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 141b TRAP_1410: 141b 0007 | | Action Break_Optional 141c 00db | | Load_Top At_Offset_3 141d e01b | | Load 0x0,0x1b 141e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 141f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1420 ; -------------------------------------------------------------------------------------- 1420 ; SUBPROGRAM 1420 ; -------------------------------------------------------------------------------------- 1420 1426 | & | .CONST 0x1426 ; Address of begin 1421 0004 | | .CONST 0x0004 ; Address of exception handler 1422 0002 | | .CONST 0x0002 ; Number of locals 1423 INIT_1420: 1423 00db | | Load_Top At_Offset_3 1424 00db | | Load_Top At_Offset_3 1425 8276 | v | Call 0x1,0x76 1426 BODY_1420: 1426 e001 | | Load 0x0,0x1 1427 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1428 180e | | Execute Package,Field_Execute,Field_Number 0xe 1429 a5fd | | Store_Unchecked 0x2,-0x3 142a 00d8 | | Load_Top At_Offset_0 142b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 142c 7029 |p) | Jump_Nonzero 0x1456 142d 00d8 | | Load_Top At_Offset_0 142e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 142f 0b00 | | Execute_Immediate Case_Compare,0x0 1430 701e |p | Jump_Nonzero 0x144f 1431 0f01 | | Execute_Immediate Equal,0x1 1432 701e |p | Jump_Nonzero 0x1451 1433 4801 |H | Short_Literal 0x1 1434 00d9 | | Load_Top At_Offset_1 1435 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 1436 01d7 | | Execute Vector,Field_Read 1437 a5fd | | Store_Unchecked 0x2,-0x3 1438 e002 | | Load 0x0,0x2 1439 1b0d | | Execute Package,Field_Read,Field_Number 0xd 143a 4801 |H | Short_Literal 0x1 143b 4802 |H | Short_Literal 0x2 143c e00e | | Load 0x0,0xe 143d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 143e 0334 | 4 | Declare_Variable Array,With_Constraint 143f e5ff | | Load 0x2,-0x1 1440 e00e | | Load 0x0,0xe 1441 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1442 4801 |H | Short_Literal 0x1 1443 00da | | Load_Top At_Offset_2 1444 01d6 | | Execute Vector,Field_Write 1445 e5fe | | Load 0x2,-0x2 1446 825a | Z | Call 0x1,0x5a 1447 4802 |H | Short_Literal 0x2 1448 00da | | Load_Top At_Offset_2 1449 01d6 | | Execute Vector,Field_Write 144a 6011 |` | Indirect_Literal Discrete,0x145c,{0x00000000, 0x00002802} 144b e002 | | Load 0x0,0x2 144c 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 144d c5fc | | Store 0x2,-0x4 144e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 144f 00d1 | | Pop_Control Pop_Count_1 1450 7805 |x | Jump 0x1456 1451 4801 |H | Short_Literal 0x1 1452 00d9 | | Load_Top At_Offset_1 1453 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 1454 01d7 | | Execute Vector,Field_Read 1455 a5fd | | Store_Unchecked 0x2,-0x3 1456 00d8 | | Load_Top At_Offset_0 1457 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 1458 a5fc | | Store_Unchecked 0x2,-0x4 1459 4503 |E | Exit_Suprogram New_Top_Offset 0x3 145a 0000 0000 | | .XXX[0x2] 145c 0000 0000 | | .LITERAL {0x00000000, 0x00002802} 1460 ; -------------------------------------------------------------------------------------- 1460 ; SUBPROGRAM 1460 ; -------------------------------------------------------------------------------------- 1460 146c | l | .CONST 0x146c ; Address of begin 1461 0004 | | .CONST 0x0004 ; Address of exception handler 1462 0004 | | .CONST 0x0004 ; Number of locals 1463 INIT_1460: 1463 00da | | Load_Top At_Offset_2 1464 82b7 | | Call 0x1,0xb7 1465 00d8 | | Load_Top At_Offset_0 1466 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 1467 e002 | | Load 0x0,0x2 1468 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1469 03f1 | | Declare_Variable Discrete,With_Value 146a 029f 2a5b | *[| Declare_Subprogram INIT_2a58,For_Call 146c BODY_1460: 146c 00d9 | | Load_Top At_Offset_1 146d 700c |p | Jump_Nonzero 0x147a 146e 00da | | Load_Top At_Offset_2 146f 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 1470 7008 |p | Jump_Nonzero 0x1479 1471 6032 |`2 | Indirect_Literal Discrete,0x14a4,{0x00000000, 0x0000282d} 1472 602d |`- | Indirect_Literal Discrete,0x14a0,{0x00000000, 0x0000282c} 1473 6028 |`( | Indirect_Literal Discrete,0x149c,{0x00000000, 0x0000282b} 1474 e5fe | | Load 0x2,-0x2 1475 e402 | | Load 0x2,0x2 1476 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1477 802c | , | Call 0x0,0x2c 1478 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1479 8404 | | Call 0x2,0x4 147a 4800 |H | Short_Literal 0x0 147b e001 | | Load 0x0,0x1 147c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 147d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 147e 1c08 | | Execute_Immediate Run_Utility,0x8 147f 00da | | Load_Top At_Offset_2 1480 00d9 | | Load_Top At_Offset_1 1481 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 1482 4801 |H | Short_Literal 0x1 1483 4800 |H | Short_Literal 0x0 1484 e001 | | Load 0x0,0x1 1485 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1486 1b13 | | Execute Package,Field_Read,Field_Number 0x13 1487 0334 | 4 | Declare_Variable Array,With_Constraint 1488 00d9 | | Load_Top At_Offset_1 1489 00d8 | | Load_Top At_Offset_0 148a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 148b 00da | | Load_Top At_Offset_2 148c 01da | | Execute Vector,Bounds 148d 00da | | Load_Top At_Offset_2 148e 01da | | Execute Vector,Bounds 148f 00da | | Load_Top At_Offset_2 1490 027f | | Execute Discrete,Equal 1491 7001 |p | Jump_Nonzero 0x1493 1492 08e0 | | Execute_Immediate Raise,0xe0 1493 00cd | | Action Spare6_Action 1494 027f | | Execute Discrete,Equal 1495 7001 |p | Jump_Nonzero 0x1497 1496 08e0 | | Execute_Immediate Raise,0xe0 1497 00d2 | | Pop_Control Pop_Count_2 1498 00d9 | | Load_Top At_Offset_1 1499 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 149a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 149b 0000 | | .XXX[0x1] 149c 0000 0000 | | .LITERAL {0x00000000, 0x0000282b} 14a0 0000 0000 | | .LITERAL {0x00000000, 0x0000282c} 14a4 0000 0000 | | .LITERAL {0x00000000, 0x0000282d} 14a8 ; -------------------------------------------------------------------------------------- 14a8 ; SUBPROGRAM 14a8 ; -------------------------------------------------------------------------------------- 14a8 14ab | | .CONST 0x14ab ; Address of begin 14a9 0004 | | .CONST 0x0004 ; Address of exception handler 14aa 0001 | | .CONST 0x0001 ; Number of locals 14ab BODY_14a8: 14ab INIT_14a8: 14ab 00da | | Load_Top At_Offset_2 14ac e02d | - | Load 0x0,0x2d 14ad 1811 | | Execute Package,Field_Execute,Field_Number 0x11 14ae e01b | | Load 0x0,0x1b 14af 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 14b0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 14b1 0000 0000 | | .BLANK 0000[0x7] 14b8 ; -------------------------------------------------------------------------------------- 14b8 ; SUBPROGRAM 14b8 ; -------------------------------------------------------------------------------------- 14b8 14bb | | .CONST 0x14bb ; Address of begin 14b9 0004 | | .CONST 0x0004 ; Address of exception handler 14ba 0001 | | .CONST 0x0001 ; Number of locals 14bb BODY_14b8: 14bb INIT_14b8: 14bb 00da | | Load_Top At_Offset_2 14bc e02e | . | Load 0x0,0x2e 14bd 1811 | | Execute Package,Field_Execute,Field_Number 0x11 14be e01b | | Load 0x0,0x1b 14bf 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 14c0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 14c1 0000 0000 | | .BLANK 0000[0x7] 14c8 ; -------------------------------------------------------------------------------------- 14c8 ; SUBPROGRAM 14c8 ; -------------------------------------------------------------------------------------- 14c8 14cb | | .CONST 0x14cb ; Address of begin 14c9 0004 | | .CONST 0x0004 ; Address of exception handler 14ca 0001 | | .CONST 0x0001 ; Number of locals 14cb BODY_14c8: 14cb INIT_14c8: 14cb 00da | | Load_Top At_Offset_2 14cc e00f | | Load 0x0,0xf 14cd 1811 | | Execute Package,Field_Execute,Field_Number 0x11 14ce e01b | | Load 0x0,0x1b 14cf 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 14d0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 14d1 0000 0000 | | .BLANK 0000[0x7] 14d8 ; -------------------------------------------------------------------------------------- 14d8 ; SUBPROGRAM 14d8 ; -------------------------------------------------------------------------------------- 14d8 14df | | .CONST 0x14df ; Address of begin 14d9 0004 | | .CONST 0x0004 ; Address of exception handler 14da 0004 | | .CONST 0x0004 ; Number of locals 14db INIT_14d8: 14db e01b | | Load 0x0,0x1b 14dc 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 14dd 039d | | Declare_Variable Heap_Access,Duplicate 14de 039d | | Declare_Variable Heap_Access,Duplicate 14df BODY_14d8: 14df e5ff | | Load 0x2,-0x1 14e0 0217 | | Execute Heap_Access,All_Reference 14e1 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 14e2 7005 |p | Jump_Nonzero 0x14e8 14e3 e5fe | | Load 0x2,-0x2 14e4 0217 | | Execute Heap_Access,All_Reference 14e5 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 14e6 0032 | 2 | Store_Top Heap_Access,At_Offset_2 14e7 7811 |x | Jump 0x14f9 14e8 e5ff | | Load 0x2,-0x1 14e9 0217 | | Execute Heap_Access,All_Reference 14ea 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 14eb 6807 |h | Jump_Zero 0x14f3 14ec e5ff | | Load 0x2,-0x1 14ed 0217 | | Execute Heap_Access,All_Reference 14ee 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 14ef 0217 | | Execute Heap_Access,All_Reference 14f0 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 14f1 0032 | 2 | Store_Top Heap_Access,At_Offset_2 14f2 7806 |x | Jump 0x14f9 14f3 e5ff | | Load 0x2,-0x1 14f4 0217 | | Execute Heap_Access,All_Reference 14f5 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 14f6 0217 | | Execute Heap_Access,All_Reference 14f7 3c15 |< | Execute Record,Field_Read,Field_Number 0x15 14f8 0032 | 2 | Store_Top Heap_Access,At_Offset_2 14f9 00cf | | Action Mark_Auxiliary 14fa 7852 |xR | Jump 0x154d 14fb 00da | | Load_Top At_Offset_2 14fc 0217 | | Execute Heap_Access,All_Reference 14fd 3c14 |< | Execute Record,Field_Read,Field_Number 0x14 14fe 0032 | 2 | Store_Top Heap_Access,At_Offset_2 14ff 00da | | Load_Top At_Offset_2 1500 e001 | | Load 0x0,0x1 1501 1b10 | | Execute Package,Field_Read,Field_Number 0x10 1502 0216 | | Execute Heap_Access,Convert 1503 e5ff | | Load 0x2,-0x1 1504 021f | | Execute Heap_Access,Equal 1505 6842 |hB | Jump_Zero 0x1548 1506 00db | | Load_Top At_Offset_3 1507 7023 |p# | Jump_Nonzero 0x152b 1508 e5ff | | Load 0x2,-0x1 1509 0217 | | Execute Heap_Access,All_Reference 150a 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 150b 7005 |p | Jump_Nonzero 0x1511 150c 00d9 | | Load_Top At_Offset_1 150d e5fe | | Load 0x2,-0x2 150e 0217 | | Execute Heap_Access,All_Reference 150f 380f |8 | Execute Record,Field_Write,Field_Number 0xf 1510 781e |x | Jump 0x152f 1511 e5ff | | Load 0x2,-0x1 1512 0217 | | Execute Heap_Access,All_Reference 1513 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 1514 680f |h | Jump_Zero 0x1524 1515 00d9 | | Load_Top At_Offset_1 1516 e5ff | | Load 0x2,-0x1 1517 0217 | | Execute Heap_Access,All_Reference 1518 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 1519 0217 | | Execute Heap_Access,All_Reference 151a 3816 |8 | Execute Record,Field_Write,Field_Number 0x16 151b 00d9 | | Load_Top At_Offset_1 151c 7012 |p | Jump_Nonzero 0x152f 151d 4800 |H | Short_Literal 0x0 151e e5ff | | Load 0x2,-0x1 151f 0217 | | Execute Heap_Access,All_Reference 1520 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 1521 0217 | | Execute Heap_Access,All_Reference 1522 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 1523 780b |x | Jump 0x152f 1524 00d9 | | Load_Top At_Offset_1 1525 e5ff | | Load 0x2,-0x1 1526 0217 | | Execute Heap_Access,All_Reference 1527 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 1528 0217 | | Execute Heap_Access,All_Reference 1529 3815 |8 | Execute Record,Field_Write,Field_Number 0x15 152a 7804 |x | Jump 0x152f 152b 00d9 | | Load_Top At_Offset_1 152c e402 | | Load 0x2,0x2 152d 0217 | | Execute Heap_Access,All_Reference 152e 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 152f e01b | | Load 0x0,0x1b 1530 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 1531 e5ff | | Load 0x2,-0x1 1532 0217 | | Execute Heap_Access,All_Reference 1533 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 1534 4800 |H | Short_Literal 0x0 1535 e5ff | | Load 0x2,-0x1 1536 0217 | | Execute Heap_Access,All_Reference 1537 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 1538 e5ff | | Load 0x2,-0x1 1539 0217 | | Execute Heap_Access,All_Reference 153a 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 153b 680b |h | Jump_Zero 0x1547 153c 4800 |H | Short_Literal 0x0 153d e5ff | | Load 0x2,-0x1 153e 0217 | | Execute Heap_Access,All_Reference 153f 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 1540 e5fe | | Load 0x2,-0x2 1541 0217 | | Execute Heap_Access,All_Reference 1542 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 1543 0aff | | Execute_Immediate Plus,-0x1 1544 e5fe | | Load 0x2,-0x2 1545 0217 | | Execute Heap_Access,All_Reference 1546 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 1547 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1548 00da | | Load_Top At_Offset_2 1549 a402 | | Store_Unchecked 0x2,0x2 154a 00d9 | | Load_Top At_Offset_1 154b 0033 | 3 | Store_Top Heap_Access,At_Offset_3 154c 00c9 | | Action Pop_Auxiliary_Loop 154d 00da | | Load_Top At_Offset_2 154e 77ac |w | Jump_Nonzero 0x14fb 154f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1550 ; -------------------------------------------------------------------------------------- 1550 ; SUBPROGRAM 1550 ; -------------------------------------------------------------------------------------- 1550 1553 | S | .CONST 0x1553 ; Address of begin 1551 0004 | | .CONST 0x0004 ; Address of exception handler 1552 0001 | | .CONST 0x0001 ; Number of locals 1553 BODY_1550: 1553 INIT_1550: 1553 00da | | Load_Top At_Offset_2 1554 0217 | | Execute Heap_Access,All_Reference 1555 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 1556 700e |p | Jump_Nonzero 0x1565 1557 00db | | Load_Top At_Offset_3 1558 0217 | | Execute Heap_Access,All_Reference 1559 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 155a 00db | | Load_Top At_Offset_3 155b 0217 | | Execute Heap_Access,All_Reference 155c 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 155d 00da | | Load_Top At_Offset_2 155e e01b | | Load 0x0,0x1b 155f 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 1560 0216 | | Execute Heap_Access,Convert 1561 e5fe | | Load 0x2,-0x2 1562 0217 | | Execute Heap_Access,All_Reference 1563 380f |8 | Execute Record,Field_Write,Field_Number 0xf 1564 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1565 00da | | Load_Top At_Offset_2 1566 0217 | | Execute Heap_Access,All_Reference 1567 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 1568 6818 |h | Jump_Zero 0x1581 1569 00da | | Load_Top At_Offset_2 156a 0217 | | Execute Heap_Access,All_Reference 156b 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 156c 0217 | | Execute Heap_Access,All_Reference 156d 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 156e 00db | | Load_Top At_Offset_3 156f 0217 | | Execute Heap_Access,All_Reference 1570 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 1571 00da | | Load_Top At_Offset_2 1572 e01b | | Load 0x0,0x1b 1573 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 1574 0216 | | Execute Heap_Access,Convert 1575 00db | | Load_Top At_Offset_3 1576 0217 | | Execute Heap_Access,All_Reference 1577 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 1578 0217 | | Execute Heap_Access,All_Reference 1579 3816 |8 | Execute Record,Field_Write,Field_Number 0x16 157a 4801 |H | Short_Literal 0x1 157b 00db | | Load_Top At_Offset_3 157c 0217 | | Execute Heap_Access,All_Reference 157d 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 157e 0217 | | Execute Heap_Access,All_Reference 157f 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 1580 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1581 00da | | Load_Top At_Offset_2 1582 0217 | | Execute Heap_Access,All_Reference 1583 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 1584 0217 | | Execute Heap_Access,All_Reference 1585 3c15 |< | Execute Record,Field_Read,Field_Number 0x15 1586 00db | | Load_Top At_Offset_3 1587 0217 | | Execute Heap_Access,All_Reference 1588 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 1589 00da | | Load_Top At_Offset_2 158a e01b | | Load 0x0,0x1b 158b 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 158c 0216 | | Execute Heap_Access,Convert 158d 00db | | Load_Top At_Offset_3 158e 0217 | | Execute Heap_Access,All_Reference 158f 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 1590 0217 | | Execute Heap_Access,All_Reference 1591 3815 |8 | Execute Record,Field_Write,Field_Number 0x15 1592 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1593 0000 0000 | | .BLANK 0000[0x5] 1598 ; -------------------------------------------------------------------------------------- 1598 ; SUBPROGRAM 1598 ; -------------------------------------------------------------------------------------- 1598 159b | | .CONST 0x159b ; Address of begin 1599 0004 | | .CONST 0x0004 ; Address of exception handler 159a 0001 | | .CONST 0x0001 ; Number of locals 159b BODY_1598: 159b INIT_1598: 159b 4607 |F | Jump_Case 0x8 159c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 159d 7806 |x | Jump 0x15a4 ; case 0x1 159e 7809 |x | Jump 0x15a8 ; case 0x2 159f 780d |x | Jump 0x15ad ; case 0x3 15a0 7810 |x | Jump 0x15b1 ; case 0x4 15a1 7811 |x | Jump 0x15b3 ; case 0x5 15a2 7812 |x | Jump 0x15b5 ; case 0x6 15a3 7815 |x | Jump 0x15b9 ; case 0x7 15a4 00da | | Load_Top At_Offset_2 15a5 0091 2b4a | +J| Action Push_String_Extended_Indexed,0x2b4a ; "TARGET_MACHINE_FIELD" 15a7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 15a8 00db | | Load_Top At_Offset_3 15a9 00db | | Load_Top At_Offset_3 15aa 00e0 | | Load_Encached Standard_Cache 15ab 181b | | Execute Package,Field_Execute,Field_Number 0x1b 15ac 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 15ad 00da | | Load_Top At_Offset_2 15ae 00e0 | | Load_Encached Standard_Cache 15af 181c | | Execute Package,Field_Execute,Field_Number 0x1c 15b0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 15b1 00db | | Load_Top At_Offset_3 15b2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 15b3 00db | | Load_Top At_Offset_3 15b4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 15b5 e297 | | Load 0x1,0x97 15b6 00dc | | Load_Top At_Offset_4 15b7 0267 | g | Execute Discrete,Predecessor 15b8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 15b9 e297 | | Load 0x1,0x97 15ba 00dc | | Load_Top At_Offset_4 15bb 0268 | h | Execute Discrete,Successor 15bc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 15bd 0000 0000 | | .XXX[0x3] 15bf 0000 | | 15c0 ; -------------------------------------------------------------------------------------- 15c0 ; SUBPROGRAM 15c0 ; -------------------------------------------------------------------------------------- 15c0 15c3 | | .CONST 0x15c3 ; Address of begin 15c1 0004 | | .CONST 0x0004 ; Address of exception handler 15c2 0001 | | .CONST 0x0001 ; Number of locals 15c3 BODY_15c0: 15c3 INIT_15c0: 15c3 4607 |F | Jump_Case 0x8 15c4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 15c5 7806 |x | Jump 0x15cc ; case 0x1 15c6 7809 |x | Jump 0x15d0 ; case 0x2 15c7 780d |x | Jump 0x15d5 ; case 0x3 15c8 7810 |x | Jump 0x15d9 ; case 0x4 15c9 7811 |x | Jump 0x15db ; case 0x5 15ca 7812 |x | Jump 0x15dd ; case 0x6 15cb 7815 |x | Jump 0x15e1 ; case 0x7 15cc 00da | | Load_Top At_Offset_2 15cd 0091 2b51 | +Q| Action Push_String_Extended_Indexed,0x2b51 ; "C" 15cf 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 15d0 00db | | Load_Top At_Offset_3 15d1 00db | | Load_Top At_Offset_3 15d2 00e0 | | Load_Encached Standard_Cache 15d3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 15d4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 15d5 00da | | Load_Top At_Offset_2 15d6 00e0 | | Load_Encached Standard_Cache 15d7 181c | | Execute Package,Field_Execute,Field_Number 0x1c 15d8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 15d9 00db | | Load_Top At_Offset_3 15da 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 15db 00db | | Load_Top At_Offset_3 15dc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 15dd e29b | | Load 0x1,0x9b 15de 00dc | | Load_Top At_Offset_4 15df 0267 | g | Execute Discrete,Predecessor 15e0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 15e1 e29b | | Load 0x1,0x9b 15e2 00dc | | Load_Top At_Offset_4 15e3 0268 | h | Execute Discrete,Successor 15e4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 15e5 0000 0000 | | .XXX[0x3] 15e7 0000 | | 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 2b64 | +d| Action Push_String_Extended_Indexed,0x2b64 ; "BASIC_FRESH" 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 e2a0 | | Load 0x1,0xa0 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 e2a0 | | Load 0x1,0xa0 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 2b69 | +i| Action Push_String_Extended_Indexed,0x2b69 ; "SEPARATE_GENERIC_BODIES" 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 e2a1 | | Load 0x1,0xa1 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 e2a1 | | Load 0x1,0xa1 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 2b6d | +m| Action Push_String_Extended_Indexed,0x2b6d ; "NIL" 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 e2a5 | | Load 0x1,0xa5 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 e2a5 | | Load 0x1,0xa5 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 ; 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 BODY_1660: 1663 INIT_1660: 1663 INIT_1660: 1663 4608 |F | Jump_Case 0x9 1664 7808 |x | Jump 0x166d ; case 0x0 1665 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 1666 78cd |x | Jump 0x1734 ; case 0x2 1667 78cc |x | Jump 0x1734 ; case 0x3 1668 78cb |x | Jump 0x1734 ; case 0x4 1669 78ca |x | Jump 0x1734 ; case 0x5 166a 782c |x, | Jump 0x1697 ; case 0x6 166b 785b |x[ | Jump 0x16c7 ; case 0x7 166c 789f |x | Jump 0x170c ; case 0x8 166d 00da | | Load_Top At_Offset_2 166e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 166f 4615 |F | Jump_Case 0x16 1670 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 1671 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 1672 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 1673 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 1674 7811 |x | Jump 0x1686 ; case 0x4 1675 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 1676 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6 1677 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7 1678 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8 1679 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x9 167a 7811 |x | Jump 0x168c ; case 0xa 167b 7810 |x | Jump 0x168c ; case 0xb 167c 780f |x | Jump 0x168c ; case 0xc 167d 780e |x | Jump 0x168c ; case 0xd 167e 780d |x | Jump 0x168c ; case 0xe 167f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0xf 1680 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x10 1681 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x11 1682 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x12 1683 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x13 1684 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x14 1685 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x15 1686 00da | | Load_Top At_Offset_2 1687 2206 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x6 1688 00da | | Load_Top At_Offset_2 1689 2606 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x6 168a 1c00 | | Execute_Immediate Run_Utility,0x0 168b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 168c 00da | | Load_Top At_Offset_2 168d 220c |" | Execute Variant_Record,Field_Constrain,Field_Number 0xc 168e 00da | | Load_Top At_Offset_2 168f 260c |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xc 1690 1c00 | | Execute_Immediate Run_Utility,0x0 1691 00da | | Load_Top At_Offset_2 1692 220d |" | Execute Variant_Record,Field_Constrain,Field_Number 0xd 1693 00da | | Load_Top At_Offset_2 1694 260d |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xd 1695 1c00 | | Execute_Immediate Run_Utility,0x0 1696 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 1697 e5fd | | Load 0x2,-0x3 1698 4615 |F | Jump_Case 0x16 1699 782b |x+ | Jump 0x16c5 ; case 0x0 169a 7816 |x | Jump 0x16b1 ; case 0x1 169b 7815 |x | Jump 0x16b1 ; case 0x2 169c 7814 |x | Jump 0x16b1 ; case 0x3 169d 7815 |x | Jump 0x16b3 ; case 0x4 169e 7816 |x | Jump 0x16b5 ; case 0x5 169f 7817 |x | Jump 0x16b7 ; case 0x6 16a0 7818 |x | Jump 0x16b9 ; case 0x7 16a1 7819 |x | Jump 0x16bb ; case 0x8 16a2 781a |x | Jump 0x16bd ; case 0x9 16a3 781b |x | Jump 0x16bf ; case 0xa 16a4 781a |x | Jump 0x16bf ; case 0xb 16a5 7819 |x | Jump 0x16bf ; case 0xc 16a6 7818 |x | Jump 0x16bf ; case 0xd 16a7 7817 |x | Jump 0x16bf ; case 0xe 16a8 7818 |x | Jump 0x16c1 ; case 0xf 16a9 7817 |x | Jump 0x16c1 ; case 0x10 16aa 7816 |x | Jump 0x16c1 ; case 0x11 16ab 7815 |x | Jump 0x16c1 ; case 0x12 16ac 7816 |x | Jump 0x16c3 ; case 0x13 16ad 7815 |x | Jump 0x16c3 ; case 0x14 16ae 7800 |x | Jump 0x16af ; case 0x15 16af 480b |H | Short_Literal 0xb 16b0 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 16b1 4801 |H | Short_Literal 0x1 16b2 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 16b3 4802 |H | Short_Literal 0x2 16b4 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 16b5 4803 |H | Short_Literal 0x3 16b6 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 16b7 4804 |H | Short_Literal 0x4 16b8 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 16b9 4805 |H | Short_Literal 0x5 16ba 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 16bb 4806 |H | Short_Literal 0x6 16bc 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 16bd 4807 |H | Short_Literal 0x7 16be 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 16bf 4808 |H | Short_Literal 0x8 16c0 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 16c1 4809 |H | Short_Literal 0x9 16c2 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 16c3 480a |H | Short_Literal 0xa 16c4 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 16c5 48ff |H | Short_Literal 0xff 16c6 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 16c7 e5fd | | Load 0x2,-0x3 16c8 e5fe | | Load 0x2,-0x2 16c9 4800 |H | Short_Literal 0x0 16ca e5fe | | Load 0x2,-0x2 16cb e00c | | Load 0x0,0xc 16cc 1b18 | | Execute Package,Field_Read,Field_Number 0x18 16cd 035b | [ | Declare_Type Array,Constrained 16ce e5fd | | Load 0x2,-0x3 16cf 4615 |F | Jump_Case 0x16 16d0 7818 |x | Jump 0x16e9 ; case 0x0 16d1 781a |x | Jump 0x16ec ; case 0x1 16d2 7819 |x | Jump 0x16ec ; case 0x2 16d3 7818 |x | Jump 0x16ec ; case 0x3 16d4 781a |x | Jump 0x16ef ; case 0x4 16d5 781c |x | Jump 0x16f2 ; case 0x5 16d6 781e |x | Jump 0x16f5 ; case 0x6 16d7 7820 |x | Jump 0x16f8 ; case 0x7 16d8 7822 |x" | Jump 0x16fb ; case 0x8 16d9 7824 |x$ | Jump 0x16fe ; case 0x9 16da 7826 |x& | Jump 0x1701 ; case 0xa 16db 7825 |x% | Jump 0x1701 ; case 0xb 16dc 7824 |x$ | Jump 0x1701 ; case 0xc 16dd 7823 |x# | Jump 0x1701 ; case 0xd 16de 7822 |x" | Jump 0x1701 ; case 0xe 16df 7824 |x$ | Jump 0x1704 ; case 0xf 16e0 7823 |x# | Jump 0x1704 ; case 0x10 16e1 7822 |x" | Jump 0x1704 ; case 0x11 16e2 7821 |x! | Jump 0x1704 ; case 0x12 16e3 7823 |x# | Jump 0x1707 ; case 0x13 16e4 7822 |x" | Jump 0x1707 ; case 0x14 16e5 7800 |x | Jump 0x16e6 ; case 0x15 16e6 4801 |H | Short_Literal 0x1 16e7 480b |H | Short_Literal 0xb 16e8 7820 |x | Jump 0x1709 16e9 4801 |H | Short_Literal 0x1 16ea 48ff |H | Short_Literal 0xff 16eb 781d |x | Jump 0x1709 16ec 4801 |H | Short_Literal 0x1 16ed 4801 |H | Short_Literal 0x1 16ee 781a |x | Jump 0x1709 16ef 4801 |H | Short_Literal 0x1 16f0 4802 |H | Short_Literal 0x2 16f1 7817 |x | Jump 0x1709 16f2 4801 |H | Short_Literal 0x1 16f3 4803 |H | Short_Literal 0x3 16f4 7814 |x | Jump 0x1709 16f5 4801 |H | Short_Literal 0x1 16f6 4804 |H | Short_Literal 0x4 16f7 7811 |x | Jump 0x1709 16f8 4801 |H | Short_Literal 0x1 16f9 4805 |H | Short_Literal 0x5 16fa 780e |x | Jump 0x1709 16fb 4801 |H | Short_Literal 0x1 16fc 4806 |H | Short_Literal 0x6 16fd 780b |x | Jump 0x1709 16fe 4801 |H | Short_Literal 0x1 16ff 4807 |H | Short_Literal 0x7 1700 7808 |x | Jump 0x1709 1701 4801 |H | Short_Literal 0x1 1702 4808 |H | Short_Literal 0x8 1703 7805 |x | Jump 0x1709 1704 4801 |H | Short_Literal 0x1 1705 4809 |H | Short_Literal 0x9 1706 7802 |x | Jump 0x1709 1707 4801 |H | Short_Literal 0x1 1708 480a |H | Short_Literal 0xa 1709 e5ff | | Load 0x2,-0x1 170a 031b | | Declare_Type Variant_Record,Constrained 170b 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 170c e5fd | | Load 0x2,-0x3 170d e5fe | | Load 0x2,-0x2 170e e5fd | | Load 0x2,-0x3 170f e5fe | | Load 0x2,-0x2 1710 e5ff | | Load 0x2,-0x1 1711 1c06 | | Execute_Immediate Run_Utility,0x6 1712 e5ff | | Load 0x2,-0x1 1713 02fc | | Declare_Variable Variant_Record,With_Constraint 1714 4800 |H | Short_Literal 0x0 1715 e5fe | | Load 0x2,-0x2 1716 e00c | | Load 0x0,0xc 1717 1b18 | | Execute Package,Field_Read,Field_Number 0x18 1718 0334 | 4 | Declare_Variable Array,With_Constraint 1719 2d04 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x4 171a e5fd | | Load 0x2,-0x3 171b 4615 |F | Jump_Case 0x16 171c 7815 |x | Jump 0x1732 ; case 0x0 171d 7814 |x | Jump 0x1732 ; case 0x1 171e 7813 |x | Jump 0x1732 ; case 0x2 171f 7812 |x | Jump 0x1732 ; case 0x3 1720 7811 |x | Jump 0x1732 ; case 0x4 1721 7810 |x | Jump 0x1732 ; case 0x5 1722 780f |x | Jump 0x1732 ; case 0x6 1723 780e |x | Jump 0x1732 ; case 0x7 1724 780d |x | Jump 0x1732 ; case 0x8 1725 780c |x | Jump 0x1732 ; case 0x9 1726 780b |x | Jump 0x1732 ; case 0xa 1727 780a |x | Jump 0x1732 ; case 0xb 1728 7809 |x | Jump 0x1732 ; case 0xc 1729 7808 |x | Jump 0x1732 ; case 0xd 172a 7807 |x | Jump 0x1732 ; case 0xe 172b 7806 |x | Jump 0x1732 ; case 0xf 172c 7805 |x | Jump 0x1732 ; case 0x10 172d 7804 |x | Jump 0x1732 ; case 0x11 172e 7803 |x | Jump 0x1732 ; case 0x12 172f 7802 |x | Jump 0x1732 ; case 0x13 1730 7801 |x | Jump 0x1732 ; case 0x14 1731 7800 |x | Jump 0x1732 ; case 0x15 1732 016a | j | QQ_execute Variant_Record,XXX 1733 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 1734 0869 | i | Execute_Immediate Raise,0x69 1735 0000 0000 | | .XXX[0x3] 1737 0000 | | 1738 ; -------------------------------------------------------------------------------------- 1738 ; SUBPROGRAM 1738 ; -------------------------------------------------------------------------------------- 1738 173b | ; | .CONST 0x173b ; Address of begin 1739 0004 | | .CONST 0x0004 ; Address of exception handler 173a 0001 | | .CONST 0x0001 ; Number of locals 173b BODY_1738: 173b INIT_1738: 173b 4608 |F | Jump_Case 0x9 173c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 173d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 173e 7819 |x | Jump 0x1758 ; case 0x2 173f 7818 |x | Jump 0x1758 ; case 0x3 1740 7817 |x | Jump 0x1758 ; case 0x4 1741 7816 |x | Jump 0x1758 ; case 0x5 1742 7815 |x | Jump 0x1758 ; case 0x6 1743 7801 |x | Jump 0x1745 ; case 0x7 1744 7809 |x | Jump 0x174e ; case 0x8 1745 00db | | Load_Top At_Offset_3 1746 4801 |H | Short_Literal 0x1 1747 e5fe | | Load 0x2,-0x2 1748 00e9 | | Load_Encached String_Cache 1749 035b | [ | Declare_Type Array,Constrained 174a 4801 |H | Short_Literal 0x1 174b e5ff | | Load 0x2,-0x1 174c 031b | | Declare_Type Variant_Record,Constrained 174d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 174e 00db | | Load_Top At_Offset_3 174f 00db | | Load_Top At_Offset_3 1750 02fc | | Declare_Variable Variant_Record,With_Constraint 1751 4801 |H | Short_Literal 0x1 1752 e5fe | | Load 0x2,-0x2 1753 00e9 | | Load_Encached String_Cache 1754 0334 | 4 | Declare_Variable Array,With_Constraint 1755 2d04 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x4 1756 016a | j | QQ_execute Variant_Record,XXX 1757 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 1758 0869 | i | Execute_Immediate Raise,0x69 1759 0000 0000 | | .BLANK 0000[0x7] 1760 ; -------------------------------------------------------------------------------------- 1760 ; SUBPROGRAM 1760 ; -------------------------------------------------------------------------------------- 1760 1765 | e | .CONST 0x1765 ; Address of begin 1761 17ca | | .CONST 0x17ca ; Address of exception handler 1762 0002 | | .CONST 0x0002 ; Number of locals 1763 INIT_1760: 1763 00e2 | | Load_Encached Integer_Cache 1764 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1765 BODY_1760: 1765 00cf | | Action Mark_Auxiliary 1766 7804 |x | Jump 0x176b 1767 e5fd | | Load 0x2,-0x3 1768 0a01 | | Execute_Immediate Plus,0x1 1769 c5fd | | Store 0x2,-0x3 176a 00c9 | | Action Pop_Auxiliary_Loop 176b e5fd | | Load 0x2,-0x3 176c e5ff | | Load 0x2,-0x1 176d 01d7 | | Execute Vector,Field_Read 176e 0f5f | _ | Execute_Immediate Equal,0x5f 176f 77f7 |w | Jump_Nonzero 0x1767 1770 00ce | | Action Pop_Auxiliary 1771 e5fd | | Load 0x2,-0x3 1772 0a02 | | Execute_Immediate Plus,0x2 1773 e5ff | | Load 0x2,-0x1 1774 01dc | | Execute Vector,Last 1775 027a | z | Execute Discrete,Less_Equal 1776 6811 |h | Jump_Zero 0x1788 1777 4800 |H | Short_Literal 0x0 1778 e5fe | | Load 0x2,-0x2 1779 483a |H: | Short_Literal 0x3a 177a e5fd | | Load 0x2,-0x3 177b 00d8 | | Load_Top At_Offset_0 177c 0a02 | | Execute_Immediate Plus,0x2 177d 00d8 | | Load_Top At_Offset_0 177e 00e2 | | Load_Encached Integer_Cache 177f 0260 | ` | Execute Discrete,In_Type 1780 7001 |p | Jump_Nonzero 0x1782 1781 0801 | | Execute_Immediate Raise,0x1 1782 e5ff | | Load 0x2,-0x1 1783 01cf | | Execute Vector,Slice_Read 1784 01ca | | Execute Vector,Prepend 1785 e02f | / | Load 0x0,0x2f 1786 181d | | Execute Package,Field_Execute,Field_Number 0x1d 1787 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 1788 00d8 | | Load_Top At_Offset_0 1789 7011 |p | Jump_Nonzero 0x179b 178a 4800 |H | Short_Literal 0x0 178b e5fe | | Load 0x2,-0x2 178c 483a |H: | Short_Literal 0x3a 178d e5fd | | Load 0x2,-0x3 178e 00d8 | | Load_Top At_Offset_0 178f 0a01 | | Execute_Immediate Plus,0x1 1790 00d8 | | Load_Top At_Offset_0 1791 00e2 | | Load_Encached Integer_Cache 1792 0260 | ` | Execute Discrete,In_Type 1793 7001 |p | Jump_Nonzero 0x1795 1794 0801 | | Execute_Immediate Raise,0x1 1795 e5ff | | Load 0x2,-0x1 1796 01cf | | Execute Vector,Slice_Read 1797 01ca | | Execute Vector,Prepend 1798 e02f | / | Load 0x0,0x2f 1799 181d | | Execute Package,Field_Execute,Field_Number 0x1d 179a 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 179b 00d8 | | Load_Top At_Offset_0 179c 0a0b | | Execute_Immediate Plus,0xb 179d 480c |H | Short_Literal 0xc 179e 0270 | p | Execute Discrete,Divide 179f c5fc | | Store 0x2,-0x4 17a0 00d8 | | Load_Top At_Offset_0 17a1 0c01 | | Execute_Immediate Greater_Equal,0x1 17a2 6826 |h& | Jump_Zero 0x17c9 17a3 00cf | | Action Mark_Auxiliary 17a4 e5ff | | Load 0x2,-0x1 17a5 01dc | | Execute Vector,Last 17a6 e5fd | | Load 0x2,-0x3 17a7 0263 | c | Execute Discrete,Above_Bound 17a8 701b |p | Jump_Nonzero 0x17c4 17a9 00db | | Load_Top At_Offset_3 17aa 0a01 | | Execute_Immediate Plus,0x1 17ab c402 | | Store 0x2,0x2 17ac 00db | | Load_Top At_Offset_3 17ad e5fe | | Load 0x2,-0x2 17ae 01d7 | | Execute Vector,Field_Read 17af 00d9 | | Load_Top At_Offset_1 17b0 e5ff | | Load 0x2,-0x1 17b1 01d7 | | Execute Vector,Field_Read 17b2 027e | ~ | Execute Discrete,Not_Equal 17b3 680e |h | Jump_Zero 0x17c2 17b4 00d8 | | Load_Top At_Offset_0 17b5 a5fd | | Store_Unchecked 0x2,-0x3 17b6 00cf | | Action Mark_Auxiliary 17b7 7804 |x | Jump 0x17bc 17b8 e5fd | | Load 0x2,-0x3 17b9 0a01 | | Execute_Immediate Plus,0x1 17ba c5fd | | Store 0x2,-0x3 17bb 00c9 | | Action Pop_Auxiliary_Loop 17bc e5fd | | Load 0x2,-0x3 17bd e5ff | | Load 0x2,-0x1 17be 01d7 | | Execute Vector,Field_Read 17bf 0f5f | _ | Execute_Immediate Equal,0x5f 17c0 77f7 |w | Jump_Nonzero 0x17b8 17c1 4503 |E | Exit_Suprogram New_Top_Offset 0x3 17c2 00c8 | | Action Pop_Auxiliary_Range 17c3 3fe5 |? | Loop_Increasing 0x17a9 17c4 00ce | | Action Pop_Auxiliary 17c5 00db | | Load_Top At_Offset_3 17c6 01dc | | Execute Vector,Last 17c7 0a01 | | Execute_Immediate Plus,0x1 17c8 c5fd | | Store 0x2,-0x3 17c9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 17ca TRAP_1760: 17ca 0007 | | Action Break_Optional 17cb 4800 |H | Short_Literal 0x0 17cc a5fc | | Store_Unchecked 0x2,-0x4 17cd 4503 |E | Exit_Suprogram New_Top_Offset 0x3 17ce 0000 0000 | | .XXX[0x2] 17d0 ; -------------------------------------------------------------------------------------- 17d0 ; SUBPROGRAM 17d0 ; -------------------------------------------------------------------------------------- 17d0 17ef | | .CONST 0x17ef ; Address of begin 17d1 18ca | | .CONST 0x18ca ; Address of exception handler 17d2 000b | | .CONST 0x000b ; Number of locals 17d3 INIT_17d0: 17d3 00e2 | | Load_Encached Integer_Cache 17d4 00e2 | | Load_Encached Integer_Cache 17d5 00e7 | | Load_Encached Duration_Cache 17d6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 17d7 00e7 | | Load_Encached Duration_Cache 17d8 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 17d9 6116 |a | Indirect_Literal Discrete,0x18f0,{0x00000000, 0xa8c00000} 17da 00e7 | | Load_Encached Duration_Cache 17db 03f1 | | Declare_Variable Discrete,With_Value 17dc 4800 |H | Short_Literal 0x0 17dd e5ff | | Load 0x2,-0x1 17de 0092 2b86 | + | Action Push_String_Extended,0x2b86 ; "AT" 17e0 e02f | / | Load 0x0,0x2f 17e1 181d | | Execute Package,Field_Execute,Field_Number 0x1d 17e2 00e2 | | Load_Encached Integer_Cache 17e3 03f1 | | Declare_Variable Discrete,With_Value 17e4 e5ff | | Load 0x2,-0x1 17e5 01dd | | Execute Vector,First 17e6 00e2 | | Load_Encached Integer_Cache 17e7 03f1 | | Declare_Variable Discrete,With_Value 17e8 e030 | 0 | Load 0x0,0x30 17e9 1b14 | | Execute Package,Field_Read,Field_Number 0x14 17ea 0322 | " | Declare_Variable Record 17eb e030 | 0 | Load 0x0,0x30 17ec 1b14 | | Execute Package,Field_Read,Field_Number 0x14 17ed 0322 | " | Declare_Variable Record 17ee 00e2 | | Load_Encached Integer_Cache 17ef BODY_17d0: 17ef e407 | | Load 0x2,0x7 17f0 7004 |p | Jump_Nonzero 0x17f5 17f1 e5ff | | Load 0x2,-0x1 17f2 01dc | | Execute Vector,Last 17f3 0a01 | | Execute_Immediate Plus,0x1 17f4 c407 | | Store 0x2,0x7 17f5 00e2 | | Load_Encached Integer_Cache 17f6 e408 | | Load 0x2,0x8 17f7 e2ae | | Load 0x1,0xae 17f8 e408 | | Load 0x2,0x8 17f9 e407 | | Load 0x2,0x7 17fa 0aff | | Execute_Immediate Plus,-0x1 17fb 00d8 | | Load_Top At_Offset_0 17fc 00e2 | | Load_Encached Integer_Cache 17fd 0260 | ` | Execute Discrete,In_Type 17fe 7001 |p | Jump_Nonzero 0x1800 17ff 0801 | | Execute_Immediate Raise,0x1 1800 e5ff | | Load 0x2,-0x1 1801 01cf | | Execute Vector,Slice_Read 1802 82af | | Call 0x1,0xaf 1803 c408 | | Store 0x2,0x8 1804 c402 | | Store 0x2,0x2 1805 e402 | | Load 0x2,0x2 1806 00d8 | | Load_Top At_Offset_0 1807 4801 |H | Short_Literal 0x1 1808 4807 |H | Short_Literal 0x7 1809 0262 | b | Execute Discrete,In_Range 180a 7015 |p | Jump_Nonzero 0x1820 180b 0b08 | | Execute_Immediate Case_Compare,0x8 180c 702e |p. | Jump_Nonzero 0x183b 180d 0f09 | | Execute_Immediate Equal,0x9 180e 7032 |p2 | Jump_Nonzero 0x1841 180f 00db | | Load_Top At_Offset_3 1810 e407 | | Load 0x2,0x7 1811 0aff | | Execute_Immediate Plus,-0x1 1812 00d8 | | Load_Top At_Offset_0 1813 00e2 | | Load_Encached Integer_Cache 1814 0260 | ` | Execute Discrete,In_Type 1815 7001 |p | Jump_Nonzero 0x1817 1816 0801 | | Execute_Immediate Raise,0x1 1817 e5ff | | Load 0x2,-0x1 1818 01cf | | Execute Vector,Slice_Read 1819 e030 | 0 | Load 0x0,0x30 181a 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 181b 00db | | Load_Top At_Offset_3 181c 017d | } | Execute Record,Structure_Write 181d e407 | | Load 0x2,0x7 181e a408 | | Store_Unchecked 0x2,0x8 181f 7827 |x' | Jump 0x1847 1820 00d1 | | Pop_Control Pop_Count_1 1821 e030 | 0 | Load 0x0,0x30 1822 1815 | | Execute Package,Field_Execute,Field_Number 0x15 1823 00db | | Load_Top At_Offset_3 1824 017d | } | Execute Record,Structure_Write 1825 e402 | | Load 0x2,0x2 1826 00db | | Load_Top At_Offset_3 1827 e030 | 0 | Load 0x0,0x30 1828 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 1829 0272 | r | Execute Discrete,Minus 182a c403 | | Store 0x2,0x3 182b e403 | | Load 0x2,0x3 182c 0c00 | | Execute_Immediate Greater_Equal,0x0 182d 6803 |h | Jump_Zero 0x1831 182e e403 | | Load 0x2,0x3 182f 0af9 | | Execute_Immediate Plus,-0x7 1830 c403 | | Store 0x2,0x3 1831 60be |` | Indirect_Literal Discrete,0x18f0,{0x00000000, 0xa8c00000} 1832 e403 | | Load 0x2,0x3 1833 0271 | q | Execute Discrete,Times 1834 00d8 | | Load_Top At_Offset_0 1835 00e7 | | Load_Encached Duration_Cache 1836 0260 | ` | Execute Discrete,In_Type 1837 7001 |p | Jump_Nonzero 0x1839 1838 0801 | | Execute_Immediate Raise,0x1 1839 a404 | | Store_Unchecked 0x2,0x4 183a 780c |x | Jump 0x1847 183b 00d1 | | Pop_Control Pop_Count_1 183c e030 | 0 | Load 0x0,0x30 183d 1815 | | Execute Package,Field_Execute,Field_Number 0x15 183e 00db | | Load_Top At_Offset_3 183f 017d | } | Execute Record,Structure_Write 1840 7806 |x | Jump 0x1847 1841 e030 | 0 | Load 0x0,0x30 1842 1815 | | Execute Package,Field_Execute,Field_Number 0x15 1843 00db | | Load_Top At_Offset_3 1844 017d | } | Execute Record,Structure_Write 1845 60a6 |` | Indirect_Literal Discrete,0x18ec,{0xffffffff, 0x57400000} 1846 a404 | | Store_Unchecked 0x2,0x4 1847 00db | | Load_Top At_Offset_3 1848 e407 | | Load 0x2,0x7 1849 027c | | | Execute Discrete,Less 184a 6801 |h | Jump_Zero 0x184c 184b 08e0 | | Execute_Immediate Raise,0xe0 184c e407 | | Load 0x2,0x7 184d e5ff | | Load 0x2,-0x1 184e 01dc | | Execute Vector,Last 184f 027c | | | Execute Discrete,Less 1850 6844 |hD | Jump_Zero 0x1895 1851 e407 | | Load 0x2,0x7 1852 0a02 | | Execute_Immediate Plus,0x2 1853 c407 | | Store 0x2,0x7 1854 00e2 | | Load_Encached Integer_Cache 1855 e407 | | Load 0x2,0x7 1856 e2ae | | Load 0x1,0xae 1857 e5ff | | Load 0x2,-0x1 1858 82af | | Call 0x1,0xaf 1859 c407 | | Store 0x2,0x7 185a c402 | | Store 0x2,0x2 185b e402 | | Load 0x2,0x2 185c 0b16 | | Execute_Immediate Case_Compare,0x16 185d 7029 |p) | Jump_Nonzero 0x1887 185e 0f17 | | Execute_Immediate Equal,0x17 185f 702b |p+ | Jump_Nonzero 0x188b 1860 e407 | | Load 0x2,0x7 1861 e5ff | | Load 0x2,-0x1 1862 01dc | | Execute Vector,Last 1863 e5ff | | Load 0x2,-0x1 1864 01cf | | Execute Vector,Slice_Read 1865 e030 | 0 | Load 0x0,0x30 1866 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 1867 00da | | Load_Top At_Offset_2 1868 017d | } | Execute Record,Structure_Write 1869 e5ff | | Load 0x2,-0x1 186a 01dc | | Execute Vector,Last 186b 0a01 | | Execute_Immediate Plus,0x1 186c c407 | | Store 0x2,0x7 186d 00d9 | | Load_Top At_Offset_1 186e 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 186f 480c |H | Short_Literal 0xc 1870 026e | n | Execute Discrete,Modulo 1871 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 1872 00d9 | | Load_Top At_Offset_1 1873 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 1874 0f01 | | Execute_Immediate Equal,0x1 1875 6803 |h | Jump_Zero 0x1879 1876 00d8 | | Load_Top At_Offset_0 1877 0a0c | | Execute_Immediate Plus,0xc 1878 0059 | Y | Store_Top Discrete,At_Offset_1 1879 606e |`n | Indirect_Literal Discrete,0x18e8,{0x00000000, 0x00000e10} 187a 00d9 | | Load_Top At_Offset_1 187b 0271 | q | Execute Discrete,Times 187c 483c |H< | Short_Literal 0x3c 187d 00db | | Load_Top At_Offset_3 187e 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 187f 0271 | q | Execute Discrete,Times 1880 0273 | s | Execute Discrete,Plus 1881 00da | | Load_Top At_Offset_2 1882 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 1883 0273 | s | Execute Discrete,Plus 1884 090f | | Execute_Immediate Binary_Scale,0xf 1885 a405 | | Store_Unchecked 0x2,0x5 1886 7806 |x | Jump 0x188d 1887 00d1 | | Pop_Control Pop_Count_1 1888 605b |`[ | Indirect_Literal Discrete,0x18e4,{0x00000000, 0x54600000} 1889 a405 | | Store_Unchecked 0x2,0x5 188a 7802 |x | Jump 0x188d 188b 6064 |`d | Indirect_Literal Discrete,0x18f0,{0x00000000, 0xa8c00000} 188c a405 | | Store_Unchecked 0x2,0x5 188d e405 | | Load 0x2,0x5 188e a406 | | Store_Unchecked 0x2,0x6 188f e407 | | Load 0x2,0x7 1890 e5ff | | Load 0x2,-0x1 1891 01dc | | Execute Vector,Last 1892 027a | z | Execute Discrete,Less_Equal 1893 6801 |h | Jump_Zero 0x1895 1894 08e0 | | Execute_Immediate Raise,0xe0 1895 e404 | | Load 0x2,0x4 1896 e405 | | Load 0x2,0x5 1897 e004 | | Load 0x0,0x4 1898 1b11 | | Execute Package,Field_Read,Field_Number 0x11 1899 00d9 | | Load_Top At_Offset_1 189a 00d0 | | Action Swap_Control 189b 0260 | ` | Execute Discrete,In_Type 189c 7001 |p | Jump_Nonzero 0x189e 189d 0801 | | Execute_Immediate Raise,0x1 189e e409 | | Load 0x2,0x9 189f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 18a0 e409 | | Load 0x2,0x9 18a1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 18a2 0a01 | | Execute_Immediate Plus,0x1 18a3 00d8 | | Load_Top At_Offset_0 18a4 e004 | | Load 0x0,0x4 18a5 1b0f | | Execute Package,Field_Read,Field_Number 0xf 18a6 0260 | ` | Execute Discrete,In_Type 18a7 7001 |p | Jump_Nonzero 0x18a9 18a8 0801 | | Execute_Immediate Raise,0x1 18a9 e409 | | Load 0x2,0x9 18aa 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 18ab e004 | | Load 0x0,0x4 18ac 1818 | | Execute Package,Field_Execute,Field_Number 0x18 18ad 829a | | Call 0x1,0x9a 18ae c5fd | | Store 0x2,-0x3 18af e404 | | Load 0x2,0x4 18b0 e406 | | Load 0x2,0x6 18b1 e004 | | Load 0x0,0x4 18b2 1b11 | | Execute Package,Field_Read,Field_Number 0x11 18b3 00d9 | | Load_Top At_Offset_1 18b4 00d0 | | Action Swap_Control 18b5 0260 | ` | Execute Discrete,In_Type 18b6 7001 |p | Jump_Nonzero 0x18b8 18b7 0801 | | Execute_Immediate Raise,0x1 18b8 e409 | | Load 0x2,0x9 18b9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 18ba e409 | | Load 0x2,0x9 18bb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 18bc 0a01 | | Execute_Immediate Plus,0x1 18bd 00d8 | | Load_Top At_Offset_0 18be e004 | | Load 0x0,0x4 18bf 1b0f | | Execute Package,Field_Read,Field_Number 0xf 18c0 0260 | ` | Execute Discrete,In_Type 18c1 7001 |p | Jump_Nonzero 0x18c3 18c2 0801 | | Execute_Immediate Raise,0x1 18c3 e409 | | Load 0x2,0x9 18c4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 18c5 e004 | | Load 0x0,0x4 18c6 1818 | | Execute Package,Field_Execute,Field_Number 0x18 18c7 829a | | Call 0x1,0x9a 18c8 c5fe | | Store 0x2,-0x2 18c9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 18ca TRAP_17d0: 18ca 0007 | | Action Break_Optional 18cb e002 | | Load 0x0,0x2 18cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 18cd 4801 |H | Short_Literal 0x1 18ce 4801 |H | Short_Literal 0x1 18cf e00e | | Load 0x0,0xe 18d0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 18d1 0334 | 4 | Declare_Variable Array,With_Constraint 18d2 e5ff | | Load 0x2,-0x1 18d3 e00e | | Load 0x0,0xe 18d4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 18d5 4801 |H | Short_Literal 0x1 18d6 00da | | Load_Top At_Offset_2 18d7 01d6 | | Execute Vector,Field_Write 18d8 6007 |` | Indirect_Literal Discrete,0x18e0,{0x00000000, 0x00002825} 18d9 e002 | | Load 0x0,0x2 18da 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 18db c5fc | | Store 0x2,-0x4 18dc 4502 |E | Exit_Suprogram New_Top_Offset 0x2 18dd 0000 0000 | | .XXX[0x3] 18df 0000 | | 18e0 0000 0000 | | .LITERAL {0x00000000, 0x00002825} 18e4 0000 0000 | | .LITERAL {0x00000000, 0x54600000} 18e8 0000 0000 | | .LITERAL {0x00000000, 0x00000e10} 18ec ffff ffff | | .LITERAL {0xffffffff, 0x57400000} 18f0 0000 0000 | | .LITERAL {0x00000000, 0xa8c00000} 18f4 0000 0000 | | .BLANK 0000[0x4] 18f8 ; -------------------------------------------------------------------------------------- 18f8 ; SUBPROGRAM 18f8 ; -------------------------------------------------------------------------------------- 18f8 1911 | | .CONST 0x1911 ; Address of begin 18f9 0004 | | .CONST 0x0004 ; Address of exception handler 18fa 0004 | | .CONST 0x0004 ; Number of locals 18fb INIT_18f8: 18fb 4800 |H | Short_Literal 0x0 18fc e5fe | | Load 0x2,-0x2 18fd 0092 2b87 | + | Action Push_String_Extended,0x2b87 ; ".." 18ff e02f | / | Load 0x0,0x2f 1900 181d | | Execute Package,Field_Execute,Field_Number 0x1d 1901 00e2 | | Load_Encached Integer_Cache 1902 03f1 | | Declare_Variable Discrete,With_Value 1903 00db | | Load_Top At_Offset_3 1904 e2aa | | Load 0x1,0xaa 1905 01d7 | | Execute Vector,Field_Read 1906 e5fc | | Load 0x2,-0x4 1907 01dc | | Execute Vector,Last 1908 e2ab | | Load 0x1,0xab 1909 1c08 | | Execute_Immediate Run_Utility,0x8 190a 00d8 | | Load_Top At_Offset_0 190b 1c00 | | Execute_Immediate Run_Utility,0x0 190c e004 | | Load 0x0,0x4 190d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 190e 02c7 | | Declare_Variable Any 190f 00d8 | | Load_Top At_Offset_0 1910 1c00 | | Execute_Immediate Run_Utility,0x0 1911 BODY_18f8: 1911 00da | | Load_Top At_Offset_2 1912 0c01 | | Execute_Immediate Greater_Equal,0x1 1913 685e |h^ | Jump_Zero 0x1972 1914 00da | | Load_Top At_Offset_2 1915 e5fe | | Load 0x2,-0x2 1916 01dd | | Execute Vector,First 1917 027f | | Execute Discrete,Equal 1918 6805 |h | Jump_Zero 0x191e 1919 e003 | | Load 0x0,0x3 191a 180f | | Execute Package,Field_Execute,Field_Number 0xf 191b 00da | | Load_Top At_Offset_2 191c 2a0c |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc 191d 7824 |x$ | Jump 0x1942 191e e5fb | | Load 0x2,-0x5 191f 00d9 | | Load_Top At_Offset_1 1920 0120 | | Execute Any,Is_Value 1921 6803 |h | Jump_Zero 0x1925 1922 e004 | | Load 0x0,0x4 1923 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1924 7801 |x | Jump 0x1926 1925 00d9 | | Load_Top At_Offset_1 1926 00db | | Load_Top At_Offset_3 1927 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 1928 0120 | | Execute Any,Is_Value 1929 6806 |h | Jump_Zero 0x1930 192a e004 | | Load 0x0,0x4 192b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 192c e403 | | Load 0x2,0x3 192d 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 192e 00d1 | | Pop_Control Pop_Count_1 192f 7802 |x | Jump 0x1932 1930 00db | | Load_Top At_Offset_3 1931 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 1932 e5fe | | Load 0x2,-0x2 1933 01dd | | Execute Vector,First 1934 e402 | | Load 0x2,0x2 1935 0aff | | Execute_Immediate Plus,-0x1 1936 00d8 | | Load_Top At_Offset_0 1937 00e2 | | Load_Encached Integer_Cache 1938 0260 | ` | Execute Discrete,In_Type 1939 7001 |p | Jump_Nonzero 0x193b 193a 0801 | | Execute_Immediate Raise,0x1 193b e5fe | | Load 0x2,-0x2 193c 01cf | | Execute Vector,Slice_Read 193d 82b0 | | Call 0x1,0xb0 193e e403 | | Load 0x2,0x3 193f 2a0c |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc 1940 c404 | | Store 0x2,0x4 1941 c5fb | | Store 0x2,-0x5 1942 00da | | Load_Top At_Offset_2 1943 0a02 | | Execute_Immediate Plus,0x2 1944 e5fe | | Load 0x2,-0x2 1945 01dc | | Execute Vector,Last 1946 027d | } | Execute Discrete,Greater 1947 6805 |h | Jump_Zero 0x194d 1948 e003 | | Load 0x0,0x3 1949 1810 | | Execute Package,Field_Execute,Field_Number 0x10 194a 00da | | Load_Top At_Offset_2 194b 2a0d |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd 194c 7845 |xE | Jump 0x1992 194d e5fb | | Load 0x2,-0x5 194e 00da | | Load_Top At_Offset_2 194f 2e0d |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd 1950 0120 | | Execute Any,Is_Value 1951 6806 |h | Jump_Zero 0x1958 1952 e004 | | Load 0x0,0x4 1953 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1954 00db | | Load_Top At_Offset_3 1955 2e0d |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd 1956 00d1 | | Pop_Control Pop_Count_1 1957 7802 |x | Jump 0x195a 1958 00da | | Load_Top At_Offset_2 1959 2e0d |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd 195a 00da | | Load_Top At_Offset_2 195b 0120 | | Execute Any,Is_Value 195c 6803 |h | Jump_Zero 0x1960 195d e004 | | Load 0x0,0x4 195e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 195f 7801 |x | Jump 0x1961 1960 00da | | Load_Top At_Offset_2 1961 e402 | | Load 0x2,0x2 1962 0a02 | | Execute_Immediate Plus,0x2 1963 00d8 | | Load_Top At_Offset_0 1964 00e2 | | Load_Encached Integer_Cache 1965 0260 | ` | Execute Discrete,In_Type 1966 7001 |p | Jump_Nonzero 0x1968 1967 0801 | | Execute_Immediate Raise,0x1 1968 e5fe | | Load 0x2,-0x2 1969 01dc | | Execute Vector,Last 196a e5fe | | Load 0x2,-0x2 196b 01cf | | Execute Vector,Slice_Read 196c 82b0 | | Call 0x1,0xb0 196d c404 | | Store 0x2,0x4 196e 00db | | Load_Top At_Offset_3 196f 2a0d |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd 1970 c5fb | | Store 0x2,-0x5 1971 7820 |x | Jump 0x1992 1972 e5fb | | Load 0x2,-0x5 1973 00da | | Load_Top At_Offset_2 1974 2e0d |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd 1975 0120 | | Execute Any,Is_Value 1976 6806 |h | Jump_Zero 0x197d 1977 e004 | | Load 0x0,0x4 1978 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1979 00db | | Load_Top At_Offset_3 197a 2e0d |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd 197b 00d1 | | Pop_Control Pop_Count_1 197c 7802 |x | Jump 0x197f 197d 00da | | Load_Top At_Offset_2 197e 2e0d |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd 197f 00db | | Load_Top At_Offset_3 1980 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 1981 0120 | | Execute Any,Is_Value 1982 6806 |h | Jump_Zero 0x1989 1983 e004 | | Load 0x0,0x4 1984 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1985 e403 | | Load 0x2,0x3 1986 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 1987 00d1 | | Pop_Control Pop_Count_1 1988 7802 |x | Jump 0x198b 1989 00db | | Load_Top At_Offset_3 198a 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 198b e5fe | | Load 0x2,-0x2 198c 82b0 | | Call 0x1,0xb0 198d e403 | | Load 0x2,0x3 198e 2a0c |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc 198f 00db | | Load_Top At_Offset_3 1990 2a0d |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd 1991 c5fb | | Store 0x2,-0x5 1992 e5fc | | Load 0x2,-0x4 1993 00da | | Load_Top At_Offset_2 1994 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1995 00d9 | | Load_Top At_Offset_1 1996 e2ac | | Load 0x1,0xac 1997 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1998 a5fd | | Store_Unchecked 0x2,-0x3 1999 4503 |E | Exit_Suprogram New_Top_Offset 0x3 199a 0000 0000 | | .BLANK 0000[0x6] 19a0 ; -------------------------------------------------------------------------------------- 19a0 ; SUBPROGRAM 19a0 ; -------------------------------------------------------------------------------------- 19a0 19b7 | | .CONST 0x19b7 ; Address of begin 19a1 0004 | | .CONST 0x0004 ; Address of exception handler 19a2 0003 | | .CONST 0x0003 ; Number of locals 19a3 INIT_19a0: 19a3 4800 |H | Short_Literal 0x0 19a4 e5fe | | Load 0x2,-0x2 19a5 0092 2b87 | + | Action Push_String_Extended,0x2b87 ; ".." 19a7 e02f | / | Load 0x0,0x2f 19a8 181d | | Execute Package,Field_Execute,Field_Number 0x1d 19a9 00e2 | | Load_Encached Integer_Cache 19aa 03f1 | | Declare_Variable Discrete,With_Value 19ab 00db | | Load_Top At_Offset_3 19ac e2aa | | Load 0x1,0xaa 19ad 01d7 | | Execute Vector,Field_Read 19ae e5fc | | Load 0x2,-0x4 19af 01dc | | Execute Vector,Last 19b0 e2ab | | Load 0x1,0xab 19b1 1c08 | | Execute_Immediate Run_Utility,0x8 19b2 e2ac | | Load 0x1,0xac 19b3 03b6 | | Declare_Variable Access,By_Allocation,With_Value 19b4 00d8 | | Load_Top At_Offset_0 19b5 0227 | ' | Execute Access,All_Reference 19b6 1c00 | | Execute_Immediate Run_Utility,0x0 19b7 BODY_19a0: 19b7 00d9 | | Load_Top At_Offset_1 19b8 0c01 | | Execute_Immediate Greater_Equal,0x1 19b9 6838 |h8 | Jump_Zero 0x19f2 19ba 00d9 | | Load_Top At_Offset_1 19bb e5fe | | Load 0x2,-0x2 19bc 01dd | | Execute Vector,First 19bd 027f | | Execute Discrete,Equal 19be 6805 |h | Jump_Zero 0x19c4 19bf 6044 |`D | Indirect_Literal Discrete,0x1a04,{0xffffffff, 0x80000001} 19c0 00d9 | | Load_Top At_Offset_1 19c1 0227 | ' | Execute Access,All_Reference 19c2 2a0f |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf 19c3 7811 |x | Jump 0x19d5 19c4 e5fe | | Load 0x2,-0x2 19c5 01dd | | Execute Vector,First 19c6 00da | | Load_Top At_Offset_2 19c7 0aff | | Execute_Immediate Plus,-0x1 19c8 00d8 | | Load_Top At_Offset_0 19c9 00e2 | | Load_Encached Integer_Cache 19ca 0260 | ` | Execute Discrete,In_Type 19cb 7001 |p | Jump_Nonzero 0x19cd 19cc 0801 | | Execute_Immediate Raise,0x1 19cd e5fe | | Load 0x2,-0x2 19ce 01cf | | Execute Vector,Slice_Read 19cf 00e2 | | Load_Encached Integer_Cache 19d0 00e0 | | Load_Encached Standard_Cache 19d1 1819 | | Execute Package,Field_Execute,Field_Number 0x19 19d2 00d9 | | Load_Top At_Offset_1 19d3 0227 | ' | Execute Access,All_Reference 19d4 2a0f |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf 19d5 00d9 | | Load_Top At_Offset_1 19d6 0a02 | | Execute_Immediate Plus,0x2 19d7 e5fe | | Load 0x2,-0x2 19d8 01dc | | Execute Vector,Last 19d9 027d | } | Execute Discrete,Greater 19da 6805 |h | Jump_Zero 0x19e0 19db 6024 |`$ | Indirect_Literal Discrete,0x1a00,{0x00000000, 0x7fffffff} 19dc 00d9 | | Load_Top At_Offset_1 19dd 0227 | ' | Execute Access,All_Reference 19de 2a10 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10 19df 7819 |x | Jump 0x19f9 19e0 00d9 | | Load_Top At_Offset_1 19e1 0a02 | | Execute_Immediate Plus,0x2 19e2 00d8 | | Load_Top At_Offset_0 19e3 00e2 | | Load_Encached Integer_Cache 19e4 0260 | ` | Execute Discrete,In_Type 19e5 7001 |p | Jump_Nonzero 0x19e7 19e6 0801 | | Execute_Immediate Raise,0x1 19e7 e5fe | | Load 0x2,-0x2 19e8 01dc | | Execute Vector,Last 19e9 e5fe | | Load 0x2,-0x2 19ea 01cf | | Execute Vector,Slice_Read 19eb 00e2 | | Load_Encached Integer_Cache 19ec 00e0 | | Load_Encached Standard_Cache 19ed 1819 | | Execute Package,Field_Execute,Field_Number 0x19 19ee 00d9 | | Load_Top At_Offset_1 19ef 0227 | ' | Execute Access,All_Reference 19f0 2a10 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10 19f1 7807 |x | Jump 0x19f9 19f2 e5fe | | Load 0x2,-0x2 19f3 00e2 | | Load_Encached Integer_Cache 19f4 00e0 | | Load_Encached Standard_Cache 19f5 1819 | | Execute Package,Field_Execute,Field_Number 0x19 19f6 00d9 | | Load_Top At_Offset_1 19f7 0227 | ' | Execute Access,All_Reference 19f8 2a0f |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf 19f9 e5fc | | Load 0x2,-0x4 19fa 00d9 | | Load_Top At_Offset_1 19fb 0227 | ' | Execute Access,All_Reference 19fc 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 19fd 00d8 | | Load_Top At_Offset_0 19fe a5fd | | Store_Unchecked 0x2,-0x3 19ff 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1a00 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 1a04 ffff ffff | | .LITERAL {0xffffffff, 0x80000001} 1a08 ; -------------------------------------------------------------------------------------- 1a08 ; SUBPROGRAM 1a08 ; -------------------------------------------------------------------------------------- 1a08 1a1d | | .CONST 0x1a1d ; Address of begin 1a09 0004 | | .CONST 0x0004 ; Address of exception handler 1a0a 0003 | | .CONST 0x0003 ; Number of locals 1a0b INIT_1a08: 1a0b 4801 |H | Short_Literal 0x1 1a0c 00db | | Load_Top At_Offset_3 1a0d 01db | | Execute Vector,Length 1a0e 00d8 | | Load_Top At_Offset_0 1a0f 00e2 | | Load_Encached Integer_Cache 1a10 0260 | ` | Execute Discrete,In_Type 1a11 7001 |p | Jump_Nonzero 0x1a13 1a12 0801 | | Execute_Immediate Raise,0x1 1a13 00e9 | | Load_Encached String_Cache 1a14 035b | [ | Declare_Type Array,Constrained 1a15 0337 | 7 | Declare_Variable Array 1a16 00db | | Load_Top At_Offset_3 1a17 e02f | / | Load 0x0,0x2f 1a18 1814 | | Execute Package,Field_Execute,Field_Number 0x14 1a19 00d9 | | Load_Top At_Offset_1 1a1a 01d4 | | Execute Vector,Structure_Write 1a1b 00e2 | | Load_Encached Integer_Cache 1a1c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1a1d BODY_1a08: 1a1d 00cf | | Action Mark_Auxiliary 1a1e 00da | | Load_Top At_Offset_2 1a1f 01d9 | | Execute Vector,Reverse_Bounds 1a20 0263 | c | Execute Discrete,Above_Bound 1a21 701b |p | Jump_Nonzero 0x1a3d 1a22 00d8 | | Load_Top At_Offset_0 1a23 e402 | | Load 0x2,0x2 1a24 01d7 | | Execute Vector,Field_Read 1a25 00d8 | | Load_Top At_Offset_0 1a26 4809 |H | Short_Literal 0x9 1a27 4820 |H | Short_Literal 0x20 1a28 0262 | b | Execute Discrete,In_Range 1a29 6807 |h | Jump_Zero 0x1a31 1a2a 0b0b | | Execute_Immediate Case_Compare,0xb 1a2b 7005 |p | Jump_Nonzero 0x1a31 1a2c 480d |H | Short_Literal 0xd 1a2d 481f |H | Short_Literal 0x1f 1a2e 0262 | b | Execute Discrete,In_Range 1a2f 7002 |p | Jump_Nonzero 0x1a32 1a30 780a |x | Jump 0x1a3b 1a31 00d1 | | Pop_Control Pop_Count_1 1a32 00db | | Load_Top At_Offset_3 1a33 0a01 | | Execute_Immediate Plus,0x1 1a34 c403 | | Store 0x2,0x3 1a35 00d8 | | Load_Top At_Offset_0 1a36 e402 | | Load 0x2,0x2 1a37 01d7 | | Execute Vector,Field_Read 1a38 e403 | | Load 0x2,0x3 1a39 e402 | | Load 0x2,0x2 1a3a 01d6 | | Execute Vector,Field_Write 1a3b 00c8 | | Action Pop_Auxiliary_Range 1a3c 3fe5 |? | Loop_Increasing 0x1a22 1a3d 00ce | | Action Pop_Auxiliary 1a3e 4801 |H | Short_Literal 0x1 1a3f 00d9 | | Load_Top At_Offset_1 1a40 00db | | Load_Top At_Offset_3 1a41 01cf | | Execute Vector,Slice_Read 1a42 00e9 | | Load_Encached String_Cache 1a43 01c6 | | Execute Vector,Convert_To_Formal 1a44 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1a45 0000 0000 | | .XXX[0x3] 1a47 0000 | | 1a48 ; -------------------------------------------------------------------------------------- 1a48 ; SUBPROGRAM 1a48 ; -------------------------------------------------------------------------------------- 1a48 1a5a | Z | .CONST 0x1a5a ; Address of begin 1a49 0004 | | .CONST 0x0004 ; Address of exception handler 1a4a 0008 | | .CONST 0x0008 ; Number of locals 1a4b INIT_1a48: 1a4b e2ac | | Load 0x1,0xac 1a4c 0007 | | Action Break_Optional 1a4d e00d | | Load 0x0,0xd 1a4e 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 1a4f 02c7 | | Declare_Variable Any 1a50 00d8 | | Load_Top At_Offset_0 1a51 1c00 | | Execute_Immediate Run_Utility,0x0 1a52 e00d | | Load 0x0,0xd 1a53 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 1a54 e2a1 | | Load 0x1,0xa1 1a55 0007 | | Action Break_Optional 1a56 e2a0 | | Load 0x1,0xa0 1a57 0007 | | Action Break_Optional 1a58 00e1 | | Load_Encached Boolean_Cache 1a59 03e9 | | Declare_Variable Discrete,Duplicate 1a5a BODY_1a48: 1a5a e5ff | | Load 0x2,-0x1 1a5b 4612 |F | Jump_Case 0x13 1a5c 781c |x | Jump 0x1a79 ; case 0x0 1a5d 7872 |xr | Jump 0x1ad0 ; case 0x1 1a5e 7961 |ya | Jump 0x1bc0 ; case 0x2 1a5f 7960 |y` | Jump 0x1bc0 ; case 0x3 1a60 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x4 1a61 7894 |x | Jump 0x1af6 ; case 0x5 1a62 78f8 |x | Jump 0x1b5b ; case 0x6 1a63 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; case 0x7 1a64 797e |y~ | Jump 0x1be3 ; case 0x8 1a65 797d |y} | Jump 0x1be3 ; case 0x9 1a66 797c |y| | Jump 0x1be3 ; case 0xa 1a67 797b |y{ | Jump 0x1be3 ; case 0xb 1a68 797a |yz | Jump 0x1be3 ; case 0xc 1a69 7983 |y | Jump 0x1bed ; case 0xd 1a6a 7982 |y | Jump 0x1bed ; case 0xe 1a6b 7981 |y | Jump 0x1bed ; case 0xf 1a6c 7980 |y | Jump 0x1bed ; case 0x10 1a6d 7801 |x | Jump 0x1a6f ; case 0x11 1a6e 7800 |x | Jump 0x1a6f ; case 0x12 1a6f e5fb | | Load 0x2,-0x5 1a70 e5fc | | Load 0x2,-0x4 1a71 e2ac | | Load 0x1,0xac 1a72 e5fe | | Load 0x2,-0x2 1a73 e5ff | | Load 0x2,-0x1 1a74 82b2 | | Call 0x1,0xb2 1a75 c5fd | | Store 0x2,-0x3 1a76 00d1 | | Pop_Control Pop_Count_1 1a77 c5fb | | Store 0x2,-0x5 1a78 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1a79 e5fe | | Load 0x2,-0x2 1a7a e00d | | Load 0x0,0xd 1a7b 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 1a7c c403 | | Store 0x2,0x3 1a7d e403 | | Load 0x2,0x3 1a7e e00d | | Load 0x0,0xd 1a7f 181f | | Execute Package,Field_Execute,Field_Number 0x1f 1a80 7025 |p% | Jump_Nonzero 0x1aa6 1a81 4804 |H | Short_Literal 0x4 1a82 e5fc | | Load 0x2,-0x4 1a83 01dc | | Execute Vector,Last 1a84 e2ab | | Load 0x1,0xab 1a85 1c08 | | Execute_Immediate Run_Utility,0x8 1a86 e2ac | | Load 0x1,0xac 1a87 00d9 | | Load_Top At_Offset_1 1a88 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1a89 e5fc | | Load 0x2,-0x4 1a8a 00d9 | | Load_Top At_Offset_1 1a8b 00d8 | | Load_Top At_Offset_0 1a8c 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1a8d 00da | | Load_Top At_Offset_2 1a8e 01da | | Execute Vector,Bounds 1a8f 00da | | Load_Top At_Offset_2 1a90 01da | | Execute Vector,Bounds 1a91 00da | | Load_Top At_Offset_2 1a92 027f | | Execute Discrete,Equal 1a93 7001 |p | Jump_Nonzero 0x1a95 1a94 08e0 | | Execute_Immediate Raise,0xe0 1a95 00cd | | Action Spare6_Action 1a96 027f | | Execute Discrete,Equal 1a97 7001 |p | Jump_Nonzero 0x1a99 1a98 08e0 | | Execute_Immediate Raise,0xe0 1a99 00d2 | | Pop_Control Pop_Count_2 1a9a 00d9 | | Load_Top At_Offset_1 1a9b 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1a9c e403 | | Load 0x2,0x3 1a9d e2ab | | Load 0x1,0xab 1a9e 2306 |# | Execute Variant_Record,Field_Type,Field_Number 0x6 1a9f 0119 | | Execute Any,Check_In_Formal_Type 1aa0 00d9 | | Load_Top At_Offset_1 1aa1 2a06 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6 1aa2 e2ac | | Load 0x1,0xac 1aa3 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1aa4 a5fd | | Store_Unchecked 0x2,-0x3 1aa5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1aa6 e5fe | | Load 0x2,-0x2 1aa7 e00d | | Load 0x0,0xd 1aa8 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 1aa9 a404 | | Store_Unchecked 0x2,0x4 1aaa e404 | | Load 0x2,0x4 1aab e00d | | Load 0x0,0xd 1aac 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 1aad 695c |i\ | Jump_Zero 0x1c0a 1aae 4805 |H | Short_Literal 0x5 1aaf e5fc | | Load 0x2,-0x4 1ab0 01dc | | Execute Vector,Last 1ab1 e2ab | | Load 0x1,0xab 1ab2 1c08 | | Execute_Immediate Run_Utility,0x8 1ab3 e2ac | | Load 0x1,0xac 1ab4 00d9 | | Load_Top At_Offset_1 1ab5 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1ab6 e5fc | | Load 0x2,-0x4 1ab7 00d9 | | Load_Top At_Offset_1 1ab8 00d8 | | Load_Top At_Offset_0 1ab9 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1aba 00da | | Load_Top At_Offset_2 1abb 01da | | Execute Vector,Bounds 1abc 00da | | Load_Top At_Offset_2 1abd 01da | | Execute Vector,Bounds 1abe 00da | | Load_Top At_Offset_2 1abf 027f | | Execute Discrete,Equal 1ac0 7001 |p | Jump_Nonzero 0x1ac2 1ac1 08e0 | | Execute_Immediate Raise,0xe0 1ac2 00cd | | Action Spare6_Action 1ac3 027f | | Execute Discrete,Equal 1ac4 7001 |p | Jump_Nonzero 0x1ac6 1ac5 08e0 | | Execute_Immediate Raise,0xe0 1ac6 00d2 | | Pop_Control Pop_Count_2 1ac7 00d9 | | Load_Top At_Offset_1 1ac8 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1ac9 e404 | | Load 0x2,0x4 1aca 00d9 | | Load_Top At_Offset_1 1acb 2a07 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7 1acc e2ac | | Load 0x1,0xac 1acd 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1ace a5fd | | Store_Unchecked 0x2,-0x3 1acf 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1ad0 4806 |H | Short_Literal 0x6 1ad1 e5fc | | Load 0x2,-0x4 1ad2 01dc | | Execute Vector,Last 1ad3 e2ab | | Load 0x1,0xab 1ad4 1c08 | | Execute_Immediate Run_Utility,0x8 1ad5 e2ac | | Load 0x1,0xac 1ad6 00d9 | | Load_Top At_Offset_1 1ad7 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1ad8 e5fc | | Load 0x2,-0x4 1ad9 00d9 | | Load_Top At_Offset_1 1ada 00d8 | | Load_Top At_Offset_0 1adb 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1adc 00da | | Load_Top At_Offset_2 1add 01da | | Execute Vector,Bounds 1ade 00da | | Load_Top At_Offset_2 1adf 01da | | Execute Vector,Bounds 1ae0 00da | | Load_Top At_Offset_2 1ae1 027f | | Execute Discrete,Equal 1ae2 7001 |p | Jump_Nonzero 0x1ae4 1ae3 08e0 | | Execute_Immediate Raise,0xe0 1ae4 00cd | | Action Spare6_Action 1ae5 027f | | Execute Discrete,Equal 1ae6 7001 |p | Jump_Nonzero 0x1ae8 1ae7 08e0 | | Execute_Immediate Raise,0xe0 1ae8 00d2 | | Pop_Control Pop_Count_2 1ae9 00d9 | | Load_Top At_Offset_1 1aea 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1aeb e5fe | | Load 0x2,-0x2 1aec e00d | | Load 0x0,0xd 1aed 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 1aee 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1aef 1c02 | | Execute_Immediate Run_Utility,0x2 1af0 00d9 | | Load_Top At_Offset_1 1af1 2a08 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8 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 00e1 | | Load_Encached Boolean_Cache 1af7 00e1 | | Load_Encached Boolean_Cache 1af8 e2a3 | | Load 0x1,0xa3 1af9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1afa e5fe | | Load 0x2,-0x2 1afb e2a3 | | Load 0x1,0xa3 1afc 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1afd c406 | | Store 0x2,0x6 1afe 005b | [ | Store_Top Discrete,At_Offset_3 1aff 0059 | Y | Store_Top Discrete,At_Offset_1 1b00 00d9 | | Load_Top At_Offset_1 1b01 701b |p | Jump_Nonzero 0x1b1d 1b02 00d8 | | Load_Top At_Offset_0 1b03 7019 |p | Jump_Nonzero 0x1b1d 1b04 e002 | | Load 0x0,0x2 1b05 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1b06 4801 |H | Short_Literal 0x1 1b07 4802 |H | Short_Literal 0x2 1b08 e00e | | Load 0x0,0xe 1b09 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1b0a 0334 | 4 | Declare_Variable Array,With_Constraint 1b0b e5fe | | Load 0x2,-0x2 1b0c e00e | | Load 0x0,0xe 1b0d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1b0e 4801 |H | Short_Literal 0x1 1b0f 00da | | Load_Top At_Offset_2 1b10 01d6 | | Execute Vector,Field_Write 1b11 0092 2b88 | + | Action Push_String_Extended,0x2b88 ; "'IS" 1b13 e00e | | Load 0x0,0xe 1b14 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1b15 4802 |H | Short_Literal 0x2 1b16 00da | | Load_Top At_Offset_2 1b17 01d6 | | Execute Vector,Field_Write 1b18 60f7 |` | Indirect_Literal Discrete,0x1c10,{0x00000000, 0x00002826} 1b19 e002 | | Load 0x0,0x2 1b1a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1b1b c5fb | | Store 0x2,-0x5 1b1c 781c |x | Jump 0x1b39 1b1d 00d9 | | Load_Top At_Offset_1 1b1e 681a |h | Jump_Zero 0x1b39 1b1f 00d8 | | Load_Top At_Offset_0 1b20 7018 |p | Jump_Nonzero 0x1b39 1b21 e002 | | Load 0x0,0x2 1b22 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1b23 4801 |H | Short_Literal 0x1 1b24 4802 |H | Short_Literal 0x2 1b25 e00e | | Load 0x0,0xe 1b26 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1b27 0334 | 4 | Declare_Variable Array,With_Constraint 1b28 e5fe | | Load 0x2,-0x2 1b29 e00e | | Load 0x0,0xe 1b2a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1b2b 4801 |H | Short_Literal 0x1 1b2c 00da | | Load_Top At_Offset_2 1b2d 01d6 | | Execute Vector,Field_Write 1b2e 0092 2b88 | + | Action Push_String_Extended,0x2b88 ; "'IS" 1b30 e00e | | Load 0x0,0xe 1b31 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1b32 4802 |H | Short_Literal 0x2 1b33 00da | | Load_Top At_Offset_2 1b34 01d6 | | Execute Vector,Field_Write 1b35 60d6 |` | Indirect_Literal Discrete,0x1c0c,{0x00000000, 0x00002831} 1b36 e002 | | Load 0x0,0x2 1b37 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1b38 c5fb | | Store 0x2,-0x5 1b39 4807 |H | Short_Literal 0x7 1b3a e5fc | | Load 0x2,-0x4 1b3b 01dc | | Execute Vector,Last 1b3c e2ab | | Load 0x1,0xab 1b3d 1c08 | | Execute_Immediate Run_Utility,0x8 1b3e e2ac | | Load 0x1,0xac 1b3f 00d9 | | Load_Top At_Offset_1 1b40 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1b41 e5fc | | Load 0x2,-0x4 1b42 00d9 | | Load_Top At_Offset_1 1b43 00d8 | | Load_Top At_Offset_0 1b44 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1b45 00da | | Load_Top At_Offset_2 1b46 01da | | Execute Vector,Bounds 1b47 00da | | Load_Top At_Offset_2 1b48 01da | | Execute Vector,Bounds 1b49 00da | | Load_Top At_Offset_2 1b4a 027f | | Execute Discrete,Equal 1b4b 7001 |p | Jump_Nonzero 0x1b4d 1b4c 08e0 | | Execute_Immediate Raise,0xe0 1b4d 00cd | | Action Spare6_Action 1b4e 027f | | Execute Discrete,Equal 1b4f 7001 |p | Jump_Nonzero 0x1b51 1b50 08e0 | | Execute_Immediate Raise,0xe0 1b51 00d2 | | Pop_Control Pop_Count_2 1b52 00d9 | | Load_Top At_Offset_1 1b53 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1b54 00db | | Load_Top At_Offset_3 1b55 00d9 | | Load_Top At_Offset_1 1b56 2a09 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9 1b57 e2ac | | Load 0x1,0xac 1b58 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1b59 a5fd | | Store_Unchecked 0x2,-0x3 1b5a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1b5b 00e1 | | Load_Encached Boolean_Cache 1b5c 00e1 | | Load_Encached Boolean_Cache 1b5d e2a4 | | Load 0x1,0xa4 1b5e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1b5f e5fe | | Load 0x2,-0x2 1b60 e2a4 | | Load 0x1,0xa4 1b61 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1b62 c405 | | Store 0x2,0x5 1b63 005b | [ | Store_Top Discrete,At_Offset_3 1b64 0059 | Y | Store_Top Discrete,At_Offset_1 1b65 00d9 | | Load_Top At_Offset_1 1b66 701b |p | Jump_Nonzero 0x1b82 1b67 00d8 | | Load_Top At_Offset_0 1b68 7019 |p | Jump_Nonzero 0x1b82 1b69 e002 | | Load 0x0,0x2 1b6a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1b6b 4801 |H | Short_Literal 0x1 1b6c 4802 |H | Short_Literal 0x2 1b6d e00e | | Load 0x0,0xe 1b6e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1b6f 0334 | 4 | Declare_Variable Array,With_Constraint 1b70 e5fe | | Load 0x2,-0x2 1b71 e00e | | Load 0x0,0xe 1b72 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1b73 4801 |H | Short_Literal 0x1 1b74 00da | | Load_Top At_Offset_2 1b75 01d6 | | Execute Vector,Field_Write 1b76 0092 2b89 | + | Action Push_String_Extended,0x2b89 ; "'HAS" 1b78 e00e | | Load 0x0,0xe 1b79 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1b7a 4802 |H | Short_Literal 0x2 1b7b 00da | | Load_Top At_Offset_2 1b7c 01d6 | | Execute Vector,Field_Write 1b7d 6092 |` | Indirect_Literal Discrete,0x1c10,{0x00000000, 0x00002826} 1b7e e002 | | Load 0x0,0x2 1b7f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1b80 c5fb | | Store 0x2,-0x5 1b81 781c |x | Jump 0x1b9e 1b82 00d9 | | Load_Top At_Offset_1 1b83 681a |h | Jump_Zero 0x1b9e 1b84 00d8 | | Load_Top At_Offset_0 1b85 7018 |p | Jump_Nonzero 0x1b9e 1b86 e002 | | Load 0x0,0x2 1b87 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1b88 4801 |H | Short_Literal 0x1 1b89 4802 |H | Short_Literal 0x2 1b8a e00e | | Load 0x0,0xe 1b8b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1b8c 0334 | 4 | Declare_Variable Array,With_Constraint 1b8d e5fe | | Load 0x2,-0x2 1b8e e00e | | Load 0x0,0xe 1b8f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1b90 4801 |H | Short_Literal 0x1 1b91 00da | | Load_Top At_Offset_2 1b92 01d6 | | Execute Vector,Field_Write 1b93 0092 2b89 | + | Action Push_String_Extended,0x2b89 ; "'HAS" 1b95 e00e | | Load 0x0,0xe 1b96 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1b97 4802 |H | Short_Literal 0x2 1b98 00da | | Load_Top At_Offset_2 1b99 01d6 | | Execute Vector,Field_Write 1b9a 6071 |`q | Indirect_Literal Discrete,0x1c0c,{0x00000000, 0x00002831} 1b9b e002 | | Load 0x0,0x2 1b9c 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1b9d c5fb | | Store 0x2,-0x5 1b9e 4808 |H | Short_Literal 0x8 1b9f e5fc | | Load 0x2,-0x4 1ba0 01dc | | Execute Vector,Last 1ba1 e2ab | | Load 0x1,0xab 1ba2 1c08 | | Execute_Immediate Run_Utility,0x8 1ba3 e2ac | | Load 0x1,0xac 1ba4 00d9 | | Load_Top At_Offset_1 1ba5 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1ba6 e5fc | | Load 0x2,-0x4 1ba7 00d9 | | Load_Top At_Offset_1 1ba8 00d8 | | Load_Top At_Offset_0 1ba9 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1baa 00da | | Load_Top At_Offset_2 1bab 01da | | Execute Vector,Bounds 1bac 00da | | Load_Top At_Offset_2 1bad 01da | | Execute Vector,Bounds 1bae 00da | | Load_Top At_Offset_2 1baf 027f | | Execute Discrete,Equal 1bb0 7001 |p | Jump_Nonzero 0x1bb2 1bb1 08e0 | | Execute_Immediate Raise,0xe0 1bb2 00cd | | Action Spare6_Action 1bb3 027f | | Execute Discrete,Equal 1bb4 7001 |p | Jump_Nonzero 0x1bb6 1bb5 08e0 | | Execute_Immediate Raise,0xe0 1bb6 00d2 | | Pop_Control Pop_Count_2 1bb7 00d9 | | Load_Top At_Offset_1 1bb8 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1bb9 e405 | | Load 0x2,0x5 1bba 00d9 | | Load_Top At_Offset_1 1bbb 2a0a |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa 1bbc e2ac | | Load 0x1,0xac 1bbd 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1bbe a5fd | | Store_Unchecked 0x2,-0x3 1bbf 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1bc0 4815 |H | Short_Literal 0x15 1bc1 e5fc | | Load 0x2,-0x4 1bc2 01dc | | Execute Vector,Last 1bc3 e2ab | | Load 0x1,0xab 1bc4 1c08 | | Execute_Immediate Run_Utility,0x8 1bc5 e2ac | | Load 0x1,0xac 1bc6 00d9 | | Load_Top At_Offset_1 1bc7 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1bc8 e5fc | | Load 0x2,-0x4 1bc9 00d9 | | Load_Top At_Offset_1 1bca 00d8 | | Load_Top At_Offset_0 1bcb 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1bcc 00da | | Load_Top At_Offset_2 1bcd 01da | | Execute Vector,Bounds 1bce 00da | | Load_Top At_Offset_2 1bcf 01da | | Execute Vector,Bounds 1bd0 00da | | Load_Top At_Offset_2 1bd1 027f | | Execute Discrete,Equal 1bd2 7001 |p | Jump_Nonzero 0x1bd4 1bd3 08e0 | | Execute_Immediate Raise,0xe0 1bd4 00cd | | Action Spare6_Action 1bd5 027f | | Execute Discrete,Equal 1bd6 7001 |p | Jump_Nonzero 0x1bd8 1bd7 08e0 | | Execute_Immediate Raise,0xe0 1bd8 00d2 | | Pop_Control Pop_Count_2 1bd9 00d9 | | Load_Top At_Offset_1 1bda 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1bdb e5ff | | Load 0x2,-0x1 1bdc 0f02 | | Execute_Immediate Equal,0x2 1bdd 00d9 | | Load_Top At_Offset_1 1bde 2a11 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x11 1bdf e2ac | | Load 0x1,0xac 1be0 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1be1 a5fd | | Store_Unchecked 0x2,-0x3 1be2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1be3 e5fb | | Load 0x2,-0x5 1be4 e5fc | | Load 0x2,-0x4 1be5 e2ac | | Load 0x1,0xac 1be6 e5fe | | Load 0x2,-0x2 1be7 e5ff | | Load 0x2,-0x1 1be8 82b1 | | Call 0x1,0xb1 1be9 c5fd | | Store 0x2,-0x3 1bea 00d1 | | Pop_Control Pop_Count_1 1beb c5fb | | Store 0x2,-0x5 1bec 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1bed e5ff | | Load 0x2,-0x1 1bee e2aa | | Load 0x1,0xaa 1bef 01d7 | | Execute Vector,Field_Read 1bf0 e5fc | | Load 0x2,-0x4 1bf1 01dc | | Execute Vector,Last 1bf2 e2ab | | Load 0x1,0xab 1bf3 1c08 | | Execute_Immediate Run_Utility,0x8 1bf4 e2ac | | Load 0x1,0xac 1bf5 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1bf6 00d8 | | Load_Top At_Offset_0 1bf7 0227 | ' | Execute Access,All_Reference 1bf8 1c00 | | Execute_Immediate Run_Utility,0x0 1bf9 a402 | | Store_Unchecked 0x2,0x2 1bfa e5fc | | Load 0x2,-0x4 1bfb e402 | | Load 0x2,0x2 1bfc 0227 | ' | Execute Access,All_Reference 1bfd 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1bfe e5fe | | Load 0x2,-0x2 1bff e001 | | Load 0x0,0x1 1c00 1b17 | | Execute Package,Field_Read,Field_Number 0x17 1c01 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1c02 e031 | 1 | Load 0x0,0x31 1c03 180d | | Execute Package,Field_Execute,Field_Number 0xd 1c04 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 1c05 e402 | | Load 0x2,0x2 1c06 0227 | ' | Execute Access,All_Reference 1c07 2a0e |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe 1c08 e402 | | Load 0x2,0x2 1c09 a5fd | | Store_Unchecked 0x2,-0x3 1c0a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1c0b 0000 | | .XXX[0x1] 1c0c 0000 0000 | | .LITERAL {0x00000000, 0x00002831} 1c10 0000 0000 | | .LITERAL {0x00000000, 0x00002826} 1c14 0000 0000 | | .BLANK 0000[0x4] 1c18 ; -------------------------------------------------------------------------------------- 1c18 ; SUBPROGRAM 1c18 ; -------------------------------------------------------------------------------------- 1c18 1c25 | % | .CONST 0x1c25 ; Address of begin 1c19 0004 | | .CONST 0x0004 ; Address of exception handler 1c1a 0006 | | .CONST 0x0006 ; Number of locals 1c1b INIT_1c18: 1c1b 00db | | Load_Top At_Offset_3 1c1c 01dd | | Execute Vector,First 1c1d 00e2 | | Load_Encached Integer_Cache 1c1e 03f1 | | Declare_Variable Discrete,With_Value 1c1f 00e2 | | Load_Encached Integer_Cache 1c20 e2ac | | Load 0x1,0xac 1c21 0007 | | Action Break_Optional 1c22 00d8 | | Load_Top At_Offset_0 1c23 0007 | | Action Break_Optional 1c24 e2ac | | Load 0x1,0xac 1c25 BODY_1c18: 1c25 00cf | | Action Mark_Auxiliary 1c26 7870 |xp | Jump 0x1c97 1c27 4800 |H | Short_Literal 0x0 1c28 e402 | | Load 0x2,0x2 1c29 e5fe | | Load 0x2,-0x2 1c2a 01dc | | Execute Vector,Last 1c2b e5fe | | Load 0x2,-0x2 1c2c 01cf | | Execute Vector,Slice_Read 1c2d 482c |H, | Short_Literal 0x2c 1c2e e02f | / | Load 0x0,0x2f 1c2f 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1c30 a403 | | Store_Unchecked 0x2,0x3 1c31 e403 | | Load 0x2,0x3 1c32 7004 |p | Jump_Nonzero 0x1c37 1c33 e5fe | | Load 0x2,-0x2 1c34 01dc | | Execute Vector,Last 1c35 0a01 | | Execute_Immediate Plus,0x1 1c36 c403 | | Store 0x2,0x3 1c37 e402 | | Load 0x2,0x2 1c38 e5fe | | Load 0x2,-0x2 1c39 01d7 | | Execute Vector,Field_Read 1c3a 0f7e | ~ | Execute_Immediate Equal,0x7e 1c3b 683a |h: | Jump_Zero 0x1c76 1c3c e5fb | | Load 0x2,-0x5 1c3d e5fc | | Load 0x2,-0x4 1c3e e2ac | | Load 0x1,0xac 1c3f e402 | | Load 0x2,0x2 1c40 0a01 | | Execute_Immediate Plus,0x1 1c41 00d8 | | Load_Top At_Offset_0 1c42 00e2 | | Load_Encached Integer_Cache 1c43 0260 | ` | Execute Discrete,In_Type 1c44 7001 |p | Jump_Nonzero 0x1c46 1c45 0801 | | Execute_Immediate Raise,0x1 1c46 e403 | | Load 0x2,0x3 1c47 0aff | | Execute_Immediate Plus,-0x1 1c48 00d8 | | Load_Top At_Offset_0 1c49 00e2 | | Load_Encached Integer_Cache 1c4a 0260 | ` | Execute Discrete,In_Type 1c4b 7001 |p | Jump_Nonzero 0x1c4d 1c4c 0801 | | Execute_Immediate Raise,0x1 1c4d e5fe | | Load 0x2,-0x2 1c4e 01cf | | Execute Vector,Slice_Read 1c4f e5ff | | Load 0x2,-0x1 1c50 82b4 | | Call 0x1,0xb4 1c51 c405 | | Store 0x2,0x5 1c52 00d1 | | Pop_Control Pop_Count_1 1c53 c5fb | | Store 0x2,-0x5 1c54 4801 |H | Short_Literal 0x1 1c55 e5fc | | Load 0x2,-0x4 1c56 01dc | | Execute Vector,Last 1c57 e2ab | | Load 0x1,0xab 1c58 1c08 | | Execute_Immediate Run_Utility,0x8 1c59 e2ac | | Load 0x1,0xac 1c5a 00d9 | | Load_Top At_Offset_1 1c5b 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1c5c e5fc | | Load 0x2,-0x4 1c5d 00d9 | | Load_Top At_Offset_1 1c5e 00d8 | | Load_Top At_Offset_0 1c5f 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1c60 00da | | Load_Top At_Offset_2 1c61 01da | | Execute Vector,Bounds 1c62 00da | | Load_Top At_Offset_2 1c63 01da | | Execute Vector,Bounds 1c64 00da | | Load_Top At_Offset_2 1c65 027f | | Execute Discrete,Equal 1c66 7001 |p | Jump_Nonzero 0x1c68 1c67 08e0 | | Execute_Immediate Raise,0xe0 1c68 00cd | | Action Spare6_Action 1c69 027f | | Execute Discrete,Equal 1c6a 7001 |p | Jump_Nonzero 0x1c6c 1c6b 08e0 | | Execute_Immediate Raise,0xe0 1c6c 00d2 | | Pop_Control Pop_Count_2 1c6d 00d9 | | Load_Top At_Offset_1 1c6e 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1c6f 00db | | Load_Top At_Offset_3 1c70 00d9 | | Load_Top At_Offset_1 1c71 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 1c72 e2ac | | Load 0x1,0xac 1c73 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1c74 003b | ; | Store_Top Access,At_Offset_3 1c75 7812 |x | Jump 0x1c88 1c76 e5fb | | Load 0x2,-0x5 1c77 e5fc | | Load 0x2,-0x4 1c78 e2ac | | Load 0x1,0xac 1c79 e402 | | Load 0x2,0x2 1c7a e403 | | Load 0x2,0x3 1c7b 0aff | | Execute_Immediate Plus,-0x1 1c7c 00d8 | | Load_Top At_Offset_0 1c7d 00e2 | | Load_Encached Integer_Cache 1c7e 0260 | ` | Execute Discrete,In_Type 1c7f 7001 |p | Jump_Nonzero 0x1c81 1c80 0801 | | Execute_Immediate Raise,0x1 1c81 e5fe | | Load 0x2,-0x2 1c82 01cf | | Execute Vector,Slice_Read 1c83 e5ff | | Load 0x2,-0x1 1c84 82b4 | | Call 0x1,0xb4 1c85 c405 | | Store 0x2,0x5 1c86 00d1 | | Pop_Control Pop_Count_1 1c87 c5fb | | Store 0x2,-0x5 1c88 00d9 | | Load_Top At_Offset_1 1c89 7003 |p | Jump_Nonzero 0x1c8d 1c8a 00da | | Load_Top At_Offset_2 1c8b a404 | | Store_Unchecked 0x2,0x4 1c8c 7804 |x | Jump 0x1c91 1c8d 00da | | Load_Top At_Offset_2 1c8e 00da | | Load_Top At_Offset_2 1c8f 0227 | ' | Execute Access,All_Reference 1c90 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1c91 00da | | Load_Top At_Offset_2 1c92 003a | : | Store_Top Access,At_Offset_2 1c93 e403 | | Load 0x2,0x3 1c94 0a01 | | Execute_Immediate Plus,0x1 1c95 c402 | | Store 0x2,0x2 1c96 00c9 | | Action Pop_Auxiliary_Loop 1c97 e402 | | Load 0x2,0x2 1c98 e5fe | | Load 0x2,-0x2 1c99 01dc | | Execute Vector,Last 1c9a 027a | z | Execute Discrete,Less_Equal 1c9b 778b |w | Jump_Nonzero 0x1c27 1c9c 00ce | | Action Pop_Auxiliary 1c9d 00da | | Load_Top At_Offset_2 1c9e 00d9 | | Load_Top At_Offset_1 1c9f 022e | . | Execute Access,Not_Equal 1ca0 6821 |h! | Jump_Zero 0x1cc2 1ca1 4803 |H | Short_Literal 0x3 1ca2 e5fc | | Load 0x2,-0x4 1ca3 01dc | | Execute Vector,Last 1ca4 e2ab | | Load 0x1,0xab 1ca5 1c08 | | Execute_Immediate Run_Utility,0x8 1ca6 e2ac | | Load 0x1,0xac 1ca7 00d9 | | Load_Top At_Offset_1 1ca8 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1ca9 e5fc | | Load 0x2,-0x4 1caa 00d9 | | Load_Top At_Offset_1 1cab 00d8 | | Load_Top At_Offset_0 1cac 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1cad 00da | | Load_Top At_Offset_2 1cae 01da | | Execute Vector,Bounds 1caf 00da | | Load_Top At_Offset_2 1cb0 01da | | Execute Vector,Bounds 1cb1 00da | | Load_Top At_Offset_2 1cb2 027f | | Execute Discrete,Equal 1cb3 7001 |p | Jump_Nonzero 0x1cb5 1cb4 08e0 | | Execute_Immediate Raise,0xe0 1cb5 00cd | | Action Spare6_Action 1cb6 027f | | Execute Discrete,Equal 1cb7 7001 |p | Jump_Nonzero 0x1cb9 1cb8 08e0 | | Execute_Immediate Raise,0xe0 1cb9 00d2 | | Pop_Control Pop_Count_2 1cba 00d9 | | Load_Top At_Offset_1 1cbb 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1cbc 00db | | Load_Top At_Offset_3 1cbd 00d9 | | Load_Top At_Offset_1 1cbe 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 1cbf e2ac | | Load 0x1,0xac 1cc0 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1cc1 003b | ; | Store_Top Access,At_Offset_3 1cc2 00da | | Load_Top At_Offset_2 1cc3 a5fd | | Store_Unchecked 0x2,-0x3 1cc4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1cc5 0000 0000 | | .XXX[0x3] 1cc7 0000 | | 1cc8 ; -------------------------------------------------------------------------------------- 1cc8 ; SUBPROGRAM 1cc8 ; -------------------------------------------------------------------------------------- 1cc8 1cd0 | | .CONST 0x1cd0 ; Address of begin 1cc9 0004 | | .CONST 0x0004 ; Address of exception handler 1cca 0003 | | .CONST 0x0003 ; Number of locals 1ccb INIT_1cc8: 1ccb 00da | | Load_Top At_Offset_2 1ccc 01dd | | Execute Vector,First 1ccd 00e2 | | Load_Encached Integer_Cache 1cce 03f1 | | Declare_Variable Discrete,With_Value 1ccf 00e2 | | Load_Encached Integer_Cache 1cd0 BODY_1cc8: 1cd0 e5fe | | Load 0x2,-0x2 1cd1 01da | | Execute Vector,Bounds 1cd2 e00c | | Load 0x0,0xc 1cd3 1b18 | | Execute Package,Field_Read,Field_Number 0x18 1cd4 035b | [ | Declare_Type Array,Constrained 1cd5 0337 | 7 | Declare_Variable Array 1cd6 00d8 | | Load_Top At_Offset_0 1cd7 01d9 | | Execute Vector,Reverse_Bounds 1cd8 0263 | c | Execute Discrete,Above_Bound 1cd9 7005 |p | Jump_Nonzero 0x1cdf 1cda 4800 |H | Short_Literal 0x0 1cdb 00d9 | | Load_Top At_Offset_1 1cdc e404 | | Load 0x2,0x4 1cdd 01d6 | | Execute Vector,Field_Write 1cde 3ffb |? | Loop_Increasing 0x1cda 1cdf e5fe | | Load 0x2,-0x2 1ce0 01d4 | | Execute Vector,Structure_Write 1ce1 00cf | | Action Mark_Auxiliary 1ce2 7858 |xX | Jump 0x1d3b 1ce3 4800 |H | Short_Literal 0x0 1ce4 00db | | Load_Top At_Offset_3 1ce5 e5ff | | Load 0x2,-0x1 1ce6 01dc | | Execute Vector,Last 1ce7 e5ff | | Load 0x2,-0x1 1ce8 01cf | | Execute Vector,Slice_Read 1ce9 482c |H, | Short_Literal 0x2c 1cea e02f | / | Load 0x0,0x2f 1ceb 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1cec 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 1ced 00d9 | | Load_Top At_Offset_1 1cee 7004 |p | Jump_Nonzero 0x1cf3 1cef e5ff | | Load 0x2,-0x1 1cf0 01dc | | Execute Vector,Last 1cf1 0a01 | | Execute_Immediate Plus,0x1 1cf2 005a | Z | Store_Top Discrete,At_Offset_2 1cf3 00cf | | Action Mark_Auxiliary 1cf4 e5fe | | Load 0x2,-0x2 1cf5 01d9 | | Execute Vector,Reverse_Bounds 1cf6 0263 | c | Execute Discrete,Above_Bound 1cf7 703e |p> | Jump_Nonzero 0x1d36 1cf8 4800 |H | Short_Literal 0x0 1cf9 e402 | | Load 0x2,0x2 1cfa e403 | | Load 0x2,0x3 1cfb 0aff | | Execute_Immediate Plus,-0x1 1cfc 00d8 | | Load_Top At_Offset_0 1cfd 00e2 | | Load_Encached Integer_Cache 1cfe 0260 | ` | Execute Discrete,In_Type 1cff 7001 |p | Jump_Nonzero 0x1d01 1d00 0801 | | Execute_Immediate Raise,0x1 1d01 e5ff | | Load 0x2,-0x1 1d02 01cf | | Execute Vector,Slice_Read 1d03 00da | | Load_Top At_Offset_2 1d04 e00c | | Load 0x0,0xc 1d05 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1d06 e02f | / | Load 0x0,0x2f 1d07 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 1d08 6806 |h | Jump_Zero 0x1d0f 1d09 4801 |H | Short_Literal 0x1 1d0a 00d9 | | Load_Top At_Offset_1 1d0b e5fe | | Load 0x2,-0x2 1d0c 01d6 | | Execute Vector,Field_Write 1d0d 00d2 | | Pop_Control Pop_Count_2 1d0e 7827 |x' | Jump 0x1d36 1d0f 00d8 | | Load_Top At_Offset_0 1d10 e5fe | | Load 0x2,-0x2 1d11 01dc | | Execute Vector,Last 1d12 027f | | Execute Discrete,Equal 1d13 6820 |h | Jump_Zero 0x1d34 1d14 e002 | | Load 0x0,0x2 1d15 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1d16 4801 |H | Short_Literal 0x1 1d17 4802 |H | Short_Literal 0x2 1d18 e00e | | Load 0x0,0xe 1d19 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1d1a 0334 | 4 | Declare_Variable Array,With_Constraint 1d1b e402 | | Load 0x2,0x2 1d1c e403 | | Load 0x2,0x3 1d1d 0aff | | Execute_Immediate Plus,-0x1 1d1e 00d8 | | Load_Top At_Offset_0 1d1f 00e2 | | Load_Encached Integer_Cache 1d20 0260 | ` | Execute Discrete,In_Type 1d21 7001 |p | Jump_Nonzero 0x1d23 1d22 0801 | | Execute_Immediate Raise,0x1 1d23 e5ff | | Load 0x2,-0x1 1d24 01cf | | Execute Vector,Slice_Read 1d25 e00e | | Load 0x0,0xe 1d26 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1d27 4801 |H | Short_Literal 0x1 1d28 00da | | Load_Top At_Offset_2 1d29 01d6 | | Execute Vector,Field_Write 1d2a e5ff | | Load 0x2,-0x1 1d2b e00e | | Load 0x0,0xe 1d2c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1d2d 4802 |H | Short_Literal 0x2 1d2e 00da | | Load_Top At_Offset_2 1d2f 01d6 | | Execute Vector,Field_Write 1d30 6013 |` | Indirect_Literal Discrete,0x1d44,{0x00000000, 0x00002824} 1d31 e002 | | Load 0x0,0x2 1d32 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1d33 c5fd | | Store 0x2,-0x3 1d34 00c8 | | Action Pop_Auxiliary_Range 1d35 3fc2 |? | Loop_Increasing 0x1cf8 1d36 00ce | | Action Pop_Auxiliary 1d37 00d9 | | Load_Top At_Offset_1 1d38 0a01 | | Execute_Immediate Plus,0x1 1d39 005b | [ | Store_Top Discrete,At_Offset_3 1d3a 00c9 | | Action Pop_Auxiliary_Loop 1d3b 00da | | Load_Top At_Offset_2 1d3c e5ff | | Load 0x2,-0x1 1d3d 01dc | | Execute Vector,Last 1d3e 027a | z | Execute Discrete,Less_Equal 1d3f 77a3 |w | Jump_Nonzero 0x1ce3 1d40 4502 |E | Exit_Suprogram New_Top_Offset 0x2 1d41 0000 0000 | | .XXX[0x3] 1d43 0000 | | 1d44 0000 0000 | | .LITERAL {0x00000000, 0x00002824} 1d48 ; -------------------------------------------------------------------------------------- 1d48 ; SUBPROGRAM 1d48 ; -------------------------------------------------------------------------------------- 1d48 1d79 | y | .CONST 0x1d79 ; Address of begin 1d49 0004 | | .CONST 0x0004 ; Address of exception handler 1d4a 0010 | | .CONST 0x0010 ; Number of locals 1d4b INIT_1d48: 1d4b 00da | | Load_Top At_Offset_2 1d4c 8032 | 2 | Call 0x0,0x32 1d4d 82b3 | | Call 0x1,0xb3 1d4e 4800 |H | Short_Literal 0x0 1d4f 00d9 | | Load_Top At_Offset_1 1d50 0092 2b8a | + | Action Push_String_Extended,0x2b8a ; "'" 1d52 e02f | / | Load 0x0,0x2f 1d53 181d | | Execute Package,Field_Execute,Field_Number 0x1d 1d54 00e2 | | Load_Encached Integer_Cache 1d55 03f1 | | Declare_Variable Discrete,With_Value 1d56 00d9 | | Load_Top At_Offset_1 1d57 01dc | | Execute Vector,Last 1d58 0a01 | | Execute_Immediate Plus,0x1 1d59 00e2 | | Load_Encached Integer_Cache 1d5a 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1d5b 00e2 | | Load_Encached Integer_Cache 1d5c 00e2 | | Load_Encached Integer_Cache 1d5d 00e2 | | Load_Encached Integer_Cache 1d5e e29b | | Load 0x1,0x9b 1d5f 0007 | | Action Break_Optional 1d60 00e1 | | Load_Encached Boolean_Cache 1d61 00e1 | | Load_Encached Boolean_Cache 1d62 e2ac | | Load 0x1,0xac 1d63 0007 | | Action Break_Optional 1d64 00d8 | | Load_Top At_Offset_0 1d65 0007 | | Action Break_Optional 1d66 e2ac | | Load 0x1,0xac 1d67 0007 | | Action Break_Optional 1d68 4800 |H | Short_Literal 0x0 1d69 e00c | | Load 0x0,0xc 1d6a 1819 | | Execute Package,Field_Execute,Field_Number 0x19 1d6b 01dc | | Execute Vector,Last 1d6c e00c | | Load 0x0,0xc 1d6d 1b18 | | Execute Package,Field_Read,Field_Number 0x18 1d6e 035b | [ | Declare_Type Array,Constrained 1d6f 0337 | 7 | Declare_Variable Array 1d70 e00c | | Load 0x0,0xc 1d71 1819 | | Execute Package,Field_Execute,Field_Number 0x19 1d72 00d9 | | Load_Top At_Offset_1 1d73 01d4 | | Execute Vector,Structure_Write 1d74 e002 | | Load 0x0,0x2 1d75 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1d76 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1d77 00e1 | | Load_Encached Boolean_Cache 1d78 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 1d79 BODY_1d48: 1d79 e403 | | Load 0x2,0x3 1d7a 0c01 | | Execute_Immediate Greater_Equal,0x1 1d7b 6978 |ix | Jump_Zero 0x1ef4 1d7c 00cf | | Action Mark_Auxiliary 1d7d 7914 |y | Jump 0x1e92 1d7e e403 | | Load 0x2,0x3 1d7f 0a01 | | Execute_Immediate Plus,0x1 1d80 c403 | | Store 0x2,0x3 1d81 4800 |H | Short_Literal 0x0 1d82 e403 | | Load 0x2,0x3 1d83 e402 | | Load 0x2,0x2 1d84 01dc | | Execute Vector,Last 1d85 e402 | | Load 0x2,0x2 1d86 01cf | | Execute Vector,Slice_Read 1d87 4827 |H' | Short_Literal 0x27 1d88 e02f | / | Load 0x0,0x2f 1d89 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1d8a a407 | | Store_Unchecked 0x2,0x7 1d8b e407 | | Load 0x2,0x7 1d8c 7004 |p | Jump_Nonzero 0x1d91 1d8d e402 | | Load 0x2,0x2 1d8e 01dc | | Execute Vector,Last 1d8f 0a01 | | Execute_Immediate Plus,0x1 1d90 c407 | | Store 0x2,0x7 1d91 4800 |H | Short_Literal 0x0 1d92 e403 | | Load 0x2,0x3 1d93 e407 | | Load 0x2,0x7 1d94 0aff | | Execute_Immediate Plus,-0x1 1d95 00d8 | | Load_Top At_Offset_0 1d96 00e2 | | Load_Encached Integer_Cache 1d97 0260 | ` | Execute Discrete,In_Type 1d98 7001 |p | Jump_Nonzero 0x1d9a 1d99 0801 | | Execute_Immediate Raise,0x1 1d9a e402 | | Load 0x2,0x2 1d9b 01cf | | Execute Vector,Slice_Read 1d9c 0092 2b8b | + | Action Push_String_Extended,0x2b8b ; "(" 1d9e e02f | / | Load 0x0,0x2f 1d9f 181d | | Execute Package,Field_Execute,Field_Number 0x1d 1da0 a405 | | Store_Unchecked 0x2,0x5 1da1 e405 | | Load 0x2,0x5 1da2 7006 |p | Jump_Nonzero 0x1da9 1da3 e407 | | Load 0x2,0x7 1da4 a405 | | Store_Unchecked 0x2,0x5 1da5 e405 | | Load 0x2,0x5 1da6 0aff | | Execute_Immediate Plus,-0x1 1da7 c406 | | Store 0x2,0x6 1da8 7808 |x | Jump 0x1db1 1da9 e407 | | Load 0x2,0x7 1daa 0aff | | Execute_Immediate Plus,-0x1 1dab c406 | | Store 0x2,0x6 1dac e406 | | Load 0x2,0x6 1dad e402 | | Load 0x2,0x2 1dae 01d7 | | Execute Vector,Field_Read 1daf 0e29 | ) | Execute_Immediate Not_Equal,0x29 1db0 70eb |p | Jump_Nonzero 0x1e9c 1db1 00e1 | | Load_Encached Boolean_Cache 1db2 00e1 | | Load_Encached Boolean_Cache 1db3 e2a2 | | Load 0x1,0xa2 1db4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1db5 e403 | | Load 0x2,0x3 1db6 e405 | | Load 0x2,0x5 1db7 0aff | | Execute_Immediate Plus,-0x1 1db8 00d8 | | Load_Top At_Offset_0 1db9 00e2 | | Load_Encached Integer_Cache 1dba 0260 | ` | Execute Discrete,In_Type 1dbb 7001 |p | Jump_Nonzero 0x1dbd 1dbc 0801 | | Execute_Immediate Raise,0x1 1dbd e402 | | Load 0x2,0x2 1dbe 01cf | | Execute Vector,Slice_Read 1dbf e2a2 | | Load 0x1,0xa2 1dc0 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1dc1 c408 | | Store 0x2,0x8 1dc2 c409 | | Store 0x2,0x9 1dc3 c40a | | Store 0x2,0xa 1dc4 e409 | | Load 0x2,0x9 1dc5 7028 |p( | Jump_Nonzero 0x1dee 1dc6 e40a | | Load 0x2,0xa 1dc7 7026 |p& | Jump_Nonzero 0x1dee 1dc8 e404 | | Load 0x2,0x4 1dc9 e402 | | Load 0x2,0x2 1dca 01dc | | Execute Vector,Last 1dcb 027a | z | Execute Discrete,Less_Equal 1dcc 68c1 |h | Jump_Zero 0x1e8e 1dcd e002 | | Load 0x0,0x2 1dce 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1dcf 4801 |H | Short_Literal 0x1 1dd0 4802 |H | Short_Literal 0x2 1dd1 e00e | | Load 0x0,0xe 1dd2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1dd3 0334 | 4 | Declare_Variable Array,With_Constraint 1dd4 e403 | | Load 0x2,0x3 1dd5 e405 | | Load 0x2,0x5 1dd6 0aff | | Execute_Immediate Plus,-0x1 1dd7 00d8 | | Load_Top At_Offset_0 1dd8 00e2 | | Load_Encached Integer_Cache 1dd9 0260 | ` | Execute Discrete,In_Type 1dda 7001 |p | Jump_Nonzero 0x1ddc 1ddb 0801 | | Execute_Immediate Raise,0x1 1ddc e402 | | Load 0x2,0x2 1ddd 01cf | | Execute Vector,Slice_Read 1dde e00e | | Load 0x0,0xe 1ddf 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1de0 4801 |H | Short_Literal 0x1 1de1 00da | | Load_Top At_Offset_2 1de2 01d6 | | Execute Vector,Field_Write 1de3 e5ff | | Load 0x2,-0x1 1de4 e00e | | Load 0x0,0xe 1de5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1de6 4802 |H | Short_Literal 0x2 1de7 00da | | Load_Top At_Offset_2 1de8 01d6 | | Execute Vector,Field_Write 1de9 613e |a> | Indirect_Literal Discrete,0x1f28,{0x00000000, 0x00002821} 1dea e002 | | Load 0x0,0x2 1deb 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1dec 005b | [ | Store_Top Discrete,At_Offset_3 1ded 78a0 |x | Jump 0x1e8e 1dee e404 | | Load 0x2,0x4 1def e402 | | Load 0x2,0x2 1df0 01dc | | Execute Vector,Last 1df1 027a | z | Execute Discrete,Less_Equal 1df2 7004 |p | Jump_Nonzero 0x1df7 1df3 e408 | | Load 0x2,0x8 1df4 e29c | | Load 0x1,0x9c 1df5 025f | _ | Execute Discrete,Not_In_Type 1df6 6897 |h | Jump_Zero 0x1e8e 1df7 e404 | | Load 0x2,0x4 1df8 e402 | | Load 0x2,0x2 1df9 01dc | | Execute Vector,Last 1dfa 027d | } | Execute Discrete,Greater 1dfb 6803 |h | Jump_Zero 0x1dff 1dfc e403 | | Load 0x2,0x3 1dfd 0aff | | Execute_Immediate Plus,-0x1 1dfe c404 | | Store 0x2,0x4 1dff e409 | | Load 0x2,0x9 1e00 681d |h | Jump_Zero 0x1e1e 1e01 e40a | | Load 0x2,0xa 1e02 701b |p | Jump_Nonzero 0x1e1e 1e03 e002 | | Load 0x0,0x2 1e04 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1e05 4801 |H | Short_Literal 0x1 1e06 4802 |H | Short_Literal 0x2 1e07 e00e | | Load 0x0,0xe 1e08 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1e09 0334 | 4 | Declare_Variable Array,With_Constraint 1e0a e403 | | Load 0x2,0x3 1e0b e406 | | Load 0x2,0x6 1e0c e402 | | Load 0x2,0x2 1e0d 01cf | | Execute Vector,Slice_Read 1e0e e00e | | Load 0x0,0xe 1e0f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1e10 4801 |H | Short_Literal 0x1 1e11 00da | | Load_Top At_Offset_2 1e12 01d6 | | Execute Vector,Field_Write 1e13 e5ff | | Load 0x2,-0x1 1e14 e00e | | Load 0x0,0xe 1e15 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1e16 4802 |H | Short_Literal 0x2 1e17 00da | | Load_Top At_Offset_2 1e18 01d6 | | Execute Vector,Field_Write 1e19 610a |a | Indirect_Literal Discrete,0x1f24,{0x00000000, 0x00002830} 1e1a e002 | | Load 0x0,0x2 1e1b 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1e1c 005b | [ | Store_Top Discrete,At_Offset_3 1e1d 7870 |xp | Jump 0x1e8e 1e1e e408 | | Load 0x2,0x8 1e1f 4802 |H | Short_Literal 0x2 1e20 4803 |H | Short_Literal 0x3 1e21 0262 | b | Execute Discrete,In_Range 1e22 e405 | | Load 0x2,0x5 1e23 e406 | | Load 0x2,0x6 1e24 027d | } | Execute Discrete,Greater 1e25 027e | ~ | Execute Discrete,Not_Equal 1e26 681b |h | Jump_Zero 0x1e42 1e27 e002 | | Load 0x0,0x2 1e28 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1e29 4801 |H | Short_Literal 0x1 1e2a 4802 |H | Short_Literal 0x2 1e2b e00e | | Load 0x0,0xe 1e2c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1e2d 0334 | 4 | Declare_Variable Array,With_Constraint 1e2e e403 | | Load 0x2,0x3 1e2f e406 | | Load 0x2,0x6 1e30 e402 | | Load 0x2,0x2 1e31 01cf | | Execute Vector,Slice_Read 1e32 e00e | | Load 0x0,0xe 1e33 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1e34 4801 |H | Short_Literal 0x1 1e35 00da | | Load_Top At_Offset_2 1e36 01d6 | | Execute Vector,Field_Write 1e37 e5ff | | Load 0x2,-0x1 1e38 e00e | | Load 0x0,0xe 1e39 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1e3a 4802 |H | Short_Literal 0x2 1e3b 00da | | Load_Top At_Offset_2 1e3c 01d6 | | Execute Vector,Field_Write 1e3d 60e2 |` | Indirect_Literal Discrete,0x1f20,{0x00000000, 0x00002823} 1e3e e002 | | Load 0x0,0x2 1e3f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1e40 005b | [ | Store_Top Discrete,At_Offset_3 1e41 784c |xL | Jump 0x1e8e 1e42 e408 | | Load 0x2,0x8 1e43 0f04 | | Execute_Immediate Equal,0x4 1e44 6818 |h | Jump_Zero 0x1e5d 1e45 4801 |H | Short_Literal 0x1 1e46 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 1e47 00da | | Load_Top At_Offset_2 1e48 e40e | | Load 0x2,0xe 1e49 e405 | | Load 0x2,0x5 1e4a 0a01 | | Execute_Immediate Plus,0x1 1e4b 00d8 | | Load_Top At_Offset_0 1e4c 00e2 | | Load_Encached Integer_Cache 1e4d 0260 | ` | Execute Discrete,In_Type 1e4e 7001 |p | Jump_Nonzero 0x1e50 1e4f 0801 | | Execute_Immediate Raise,0x1 1e50 e406 | | Load 0x2,0x6 1e51 0aff | | Execute_Immediate Plus,-0x1 1e52 00d8 | | Load_Top At_Offset_0 1e53 00e2 | | Load_Encached Integer_Cache 1e54 0260 | ` | Execute Discrete,In_Type 1e55 7001 |p | Jump_Nonzero 0x1e57 1e56 0801 | | Execute_Immediate Raise,0x1 1e57 e402 | | Load 0x2,0x2 1e58 01cf | | Execute Vector,Slice_Read 1e59 82b6 | | Call 0x1,0xb6 1e5a 00d1 | | Pop_Control Pop_Count_1 1e5b 005b | [ | Store_Top Discrete,At_Offset_3 1e5c 7831 |x1 | Jump 0x1e8e 1e5d e405 | | Load 0x2,0x5 1e5e e406 | | Load 0x2,0x6 1e5f 027d | } | Execute Discrete,Greater 1e60 680a |h | Jump_Zero 0x1e6b 1e61 00da | | Load_Top At_Offset_2 1e62 e40e | | Load 0x2,0xe 1e63 e2ac | | Load 0x1,0xac 1e64 00ea | | Load_Encached Null_String_Cache 1e65 e408 | | Load 0x2,0x8 1e66 82b4 | | Call 0x1,0xb4 1e67 c40c | | Store 0x2,0xc 1e68 00d1 | | Pop_Control Pop_Count_1 1e69 005b | [ | Store_Top Discrete,At_Offset_3 1e6a 7818 |x | Jump 0x1e83 1e6b 00da | | Load_Top At_Offset_2 1e6c e40e | | Load 0x2,0xe 1e6d e2ac | | Load 0x1,0xac 1e6e e405 | | Load 0x2,0x5 1e6f 0a01 | | Execute_Immediate Plus,0x1 1e70 00d8 | | Load_Top At_Offset_0 1e71 00e2 | | Load_Encached Integer_Cache 1e72 0260 | ` | Execute Discrete,In_Type 1e73 7001 |p | Jump_Nonzero 0x1e75 1e74 0801 | | Execute_Immediate Raise,0x1 1e75 e406 | | Load 0x2,0x6 1e76 0aff | | Execute_Immediate Plus,-0x1 1e77 00d8 | | Load_Top At_Offset_0 1e78 00e2 | | Load_Encached Integer_Cache 1e79 0260 | ` | Execute Discrete,In_Type 1e7a 7001 |p | Jump_Nonzero 0x1e7c 1e7b 0801 | | Execute_Immediate Raise,0x1 1e7c e402 | | Load 0x2,0x2 1e7d 01cf | | Execute Vector,Slice_Read 1e7e e408 | | Load 0x2,0x8 1e7f 82b5 | | Call 0x1,0xb5 1e80 c40c | | Store 0x2,0xc 1e81 00d1 | | Pop_Control Pop_Count_1 1e82 005b | [ | Store_Top Discrete,At_Offset_3 1e83 e40d | | Load 0x2,0xd 1e84 7003 |p | Jump_Nonzero 0x1e88 1e85 e40c | | Load 0x2,0xc 1e86 a40b | | Store_Unchecked 0x2,0xb 1e87 7804 |x | Jump 0x1e8c 1e88 e40c | | Load 0x2,0xc 1e89 e40d | | Load 0x2,0xd 1e8a 0227 | ' | Execute Access,All_Reference 1e8b 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1e8c e40c | | Load 0x2,0xc 1e8d a40d | | Store_Unchecked 0x2,0xd 1e8e e406 | | Load 0x2,0x6 1e8f 0a01 | | Execute_Immediate Plus,0x1 1e90 c403 | | Store 0x2,0x3 1e91 00c9 | | Action Pop_Auxiliary_Loop 1e92 e403 | | Load 0x2,0x3 1e93 e402 | | Load 0x2,0x2 1e94 01dc | | Execute Vector,Last 1e95 027c | | | Execute Discrete,Less 1e96 6805 |h | Jump_Zero 0x1e9c 1e97 e403 | | Load 0x2,0x3 1e98 e402 | | Load 0x2,0x2 1e99 01d7 | | Execute Vector,Field_Read 1e9a 0f27 | ' | Execute_Immediate Equal,0x27 1e9b 76e2 |v | Jump_Nonzero 0x1d7e 1e9c 00ce | | Action Pop_Auxiliary 1e9d e403 | | Load 0x2,0x3 1e9e e402 | | Load 0x2,0x2 1e9f 01dc | | Execute Vector,Last 1ea0 027c | | | Execute Discrete,Less 1ea1 6825 |h% | Jump_Zero 0x1ec7 1ea2 e002 | | Load 0x0,0x2 1ea3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1ea4 4801 |H | Short_Literal 0x1 1ea5 4802 |H | Short_Literal 0x2 1ea6 e00e | | Load 0x0,0xe 1ea7 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1ea8 0334 | 4 | Declare_Variable Array,With_Constraint 1ea9 4801 |H | Short_Literal 0x1 1eaa e403 | | Load 0x2,0x3 1eab 0aff | | Execute_Immediate Plus,-0x1 1eac 00d8 | | Load_Top At_Offset_0 1ead 00e2 | | Load_Encached Integer_Cache 1eae 0260 | ` | Execute Discrete,In_Type 1eaf 7001 |p | Jump_Nonzero 0x1eb1 1eb0 0801 | | Execute_Immediate Raise,0x1 1eb1 e402 | | Load 0x2,0x2 1eb2 01cf | | Execute Vector,Slice_Read 1eb3 e00e | | Load 0x0,0xe 1eb4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1eb5 4801 |H | Short_Literal 0x1 1eb6 00da | | Load_Top At_Offset_2 1eb7 01d6 | | Execute Vector,Field_Write 1eb8 e403 | | Load 0x2,0x3 1eb9 e402 | | Load 0x2,0x2 1eba 01dc | | Execute Vector,Last 1ebb e402 | | Load 0x2,0x2 1ebc 01cf | | Execute Vector,Slice_Read 1ebd e00e | | Load 0x0,0xe 1ebe 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1ebf 4802 |H | Short_Literal 0x2 1ec0 00da | | Load_Top At_Offset_2 1ec1 01d6 | | Execute Vector,Field_Write 1ec2 6059 |`Y | Indirect_Literal Discrete,0x1f1c,{0x00000000, 0x0000281e} 1ec3 e002 | | Load 0x0,0x2 1ec4 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1ec5 005a | Z | Store_Top Discrete,At_Offset_2 1ec6 782d |x- | Jump 0x1ef4 1ec7 e40b | | Load 0x2,0xb 1ec8 e40d | | Load 0x2,0xd 1ec9 022e | . | Execute Access,Not_Equal 1eca 6822 |h" | Jump_Zero 0x1eed 1ecb 4802 |H | Short_Literal 0x2 1ecc 00db | | Load_Top At_Offset_3 1ecd 01dc | | Execute Vector,Last 1ece e2ab | | Load 0x1,0xab 1ecf 1c08 | | Execute_Immediate Run_Utility,0x8 1ed0 e2ac | | Load 0x1,0xac 1ed1 00d9 | | Load_Top At_Offset_1 1ed2 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1ed3 00db | | Load_Top At_Offset_3 1ed4 00d9 | | Load_Top At_Offset_1 1ed5 00d8 | | Load_Top At_Offset_0 1ed6 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1ed7 00da | | Load_Top At_Offset_2 1ed8 01da | | Execute Vector,Bounds 1ed9 00da | | Load_Top At_Offset_2 1eda 01da | | Execute Vector,Bounds 1edb 00da | | Load_Top At_Offset_2 1edc 027f | | Execute Discrete,Equal 1edd 7001 |p | Jump_Nonzero 0x1edf 1ede 08e0 | | Execute_Immediate Raise,0xe0 1edf 00cd | | Action Spare6_Action 1ee0 027f | | Execute Discrete,Equal 1ee1 7001 |p | Jump_Nonzero 0x1ee3 1ee2 08e0 | | Execute_Immediate Raise,0xe0 1ee3 00d2 | | Pop_Control Pop_Count_2 1ee4 00d9 | | Load_Top At_Offset_1 1ee5 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1ee6 e40b | | Load 0x2,0xb 1ee7 00d9 | | Load_Top At_Offset_1 1ee8 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 1ee9 e2ac | | Load 0x1,0xac 1eea 03b6 | | Declare_Variable Access,By_Allocation,With_Value 1eeb a40b | | Store_Unchecked 0x2,0xb 1eec 7807 |x | Jump 0x1ef4 1eed e40b | | Load 0x2,0xb 1eee 7005 |p | Jump_Nonzero 0x1ef4 1eef 00d8 | | Load_Top At_Offset_0 1ef0 6803 |h | Jump_Zero 0x1ef4 1ef1 0092 2b8c | + | Action Push_String_Extended,0x2b8c ; "Warning: ON_MACHINES query attribute will be ignored." 1ef3 801d | | Call 0x0,0x1d 1ef4 e404 | | Load 0x2,0x4 1ef5 0aff | | Execute_Immediate Plus,-0x1 1ef6 e2ad | | Load 0x1,0xad 1ef7 1c08 | | Execute_Immediate Run_Utility,0x8 1ef8 00da | | Load_Top At_Offset_2 1ef9 00d9 | | Load_Top At_Offset_1 1efa 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 1efb 4801 |H | Short_Literal 0x1 1efc e404 | | Load 0x2,0x4 1efd 0aff | | Execute_Immediate Plus,-0x1 1efe 00d8 | | Load_Top At_Offset_0 1eff 00e2 | | Load_Encached Integer_Cache 1f00 0260 | ` | Execute Discrete,In_Type 1f01 7001 |p | Jump_Nonzero 0x1f03 1f02 0801 | | Execute_Immediate Raise,0x1 1f03 e402 | | Load 0x2,0x2 1f04 01cf | | Execute Vector,Slice_Read 1f05 00d9 | | Load_Top At_Offset_1 1f06 00d8 | | Load_Top At_Offset_0 1f07 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 1f08 00da | | Load_Top At_Offset_2 1f09 01da | | Execute Vector,Bounds 1f0a 00da | | Load_Top At_Offset_2 1f0b 01da | | Execute Vector,Bounds 1f0c 00da | | Load_Top At_Offset_2 1f0d 027f | | Execute Discrete,Equal 1f0e 7001 |p | Jump_Nonzero 0x1f10 1f0f 08e0 | | Execute_Immediate Raise,0xe0 1f10 00cd | | Action Spare6_Action 1f11 027f | | Execute Discrete,Equal 1f12 7001 |p | Jump_Nonzero 0x1f14 1f13 08e0 | | Execute_Immediate Raise,0xe0 1f14 00d2 | | Pop_Control Pop_Count_2 1f15 00d9 | | Load_Top At_Offset_1 1f16 2904 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x4 1f17 e40b | | Load 0x2,0xb 1f18 00d9 | | Load_Top At_Offset_1 1f19 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 1f1a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1f1b 0000 | | .XXX[0x1] 1f1c 0000 0000 | | .LITERAL {0x00000000, 0x0000281e} 1f20 0000 0000 | | .LITERAL {0x00000000, 0x00002823} 1f24 0000 0000 | | .LITERAL {0x00000000, 0x00002830} 1f28 0000 0000 | | .LITERAL {0x00000000, 0x00002821} 1f2c 0000 0000 | | .BLANK 0000[0x4] 1f30 ; -------------------------------------------------------------------------------------- 1f30 ; SUBPROGRAM 1f30 ; -------------------------------------------------------------------------------------- 1f30 1f33 | 3 | .CONST 0x1f33 ; Address of begin 1f31 0004 | | .CONST 0x0004 ; Address of exception handler 1f32 0001 | | .CONST 0x0001 ; Number of locals 1f33 BODY_1f30: 1f33 INIT_1f30: 1f33 00da | | Load_Top At_Offset_2 1f34 e5fe | | Load 0x2,-0x2 1f35 0227 | ' | Execute Access,All_Reference 1f36 2e0c |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc 1f37 e004 | | Load 0x0,0x4 1f38 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1f39 6807 |h | Jump_Zero 0x1f41 1f3a 00db | | Load_Top At_Offset_3 1f3b 0227 | ' | Execute Access,All_Reference 1f3c 2e0d |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd 1f3d 00db | | Load_Top At_Offset_3 1f3e e004 | | Load 0x0,0x4 1f3f 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1f40 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1f41 4800 |H | Short_Literal 0x0 1f42 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1f43 0000 0000 | | .BLANK 0000[0x5] 1f48 ; -------------------------------------------------------------------------------------- 1f48 ; SUBPROGRAM 1f48 ; -------------------------------------------------------------------------------------- 1f48 1f4b | K | .CONST 0x1f4b ; Address of begin 1f49 0004 | | .CONST 0x0004 ; Address of exception handler 1f4a 0001 | | .CONST 0x0001 ; Number of locals 1f4b BODY_1f48: 1f4b INIT_1f48: 1f4b 00db | | Load_Top At_Offset_3 1f4c 0227 | ' | Execute Access,All_Reference 1f4d 2e0f |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xf 1f4e 00db | | Load_Top At_Offset_3 1f4f 027a | z | Execute Discrete,Less_Equal 1f50 6806 |h | Jump_Zero 0x1f57 1f51 00da | | Load_Top At_Offset_2 1f52 e5fe | | Load 0x2,-0x2 1f53 0227 | ' | Execute Access,All_Reference 1f54 2e10 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x10 1f55 027a | z | Execute Discrete,Less_Equal 1f56 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1f57 4800 |H | Short_Literal 0x0 1f58 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 1f59 0000 0000 | | .BLANK 0000[0x7] 1f60 ; -------------------------------------------------------------------------------------- 1f60 ; SUBPROGRAM 1f60 ; -------------------------------------------------------------------------------------- 1f60 1f78 | x | .CONST 0x1f78 ; Address of begin 1f61 0004 | | .CONST 0x0004 ; Address of exception handler 1f62 0008 | | .CONST 0x0008 ; Number of locals 1f63 INIT_1f60: 1f63 00e1 | | Load_Encached Boolean_Cache 1f64 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 1f65 e2ac | | Load 0x1,0xac 1f66 0007 | | Action Break_Optional 1f67 e00d | | Load 0x0,0xd 1f68 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 1f69 02c7 | | Declare_Variable Any 1f6a 00d8 | | Load_Top At_Offset_0 1f6b 1c00 | | Execute_Immediate Run_Utility,0x0 1f6c e00d | | Load 0x0,0xd 1f6d 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 1f6e e00d | | Load 0x0,0xd 1f6f 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 1f70 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1f71 e00d | | Load 0x0,0xd 1f72 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1f73 02c7 | | Declare_Variable Any 1f74 00d8 | | Load_Top At_Offset_0 1f75 1c00 | | Execute_Immediate Run_Utility,0x0 1f76 e00d | | Load 0x0,0xd 1f77 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1f78 BODY_1f60: 1f78 e5ff | | Load 0x2,-0x1 1f79 7003 |p | Jump_Nonzero 0x1f7d 1f7a 4801 |H | Short_Literal 0x1 1f7b a5fd | | Store_Unchecked 0x2,-0x3 1f7c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 1f7d e5ff | | Load 0x2,-0x1 1f7e 0227 | ' | Execute Access,All_Reference 1f7f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 1f80 4615 |F | Jump_Case 0x16 1f81 7a80 |z | Jump 0x2202 ; case 0x0 1f82 781d |x | Jump 0x1fa0 ; case 0x1 1f83 7829 |x) | Jump 0x1fad ; case 0x2 1f84 7840 |x@ | Jump 0x1fc5 ; case 0x3 1f85 7859 |xY | Jump 0x1fdf ; case 0x4 1f86 786f |xo | Jump 0x1ff6 ; case 0x5 1f87 7880 |x | Jump 0x2008 ; case 0x6 1f88 78c3 |x | Jump 0x204c ; case 0x7 1f89 7901 |y | Jump 0x208b ; case 0x8 1f8a 794d |yM | Jump 0x20d8 ; case 0x9 1f8b 7982 |y | Jump 0x210e ; case 0xa 1f8c 7988 |y | Jump 0x2115 ; case 0xb 1f8d 798e |y | Jump 0x211c ; case 0xc 1f8e 79ac |y | Jump 0x213b ; case 0xd 1f8f 79ca |y | Jump 0x215a ; case 0xe 1f90 79e9 |y | Jump 0x217a ; case 0xf 1f91 79f4 |y | Jump 0x2186 ; case 0x10 1f92 7a1e |z | Jump 0x21b1 ; case 0x11 1f93 7a33 |z3 | Jump 0x21c7 ; case 0x12 1f94 7a48 |zH | Jump 0x21dd ; case 0x13 1f95 7a66 |zf | Jump 0x21fc ; case 0x14 1f96 7800 |x | Jump 0x1f97 ; case 0x15 1f97 e5fe | | Load 0x2,-0x2 1f98 0217 | | Execute Heap_Access,All_Reference 1f99 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 1f9a e5ff | | Load 0x2,-0x1 1f9b 0227 | ' | Execute Access,All_Reference 1f9c 2e11 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x11 1f9d 027f | | Execute Discrete,Equal 1f9e a402 | | Store_Unchecked 0x2,0x2 1f9f 7a62 |zb | Jump 0x2202 1fa0 e5fc | | Load 0x2,-0x4 1fa1 00e1 | | Load_Encached Boolean_Cache 1fa2 e5fe | | Load 0x2,-0x2 1fa3 e5ff | | Load 0x2,-0x1 1fa4 0227 | ' | Execute Access,All_Reference 1fa5 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 1fa6 82ba | | Call 0x1,0xba 1fa7 c402 | | Store 0x2,0x2 1fa8 c5fc | | Store 0x2,-0x4 1fa9 e402 | | Load 0x2,0x2 1faa 0f00 | | Execute_Immediate Equal,0x0 1fab a402 | | Store_Unchecked 0x2,0x2 1fac 7a55 |zU | Jump 0x2202 1fad e5ff | | Load 0x2,-0x1 1fae 0227 | ' | Execute Access,All_Reference 1faf 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 1fb0 a403 | | Store_Unchecked 0x2,0x3 1fb1 00cf | | Action Mark_Auxiliary 1fb2 780c |x | Jump 0x1fbf 1fb3 e5fc | | Load 0x2,-0x4 1fb4 00e1 | | Load_Encached Boolean_Cache 1fb5 e5fe | | Load 0x2,-0x2 1fb6 e403 | | Load 0x2,0x3 1fb7 82ba | | Call 0x1,0xba 1fb8 c402 | | Store 0x2,0x2 1fb9 c5fc | | Store 0x2,-0x4 1fba e403 | | Load 0x2,0x3 1fbb 0227 | ' | Execute Access,All_Reference 1fbc 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 1fbd a403 | | Store_Unchecked 0x2,0x3 1fbe 00c9 | | Action Pop_Auxiliary_Loop 1fbf e403 | | Load 0x2,0x3 1fc0 6802 |h | Jump_Zero 0x1fc3 1fc1 e402 | | Load 0x2,0x2 1fc2 77f0 |w | Jump_Nonzero 0x1fb3 1fc3 00ce | | Action Pop_Auxiliary 1fc4 7a3d |z= | Jump 0x2202 1fc5 4800 |H | Short_Literal 0x0 1fc6 a402 | | Store_Unchecked 0x2,0x2 1fc7 e5ff | | Load 0x2,-0x1 1fc8 0227 | ' | Execute Access,All_Reference 1fc9 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 1fca a403 | | Store_Unchecked 0x2,0x3 1fcb 00cf | | Action Mark_Auxiliary 1fcc 780c |x | Jump 0x1fd9 1fcd e5fc | | Load 0x2,-0x4 1fce 00e1 | | Load_Encached Boolean_Cache 1fcf e5fe | | Load 0x2,-0x2 1fd0 e403 | | Load 0x2,0x3 1fd1 82ba | | Call 0x1,0xba 1fd2 c402 | | Store 0x2,0x2 1fd3 c5fc | | Store 0x2,-0x4 1fd4 e403 | | Load 0x2,0x3 1fd5 0227 | ' | Execute Access,All_Reference 1fd6 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 1fd7 a403 | | Store_Unchecked 0x2,0x3 1fd8 00c9 | | Action Pop_Auxiliary_Loop 1fd9 e403 | | Load 0x2,0x3 1fda 6802 |h | Jump_Zero 0x1fdd 1fdb e402 | | Load 0x2,0x2 1fdc 6ff0 |o | Jump_Zero 0x1fcd 1fdd 00ce | | Action Pop_Auxiliary 1fde 7a23 |z# | Jump 0x2202 1fdf e5fc | | Load 0x2,-0x4 1fe0 e404 | | Load 0x2,0x4 1fe1 0120 | | Execute Any,Is_Value 1fe2 6803 |h | Jump_Zero 0x1fe6 1fe3 e00d | | Load 0x0,0xd 1fe4 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 1fe5 7801 |x | Jump 0x1fe7 1fe6 e404 | | Load 0x2,0x4 1fe7 e5fe | | Load 0x2,-0x2 1fe8 e001 | | Load 0x0,0x1 1fe9 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1fea 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1feb c404 | | Store 0x2,0x4 1fec c5fc | | Store 0x2,-0x4 1fed e5fc | | Load 0x2,-0x4 1fee 7213 |r | Jump_Nonzero 0x2202 1fef e404 | | Load 0x2,0x4 1ff0 e5ff | | Load 0x2,-0x1 1ff1 0227 | ' | Execute Access,All_Reference 1ff2 2e06 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6 1ff3 012f | / | Execute Any,Equal 1ff4 a402 | | Store_Unchecked 0x2,0x2 1ff5 7a0c |z | Jump 0x2202 1ff6 e5fc | | Load 0x2,-0x4 1ff7 e00d | | Load 0x0,0xd 1ff8 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 1ff9 e5fe | | Load 0x2,-0x2 1ffa e001 | | Load 0x0,0x1 1ffb 1b14 | | Execute Package,Field_Read,Field_Number 0x14 1ffc 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 1ffd c405 | | Store 0x2,0x5 1ffe c5fc | | Store 0x2,-0x4 1fff e5fc | | Load 0x2,-0x4 2000 7201 |r | Jump_Nonzero 0x2202 2001 00db | | Load_Top At_Offset_3 2002 e5ff | | Load 0x2,-0x1 2003 0227 | ' | Execute Access,All_Reference 2004 2e07 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7 2005 027f | | Execute Discrete,Equal 2006 a402 | | Store_Unchecked 0x2,0x2 2007 79fa |y | Jump 0x2202 2008 e5fc | | Load 0x2,-0x4 2009 00da | | Load_Top At_Offset_2 200a 0120 | | Execute Any,Is_Value 200b 6803 |h | Jump_Zero 0x200f 200c e00d | | Load 0x0,0xd 200d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 200e 7801 |x | Jump 0x2010 200f 00da | | Load_Top At_Offset_2 2010 e5fe | | Load 0x2,-0x2 2011 e001 | | Load 0x0,0x1 2012 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2013 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 2014 c407 | | Store 0x2,0x7 2015 c5fc | | Store 0x2,-0x4 2016 e5fc | | Load 0x2,-0x4 2017 71ea |q | Jump_Nonzero 0x2202 2018 e00d | | Load 0x0,0xd 2019 1b0d | | Execute Package,Field_Read,Field_Number 0xd 201a e00d | | Load 0x0,0xd 201b 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 201c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 201d 61ee |a | Indirect_Literal Discrete,0x220c,{0x00000000, 0x00004000} 201e e022 | " | Load 0x0,0x22 201f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 2020 4800 |H | Short_Literal 0x0 2021 e407 | | Load 0x2,0x7 2022 e00d | | Load 0x0,0xd 2023 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 2024 1811 | | Execute Package,Field_Execute,Field_Number 0x11 2025 e00d | | Load 0x0,0xd 2026 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 2027 180f | | Execute Package,Field_Execute,Field_Number 0xf 2028 c406 | | Store 0x2,0x6 2029 0059 | Y | Store_Top Discrete,At_Offset_1 202a 00d8 | | Load_Top At_Offset_0 202b 7007 |p | Jump_Nonzero 0x2033 202c 00da | | Load_Top At_Offset_2 202d e5ff | | Load 0x2,-0x1 202e 0227 | ' | Execute Access,All_Reference 202f 2e08 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8 2030 027f | | Execute Discrete,Equal 2031 a402 | | Store_Unchecked 0x2,0x2 2032 79cf |y | Jump 0x2202 2033 e002 | | Load 0x0,0x2 2034 1b0d | | Execute Package,Field_Read,Field_Number 0xd 2035 4801 |H | Short_Literal 0x1 2036 4802 |H | Short_Literal 0x2 2037 e00e | | Load 0x0,0xe 2038 1b0f | | Execute Package,Field_Read,Field_Number 0xf 2039 0334 | 4 | Declare_Variable Array,With_Constraint 203a e5fe | | Load 0x2,-0x2 203b e001 | | Load 0x0,0x1 203c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 203d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 203e 4801 |H | Short_Literal 0x1 203f 00da | | Load_Top At_Offset_2 2040 01d6 | | Execute Vector,Field_Write 2041 00da | | Load_Top At_Offset_2 2042 e00e | | Load 0x0,0xe 2043 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 2044 4802 |H | Short_Literal 0x2 2045 00da | | Load_Top At_Offset_2 2046 01d6 | | Execute Vector,Field_Write 2047 61c0 |a | Indirect_Literal Discrete,0x2208,{0x00000000, 0x00002820} 2048 e002 | | Load 0x0,0x2 2049 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 204a c5fc | | Store 0x2,-0x4 204b 79b6 |y | Jump 0x2202 204c e5ff | | Load 0x2,-0x1 204d 0227 | ' | Execute Access,All_Reference 204e 2e09 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9 204f 4604 |F | Jump_Case 0x5 2050 7809 |x | Jump 0x205a ; case 0x0 2051 780f |x | Jump 0x2061 ; case 0x1 2052 7815 |x | Jump 0x2068 ; case 0x2 2053 781a |x | Jump 0x206e ; case 0x3 2054 7800 |x | Jump 0x2055 ; case 0x4 2055 e5fe | | Load 0x2,-0x2 2056 0217 | | Execute Heap_Access,All_Reference 2057 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 2058 a402 | | Store_Unchecked 0x2,0x2 2059 79a8 |y | Jump 0x2202 205a 4801 |H | Short_Literal 0x1 205b e5fe | | Load 0x2,-0x2 205c e001 | | Load 0x0,0x1 205d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 205e 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 205f a402 | | Store_Unchecked 0x2,0x2 2060 79a1 |y | Jump 0x2202 2061 4802 |H | Short_Literal 0x2 2062 e5fe | | Load 0x2,-0x2 2063 e001 | | Load 0x0,0x1 2064 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2065 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 2066 a402 | | Store_Unchecked 0x2,0x2 2067 799a |y | Jump 0x2202 2068 e5fe | | Load 0x2,-0x2 2069 e001 | | Load 0x0,0x1 206a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 206b 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 206c a402 | | Store_Unchecked 0x2,0x2 206d 7994 |y | Jump 0x2202 206e 4800 |H | Short_Literal 0x0 206f a402 | | Store_Unchecked 0x2,0x2 2070 00cf | | Action Mark_Auxiliary 2071 e5ff | | Load 0x2,-0x1 2072 0227 | ' | Execute Access,All_Reference 2073 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2074 01d9 | | Execute Vector,Reverse_Bounds 2075 0263 | c | Execute Discrete,Above_Bound 2076 7012 |p | Jump_Nonzero 0x2089 2077 00d8 | | Load_Top At_Offset_0 2078 e5ff | | Load 0x2,-0x1 2079 0227 | ' | Execute Access,All_Reference 207a 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 207b 01d7 | | Execute Vector,Field_Read 207c 680a |h | Jump_Zero 0x2087 207d 00d8 | | Load_Top At_Offset_0 207e e5fe | | Load 0x2,-0x2 207f e001 | | Load 0x0,0x1 2080 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2081 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 2082 a402 | | Store_Unchecked 0x2,0x2 2083 e402 | | Load 0x2,0x2 2084 6802 |h | Jump_Zero 0x2087 2085 00d2 | | Pop_Control Pop_Count_2 2086 7802 |x | Jump 0x2089 2087 00c8 | | Action Pop_Auxiliary_Range 2088 3fee |? | Loop_Increasing 0x2077 2089 00ce | | Action Pop_Auxiliary 208a 7977 |yw | Jump 0x2202 208b e5ff | | Load 0x2,-0x1 208c 0227 | ' | Execute Access,All_Reference 208d 2e0a |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa 208e 4603 |F | Jump_Case 0x4 208f 7820 |x | Jump 0x20b0 ; case 0x0 2090 7824 |x$ | Jump 0x20b5 ; case 0x1 2091 7829 |x) | Jump 0x20bb ; case 0x2 2092 7800 |x | Jump 0x2093 ; case 0x3 2093 4800 |H | Short_Literal 0x0 2094 a402 | | Store_Unchecked 0x2,0x2 2095 00cf | | Action Mark_Auxiliary 2096 e5ff | | Load 0x2,-0x1 2097 0227 | ' | Execute Access,All_Reference 2098 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2099 01d9 | | Execute Vector,Reverse_Bounds 209a 0263 | c | Execute Discrete,Above_Bound 209b 7012 |p | Jump_Nonzero 0x20ae 209c 00d8 | | Load_Top At_Offset_0 209d e5ff | | Load 0x2,-0x1 209e 0227 | ' | Execute Access,All_Reference 209f 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 20a0 01d7 | | Execute Vector,Field_Read 20a1 680a |h | Jump_Zero 0x20ac 20a2 00d8 | | Load_Top At_Offset_0 20a3 e5fe | | Load 0x2,-0x2 20a4 e001 | | Load 0x0,0x1 20a5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 20a6 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 20a7 a402 | | Store_Unchecked 0x2,0x2 20a8 e402 | | Load 0x2,0x2 20a9 6802 |h | Jump_Zero 0x20ac 20aa 00d2 | | Pop_Control Pop_Count_2 20ab 7802 |x | Jump 0x20ae 20ac 00c8 | | Action Pop_Auxiliary_Range 20ad 3fee |? | Loop_Increasing 0x209c 20ae 00ce | | Action Pop_Auxiliary 20af 7952 |yR | Jump 0x2202 20b0 e5fe | | Load 0x2,-0x2 20b1 0217 | | Execute Heap_Access,All_Reference 20b2 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 20b3 a402 | | Store_Unchecked 0x2,0x2 20b4 794d |yM | Jump 0x2202 20b5 e5fe | | Load 0x2,-0x2 20b6 e001 | | Load 0x0,0x1 20b7 1b14 | | Execute Package,Field_Read,Field_Number 0x14 20b8 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 20b9 a402 | | Store_Unchecked 0x2,0x2 20ba 7947 |yG | Jump 0x2202 20bb 4800 |H | Short_Literal 0x0 20bc a402 | | Store_Unchecked 0x2,0x2 20bd 00cf | | Action Mark_Auxiliary 20be e5ff | | Load 0x2,-0x1 20bf 0227 | ' | Execute Access,All_Reference 20c0 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 20c1 01d9 | | Execute Vector,Reverse_Bounds 20c2 0263 | c | Execute Discrete,Above_Bound 20c3 7012 |p | Jump_Nonzero 0x20d6 20c4 00d8 | | Load_Top At_Offset_0 20c5 e5ff | | Load 0x2,-0x1 20c6 0227 | ' | Execute Access,All_Reference 20c7 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 20c8 01d7 | | Execute Vector,Field_Read 20c9 680a |h | Jump_Zero 0x20d4 20ca 00d8 | | Load_Top At_Offset_0 20cb e5fe | | Load 0x2,-0x2 20cc e001 | | Load 0x0,0x1 20cd 1b14 | | Execute Package,Field_Read,Field_Number 0x14 20ce 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 20cf a402 | | Store_Unchecked 0x2,0x2 20d0 e402 | | Load 0x2,0x2 20d1 6802 |h | Jump_Zero 0x20d4 20d2 00d2 | | Pop_Control Pop_Count_2 20d3 7802 |x | Jump 0x20d6 20d4 00c8 | | Action Pop_Auxiliary_Range 20d5 3fee |? | Loop_Increasing 0x20c4 20d6 00ce | | Action Pop_Auxiliary 20d7 792a |y* | Jump 0x2202 20d8 4800 |H | Short_Literal 0x0 20d9 a402 | | Store_Unchecked 0x2,0x2 20da e5fe | | Load 0x2,-0x2 20db e001 | | Load 0x0,0x1 20dc 1b14 | | Execute Package,Field_Read,Field_Number 0x14 20dd 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 20de 6923 |i# | Jump_Zero 0x2202 20df e5fe | | Load 0x2,-0x2 20e0 e001 | | Load 0x0,0x1 20e1 1b14 | | Execute Package,Field_Read,Field_Number 0x14 20e2 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 20e3 e5ff | | Load 0x2,-0x1 20e4 0227 | ' | Execute Access,All_Reference 20e5 2e0e |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe 20e6 0217 | | Execute Heap_Access,All_Reference 20e7 e033 | 3 | Load 0x0,0x33 20e8 1812 | | Execute Package,Field_Execute,Field_Number 0x12 20e9 6803 |h | Jump_Zero 0x20ed 20ea 4801 |H | Short_Literal 0x1 20eb a402 | | Store_Unchecked 0x2,0x2 20ec 7915 |y | Jump 0x2202 20ed 00cf | | Action Mark_Auxiliary 20ee e5ff | | Load 0x2,-0x1 20ef 0227 | ' | Execute Access,All_Reference 20f0 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 20f1 01d9 | | Execute Vector,Reverse_Bounds 20f2 0263 | c | Execute Discrete,Above_Bound 20f3 7018 |p | Jump_Nonzero 0x210c 20f4 00d8 | | Load_Top At_Offset_0 20f5 e5ff | | Load 0x2,-0x1 20f6 0227 | ' | Execute Access,All_Reference 20f7 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 20f8 01d7 | | Execute Vector,Field_Read 20f9 6810 |h | Jump_Zero 0x210a 20fa 00d8 | | Load_Top At_Offset_0 20fb e5fe | | Load 0x2,-0x2 20fc e001 | | Load 0x0,0x1 20fd 1b14 | | Execute Package,Field_Read,Field_Number 0x14 20fe 1854 | T | Execute Package,Field_Execute,Field_Number 0x54 20ff e5ff | | Load 0x2,-0x1 2100 0227 | ' | Execute Access,All_Reference 2101 2e0e |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe 2102 0217 | | Execute Heap_Access,All_Reference 2103 e033 | 3 | Load 0x0,0x33 2104 1812 | | Execute Package,Field_Execute,Field_Number 0x12 2105 a402 | | Store_Unchecked 0x2,0x2 2106 e402 | | Load 0x2,0x2 2107 6802 |h | Jump_Zero 0x210a 2108 00d2 | | Pop_Control Pop_Count_2 2109 7802 |x | Jump 0x210c 210a 00c8 | | Action Pop_Auxiliary_Range 210b 3fe8 |? | Loop_Increasing 0x20f4 210c 00ce | | Action Pop_Auxiliary 210d 78f4 |x | Jump 0x2202 210e e5ff | | Load 0x2,-0x1 210f e5fe | | Load 0x2,-0x2 2110 0217 | | Execute Heap_Access,All_Reference 2111 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 2112 82b8 | | Call 0x1,0xb8 2113 a402 | | Store_Unchecked 0x2,0x2 2114 78ed |x | Jump 0x2202 2115 e5ff | | Load 0x2,-0x1 2116 e5fe | | Load 0x2,-0x2 2117 0217 | | Execute Heap_Access,All_Reference 2118 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 2119 82b8 | | Call 0x1,0xb8 211a a402 | | Store_Unchecked 0x2,0x2 211b 78e6 |x | Jump 0x2202 211c 4800 |H | Short_Literal 0x0 211d a402 | | Store_Unchecked 0x2,0x2 211e 00cf | | Action Mark_Auxiliary 211f e5ff | | Load 0x2,-0x1 2120 0227 | ' | Execute Access,All_Reference 2121 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2122 01d9 | | Execute Vector,Reverse_Bounds 2123 0263 | c | Execute Discrete,Above_Bound 2124 7014 |p | Jump_Nonzero 0x2139 2125 00d8 | | Load_Top At_Offset_0 2126 e5ff | | Load 0x2,-0x1 2127 0227 | ' | Execute Access,All_Reference 2128 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2129 01d7 | | Execute Vector,Field_Read 212a 680c |h | Jump_Zero 0x2137 212b e5ff | | Load 0x2,-0x1 212c 00d9 | | Load_Top At_Offset_1 212d e5fe | | Load 0x2,-0x2 212e e001 | | Load 0x0,0x1 212f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2130 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 2131 82b8 | | Call 0x1,0xb8 2132 a402 | | Store_Unchecked 0x2,0x2 2133 e402 | | Load 0x2,0x2 2134 6802 |h | Jump_Zero 0x2137 2135 00d2 | | Pop_Control Pop_Count_2 2136 7802 |x | Jump 0x2139 2137 00c8 | | Action Pop_Auxiliary_Range 2138 3fec |? | Loop_Increasing 0x2125 2139 00ce | | Action Pop_Auxiliary 213a 78c7 |x | Jump 0x2202 213b 4800 |H | Short_Literal 0x0 213c a402 | | Store_Unchecked 0x2,0x2 213d 00cf | | Action Mark_Auxiliary 213e e5ff | | Load 0x2,-0x1 213f 0227 | ' | Execute Access,All_Reference 2140 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2141 01d9 | | Execute Vector,Reverse_Bounds 2142 0263 | c | Execute Discrete,Above_Bound 2143 7014 |p | Jump_Nonzero 0x2158 2144 00d8 | | Load_Top At_Offset_0 2145 e5ff | | Load 0x2,-0x1 2146 0227 | ' | Execute Access,All_Reference 2147 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2148 01d7 | | Execute Vector,Field_Read 2149 680c |h | Jump_Zero 0x2156 214a e5ff | | Load 0x2,-0x1 214b 00d9 | | Load_Top At_Offset_1 214c e5fe | | Load 0x2,-0x2 214d e001 | | Load 0x0,0x1 214e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 214f 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 2150 82b8 | | Call 0x1,0xb8 2151 a402 | | Store_Unchecked 0x2,0x2 2152 e402 | | Load 0x2,0x2 2153 6802 |h | Jump_Zero 0x2156 2154 00d2 | | Pop_Control Pop_Count_2 2155 7802 |x | Jump 0x2158 2156 00c8 | | Action Pop_Auxiliary_Range 2157 3fec |? | Loop_Increasing 0x2144 2158 00ce | | Action Pop_Auxiliary 2159 78a8 |x | Jump 0x2202 215a 4800 |H | Short_Literal 0x0 215b a402 | | Store_Unchecked 0x2,0x2 215c 00cf | | Action Mark_Auxiliary 215d e5ff | | Load 0x2,-0x1 215e 0227 | ' | Execute Access,All_Reference 215f 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2160 01d9 | | Execute Vector,Reverse_Bounds 2161 0263 | c | Execute Discrete,Above_Bound 2162 7015 |p | Jump_Nonzero 0x2178 2163 00d8 | | Load_Top At_Offset_0 2164 e5ff | | Load 0x2,-0x1 2165 0227 | ' | Execute Access,All_Reference 2166 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2167 01d7 | | Execute Vector,Field_Read 2168 680d |h | Jump_Zero 0x2176 2169 e5ff | | Load 0x2,-0x1 216a 00d9 | | Load_Top At_Offset_1 216b 4800 |H | Short_Literal 0x0 216c e5fe | | Load 0x2,-0x2 216d e001 | | Load 0x0,0x1 216e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 216f 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 2170 82b8 | | Call 0x1,0xb8 2171 a402 | | Store_Unchecked 0x2,0x2 2172 e402 | | Load 0x2,0x2 2173 6802 |h | Jump_Zero 0x2176 2174 00d2 | | Pop_Control Pop_Count_2 2175 7802 |x | Jump 0x2178 2176 00c8 | | Action Pop_Auxiliary_Range 2177 3feb |? | Loop_Increasing 0x2163 2178 00ce | | Action Pop_Auxiliary 2179 7888 |x | Jump 0x2202 217a e5fe | | Load 0x2,-0x2 217b e001 | | Load 0x0,0x1 217c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 217d 181c | | Execute Package,Field_Execute,Field_Number 0x1c 217e e5ff | | Load 0x2,-0x1 217f 0227 | ' | Execute Access,All_Reference 2180 2e0e |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe 2181 0217 | | Execute Heap_Access,All_Reference 2182 e033 | 3 | Load 0x0,0x33 2183 1812 | | Execute Package,Field_Execute,Field_Number 0x12 2184 a402 | | Store_Unchecked 0x2,0x2 2185 787c |x| | Jump 0x2202 2186 4800 |H | Short_Literal 0x0 2187 a402 | | Store_Unchecked 0x2,0x2 2188 00cf | | Action Mark_Auxiliary 2189 e5ff | | Load 0x2,-0x1 218a 0227 | ' | Execute Access,All_Reference 218b 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 218c 01d9 | | Execute Vector,Reverse_Bounds 218d 0263 | c | Execute Discrete,Above_Bound 218e 7020 |p | Jump_Nonzero 0x21af 218f 00d8 | | Load_Top At_Offset_0 2190 e5ff | | Load 0x2,-0x1 2191 0227 | ' | Execute Access,All_Reference 2192 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2193 01d7 | | Execute Vector,Field_Read 2194 6818 |h | Jump_Zero 0x21ad 2195 00d8 | | Load_Top At_Offset_0 2196 e5fe | | Load 0x2,-0x2 2197 e001 | | Load 0x0,0x1 2198 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2199 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 219a 680c |h | Jump_Zero 0x21a7 219b 00d8 | | Load_Top At_Offset_0 219c e5fe | | Load 0x2,-0x2 219d e001 | | Load 0x0,0x1 219e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 219f 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 21a0 e5ff | | Load 0x2,-0x1 21a1 0227 | ' | Execute Access,All_Reference 21a2 2e0e |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe 21a3 0217 | | Execute Heap_Access,All_Reference 21a4 e033 | 3 | Load 0x0,0x33 21a5 1812 | | Execute Package,Field_Execute,Field_Number 0x12 21a6 7801 |x | Jump 0x21a8 21a7 4800 |H | Short_Literal 0x0 21a8 a402 | | Store_Unchecked 0x2,0x2 21a9 e402 | | Load 0x2,0x2 21aa 6802 |h | Jump_Zero 0x21ad 21ab 00d2 | | Pop_Control Pop_Count_2 21ac 7802 |x | Jump 0x21af 21ad 00c8 | | Action Pop_Auxiliary_Range 21ae 3fe0 |? | Loop_Increasing 0x218f 21af 00ce | | Action Pop_Auxiliary 21b0 7851 |xQ | Jump 0x2202 21b1 e5fe | | Load 0x2,-0x2 21b2 e001 | | Load 0x0,0x1 21b3 1b14 | | Execute Package,Field_Read,Field_Number 0x14 21b4 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 21b5 680e |h | Jump_Zero 0x21c4 21b6 e5fe | | Load 0x2,-0x2 21b7 e001 | | Load 0x0,0x1 21b8 1b14 | | Execute Package,Field_Read,Field_Number 0x14 21b9 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 21ba e001 | | Load 0x0,0x1 21bb 1b14 | | Execute Package,Field_Read,Field_Number 0x14 21bc 181c | | Execute Package,Field_Execute,Field_Number 0x1c 21bd e5ff | | Load 0x2,-0x1 21be 0227 | ' | Execute Access,All_Reference 21bf 2e0e |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe 21c0 0217 | | Execute Heap_Access,All_Reference 21c1 e033 | 3 | Load 0x0,0x33 21c2 1812 | | Execute Package,Field_Execute,Field_Number 0x12 21c3 7801 |x | Jump 0x21c5 21c4 4800 |H | Short_Literal 0x0 21c5 a402 | | Store_Unchecked 0x2,0x2 21c6 783b |x; | Jump 0x2202 21c7 e5fe | | Load 0x2,-0x2 21c8 e001 | | Load 0x0,0x1 21c9 1b14 | | Execute Package,Field_Read,Field_Number 0x14 21ca 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 21cb 680e |h | Jump_Zero 0x21da 21cc e5fe | | Load 0x2,-0x2 21cd e001 | | Load 0x0,0x1 21ce 1b14 | | Execute Package,Field_Read,Field_Number 0x14 21cf 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 21d0 e001 | | Load 0x0,0x1 21d1 1b14 | | Execute Package,Field_Read,Field_Number 0x14 21d2 181c | | Execute Package,Field_Execute,Field_Number 0x1c 21d3 e5ff | | Load 0x2,-0x1 21d4 0227 | ' | Execute Access,All_Reference 21d5 2e0e |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe 21d6 0217 | | Execute Heap_Access,All_Reference 21d7 e033 | 3 | Load 0x0,0x33 21d8 1812 | | Execute Package,Field_Execute,Field_Number 0x12 21d9 7801 |x | Jump 0x21db 21da 4800 |H | Short_Literal 0x0 21db a402 | | Store_Unchecked 0x2,0x2 21dc 7825 |x% | Jump 0x2202 21dd 4800 |H | Short_Literal 0x0 21de a402 | | Store_Unchecked 0x2,0x2 21df 00cf | | Action Mark_Auxiliary 21e0 e5ff | | Load 0x2,-0x1 21e1 0227 | ' | Execute Access,All_Reference 21e2 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 21e3 01d9 | | Execute Vector,Reverse_Bounds 21e4 0263 | c | Execute Discrete,Above_Bound 21e5 7014 |p | Jump_Nonzero 0x21fa 21e6 00d8 | | Load_Top At_Offset_0 21e7 e5ff | | Load 0x2,-0x1 21e8 0227 | ' | Execute Access,All_Reference 21e9 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 21ea 01d7 | | Execute Vector,Field_Read 21eb 680c |h | Jump_Zero 0x21f8 21ec e5ff | | Load 0x2,-0x1 21ed 00d9 | | Load_Top At_Offset_1 21ee e5fe | | Load 0x2,-0x2 21ef e001 | | Load 0x0,0x1 21f0 1b14 | | Execute Package,Field_Read,Field_Number 0x14 21f1 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 21f2 82b9 | | Call 0x1,0xb9 21f3 a402 | | Store_Unchecked 0x2,0x2 21f4 e402 | | Load 0x2,0x2 21f5 6802 |h | Jump_Zero 0x21f8 21f6 00d2 | | Pop_Control Pop_Count_2 21f7 7802 |x | Jump 0x21fa 21f8 00c8 | | Action Pop_Auxiliary_Range 21f9 3fec |? | Loop_Increasing 0x21e6 21fa 00ce | | Action Pop_Auxiliary 21fb 7806 |x | Jump 0x2202 21fc e5ff | | Load 0x2,-0x1 21fd e5fe | | Load 0x2,-0x2 21fe 0217 | | Execute Heap_Access,All_Reference 21ff 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 2200 82b9 | | Call 0x1,0xb9 2201 a402 | | Store_Unchecked 0x2,0x2 2202 e402 | | Load 0x2,0x2 2203 a5fd | | Store_Unchecked 0x2,-0x3 2204 4503 |E | Exit_Suprogram New_Top_Offset 0x3 2205 0000 0000 | | .XXX[0x3] 2207 0000 | | 2208 0000 0000 | | .LITERAL {0x00000000, 0x00002820} 220c 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 2210 ; -------------------------------------------------------------------------------------- 2210 ; SUBPROGRAM 2210 ; -------------------------------------------------------------------------------------- 2210 2220 |" | .CONST 0x2220 ; Address of begin 2211 0004 | | .CONST 0x0004 ; Address of exception handler 2212 0005 | | .CONST 0x0005 ; Number of locals 2213 INIT_2210: 2213 00da | | Load_Top At_Offset_2 2214 e00d | | Load 0x0,0xd 2215 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 2216 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 2217 e5fd | | Load 0x2,-0x3 2218 e01b | | Load 0x0,0x1b 2219 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 221a e5fd | | Load 0x2,-0x3 221b 0217 | | Execute Heap_Access,All_Reference 221c 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 221d 0007 | | Action Break_Optional 221e e01b | | Load 0x0,0x1b 221f 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 2220 BODY_2210: 2220 e5ff | | Load 0x2,-0x1 2221 8026 | & | Call 0x0,0x26 2222 0f02 | | Execute_Immediate Equal,0x2 2223 00db | | Load_Top At_Offset_3 2224 0217 | | Execute Heap_Access,All_Reference 2225 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 2226 4800 |H | Short_Literal 0x0 2227 e5fd | | Load 0x2,-0x3 2228 e403 | | Load 0x2,0x3 2229 e001 | | Load 0x0,0x1 222a 1b13 | | Execute Package,Field_Read,Field_Number 0x13 222b 0216 | | Execute Heap_Access,Convert 222c e5ff | | Load 0x2,-0x1 222d e02a | * | Load 0x0,0x2a 222e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 222f e5fd | | Load 0x2,-0x3 2230 0217 | | Execute Heap_Access,All_Reference 2231 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 2232 00db | | Load_Top At_Offset_3 2233 0217 | | Execute Heap_Access,All_Reference 2234 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 2235 00da | | Load_Top At_Offset_2 2236 e5fd | | Load 0x2,-0x3 2237 0217 | | Execute Heap_Access,All_Reference 2238 380d |8 | Execute Record,Field_Write,Field_Number 0xd 2239 e5ff | | Load 0x2,-0x1 223a 00db | | Load_Top At_Offset_3 223b 0217 | | Execute Heap_Access,All_Reference 223c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 223d e5fd | | Load 0x2,-0x3 223e e402 | | Load 0x2,0x2 223f e020 | | Load 0x0,0x20 2240 180f | | Execute Package,Field_Execute,Field_Number 0xf 2241 00db | | Load_Top At_Offset_3 2242 0217 | | Execute Heap_Access,All_Reference 2243 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 2244 e5fe | | Load 0x2,-0x2 2245 00db | | Load_Top At_Offset_3 2246 0217 | | Execute Heap_Access,All_Reference 2247 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 2248 e5ff | | Load 0x2,-0x1 2249 e5fe | | Load 0x2,-0x2 224a 012f | / | Execute Any,Equal 224b 680b |h | Jump_Zero 0x2257 224c 00da | | Load_Top At_Offset_2 224d 0217 | | Execute Heap_Access,All_Reference 224e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 224f 00db | | Load_Top At_Offset_3 2250 0217 | | Execute Heap_Access,All_Reference 2251 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 2252 4800 |H | Short_Literal 0x0 2253 00db | | Load_Top At_Offset_3 2254 0217 | | Execute Heap_Access,All_Reference 2255 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 2256 780e |x | Jump 0x2265 2257 e5fe | | Load 0x2,-0x2 2258 e00d | | Load 0x0,0xd 2259 1811 | | Execute Package,Field_Execute,Field_Number 0x11 225a 700a |p | Jump_Nonzero 0x2265 225b e5fd | | Load 0x2,-0x3 225c e5fe | | Load 0x2,-0x2 225d e00d | | Load 0x0,0xd 225e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 225f 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 2260 e020 | | Load 0x0,0x20 2261 180f | | Execute Package,Field_Execute,Field_Number 0xf 2262 00db | | Load_Top At_Offset_3 2263 0217 | | Execute Heap_Access,All_Reference 2264 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 2265 00cf | | Action Mark_Auxiliary 2266 781c |x | Jump 0x2283 2267 00db | | Load_Top At_Offset_3 2268 e001 | | Load 0x0,0x1 2269 1b13 | | Execute Package,Field_Read,Field_Number 0x13 226a 0216 | | Execute Heap_Access,Convert 226b e01b | | Load 0x0,0x1b 226c 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 226d 0032 | 2 | Store_Top Heap_Access,At_Offset_2 226e 00da | | Load_Top At_Offset_2 226f 0217 | | Execute Heap_Access,All_Reference 2270 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 2271 00da | | Load_Top At_Offset_2 2272 0217 | | Execute Heap_Access,All_Reference 2273 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 2274 00db | | Load_Top At_Offset_3 2275 0217 | | Execute Heap_Access,All_Reference 2276 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 2277 00da | | Load_Top At_Offset_2 2278 0217 | | Execute Heap_Access,All_Reference 2279 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 227a 00d9 | | Load_Top At_Offset_1 227b e403 | | Load 0x2,0x3 227c 0217 | | Execute Heap_Access,All_Reference 227d 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 227e 00da | | Load_Top At_Offset_2 227f 0217 | | Execute Heap_Access,All_Reference 2280 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 2281 0033 | 3 | Store_Top Heap_Access,At_Offset_3 2282 00c9 | | Action Pop_Auxiliary_Loop 2283 00da | | Load_Top At_Offset_2 2284 77e2 |w | Jump_Nonzero 0x2267 2285 4504 |E | Exit_Suprogram New_Top_Offset 0x4 2286 0000 0000 | | .XXX[0x2] 2288 ; -------------------------------------------------------------------------------------- 2288 ; SUBPROGRAM 2288 ; -------------------------------------------------------------------------------------- 2288 2298 |" | .CONST 0x2298 ; Address of begin 2289 0004 | | .CONST 0x0004 ; Address of exception handler 228a 0004 | | .CONST 0x0004 ; Number of locals 228b INIT_2288: 228b e00d | | Load 0x0,0xd 228c 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 228d 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 228e 02c7 | | Declare_Variable Any 228f 00d8 | | Load_Top At_Offset_0 2290 1c00 | | Execute_Immediate Run_Utility,0x0 2291 e00d | | Load 0x0,0xd 2292 1b0d | | Execute Package,Field_Read,Field_Number 0xd 2293 e02a | * | Load 0x0,0x2a 2294 1b0f | | Execute Package,Field_Read,Field_Number 0xf 2295 02ff | | Declare_Variable Variant_Record 2296 00d8 | | Load_Top At_Offset_0 2297 1c00 | | Execute_Immediate Run_Utility,0x0 2298 BODY_2288: 2298 e00d | | Load 0x0,0xd 2299 1b0d | | Execute Package,Field_Read,Field_Number 0xd 229a 00db | | Load_Top At_Offset_3 229b 0120 | | Execute Any,Is_Value 229c 6804 |h | Jump_Zero 0x22a1 229d e00d | | Load 0x0,0xd 229e 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 229f 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 22a0 7801 |x | Jump 0x22a2 22a1 00db | | Load_Top At_Offset_3 22a2 602d |`- | Indirect_Literal Discrete,0x22d0,{0x00000000, 0x00004000} 22a3 e022 | " | Load 0x0,0x22 22a4 1b0e | | Execute Package,Field_Read,Field_Number 0xe 22a5 4800 |H | Short_Literal 0x0 22a6 e5ff | | Load 0x2,-0x1 22a7 0217 | | Execute Heap_Access,All_Reference 22a8 340d |4 | Execute Record,Field_Reference,Field_Number 0xd 22a9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 22aa e00d | | Load 0x0,0xd 22ab 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 22ac 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 22ad c402 | | Store 0x2,0x2 22ae 005a | Z | Store_Top Discrete,At_Offset_2 22af 00da | | Load_Top At_Offset_2 22b0 e00d | | Load 0x0,0xd 22b1 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 22b2 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 22b3 00db | | Load_Top At_Offset_3 22b4 e00d | | Load 0x0,0xd 22b5 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 22b6 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 22b7 012e | . | Execute Any,Not_Equal 22b8 6813 |h | Jump_Zero 0x22cc 22b9 4802 |H | Short_Literal 0x2 22ba e5fe | | Load 0x2,-0x2 22bb e402 | | Load 0x2,0x2 22bc e00d | | Load 0x0,0xd 22bd 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 22be 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 22bf e02a | * | Load 0x0,0x2a 22c0 1811 | | Execute Package,Field_Execute,Field_Number 0x11 22c1 00d9 | | Load_Top At_Offset_1 22c2 016d | m | Execute Variant_Record,Structure_Write 22c3 00d8 | | Load_Top At_Offset_0 22c4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 22c5 0f02 | | Execute_Immediate Equal,0x2 22c6 6805 |h | Jump_Zero 0x22cc 22c7 00d8 | | Load_Top At_Offset_0 22c8 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 22c9 0217 | | Execute Heap_Access,All_Reference 22ca 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 22cb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 22cc e01b | | Load 0x0,0x1b 22cd 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 22ce 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 22cf 0000 | | .XXX[0x1] 22d0 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 22d4 0000 0000 | | .BLANK 0000[0x4] 22d8 ; -------------------------------------------------------------------------------------- 22d8 ; SUBPROGRAM 22d8 ; -------------------------------------------------------------------------------------- 22d8 22e5 |" | .CONST 0x22e5 ; Address of begin 22d9 2343 |#C | .CONST 0x2343 ; Address of exception handler 22da 0006 | | .CONST 0x0006 ; Number of locals 22db INIT_22d8: 22db e01b | | Load 0x0,0x1b 22dc 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 22dd e01b | | Load 0x0,0x1b 22de 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 22df e01b | | Load 0x0,0x1b 22e0 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 22e1 e01b | | Load 0x0,0x1b 22e2 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 22e3 00e2 | | Load_Encached Integer_Cache 22e4 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 22e5 BODY_22d8: 22e5 e5ff | | Load 0x2,-0x1 22e6 0217 | | Execute Heap_Access,All_Reference 22e7 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 22e8 0c01 | | Execute_Immediate Greater_Equal,0x1 22e9 7009 |p | Jump_Nonzero 0x22f3 22ea e5fd | | Load 0x2,-0x3 22eb 0c02 | | Execute_Immediate Greater_Equal,0x2 22ec 7006 |p | Jump_Nonzero 0x22f3 22ed e5fd | | Load 0x2,-0x3 22ee 0f01 | | Execute_Immediate Equal,0x1 22ef 684e |hN | Jump_Zero 0x233e 22f0 e5fe | | Load 0x2,-0x2 22f1 0c02 | | Execute_Immediate Greater_Equal,0x2 22f2 684b |hK | Jump_Zero 0x233e 22f3 e5ff | | Load 0x2,-0x1 22f4 0217 | | Execute Heap_Access,All_Reference 22f5 3c0f |< | Execute Record,Field_Read,Field_Number 0xf 22f6 a402 | | Store_Unchecked 0x2,0x2 22f7 00cf | | Action Mark_Auxiliary 22f8 783d |x= | Jump 0x2336 22f9 e402 | | Load 0x2,0x2 22fa 0217 | | Execute Heap_Access,All_Reference 22fb 3c14 |< | Execute Record,Field_Read,Field_Number 0x14 22fc a403 | | Store_Unchecked 0x2,0x3 22fd e402 | | Load 0x2,0x2 22fe 0217 | | Execute Heap_Access,All_Reference 22ff 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 2300 6830 |h0 | Jump_Zero 0x2331 2301 e5ff | | Load 0x2,-0x1 2302 e402 | | Load 0x2,0x2 2303 82bc | | Call 0x1,0xbc 2304 0033 | 3 | Store_Top Heap_Access,At_Offset_3 2305 00da | | Load_Top At_Offset_2 2306 6827 |h' | Jump_Zero 0x232e 2307 00db | | Load_Top At_Offset_3 2308 7005 |p | Jump_Nonzero 0x230e 2309 e403 | | Load 0x2,0x3 230a e5ff | | Load 0x2,-0x1 230b 0217 | | Execute Heap_Access,All_Reference 230c 380f |8 | Execute Record,Field_Write,Field_Number 0xf 230d 7804 |x | Jump 0x2312 230e e403 | | Load 0x2,0x3 230f e404 | | Load 0x2,0x4 2310 0217 | | Execute Heap_Access,All_Reference 2311 3814 |8 | Execute Record,Field_Write,Field_Number 0x14 2312 4800 |H | Short_Literal 0x0 2313 e402 | | Load 0x2,0x2 2314 0217 | | Execute Heap_Access,All_Reference 2315 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 2316 00da | | Load_Top At_Offset_2 2317 e402 | | Load 0x2,0x2 2318 0217 | | Execute Heap_Access,All_Reference 2319 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 231a e5ff | | Load 0x2,-0x1 231b e402 | | Load 0x2,0x2 231c e001 | | Load 0x0,0x1 231d 1b10 | | Execute Package,Field_Read,Field_Number 0x10 231e 0216 | | Execute Heap_Access,Convert 231f 8264 | d | Call 0x1,0x64 2320 e5fb | | Load 0x2,-0x5 2321 e402 | | Load 0x2,0x2 2322 0217 | | Execute Heap_Access,All_Reference 2323 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 2324 e5fc | | Load 0x2,-0x4 2325 e402 | | Load 0x2,0x2 2326 e001 | | Load 0x0,0x1 2327 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2328 0216 | | Execute Heap_Access,Convert 2329 e001 | | Load 0x0,0x1 232a 1b14 | | Execute Package,Field_Read,Field_Number 0x14 232b 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 232c c5fb | | Store 0x2,-0x5 232d 7803 |x | Jump 0x2331 232e 00d9 | | Load_Top At_Offset_1 232f 0a01 | | Execute_Immediate Plus,0x1 2330 005a | Z | Store_Top Discrete,At_Offset_2 2331 e402 | | Load 0x2,0x2 2332 a404 | | Store_Unchecked 0x2,0x4 2333 e403 | | Load 0x2,0x3 2334 a402 | | Store_Unchecked 0x2,0x2 2335 00c9 | | Action Pop_Auxiliary_Loop 2336 e402 | | Load 0x2,0x2 2337 77c1 |w | Jump_Nonzero 0x22f9 2338 00ce | | Action Pop_Auxiliary 2339 00d8 | | Load_Top At_Offset_0 233a e5ff | | Load 0x2,-0x1 233b 0217 | | Execute Heap_Access,All_Reference 233c 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 233d 4505 |E | Exit_Suprogram New_Top_Offset 0x5 233e 4801 |H | Short_Literal 0x1 233f e5ff | | Load 0x2,-0x1 2340 0217 | | Execute Heap_Access,All_Reference 2341 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 2342 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2343 TRAP_22d8: 2343 4885 |H | Short_Literal 0x85 2344 010f | | Execute Exception,Equal 2345 6811 |h | Jump_Zero 0x2357 2346 e002 | | Load 0x0,0x2 2347 1b0d | | Execute Package,Field_Read,Field_Number 0xd 2348 4801 |H | Short_Literal 0x1 2349 4801 |H | Short_Literal 0x1 234a e00e | | Load 0x0,0xe 234b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 234c 0334 | 4 | Declare_Variable Array,With_Constraint 234d e5ff | | Load 0x2,-0x1 234e 825a | Z | Call 0x1,0x5a 234f 4801 |H | Short_Literal 0x1 2350 00da | | Load_Top At_Offset_2 2351 01d6 | | Execute Vector,Field_Write 2352 6005 |` | Indirect_Literal Discrete,0x2358,{0x00000000, 0x00002836} 2353 e002 | | Load 0x0,0x2 2354 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 2355 c5fb | | Store 0x2,-0x5 2356 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2357 0100 | | Execute Exception,Raise 2358 0000 0000 | | .LITERAL {0x00000000, 0x00002836} 235c 0000 0000 | | .BLANK 0000[0x4] 2360 ; -------------------------------------------------------------------------------------- 2360 ; SUBPROGRAM 2360 ; -------------------------------------------------------------------------------------- 2360 236d |#m | .CONST 0x236d ; Address of begin 2361 0004 | | .CONST 0x0004 ; Address of exception handler 2362 0002 | | .CONST 0x0002 ; Number of locals 2363 INIT_2360: 2363 e003 | | Load 0x0,0x3 2364 1b0e | | Execute Package,Field_Read,Field_Number 0xe 2365 0337 | 7 | Declare_Variable Array 2366 00db | | Load_Top At_Offset_3 2367 825f | _ | Call 0x1,0x5f 2368 8226 | & | Call 0x1,0x26 2369 e00c | | Load 0x0,0xc 236a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 236b 00d9 | | Load_Top At_Offset_1 236c 01d4 | | Execute Vector,Structure_Write 236d BODY_2360: 236d 4800 |H | Short_Literal 0x0 236e 00d9 | | Load_Top At_Offset_1 236f 01d7 | | Execute Vector,Field_Read 2370 0f00 | | Execute_Immediate Equal,0x0 2371 4803 |H | Short_Literal 0x3 2372 e5ff | | Load 0x2,-0x1 2373 0217 | | Execute Heap_Access,All_Reference 2374 341a |4 | Execute Record,Field_Reference,Field_Number 0x1a 2375 01d6 | | Execute Vector,Field_Write 2376 4803 |H | Short_Literal 0x3 2377 00d9 | | Load_Top At_Offset_1 2378 01d7 | | Execute Vector,Field_Read 2379 4804 |H | Short_Literal 0x4 237a e5ff | | Load 0x2,-0x1 237b 0217 | | Execute Heap_Access,All_Reference 237c 341a |4 | Execute Record,Field_Reference,Field_Number 0x1a 237d 01d6 | | Execute Vector,Field_Write 237e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 237f 0000 | | .XXX[0x1] 2380 ; -------------------------------------------------------------------------------------- 2380 ; SUBPROGRAM 2380 ; -------------------------------------------------------------------------------------- 2380 23c1 |# | .CONST 0x23c1 ; Address of begin 2381 2555 |%U | .CONST 0x2555 ; Address of exception handler 2382 000d | | .CONST 0x000d ; Number of locals 2383 INIT_2380: 2383 00da | | Load_Top At_Offset_2 2384 e00d | | Load 0x0,0xd 2385 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 2386 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 2387 e5fe | | Load 0x2,-0x2 2388 0217 | | Execute Heap_Access,All_Reference 2389 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 238a 0217 | | Execute Heap_Access,All_Reference 238b 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 238c e020 | | Load 0x0,0x20 238d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 238e 00d9 | | Load_Top At_Offset_1 238f 01dd | | Execute Vector,First 2390 00d9 | | Load_Top At_Offset_1 2391 01db | | Execute Vector,Length 2392 0273 | s | Execute Discrete,Plus 2393 00d8 | | Load_Top At_Offset_0 2394 00e2 | | Load_Encached Integer_Cache 2395 0260 | ` | Execute Discrete,In_Type 2396 7001 |p | Jump_Nonzero 0x2398 2397 0801 | | Execute_Immediate Raise,0x1 2398 00da | | Load_Top At_Offset_2 2399 01dc | | Execute Vector,Last 239a 00db | | Load_Top At_Offset_3 239b 01cf | | Execute Vector,Slice_Read 239c 0007 | | Action Break_Optional 239d e020 | | Load 0x0,0x20 239e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 239f e02a | * | Load 0x0,0x2a 23a0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 23a1 02ff | | Declare_Variable Variant_Record 23a2 00d8 | | Load_Top At_Offset_0 23a3 1c00 | | Execute_Immediate Run_Utility,0x0 23a4 e00d | | Load 0x0,0xd 23a5 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 23a6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 23a7 02c7 | | Declare_Variable Any 23a8 00d8 | | Load_Top At_Offset_0 23a9 1c00 | | Execute_Immediate Run_Utility,0x0 23aa e00d | | Load 0x0,0xd 23ab 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 23ac 1b0e | | Execute Package,Field_Read,Field_Number 0xe 23ad 02c7 | | Declare_Variable Any 23ae 00d8 | | Load_Top At_Offset_0 23af 1c00 | | Execute_Immediate Run_Utility,0x0 23b0 e00d | | Load 0x0,0xd 23b1 1b0f | | Execute Package,Field_Read,Field_Number 0xf 23b2 02c7 | | Declare_Variable Any 23b3 00d8 | | Load_Top At_Offset_0 23b4 1c00 | | Execute_Immediate Run_Utility,0x0 23b5 e01b | | Load 0x0,0x1b 23b6 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 23b7 e01b | | Load 0x0,0x1b 23b8 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 23b9 e00d | | Load 0x0,0xd 23ba 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 23bb 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 23bc 02c7 | | Declare_Variable Any 23bd 00d8 | | Load_Top At_Offset_0 23be 1c00 | | Execute_Immediate Run_Utility,0x0 23bf e00d | | Load 0x0,0xd 23c0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 23c1 BODY_2380: 23c1 e403 | | Load 0x2,0x3 23c2 01db | | Execute Vector,Length 23c3 e402 | | Load 0x2,0x2 23c4 01db | | Execute Vector,Length 23c5 027d | } | Execute Discrete,Greater 23c6 7014 |p | Jump_Nonzero 0x23db 23c7 4801 |H | Short_Literal 0x1 23c8 e402 | | Load 0x2,0x2 23c9 01dd | | Execute Vector,First 23ca e402 | | Load 0x2,0x2 23cb 01dd | | Execute Vector,First 23cc e403 | | Load 0x2,0x3 23cd 01db | | Execute Vector,Length 23ce 0273 | s | Execute Discrete,Plus 23cf 0aff | | Execute_Immediate Plus,-0x1 23d0 00d8 | | Load_Top At_Offset_0 23d1 00e2 | | Load_Encached Integer_Cache 23d2 0260 | ` | Execute Discrete,In_Type 23d3 7001 |p | Jump_Nonzero 0x23d5 23d4 0801 | | Execute_Immediate Raise,0x1 23d5 e402 | | Load 0x2,0x2 23d6 01cf | | Execute Vector,Slice_Read 23d7 e403 | | Load 0x2,0x3 23d8 e02f | / | Load 0x0,0x2f 23d9 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 23da 7017 |p | Jump_Nonzero 0x23f2 23db e002 | | Load 0x0,0x2 23dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 23dd 4801 |H | Short_Literal 0x1 23de 4802 |H | Short_Literal 0x2 23df e00e | | Load 0x0,0xe 23e0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 23e1 0334 | 4 | Declare_Variable Array,With_Constraint 23e2 e5ff | | Load 0x2,-0x1 23e3 e00e | | Load 0x0,0xe 23e4 181a | | Execute Package,Field_Execute,Field_Number 0x1a 23e5 4801 |H | Short_Literal 0x1 23e6 00da | | Load_Top At_Offset_2 23e7 01d6 | | Execute Vector,Field_Write 23e8 e5fe | | Load 0x2,-0x2 23e9 825a | Z | Call 0x1,0x5a 23ea 4802 |H | Short_Literal 0x2 23eb 00da | | Load_Top At_Offset_2 23ec 01d6 | | Execute Vector,Field_Write 23ed 618a |a | Indirect_Literal Discrete,0x2578,{0x00000000, 0x0000281d} 23ee e002 | | Load 0x0,0x2 23ef 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 23f0 c5fa | | Store 0x2,-0x6 23f1 7952 |yR | Jump 0x2544 23f2 e024 | $ | Load 0x0,0x24 23f3 180e | | Execute Package,Field_Execute,Field_Number 0xe 23f4 e402 | | Load 0x2,0x2 23f5 4801 |H | Short_Literal 0x1 23f6 617d |a} | Indirect_Literal Discrete,0x2574,{0x00000000, 0x0000281f} 23f7 e002 | | Load 0x0,0x2 23f8 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 23f9 e5fe | | Load 0x2,-0x2 23fa e404 | | Load 0x2,0x4 23fb e020 | | Load 0x0,0x20 23fc 180f | | Execute Package,Field_Execute,Field_Number 0xf 23fd a405 | | Store_Unchecked 0x2,0x5 23fe e5fe | | Load 0x2,-0x2 23ff e405 | | Load 0x2,0x5 2400 e025 | % | Load 0x0,0x25 2401 180f | | Execute Package,Field_Execute,Field_Number 0xf 2402 a40a | | Store_Unchecked 0x2,0xa 2403 4802 |H | Short_Literal 0x2 2404 e5fe | | Load 0x2,-0x2 2405 e5ff | | Load 0x2,-0x1 2406 e02a | * | Load 0x0,0x2a 2407 1811 | | Execute Package,Field_Execute,Field_Number 0x11 2408 e406 | | Load 0x2,0x6 2409 016d | m | Execute Variant_Record,Structure_Write 240a 00db | | Load_Top At_Offset_3 240b 681d |h | Jump_Zero 0x2429 240c e406 | | Load 0x2,0x6 240d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 240e 0f02 | | Execute_Immediate Equal,0x2 240f 6811 |h | Jump_Zero 0x2421 2410 00db | | Load_Top At_Offset_3 2411 e001 | | Load 0x0,0x1 2412 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2413 0216 | | Execute Heap_Access,Convert 2414 a5fb | | Store_Unchecked 0x2,-0x5 2415 e5fa | | Load 0x2,-0x6 2416 e5fc | | Load 0x2,-0x4 2417 e5fd | | Load 0x2,-0x3 2418 e40a | | Load 0x2,0xa 2419 e001 | | Load 0x0,0x1 241a 1b10 | | Execute Package,Field_Read,Field_Number 0x10 241b 0216 | | Execute Heap_Access,Convert 241c e001 | | Load 0x0,0x1 241d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 241e 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 241f c5fa | | Store 0x2,-0x6 2420 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2421 e5fa | | Load 0x2,-0x6 2422 e5fe | | Load 0x2,-0x2 2423 e40a | | Load 0x2,0xa 2424 e001 | | Load 0x0,0x1 2425 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2426 0216 | | Execute Heap_Access,Convert 2427 8222 | " | Call 0x1,0x22 2428 c5fa | | Store 0x2,-0x6 2429 e5fe | | Load 0x2,-0x2 242a e01b | | Load 0x0,0x1b 242b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 242c a40a | | Store_Unchecked 0x2,0xa 242d 00db | | Load_Top At_Offset_3 242e e001 | | Load 0x0,0x1 242f 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2430 0216 | | Execute Heap_Access,Convert 2431 a5fb | | Store_Unchecked 0x2,-0x5 2432 e5fe | | Load 0x2,-0x2 2433 0217 | | Execute Heap_Access,All_Reference 2434 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 2435 0a01 | | Execute_Immediate Plus,0x1 2436 e5fe | | Load 0x2,-0x2 2437 0217 | | Execute Heap_Access,All_Reference 2438 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 2439 e5fe | | Load 0x2,-0x2 243a 0217 | | Execute Heap_Access,All_Reference 243b 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 243c 0a01 | | Execute_Immediate Plus,0x1 243d e5fe | | Load 0x2,-0x2 243e 0217 | | Execute Heap_Access,All_Reference 243f 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 2440 e5fe | | Load 0x2,-0x2 2441 0217 | | Execute Heap_Access,All_Reference 2442 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 2443 e40a | | Load 0x2,0xa 2444 0217 | | Execute Heap_Access,All_Reference 2445 380a |8 | Execute Record,Field_Write,Field_Number 0xa 2446 e405 | | Load 0x2,0x5 2447 e40a | | Load 0x2,0xa 2448 0217 | | Execute Heap_Access,All_Reference 2449 380b |8 | Execute Record,Field_Write,Field_Number 0xb 244a 4800 |H | Short_Literal 0x0 244b e5fe | | Load 0x2,-0x2 244c e40a | | Load 0x2,0xa 244d e405 | | Load 0x2,0x5 244e e025 | % | Load 0x0,0x25 244f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 2450 e406 | | Load 0x2,0x6 2451 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 2452 0f02 | | Execute_Immediate Equal,0x2 2453 6804 |h | Jump_Zero 0x2458 2454 e406 | | Load 0x2,0x6 2455 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 2456 0033 | 3 | Store_Top Heap_Access,At_Offset_3 2457 7826 |x& | Jump 0x247e 2458 e5fe | | Load 0x2,-0x2 2459 e01b | | Load 0x0,0x1b 245a 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 245b 0033 | 3 | Store_Top Heap_Access,At_Offset_3 245c e5fe | | Load 0x2,-0x2 245d 0217 | | Execute Heap_Access,All_Reference 245e 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 245f 00db | | Load_Top At_Offset_3 2460 0217 | | Execute Heap_Access,All_Reference 2461 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 2462 e405 | | Load 0x2,0x5 2463 00db | | Load_Top At_Offset_3 2464 0217 | | Execute Heap_Access,All_Reference 2465 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 2466 e5ff | | Load 0x2,-0x1 2467 00db | | Load_Top At_Offset_3 2468 0217 | | Execute Heap_Access,All_Reference 2469 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 246a e5fe | | Load 0x2,-0x2 246b 0217 | | Execute Heap_Access,All_Reference 246c 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 246d 0217 | | Execute Heap_Access,All_Reference 246e 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 246f 00db | | Load_Top At_Offset_3 2470 0217 | | Execute Heap_Access,All_Reference 2471 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 2472 00da | | Load_Top At_Offset_2 2473 e5fe | | Load 0x2,-0x2 2474 0217 | | Execute Heap_Access,All_Reference 2475 3c0e |< | Execute Record,Field_Read,Field_Number 0xe 2476 0217 | | Execute Heap_Access,All_Reference 2477 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 2478 4800 |H | Short_Literal 0x0 2479 e5fe | | Load 0x2,-0x2 247a e40b | | Load 0x2,0xb 247b e5ff | | Load 0x2,-0x1 247c e02a | * | Load 0x0,0x2a 247d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 247e 4801 |H | Short_Literal 0x1 247f 00db | | Load_Top At_Offset_3 2480 0217 | | Execute Heap_Access,All_Reference 2481 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 2482 00db | | Load_Top At_Offset_3 2483 00db | | Load_Top At_Offset_3 2484 0217 | | Execute Heap_Access,All_Reference 2485 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 2486 00da | | Load_Top At_Offset_2 2487 e40a | | Load 0x2,0xa 2488 0217 | | Execute Heap_Access,All_Reference 2489 3817 |8 | Execute Record,Field_Write,Field_Number 0x17 248a 4800 |H | Short_Literal 0x0 248b e40a | | Load 0x2,0xa 248c 0217 | | Execute Heap_Access,All_Reference 248d 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 248e 00db | | Load_Top At_Offset_3 248f 0219 | | Execute Heap_Access,All_Read 2490 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 2491 e5fa | | Load 0x2,-0x6 2492 00d9 | | Load_Top At_Offset_1 2493 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 2494 0120 | | Execute Any,Is_Value 2495 6803 |h | Jump_Zero 0x2499 2496 e00d | | Load 0x0,0xd 2497 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 2498 7802 |x | Jump 0x249b 2499 00d9 | | Load_Top At_Offset_1 249a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 249b e40a | | Load 0x2,0xa 249c e001 | | Load 0x0,0x1 249d 1b10 | | Execute Package,Field_Read,Field_Number 0x10 249e 0216 | | Execute Heap_Access,Convert 249f e001 | | Load 0x0,0x1 24a0 1b14 | | Execute Package,Field_Read,Field_Number 0x14 24a1 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 24a2 00da | | Load_Top At_Offset_2 24a3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 24a4 c5fa | | Store 0x2,-0x6 24a5 00d1 | | Pop_Control Pop_Count_1 24a6 00db | | Load_Top At_Offset_3 24a7 0217 | | Execute Heap_Access,All_Reference 24a8 340d |4 | Execute Record,Field_Reference,Field_Number 0xd 24a9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 24aa e00d | | Load 0x0,0xd 24ab 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 24ac 1814 | | Execute Package,Field_Execute,Field_Number 0x14 24ad 012f | / | Execute Any,Equal 24ae 688b |h | Jump_Zero 0x253a 24af e5ff | | Load 0x2,-0x1 24b0 e00d | | Load 0x0,0xd 24b1 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 24b2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 24b3 c407 | | Store 0x2,0x7 24b4 4800 |H | Short_Literal 0x0 24b5 e407 | | Load 0x2,0x7 24b6 e00d | | Load 0x0,0xd 24b7 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 24b8 1812 | | Execute Package,Field_Execute,Field_Number 0x12 24b9 e40a | | Load 0x2,0xa 24ba 0217 | | Execute Heap_Access,All_Reference 24bb 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 24bc e00d | | Load 0x0,0xd 24bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 24be e408 | | Load 0x2,0x8 24bf 0120 | | Execute Any,Is_Value 24c0 6804 |h | Jump_Zero 0x24c5 24c1 e00d | | Load 0x0,0xd 24c2 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 24c3 1b0e | | Execute Package,Field_Read,Field_Number 0xe 24c4 7801 |x | Jump 0x24c6 24c5 e408 | | Load 0x2,0x8 24c6 60a9 |` | Indirect_Literal Discrete,0x2570,{0x00000000, 0x00004000} 24c7 e022 | " | Load 0x0,0x22 24c8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 24c9 e407 | | Load 0x2,0x7 24ca e00d | | Load 0x0,0xd 24cb 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 24cc 1814 | | Execute Package,Field_Execute,Field_Number 0x14 24cd c408 | | Store 0x2,0x8 24ce 0059 | Y | Store_Top Discrete,At_Offset_1 24cf e408 | | Load 0x2,0x8 24d0 e00d | | Load 0x0,0xd 24d1 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 24d2 1812 | | Execute Package,Field_Execute,Field_Number 0x12 24d3 c409 | | Store 0x2,0x9 24d4 e409 | | Load 0x2,0x9 24d5 e00d | | Load 0x0,0xd 24d6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 24d7 7023 |p# | Jump_Nonzero 0x24fb 24d8 4802 |H | Short_Literal 0x2 24d9 e5fe | | Load 0x2,-0x2 24da e409 | | Load 0x2,0x9 24db e02a | * | Load 0x0,0x2a 24dc 1811 | | Execute Package,Field_Execute,Field_Number 0x11 24dd e406 | | Load 0x2,0x6 24de 016d | m | Execute Variant_Record,Structure_Write 24df e406 | | Load 0x2,0x6 24e0 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 24e1 0f02 | | Execute_Immediate Equal,0x2 24e2 6818 |h | Jump_Zero 0x24fb 24e3 e406 | | Load 0x2,0x6 24e4 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 24e5 0217 | | Execute Heap_Access,All_Reference 24e6 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 24e7 e001 | | Load 0x0,0x1 24e8 1b10 | | Execute Package,Field_Read,Field_Number 0x10 24e9 0216 | | Execute Heap_Access,Convert 24ea e001 | | Load 0x0,0x1 24eb 1b14 | | Execute Package,Field_Read,Field_Number 0x14 24ec 180f | | Execute Package,Field_Execute,Field_Number 0xf 24ed 700d |p | Jump_Nonzero 0x24fb 24ee e406 | | Load 0x2,0x6 24ef 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 24f0 0217 | | Execute Heap_Access,All_Reference 24f1 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 24f2 e40a | | Load 0x2,0xa 24f3 0217 | | Execute Heap_Access,All_Reference 24f4 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 24f5 00db | | Load_Top At_Offset_3 24f6 e40a | | Load 0x2,0xa 24f7 0217 | | Execute Heap_Access,All_Reference 24f8 3c13 |< | Execute Record,Field_Read,Field_Number 0x13 24f9 0217 | | Execute Heap_Access,All_Reference 24fa 3813 |8 | Execute Record,Field_Write,Field_Number 0x13 24fb e00d | | Load 0x0,0xd 24fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 24fd 00da | | Load_Top At_Offset_2 24fe 0120 | | Execute Any,Is_Value 24ff 6804 |h | Jump_Zero 0x2504 2500 e00d | | Load 0x0,0xd 2501 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 2502 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 2503 7801 |x | Jump 0x2505 2504 00da | | Load_Top At_Offset_2 2505 606a |`j | Indirect_Literal Discrete,0x2570,{0x00000000, 0x00004000} 2506 e022 | " | Load 0x0,0x22 2507 1b0e | | Execute Package,Field_Read,Field_Number 0xe 2508 4800 |H | Short_Literal 0x0 2509 e40a | | Load 0x2,0xa 250a 0217 | | Execute Heap_Access,All_Reference 250b 340d |4 | Execute Record,Field_Reference,Field_Number 0xd 250c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 250d e00d | | Load 0x0,0xd 250e 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 250f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 2510 c40c | | Store 0x2,0xc 2511 0059 | Y | Store_Top Discrete,At_Offset_1 2512 00d9 | | Load_Top At_Offset_1 2513 e00d | | Load 0x0,0xd 2514 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 2515 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 2516 00da | | Load_Top At_Offset_2 2517 e00d | | Load 0x0,0xd 2518 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 2519 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 251a 012e | . | Execute Any,Not_Equal 251b 6822 |h" | Jump_Zero 0x253e 251c 4802 |H | Short_Literal 0x2 251d e5fe | | Load 0x2,-0x2 251e 00db | | Load_Top At_Offset_3 251f e00d | | Load 0x0,0xd 2520 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 2521 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 2522 e02a | * | Load 0x0,0x2a 2523 1811 | | Execute Package,Field_Execute,Field_Number 0x11 2524 e406 | | Load 0x2,0x6 2525 016d | m | Execute Variant_Record,Structure_Write 2526 e406 | | Load 0x2,0x6 2527 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 2528 0f02 | | Execute_Immediate Equal,0x2 2529 6808 |h | Jump_Zero 0x2532 252a e406 | | Load 0x2,0x6 252b 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 252c 0217 | | Execute Heap_Access,All_Reference 252d 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 252e e40a | | Load 0x2,0xa 252f 0217 | | Execute Heap_Access,All_Reference 2530 3812 |8 | Execute Record,Field_Write,Field_Number 0x12 2531 780c |x | Jump 0x253e 2532 e5f9 | | Load 0x2,-0x7 2533 0a01 | | Execute_Immediate Plus,0x1 2534 c5f9 | | Store 0x2,-0x7 2535 4801 |H | Short_Literal 0x1 2536 e40a | | Load 0x2,0xa 2537 0217 | | Execute Heap_Access,All_Reference 2538 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 2539 7804 |x | Jump 0x253e 253a 4800 |H | Short_Literal 0x0 253b e40a | | Load 0x2,0xa 253c 0217 | | Execute Heap_Access,All_Reference 253d 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 253e e5fe | | Load 0x2,-0x2 253f e40a | | Load 0x2,0xa 2540 e001 | | Load 0x0,0x1 2541 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2542 0216 | | Execute Heap_Access,Convert 2543 8264 | d | Call 0x1,0x64 2544 00db | | Load_Top At_Offset_3 2545 e001 | | Load 0x0,0x1 2546 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2547 0216 | | Execute Heap_Access,Convert 2548 82be | | Call 0x1,0xbe 2549 e5fa | | Load 0x2,-0x6 254a e5fc | | Load 0x2,-0x4 254b e5fd | | Load 0x2,-0x3 254c e40a | | Load 0x2,0xa 254d e001 | | Load 0x0,0x1 254e 1b10 | | Execute Package,Field_Read,Field_Number 0x10 254f 0216 | | Execute Heap_Access,Convert 2550 e001 | | Load 0x0,0x1 2551 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2552 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 2553 c5fa | | Store 0x2,-0x6 2554 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2555 TRAP_2380: 2555 4885 |H | Short_Literal 0x85 2556 010f | | Execute Exception,Equal 2557 6811 |h | Jump_Zero 0x2569 2558 e002 | | Load 0x0,0x2 2559 1b0d | | Execute Package,Field_Read,Field_Number 0xd 255a 4801 |H | Short_Literal 0x1 255b 4801 |H | Short_Literal 0x1 255c e00e | | Load 0x0,0xe 255d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 255e 0334 | 4 | Declare_Variable Array,With_Constraint 255f e5fe | | Load 0x2,-0x2 2560 825a | Z | Call 0x1,0x5a 2561 4801 |H | Short_Literal 0x1 2562 00da | | Load_Top At_Offset_2 2563 01d6 | | Execute Vector,Field_Write 2564 6007 |` | Indirect_Literal Discrete,0x256c,{0x00000000, 0x00002836} 2565 e002 | | Load 0x0,0x2 2566 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 2567 c5fa | | Store 0x2,-0x6 2568 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2569 0100 | | Execute Exception,Raise 256a 0000 0000 | | .XXX[0x2] 256c 0000 0000 | | .LITERAL {0x00000000, 0x00002836} 2570 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 2574 0000 0000 | | .LITERAL {0x00000000, 0x0000281f} 2578 0000 0000 | | .LITERAL {0x00000000, 0x0000281d} 257c 0000 0000 | | .BLANK 0000[0x4] 2580 ; -------------------------------------------------------------------------------------- 2580 ; SUBPROGRAM 2580 ; -------------------------------------------------------------------------------------- 2580 2592 |% | .CONST 0x2592 ; Address of begin 2581 0004 | | .CONST 0x0004 ; Address of exception handler 2582 0005 | | .CONST 0x0005 ; Number of locals 2583 INIT_2580: 2583 e00d | | Load 0x0,0xd 2584 1b0f | | Execute Package,Field_Read,Field_Number 0xf 2585 02c7 | | Declare_Variable Any 2586 00d8 | | Load_Top At_Offset_0 2587 1c00 | | Execute_Immediate Run_Utility,0x0 2588 e00d | | Load 0x0,0xd 2589 1b0f | | Execute Package,Field_Read,Field_Number 0xf 258a 02c7 | | Declare_Variable Any 258b 00d8 | | Load_Top At_Offset_0 258c 1c00 | | Execute_Immediate Run_Utility,0x0 258d e00d | | Load 0x0,0xd 258e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 258f e002 | | Load 0x0,0x2 2590 1b0d | | Execute Package,Field_Read,Field_Number 0xd 2591 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 2592 BODY_2580: 2592 e00d | | Load 0x0,0xd 2593 1b0d | | Execute Package,Field_Read,Field_Number 0xd 2594 00db | | Load_Top At_Offset_3 2595 0120 | | Execute Any,Is_Value 2596 6803 |h | Jump_Zero 0x259a 2597 e00d | | Load 0x0,0xd 2598 1b0f | | Execute Package,Field_Read,Field_Number 0xf 2599 7801 |x | Jump 0x259b 259a 00db | | Load_Top At_Offset_3 259b e5ff | | Load 0x2,-0x1 259c e00d | | Load 0x0,0xd 259d 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 259e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 259f c403 | | Store 0x2,0x3 25a0 005a | Z | Store_Top Discrete,At_Offset_2 25a1 00d8 | | Load_Top At_Offset_0 25a2 e402 | | Load 0x2,0x2 25a3 0120 | | Execute Any,Is_Value 25a4 6803 |h | Jump_Zero 0x25a8 25a5 e00d | | Load 0x0,0xd 25a6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 25a7 7801 |x | Jump 0x25a9 25a8 e402 | | Load 0x2,0x2 25a9 e5fe | | Load 0x2,-0x2 25aa 8217 | | Call 0x1,0x17 25ab c402 | | Store 0x2,0x2 25ac 0059 | Y | Store_Top Discrete,At_Offset_1 25ad 00da | | Load_Top At_Offset_2 25ae e402 | | Load 0x2,0x2 25af 012f | / | Execute Any,Equal 25b0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 25b1 0000 0000 | | .BLANK 0000[0x7] 25b8 ; -------------------------------------------------------------------------------------- 25b8 ; SUBPROGRAM 25b8 ; -------------------------------------------------------------------------------------- 25b8 25c5 |% | .CONST 0x25c5 ; Address of begin 25b9 0004 | | .CONST 0x0004 ; Address of exception handler 25ba 0002 | | .CONST 0x0002 ; Number of locals 25bb INIT_25b8: 25bb e02a | * | Load 0x0,0x2a 25bc 1b0f | | Execute Package,Field_Read,Field_Number 0xf 25bd 02ff | | Declare_Variable Variant_Record 25be 4801 |H | Short_Literal 0x1 25bf e5fe | | Load 0x2,-0x2 25c0 e5ff | | Load 0x2,-0x1 25c1 e02a | * | Load 0x0,0x2a 25c2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 25c3 00d9 | | Load_Top At_Offset_1 25c4 016d | m | Execute Variant_Record,Structure_Write 25c5 BODY_25b8: 25c5 e01b | | Load 0x0,0x1b 25c6 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 25c7 a5fd | | Store_Unchecked 0x2,-0x3 25c8 00d8 | | Load_Top At_Offset_0 25c9 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 25ca 0f01 | | Execute_Immediate Equal,0x1 25cb 6807 |h | Jump_Zero 0x25d3 25cc 00d8 | | Load_Top At_Offset_0 25cd 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 25ce e01b | | Load 0x0,0x1b 25cf 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 25d0 0216 | | Execute Heap_Access,Convert 25d1 a5fd | | Store_Unchecked 0x2,-0x3 25d2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 25d3 00d8 | | Load_Top At_Offset_0 25d4 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 25d5 6016 |` | Indirect_Literal Discrete,0x25ec,{0x00000000, 0x0000500a} 25d6 027f | | Execute Discrete,Equal 25d7 6812 |h | Jump_Zero 0x25ea 25d8 e002 | | Load 0x0,0x2 25d9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 25da 4801 |H | Short_Literal 0x1 25db 4801 |H | Short_Literal 0x1 25dc e00e | | Load 0x0,0xe 25dd 1b0f | | Execute Package,Field_Read,Field_Number 0xf 25de 0334 | 4 | Declare_Variable Array,With_Constraint 25df e5ff | | Load 0x2,-0x1 25e0 e00e | | Load 0x0,0xe 25e1 181a | | Execute Package,Field_Execute,Field_Number 0x1a 25e2 4801 |H | Short_Literal 0x1 25e3 00da | | Load_Top At_Offset_2 25e4 01d6 | | Execute Vector,Field_Write 25e5 00da | | Load_Top At_Offset_2 25e6 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 25e7 e002 | | Load 0x0,0x2 25e8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 25e9 c5fc | | Store 0x2,-0x4 25ea 4503 |E | Exit_Suprogram New_Top_Offset 0x3 25eb 0000 | | .XXX[0x1] 25ec 0000 0000 | | .LITERAL {0x00000000, 0x0000500a} 25f0 ; -------------------------------------------------------------------------------------- 25f0 ; SUBPROGRAM 25f0 ; -------------------------------------------------------------------------------------- 25f0 25f3 |% | .CONST 0x25f3 ; Address of begin 25f1 0004 | | .CONST 0x0004 ; Address of exception handler 25f2 0001 | | .CONST 0x0001 ; Number of locals 25f3 BODY_25f0: 25f3 INIT_25f0: 25f3 00cf | | Action Mark_Auxiliary 25f4 00db | | Load_Top At_Offset_3 25f5 01d9 | | Execute Vector,Reverse_Bounds 25f6 0263 | c | Execute Discrete,Above_Bound 25f7 7009 |p | Jump_Nonzero 0x2601 25f8 e5fd | | Load 0x2,-0x3 25f9 e5fe | | Load 0x2,-0x2 25fa 00da | | Load_Top At_Offset_2 25fb e5ff | | Load 0x2,-0x1 25fc 01d7 | | Execute Vector,Field_Read 25fd 8231 | 1 | Call 0x1,0x31 25fe c5fd | | Store 0x2,-0x3 25ff 00c8 | | Action Pop_Auxiliary_Range 2600 3ff7 |? | Loop_Increasing 0x25f8 2601 4503 |E | Exit_Suprogram New_Top_Offset 0x3 2602 0000 0000 | | .BLANK 0000[0x6] 2608 ; -------------------------------------------------------------------------------------- 2608 ; SUBPROGRAM 2608 ; -------------------------------------------------------------------------------------- 2608 260b |& | .CONST 0x260b ; Address of begin 2609 0004 | | .CONST 0x0004 ; Address of exception handler 260a 0001 | | .CONST 0x0001 ; Number of locals 260b BODY_2608: 260b INIT_2608: 260b 00cf | | Action Mark_Auxiliary 260c 00db | | Load_Top At_Offset_3 260d 01d9 | | Execute Vector,Reverse_Bounds 260e 0263 | c | Execute Discrete,Above_Bound 260f 7009 |p | Jump_Nonzero 0x2619 2610 e5fd | | Load 0x2,-0x3 2611 e5fe | | Load 0x2,-0x2 2612 00da | | Load_Top At_Offset_2 2613 e5ff | | Load 0x2,-0x1 2614 01d7 | | Execute Vector,Field_Read 2615 8235 | 5 | Call 0x1,0x35 2616 c5fd | | Store 0x2,-0x3 2617 00c8 | | Action Pop_Auxiliary_Range 2618 3ff7 |? | Loop_Increasing 0x2610 2619 4503 |E | Exit_Suprogram New_Top_Offset 0x3 261a 0000 0000 | | .BLANK 0000[0x6] 2620 ; -------------------------------------------------------------------------------------- 2620 ; SUBPROGRAM 2620 ; -------------------------------------------------------------------------------------- 2620 2629 |&) | .CONST 0x2629 ; Address of begin 2621 0004 | | .CONST 0x0004 ; Address of exception handler 2622 0003 | | .CONST 0x0003 ; Number of locals 2623 INIT_2620: 2623 00da | | Load_Top At_Offset_2 2624 0217 | | Execute Heap_Access,All_Reference 2625 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 2626 0007 | | Action Break_Optional 2627 00e2 | | Load_Encached Integer_Cache 2628 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 2629 BODY_2620: 2629 00cf | | Action Mark_Auxiliary 262a 7808 |x | Jump 0x2633 262b 00d9 | | Load_Top At_Offset_1 262c 0a01 | | Execute_Immediate Plus,0x1 262d 005a | Z | Store_Top Discrete,At_Offset_2 262e 00da | | Load_Top At_Offset_2 262f 0217 | | Execute Heap_Access,All_Reference 2630 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 2631 0033 | 3 | Store_Top Heap_Access,At_Offset_3 2632 00c9 | | Action Pop_Auxiliary_Loop 2633 00da | | Load_Top At_Offset_2 2634 77f6 |w | Jump_Nonzero 0x262b 2635 00ce | | Action Pop_Auxiliary 2636 00d8 | | Load_Top At_Offset_0 2637 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 2638 ; -------------------------------------------------------------------------------------- 2638 ; SUBPROGRAM 2638 ; -------------------------------------------------------------------------------------- 2638 263d |&= | .CONST 0x263d ; Address of begin 2639 0004 | | .CONST 0x0004 ; Address of exception handler 263a 0002 | | .CONST 0x0002 ; Number of locals 263b INIT_2638: 263b e01b | | Load 0x0,0x1b 263c 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 263d BODY_2638: 263d 00db | | Load_Top At_Offset_3 263e 0217 | | Execute Heap_Access,All_Reference 263f 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 2640 0031 | 1 | Store_Top Heap_Access,At_Offset_1 2641 00cf | | Action Mark_Auxiliary 2642 780e |x | Jump 0x2651 2643 00d9 | | Load_Top At_Offset_1 2644 0217 | | Execute Heap_Access,All_Reference 2645 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 2646 e5fe | | Load 0x2,-0x2 2647 027f | | Execute Discrete,Equal 2648 6803 |h | Jump_Zero 0x264c 2649 00d9 | | Load_Top At_Offset_1 264a a5fc | | Store_Unchecked 0x2,-0x4 264b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 264c 00d9 | | Load_Top At_Offset_1 264d 0217 | | Execute Heap_Access,All_Reference 264e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 264f 0032 | 2 | Store_Top Heap_Access,At_Offset_2 2650 00c9 | | Action Pop_Auxiliary_Loop 2651 00d9 | | Load_Top At_Offset_1 2652 77f0 |w | Jump_Nonzero 0x2643 2653 00ce | | Action Pop_Auxiliary 2654 e5fd | | Load 0x2,-0x3 2655 6813 |h | Jump_Zero 0x2669 2656 00db | | Load_Top At_Offset_3 2657 e01b | | Load 0x0,0x1b 2658 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 2659 0031 | 1 | Store_Top Heap_Access,At_Offset_1 265a e5fe | | Load 0x2,-0x2 265b 00d9 | | Load_Top At_Offset_1 265c 0217 | | Execute Heap_Access,All_Reference 265d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 265e 00db | | Load_Top At_Offset_3 265f 0217 | | Execute Heap_Access,All_Reference 2660 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 2661 00d9 | | Load_Top At_Offset_1 2662 0217 | | Execute Heap_Access,All_Reference 2663 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 2664 00d8 | | Load_Top At_Offset_0 2665 e5ff | | Load 0x2,-0x1 2666 0217 | | Execute Heap_Access,All_Reference 2667 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 2668 7802 |x | Jump 0x266b 2669 6006 |` | Indirect_Literal Discrete,0x2670,{0x00000000, 0x0000281a} 266a a5fb | | Store_Unchecked 0x2,-0x5 266b 00d8 | | Load_Top At_Offset_0 266c a5fc | | Store_Unchecked 0x2,-0x4 266d 4504 |E | Exit_Suprogram New_Top_Offset 0x4 266e 0000 0000 | | .XXX[0x2] 2670 0000 0000 | | .LITERAL {0x00000000, 0x0000281a} 2674 0000 0000 | | .BLANK 0000[0x4] 2678 ; -------------------------------------------------------------------------------------- 2678 ; SUBPROGRAM 2678 ; -------------------------------------------------------------------------------------- 2678 267b |&{ | .CONST 0x267b ; Address of begin 2679 0004 | | .CONST 0x0004 ; Address of exception handler 267a 0001 | | .CONST 0x0001 ; Number of locals 267b BODY_2678: 267b INIT_2678: 267b 00db | | Load_Top At_Offset_3 267c e034 | 4 | Load 0x0,0x34 267d 1b17 | | Execute Package,Field_Read,Field_Number 0x17 267e 00d9 | | Load_Top At_Offset_1 267f 00d0 | | Action Swap_Control 2680 0260 | ` | Execute Discrete,In_Type 2681 7001 |p | Jump_Nonzero 0x2683 2682 0801 | | Execute_Immediate Raise,0x1 2683 00db | | Load_Top At_Offset_3 2684 e035 | 5 | Load 0x0,0x35 2685 e036 | 6 | Load 0x0,0x36 2686 a037 | 7 | Store_Unchecked 0x0,0x37 2687 e038 | 8 | Load 0x0,0x38 2688 1819 | | Execute Package,Field_Execute,Field_Number 0x19 2689 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 268a 0000 0000 | | .BLANK 0000[0x6] 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 1b16 | | Execute Package,Field_Read,Field_Number 0x16 2695 BODY_2690: 2695 e5fb | | Load 0x2,-0x5 2696 e5fd | | Load 0x2,-0x3 2697 e299 | | Load 0x1,0x99 2698 01d7 | | Execute Vector,Field_Read 2699 e5ff | | Load 0x2,-0x1 269a e01b | | Load 0x0,0x1b 269b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 269c c5fb | | Store 0x2,-0x5 269d e5fb | | Load 0x2,-0x5 269e 702e |p. | Jump_Nonzero 0x26cd 269f 00db | | Load_Top At_Offset_3 26a0 0217 | | Execute Heap_Access,All_Reference 26a1 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 26a2 0031 | 1 | Store_Top Heap_Access,At_Offset_1 26a3 00cf | | Action Mark_Auxiliary 26a4 780e |x | Jump 0x26b3 26a5 00d9 | | Load_Top At_Offset_1 26a6 0217 | | Execute Heap_Access,All_Reference 26a7 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 26a8 e5fe | | Load 0x2,-0x2 26a9 027f | | Execute Discrete,Equal 26aa 6803 |h | Jump_Zero 0x26ae 26ab 00d9 | | Load_Top At_Offset_1 26ac a5fc | | Store_Unchecked 0x2,-0x4 26ad 4504 |E | Exit_Suprogram New_Top_Offset 0x4 26ae 00d9 | | Load_Top At_Offset_1 26af 0217 | | Execute Heap_Access,All_Reference 26b0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 26b1 0032 | 2 | Store_Top Heap_Access,At_Offset_2 26b2 00c9 | | Action Pop_Auxiliary_Loop 26b3 00d9 | | Load_Top At_Offset_1 26b4 77f0 |w | Jump_Nonzero 0x26a5 26b5 00ce | | Action Pop_Auxiliary 26b6 e5fd | | Load 0x2,-0x3 26b7 6813 |h | Jump_Zero 0x26cb 26b8 00db | | Load_Top At_Offset_3 26b9 e01b | | Load 0x0,0x1b 26ba 1817 | | Execute Package,Field_Execute,Field_Number 0x17 26bb 0031 | 1 | Store_Top Heap_Access,At_Offset_1 26bc e5fe | | Load 0x2,-0x2 26bd 00d9 | | Load_Top At_Offset_1 26be 0217 | | Execute Heap_Access,All_Reference 26bf 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 26c0 00db | | Load_Top At_Offset_3 26c1 0217 | | Execute Heap_Access,All_Reference 26c2 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 26c3 00d9 | | Load_Top At_Offset_1 26c4 0217 | | Execute Heap_Access,All_Reference 26c5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 26c6 00d8 | | Load_Top At_Offset_0 26c7 e5ff | | Load 0x2,-0x1 26c8 0217 | | Execute Heap_Access,All_Reference 26c9 3810 |8 | Execute Record,Field_Write,Field_Number 0x10 26ca 7802 |x | Jump 0x26cd 26cb 6004 |` | Indirect_Literal Discrete,0x26d0,{0x00000000, 0x0000281c} 26cc a5fb | | Store_Unchecked 0x2,-0x5 26cd 00d8 | | Load_Top At_Offset_0 26ce a5fc | | Store_Unchecked 0x2,-0x4 26cf 4504 |E | Exit_Suprogram New_Top_Offset 0x4 26d0 0000 0000 | | .LITERAL {0x00000000, 0x0000281c} 26d4 0000 0000 | | .BLANK 0000[0x4] 26d8 ; -------------------------------------------------------------------------------------- 26d8 ; SUBPROGRAM 26d8 ; -------------------------------------------------------------------------------------- 26d8 26db |& | .CONST 0x26db ; Address of begin 26d9 0004 | | .CONST 0x0004 ; Address of exception handler 26da 0001 | | .CONST 0x0001 ; Number of locals 26db BODY_26d8: 26db INIT_26d8: 26db 00da | | Load_Top At_Offset_2 26dc e297 | | Load 0x1,0x97 26dd 011c | | Execute Any,Convert_Unchecked 26de 1c01 | | Execute_Immediate Run_Utility,0x1 26df e00e | | Load 0x0,0xe 26e0 1810 | | Execute Package,Field_Execute,Field_Number 0x10 26e1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 26e2 0000 0000 | | .BLANK 0000[0x6] 26e8 ; -------------------------------------------------------------------------------------- 26e8 ; SUBPROGRAM 26e8 ; -------------------------------------------------------------------------------------- 26e8 26f0 |& | .CONST 0x26f0 ; Address of begin 26e9 0004 | | .CONST 0x0004 ; Address of exception handler 26ea 0003 | | .CONST 0x0003 ; Number of locals 26eb INIT_26e8: 26eb e01b | | Load 0x0,0x1b 26ec 1b16 | | Execute Package,Field_Read,Field_Number 0x16 26ed e002 | | Load 0x0,0x2 26ee 1b10 | | Execute Package,Field_Read,Field_Number 0x10 26ef 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 26f0 BODY_26e8: 26f0 00d8 | | Load_Top At_Offset_0 26f1 e01b | | Load 0x0,0x1b 26f2 1b16 | | Execute Package,Field_Read,Field_Number 0x16 26f3 4800 |H | Short_Literal 0x0 26f4 e5fd | | Load 0x2,-0x3 26f5 e5ff | | Load 0x2,-0x1 26f6 82d5 | | Call 0x1,0xd5 26f7 0033 | 3 | Store_Top Heap_Access,At_Offset_3 26f8 0059 | Y | Store_Top Discrete,At_Offset_1 26f9 00d8 | | Load_Top At_Offset_0 26fa 7027 |p' | Jump_Nonzero 0x2722 26fb e5fe | | Load 0x2,-0x2 26fc 4606 |F | Jump_Case 0x7 26fd 781e |x | Jump 0x271c ; case 0x0 26fe 7805 |x | Jump 0x2704 ; case 0x1 26ff 780a |x | Jump 0x270a ; case 0x2 2700 780f |x | Jump 0x2710 ; case 0x3 2701 7814 |x | Jump 0x2716 ; case 0x4 2702 7838 |x8 | Jump 0x273b ; case 0x5 2703 7837 |x7 | Jump 0x273b ; case 0x6 2704 00d9 | | Load_Top At_Offset_1 2705 0217 | | Execute Heap_Access,All_Reference 2706 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 2707 e020 | | Load 0x0,0x20 2708 1812 | | Execute Package,Field_Execute,Field_Number 0x12 2709 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 270a 00d9 | | Load_Top At_Offset_1 270b 0217 | | Execute Heap_Access,All_Reference 270c 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 270d e020 | | Load 0x0,0x20 270e 1812 | | Execute Package,Field_Execute,Field_Number 0x12 270f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 2710 00d9 | | Load_Top At_Offset_1 2711 0217 | | Execute Heap_Access,All_Reference 2712 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 2713 e020 | | Load 0x0,0x20 2714 1812 | | Execute Package,Field_Execute,Field_Number 0x12 2715 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 2716 00d9 | | Load_Top At_Offset_1 2717 0217 | | Execute Heap_Access,All_Reference 2718 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 2719 e020 | | Load 0x0,0x20 271a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 271b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 271c 00d9 | | Load_Top At_Offset_1 271d 0217 | | Execute Heap_Access,All_Reference 271e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 271f e020 | | Load 0x0,0x20 2720 1812 | | Execute Package,Field_Execute,Field_Number 0x12 2721 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 2722 00d8 | | Load_Top At_Offset_0 2723 6018 |` | Indirect_Literal Discrete,0x273c,{0x00000000, 0x0000281c} 2724 027f | | Execute Discrete,Equal 2725 6802 |h | Jump_Zero 0x2728 2726 00ea | | Load_Encached Null_String_Cache 2727 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 2728 4801 |H | Short_Literal 0x1 2729 4802 |H | Short_Literal 0x2 272a e00e | | Load 0x0,0xe 272b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 272c 0334 | 4 | Declare_Variable Array,With_Constraint 272d e5ff | | Load 0x2,-0x1 272e 825a | Z | Call 0x1,0x5a 272f 4801 |H | Short_Literal 0x1 2730 00da | | Load_Top At_Offset_2 2731 01d6 | | Execute Vector,Field_Write 2732 e5fe | | Load 0x2,-0x2 2733 82d6 | | Call 0x1,0xd6 2734 4802 |H | Short_Literal 0x2 2735 00da | | Load_Top At_Offset_2 2736 01d6 | | Execute Vector,Field_Write 2737 00d9 | | Load_Top At_Offset_1 2738 e002 | | Load 0x0,0x2 2739 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 273a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 273b 0831 | 1 | Execute_Immediate Raise,0x31 273c 0000 0000 | | .LITERAL {0x00000000, 0x0000281c} 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 4801 |H | Short_Literal 0x1 274c e5fc | | Load 0x2,-0x4 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 7059 |pY | Jump_Nonzero 0x27ac 2753 e5fe | | Load 0x2,-0x2 2754 4606 |F | Jump_Case 0x7 2755 7846 |xF | Jump 0x279c ; case 0x0 2756 7805 |x | Jump 0x275c ; case 0x1 2757 7814 |x | Jump 0x276c ; case 0x2 2758 7823 |x# | Jump 0x277c ; case 0x3 2759 7832 |x2 | Jump 0x278c ; case 0x4 275a 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; case 0x5 275b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; case 0x6 275c e5ff | | Load 0x2,-0x1 275d e5fd | | Load 0x2,-0x3 275e e020 | | Load 0x0,0x20 275f 180f | | Execute Package,Field_Execute,Field_Number 0xf 2760 00da | | Load_Top At_Offset_2 2761 0217 | | Execute Heap_Access,All_Reference 2762 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 2763 0092 2b8d | + | Action Push_String_Extended,0x2b8d ; "Target_Account has been set to \x22" 2765 e5fd | | Load 0x2,-0x3 2766 01cc | | Execute Vector,Catenate 2767 0092 2b85 | + | Action Push_String_Extended,0x2b85 ; "\x22." 2769 01cc | | Execute Vector,Catenate 276a 801d | | Call 0x0,0x1d 276b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 276c e5ff | | Load 0x2,-0x1 276d e5fd | | Load 0x2,-0x3 276e e020 | | Load 0x0,0x20 276f 180f | | Execute Package,Field_Execute,Field_Number 0xf 2770 00da | | Load_Top At_Offset_2 2771 0217 | | Execute Heap_Access,All_Reference 2772 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 2773 0092 2b8e | + | Action Push_String_Extended,0x2b8e ; "Target_Directory has been set to \x22" 2775 e5fd | | Load 0x2,-0x3 2776 01cc | | Execute Vector,Catenate 2777 0092 2b85 | + | Action Push_String_Extended,0x2b85 ; "\x22." 2779 01cc | | Execute Vector,Catenate 277a 801d | | Call 0x0,0x1d 277b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 277c e5ff | | Load 0x2,-0x1 277d e5fd | | Load 0x2,-0x3 277e e020 | | Load 0x0,0x20 277f 180f | | Execute Package,Field_Execute,Field_Number 0xf 2780 00da | | Load_Top At_Offset_2 2781 0217 | | Execute Heap_Access,All_Reference 2782 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 2783 0092 2b8f | + | Action Push_String_Extended,0x2b8f ; "Target_Library has been set to \x22" 2785 e5fd | | Load 0x2,-0x3 2786 01cc | | Execute Vector,Catenate 2787 0092 2b85 | + | Action Push_String_Extended,0x2b85 ; "\x22." 2789 01cc | | Execute Vector,Catenate 278a 801d | | Call 0x0,0x1d 278b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 278c e5ff | | Load 0x2,-0x1 278d e5fd | | Load 0x2,-0x3 278e e020 | | Load 0x0,0x20 278f 180f | | Execute Package,Field_Execute,Field_Number 0xf 2790 00da | | Load_Top At_Offset_2 2791 0217 | | Execute Heap_Access,All_Reference 2792 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 2793 0092 2b90 | + | Action Push_String_Extended,0x2b90 ; "Configuration has been set to \x22" 2795 e5fd | | Load 0x2,-0x3 2796 01cc | | Execute Vector,Catenate 2797 0092 2b85 | + | Action Push_String_Extended,0x2b85 ; "\x22." 2799 01cc | | Execute Vector,Catenate 279a 801d | | Call 0x0,0x1d 279b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 279c e5ff | | Load 0x2,-0x1 279d e5fd | | Load 0x2,-0x3 279e e020 | | Load 0x0,0x20 279f 180f | | Execute Package,Field_Execute,Field_Number 0xf 27a0 00da | | Load_Top At_Offset_2 27a1 0217 | | Execute Heap_Access,All_Reference 27a2 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 27a3 0092 2b91 | + | Action Push_String_Extended,0x2b91 ; "Target_Machine has been set to \x22" 27a5 e5fd | | Load 0x2,-0x3 27a6 01cc | | Execute Vector,Catenate 27a7 0092 2b85 | + | Action Push_String_Extended,0x2b85 ; "\x22." 27a9 01cc | | Execute Vector,Catenate 27aa 801d | | Call 0x0,0x1d 27ab 4505 |E | Exit_Suprogram New_Top_Offset 0x5 27ac e002 | | Load 0x0,0x2 27ad 1b0d | | Execute Package,Field_Read,Field_Number 0xd 27ae 4801 |H | Short_Literal 0x1 27af 4804 |H | Short_Literal 0x4 27b0 e00e | | Load 0x0,0xe 27b1 1b0f | | Execute Package,Field_Read,Field_Number 0xf 27b2 0334 | 4 | Declare_Variable Array,With_Constraint 27b3 e5ff | | Load 0x2,-0x1 27b4 825a | Z | Call 0x1,0x5a 27b5 4801 |H | Short_Literal 0x1 27b6 00da | | Load_Top At_Offset_2 27b7 01d6 | | Execute Vector,Field_Write 27b8 e5fc | | Load 0x2,-0x4 27b9 e00c | | Load 0x0,0xc 27ba 181c | | Execute Package,Field_Execute,Field_Number 0x1c 27bb 4802 |H | Short_Literal 0x2 27bc 00da | | Load_Top At_Offset_2 27bd 01d6 | | Execute Vector,Field_Write 27be 00da | | Load_Top At_Offset_2 27bf e002 | | Load 0x0,0x2 27c0 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 27c1 4803 |H | Short_Literal 0x3 27c2 00da | | Load_Top At_Offset_2 27c3 01d6 | | Execute Vector,Field_Write 27c4 e5fe | | Load 0x2,-0x2 27c5 82d6 | | Call 0x1,0xd6 27c6 4804 |H | Short_Literal 0x4 27c7 00da | | Load_Top At_Offset_2 27c8 01d6 | | Execute Vector,Field_Write 27c9 6006 |` | Indirect_Literal Discrete,0x27d0,{0x00000000, 0x0000282e} 27ca e002 | | Load 0x0,0x2 27cb 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 27cc c5fb | | Store 0x2,-0x5 27cd 4505 |E | Exit_Suprogram New_Top_Offset 0x5 27ce 0000 0000 | | .XXX[0x2] 27d0 0000 0000 | | .LITERAL {0x00000000, 0x0000282e} 27d4 0000 0000 | | .BLANK 0000[0x4] 27d8 ; -------------------------------------------------------------------------------------- 27d8 ; SUBPROGRAM 27d8 ; -------------------------------------------------------------------------------------- 27d8 27e0 |' | .CONST 0x27e0 ; Address of begin 27d9 0004 | | .CONST 0x0004 ; Address of exception handler 27da 0003 | | .CONST 0x0003 ; Number of locals 27db INIT_27d8: 27db e01b | | Load 0x0,0x1b 27dc 1b16 | | Execute Package,Field_Read,Field_Number 0x16 27dd e002 | | Load 0x0,0x2 27de 1b10 | | Execute Package,Field_Read,Field_Number 0x10 27df 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 27e0 BODY_27d8: 27e0 00d8 | | Load_Top At_Offset_0 27e1 e01b | | Load 0x0,0x1b 27e2 1b16 | | Execute Package,Field_Read,Field_Number 0x16 27e3 4800 |H | Short_Literal 0x0 27e4 e5fd | | Load 0x2,-0x3 27e5 e5ff | | Load 0x2,-0x1 27e6 82d5 | | Call 0x1,0xd5 27e7 0033 | 3 | Store_Top Heap_Access,At_Offset_3 27e8 0059 | Y | Store_Top Discrete,At_Offset_1 27e9 00d8 | | Load_Top At_Offset_0 27ea 7011 |p | Jump_Nonzero 0x27fc 27eb e5fe | | Load 0x2,-0x2 27ec 4606 |F | Jump_Case 0x7 27ed 7827 |x' | Jump 0x2815 ; case 0x0 27ee 7826 |x& | Jump 0x2815 ; case 0x1 27ef 7825 |x% | Jump 0x2815 ; case 0x2 27f0 7824 |x$ | Jump 0x2815 ; case 0x3 27f1 7823 |x# | Jump 0x2815 ; case 0x4 27f2 7805 |x | Jump 0x27f8 ; case 0x5 27f3 7800 |x | Jump 0x27f4 ; case 0x6 27f4 00d9 | | Load_Top At_Offset_1 27f5 0217 | | Execute Heap_Access,All_Reference 27f6 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 27f7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 27f8 00d9 | | Load_Top At_Offset_1 27f9 0217 | | Execute Heap_Access,All_Reference 27fa 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 27fb 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 27fc 00d8 | | Load_Top At_Offset_0 27fd 601a |` | Indirect_Literal Discrete,0x2818,{0x00000000, 0x0000281c} 27fe 027f | | Execute Discrete,Equal 27ff 6802 |h | Jump_Zero 0x2802 2800 4800 |H | Short_Literal 0x0 2801 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 2802 4801 |H | Short_Literal 0x1 2803 4802 |H | Short_Literal 0x2 2804 e00e | | Load 0x0,0xe 2805 1b0f | | Execute Package,Field_Read,Field_Number 0xf 2806 0334 | 4 | Declare_Variable Array,With_Constraint 2807 e5ff | | Load 0x2,-0x1 2808 825a | Z | Call 0x1,0x5a 2809 4801 |H | Short_Literal 0x1 280a 00da | | Load_Top At_Offset_2 280b 01d6 | | Execute Vector,Field_Write 280c e5fe | | Load 0x2,-0x2 280d 82d6 | | Call 0x1,0xd6 280e 4802 |H | Short_Literal 0x2 280f 00da | | Load_Top At_Offset_2 2810 01d6 | | Execute Vector,Field_Write 2811 00d9 | | Load_Top At_Offset_1 2812 e002 | | Load 0x0,0x2 2813 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 2814 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 2815 0831 | 1 | Execute_Immediate Raise,0x31 2816 0000 0000 | | .XXX[0x2] 2818 0000 0000 | | .LITERAL {0x00000000, 0x0000281c} 281c 0000 0000 | | .BLANK 0000[0x4] 2820 ; -------------------------------------------------------------------------------------- 2820 ; SUBPROGRAM 2820 ; -------------------------------------------------------------------------------------- 2820 2828 |(( | .CONST 0x2828 ; Address of begin 2821 0004 | | .CONST 0x0004 ; Address of exception handler 2822 0003 | | .CONST 0x0003 ; Number of locals 2823 INIT_2820: 2823 e01b | | Load 0x0,0x1b 2824 1b16 | | Execute Package,Field_Read,Field_Number 0x16 2825 e002 | | Load 0x0,0x2 2826 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2827 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 2828 BODY_2820: 2828 00d8 | | Load_Top At_Offset_0 2829 e01b | | Load 0x0,0x1b 282a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 282b 4801 |H | Short_Literal 0x1 282c e5fc | | Load 0x2,-0x4 282d e5ff | | Load 0x2,-0x1 282e 82d5 | | Call 0x1,0xd5 282f 0033 | 3 | Store_Top Heap_Access,At_Offset_3 2830 0059 | Y | Store_Top Discrete,At_Offset_1 2831 00d8 | | Load_Top At_Offset_0 2832 7013 |p | Jump_Nonzero 0x2846 2833 e5fe | | Load 0x2,-0x2 2834 4606 |F | Jump_Case 0x7 2835 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; case 0x0 2836 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; case 0x1 2837 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; case 0x2 2838 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; case 0x3 2839 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; case 0x4 283a 7806 |x | Jump 0x2841 ; case 0x5 283b 7800 |x | Jump 0x283c ; case 0x6 283c e5fd | | Load 0x2,-0x3 283d 00da | | Load_Top At_Offset_2 283e 0217 | | Execute Heap_Access,All_Reference 283f 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 2840 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2841 e5fd | | Load 0x2,-0x3 2842 00da | | Load_Top At_Offset_2 2843 0217 | | Execute Heap_Access,All_Reference 2844 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 2845 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2846 e002 | | Load 0x0,0x2 2847 1b0d | | Execute Package,Field_Read,Field_Number 0xd 2848 4801 |H | Short_Literal 0x1 2849 4804 |H | Short_Literal 0x4 284a e00e | | Load 0x0,0xe 284b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 284c 0334 | 4 | Declare_Variable Array,With_Constraint 284d e5ff | | Load 0x2,-0x1 284e 825a | Z | Call 0x1,0x5a 284f 4801 |H | Short_Literal 0x1 2850 00da | | Load_Top At_Offset_2 2851 01d6 | | Execute Vector,Field_Write 2852 e5fc | | Load 0x2,-0x4 2853 e00c | | Load 0x0,0xc 2854 181c | | Execute Package,Field_Execute,Field_Number 0x1c 2855 4802 |H | Short_Literal 0x2 2856 00da | | Load_Top At_Offset_2 2857 01d6 | | Execute Vector,Field_Write 2858 00da | | Load_Top At_Offset_2 2859 e002 | | Load 0x0,0x2 285a 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 285b 4803 |H | Short_Literal 0x3 285c 00da | | Load_Top At_Offset_2 285d 01d6 | | Execute Vector,Field_Write 285e e5fe | | Load 0x2,-0x2 285f 82d6 | | Call 0x1,0xd6 2860 4804 |H | Short_Literal 0x4 2861 00da | | Load_Top At_Offset_2 2862 01d6 | | Execute Vector,Field_Write 2863 6004 |` | Indirect_Literal Discrete,0x2868,{0x00000000, 0x0000282e} 2864 e002 | | Load 0x0,0x2 2865 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 2866 c5fb | | Store 0x2,-0x5 2867 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2868 0000 0000 | | .LITERAL {0x00000000, 0x0000282e} 286c 0000 0000 | | .BLANK 0000[0x4] 2870 ; -------------------------------------------------------------------------------------- 2870 ; SUBPROGRAM 2870 ; -------------------------------------------------------------------------------------- 2870 2873 |(s | .CONST 0x2873 ; Address of begin 2871 0004 | | .CONST 0x0004 ; Address of exception handler 2872 0001 | | .CONST 0x0001 ; Number of locals 2873 BODY_2870: 2873 INIT_2870: 2873 00db | | Load_Top At_Offset_3 2874 e034 | 4 | Load 0x0,0x34 2875 1b17 | | Execute Package,Field_Read,Field_Number 0x17 2876 00d9 | | Load_Top At_Offset_1 2877 00d0 | | Action Swap_Control 2878 0260 | ` | Execute Discrete,In_Type 2879 7001 |p | Jump_Nonzero 0x287b 287a 0801 | | Execute_Immediate Raise,0x1 287b 00db | | Load_Top At_Offset_3 287c e039 | 9 | Load 0x0,0x39 287d e03a | : | Load 0x0,0x3a 287e a03b | ; | Store_Unchecked 0x0,0x3b 287f e038 | 8 | Load 0x0,0x38 2880 1819 | | Execute Package,Field_Execute,Field_Number 0x19 2881 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 2882 0000 0000 | | .BLANK 0000[0x6] 2888 ; -------------------------------------------------------------------------------------- 2888 ; SUBPROGRAM 2888 ; -------------------------------------------------------------------------------------- 2888 2894 |( | .CONST 0x2894 ; Address of begin 2889 2913 |) | .CONST 0x2913 ; Address of exception handler 288a 0004 | | .CONST 0x0004 ; Number of locals 288b INIT_2888: 288b e03c | < | Load 0x0,0x3c 288c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 288d 02c7 | | Declare_Variable Any 288e 00d8 | | Load_Top At_Offset_0 288f 1c00 | | Execute_Immediate Run_Utility,0x0 2890 e20d | | Load 0x1,0xd 2891 0007 | | Action Break_Optional 2892 e01b | | Load 0x0,0x1b 2893 1b16 | | Execute Package,Field_Read,Field_Number 0x16 2894 BODY_2888: 2894 00be | | Action Activate_Tasks 2895 e5f9 | | Load 0x2,-0x7 2896 00db | | Load_Top At_Offset_3 2897 e20d | | Load 0x1,0xd 2898 e5fb | | Load 0x2,-0x5 2899 e7ff | | Load 0x3,-0x1 289a e01b | | Load 0x0,0x1b 289b 180d | | Execute Package,Field_Execute,Field_Number 0xd 289c c603 | | Store 0x3,0x3 289d c602 | | Store 0x3,0x2 289e c5f9 | | Store 0x2,-0x7 289f e5f9 | | Load 0x2,-0x7 28a0 7071 |pq | Jump_Nonzero 0x2912 28a1 00d9 | | Load_Top At_Offset_1 28a2 e5fd | | Load 0x2,-0x3 28a3 e020 | | Load 0x0,0x20 28a4 180f | | Execute Package,Field_Execute,Field_Number 0xf 28a5 00da | | Load_Top At_Offset_2 28a6 0217 | | Execute Heap_Access,All_Reference 28a7 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 28a8 00d9 | | Load_Top At_Offset_1 28a9 e5fe | | Load 0x2,-0x2 28aa e020 | | Load 0x0,0x20 28ab 180f | | Execute Package,Field_Execute,Field_Number 0xf 28ac 00da | | Load_Top At_Offset_2 28ad 0217 | | Execute Heap_Access,All_Reference 28ae 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 28af e5fb | | Load 0x2,-0x5 28b0 e00c | | Load 0x0,0xc 28b1 180f | | Execute Package,Field_Execute,Field_Number 0xf 28b2 00da | | Load_Top At_Offset_2 28b3 0217 | | Execute Heap_Access,All_Reference 28b4 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 28b5 e5fb | | Load 0x2,-0x5 28b6 00da | | Load_Top At_Offset_2 28b7 0217 | | Execute Heap_Access,All_Reference 28b8 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 28b9 00cf | | Action Mark_Auxiliary 28ba e5fa | | Load 0x2,-0x6 28bb 01d9 | | Execute Vector,Reverse_Bounds 28bc 0263 | c | Execute Discrete,Above_Bound 28bd 7027 |p' | Jump_Nonzero 0x28e5 28be 00d8 | | Load_Top At_Offset_0 28bf e5fa | | Load 0x2,-0x6 28c0 01d7 | | Execute Vector,Field_Read 28c1 6821 |h! | Jump_Zero 0x28e3 28c2 e603 | | Load 0x3,0x3 28c3 e01b | | Load 0x0,0x1b 28c4 1817 | | Execute Package,Field_Execute,Field_Number 0x17 28c5 a604 | | Store_Unchecked 0x3,0x4 28c6 e603 | | Load 0x3,0x3 28c7 0217 | | Execute Heap_Access,All_Reference 28c8 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 28c9 e604 | | Load 0x3,0x4 28ca 0217 | | Execute Heap_Access,All_Reference 28cb 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 28cc 00d8 | | Load_Top At_Offset_0 28cd e604 | | Load 0x3,0x4 28ce 0217 | | Execute Heap_Access,All_Reference 28cf 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 28d0 e5fc | | Load 0x2,-0x4 28d1 e604 | | Load 0x3,0x4 28d2 0217 | | Execute Heap_Access,All_Reference 28d3 3809 |8 | Execute Record,Field_Write,Field_Number 0x9 28d4 00db | | Load_Top At_Offset_3 28d5 0219 | | Execute Heap_Access,All_Read 28d6 00d8 | | Load_Top At_Offset_0 28d7 3c0a |< | Execute Record,Field_Read,Field_Number 0xa 28d8 e603 | | Load 0x3,0x3 28d9 e5fc | | Load 0x2,-0x4 28da e02b | + | Load 0x0,0x2b 28db 180e | | Execute Package,Field_Execute,Field_Number 0xe 28dc 00d9 | | Load_Top At_Offset_1 28dd 380a |8 | Execute Record,Field_Write,Field_Number 0xa 28de 00d1 | | Pop_Control Pop_Count_1 28df 00db | | Load_Top At_Offset_3 28e0 e603 | | Load 0x3,0x3 28e1 0217 | | Execute Heap_Access,All_Reference 28e2 3810 |8 | Execute Record,Field_Write,Field_Number 0x10 28e3 00c8 | | Action Pop_Auxiliary_Range 28e4 3fd9 |? | Loop_Increasing 0x28be 28e5 00ce | | Action Pop_Auxiliary 28e6 00d9 | | Load_Top At_Offset_1 28e7 0217 | | Execute Heap_Access,All_Reference 28e8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 28e9 0f02 | | Execute_Immediate Equal,0x2 28ea 6809 |h | Jump_Zero 0x28f4 28eb 4801 |H | Short_Literal 0x1 28ec 00da | | Load_Top At_Offset_2 28ed 0217 | | Execute Heap_Access,All_Reference 28ee 380b |8 | Execute Record,Field_Write,Field_Number 0xb 28ef 00d9 | | Load_Top At_Offset_1 28f0 e7ff | | Load 0x3,-0x1 28f1 00d8 | | Load_Top At_Offset_0 28f2 82bb | | Call 0x1,0xbb 28f3 7806 |x | Jump 0x28fa 28f4 00d9 | | Load_Top At_Offset_1 28f5 e7ff | | Load 0x3,-0x1 28f6 6025 |`% | Indirect_Literal Discrete,0x291c,{0x00000000, 0x0000280a} 28f7 e7ff | | Load 0x3,-0x1 28f8 8029 | ) | Call 0x0,0x29 28f9 82bb | | Call 0x1,0xbb 28fa 00d9 | | Load_Top At_Offset_1 28fb 0217 | | Execute Heap_Access,All_Reference 28fc 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 28fd 00da | | Load_Top At_Offset_2 28fe 0217 | | Execute Heap_Access,All_Reference 28ff 380e |8 | Execute Record,Field_Write,Field_Number 0xe 2900 e03c | < | Load 0x0,0x3c 2901 1b10 | | Execute Package,Field_Read,Field_Number 0x10 2902 00db | | Load_Top At_Offset_3 2903 e03c | < | Load 0x0,0x3c 2904 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 2905 c602 | | Store 0x3,0x2 2906 c404 | | Store 0x2,0x4 2907 e404 | | Load 0x2,0x4 2908 7009 |p | Jump_Nonzero 0x2912 2909 0092 2b92 | + | Action Push_String_Extended,0x2b92 ; "State file for " 290b 00da | | Load_Top At_Offset_2 290c 8227 | ' | Call 0x1,0x27 290d 01cc | | Execute Vector,Catenate 290e 0092 2b93 | + | Action Push_String_Extended,0x2b93 ; " has been closed." 2910 01cc | | Execute Vector,Catenate 2911 801d | | Call 0x0,0x1d 2912 4502 |E | Exit_Suprogram New_Top_Offset 0x2 2913 TRAP_2888: 2913 e002 | | Load 0x0,0x2 2914 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 2915 010f | | Execute Exception,Equal 2916 6804 |h | Jump_Zero 0x291b 2917 e002 | | Load 0x0,0x2 2918 181b | | Execute Package,Field_Execute,Field_Number 0x1b 2919 a5f9 | | Store_Unchecked 0x2,-0x7 291a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 291b 0100 | | Execute Exception,Raise 291c 0000 0000 | | .LITERAL {0x00000000, 0x0000280a} 2920 ; -------------------------------------------------------------------------------------- 2920 ; SUBPROGRAM 2920 ; -------------------------------------------------------------------------------------- 2920 292a |)* | .CONST 0x292a ; Address of begin 2921 0004 | | .CONST 0x0004 ; Address of exception handler 2922 0003 | | .CONST 0x0003 ; Number of locals 2923 INIT_2920: 2923 e405 | | Load 0x2,0x5 2924 e001 | | Load 0x0,0x1 2925 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2926 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2927 1c08 | | Execute_Immediate Run_Utility,0x8 2928 00e3 | | Load_Encached Natural_Cache 2929 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 292a BODY_2920: 292a e404 | | Load 0x2,0x4 292b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 292c 00da | | Load_Top At_Offset_2 292d 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 292e 00cf | | Action Mark_Auxiliary 292f 7837 |x7 | Jump 0x2967 2930 e00d | | Load 0x0,0xd 2931 1b0d | | Execute Package,Field_Read,Field_Number 0xd 2932 e406 | | Load 0x2,0x6 2933 0120 | | Execute Any,Is_Value 2934 6803 |h | Jump_Zero 0x2938 2935 e00d | | Load 0x0,0xd 2936 1b0f | | Execute Package,Field_Read,Field_Number 0xf 2937 7801 |x | Jump 0x2939 2938 e406 | | Load 0x2,0x6 2939 e403 | | Load 0x2,0x3 293a e00d | | Load 0x0,0xd 293b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 293c 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 293d c406 | | Store 0x2,0x6 293e c402 | | Store 0x2,0x2 293f e402 | | Load 0x2,0x2 2940 7020 |p | Jump_Nonzero 0x2961 2941 e5fe | | Load 0x2,-0x2 2942 e406 | | Load 0x2,0x6 2943 82c0 | | Call 0x1,0xc0 2944 681c |h | Jump_Zero 0x2961 2945 00da | | Load_Top At_Offset_2 2946 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2947 00da | | Load_Top At_Offset_2 2948 e407 | | Load 0x2,0x7 2949 e602 | | Load 0x3,0x2 294a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 294b e001 | | Load 0x0,0x1 294c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 294d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 294e 00db | | Load_Top At_Offset_3 294f e605 | | Load 0x3,0x5 2950 01d7 | | Execute Vector,Field_Read 2951 00d1 | | Pop_Control Pop_Count_1 2952 e5fc | | Load 0x2,-0x4 2953 e5fd | | Load 0x2,-0x3 2954 e5fe | | Load 0x2,-0x2 2955 e406 | | Load 0x2,0x6 2956 82bf | | Call 0x1,0xbf 2957 00db | | Load_Top At_Offset_3 2958 e605 | | Load 0x3,0x5 2959 01d6 | | Execute Vector,Field_Write 295a e602 | | Load 0x3,0x2 295b 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 295c c407 | | Store 0x2,0x7 295d 00d2 | | Pop_Control Pop_Count_2 295e 00d9 | | Load_Top At_Offset_1 295f 0a01 | | Execute_Immediate Plus,0x1 2960 005a | Z | Store_Top Discrete,At_Offset_2 2961 e403 | | Load 0x2,0x3 2962 e00d | | Load 0x0,0xd 2963 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 2964 181d | | Execute Package,Field_Execute,Field_Number 0x1d 2965 c403 | | Store 0x2,0x3 2966 00c9 | | Action Pop_Auxiliary_Loop 2967 e403 | | Load 0x2,0x3 2968 e00d | | Load 0x0,0xd 2969 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 296a 181e | | Execute Package,Field_Execute,Field_Number 0x1e 296b 6fc4 |o | Jump_Zero 0x2930 296c 00ce | | Action Pop_Auxiliary 296d 00d9 | | Load_Top At_Offset_1 296e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 296f e5fd | | Load 0x2,-0x3 2970 e407 | | Load 0x2,0x7 2971 e405 | | Load 0x2,0x5 2972 e5fe | | Load 0x2,-0x2 2973 82bd | | Call 0x1,0xbd 2974 00da | | Load_Top At_Offset_2 2975 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 2976 e403 | | Load 0x2,0x3 2977 e00d | | Load 0x0,0xd 2978 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 2979 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 297a c403 | | Store 0x2,0x3 297b 00d8 | | Load_Top At_Offset_0 297c 0aff | | Execute_Immediate Plus,-0x1 297d e001 | | Load 0x0,0x1 297e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 297f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2980 1c08 | | Execute_Immediate Run_Utility,0x8 2981 00da | | Load_Top At_Offset_2 2982 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 2983 00d9 | | Load_Top At_Offset_1 2984 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 2985 4801 |H | Short_Literal 0x1 2986 00da | | Load_Top At_Offset_2 2987 0aff | | Execute_Immediate Plus,-0x1 2988 e602 | | Load 0x3,0x2 2989 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 298a 01cf | | Execute Vector,Slice_Read 298b 00d9 | | Load_Top At_Offset_1 298c 00d8 | | Load_Top At_Offset_0 298d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 298e 00da | | Load_Top At_Offset_2 298f 01da | | Execute Vector,Bounds 2990 00da | | Load_Top At_Offset_2 2991 01da | | Execute Vector,Bounds 2992 00da | | Load_Top At_Offset_2 2993 027f | | Execute Discrete,Equal 2994 7001 |p | Jump_Nonzero 0x2996 2995 08e0 | | Execute_Immediate Raise,0xe0 2996 00cd | | Action Spare6_Action 2997 027f | | Execute Discrete,Equal 2998 7001 |p | Jump_Nonzero 0x299a 2999 08e0 | | Execute_Immediate Raise,0xe0 299a 00d2 | | Pop_Control Pop_Count_2 299b 00d9 | | Load_Top At_Offset_1 299c 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 299d 00cb | | Action Pop_Block_With_Result 299e 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 299f 0000 | | .XXX[0x1] 29a0 ; -------------------------------------------------------------------------------------- 29a0 ; SUBPROGRAM 29a0 ; -------------------------------------------------------------------------------------- 29a0 29b9 |) | .CONST 0x29b9 ; Address of begin 29a1 0004 | | .CONST 0x0004 ; Address of exception handler 29a2 0002 | | .CONST 0x0002 ; Number of locals 29a3 INIT_29a0: 29a3 e402 | | Load 0x2,0x2 29a4 e403 | | Load 0x2,0x3 29a5 e00c | | Load 0x0,0xc 29a6 1b18 | | Execute Package,Field_Read,Field_Number 0x18 29a7 035b | [ | Declare_Type Array,Constrained 29a8 0337 | 7 | Declare_Variable Array 29a9 e402 | | Load 0x2,0x2 29aa e403 | | Load 0x2,0x3 29ab e00c | | Load 0x0,0xc 29ac 1b18 | | Execute Package,Field_Read,Field_Number 0x18 29ad 0334 | 4 | Declare_Variable Array,With_Constraint 29ae 00d8 | | Load_Top At_Offset_0 29af 01d9 | | Execute Vector,Reverse_Bounds 29b0 0263 | c | Execute Discrete,Above_Bound 29b1 7005 |p | Jump_Nonzero 0x29b7 29b2 4800 |H | Short_Literal 0x0 29b3 00d9 | | Load_Top At_Offset_1 29b4 e603 | | Load 0x3,0x3 29b5 01d6 | | Execute Vector,Field_Write 29b6 3ffb |? | Loop_Increasing 0x29b2 29b7 00d9 | | Load_Top At_Offset_1 29b8 01d4 | | Execute Vector,Structure_Write 29b9 BODY_29a0: 29b9 e5ff | | Load 0x2,-0x1 29ba 0217 | | Execute Heap_Access,All_Reference 29bb 3c10 |< | Execute Record,Field_Read,Field_Number 0x10 29bc a404 | | Store_Unchecked 0x2,0x4 29bd 00cf | | Action Mark_Auxiliary 29be 780b |x | Jump 0x29ca 29bf 4801 |H | Short_Literal 0x1 29c0 e404 | | Load 0x2,0x4 29c1 0217 | | Execute Heap_Access,All_Reference 29c2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 29c3 00db | | Load_Top At_Offset_3 29c4 01d6 | | Execute Vector,Field_Write 29c5 e404 | | Load 0x2,0x4 29c6 0217 | | Execute Heap_Access,All_Reference 29c7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 29c8 a404 | | Store_Unchecked 0x2,0x4 29c9 00c9 | | Action Pop_Auxiliary_Loop 29ca e404 | | Load 0x2,0x4 29cb 77f3 |w | Jump_Nonzero 0x29bf 29cc 00ce | | Action Pop_Auxiliary 29cd 00d8 | | Load_Top At_Offset_0 29ce e00c | | Load 0x0,0xc 29cf 1b18 | | Execute Package,Field_Read,Field_Number 0x18 29d0 01c6 | | Execute Vector,Convert_To_Formal 29d1 00cb | | Action Pop_Block_With_Result 29d2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 29d3 0000 0000 | | .BLANK 0000[0x5] 29d8 ; -------------------------------------------------------------------------------------- 29d8 ; SUBPROGRAM 29d8 ; -------------------------------------------------------------------------------------- 29d8 29de |) | .CONST 0x29de ; Address of begin 29d9 0004 | | .CONST 0x0004 ; Address of exception handler 29da 0002 | | .CONST 0x0002 ; Number of locals 29db INIT_29d8: 29db e5ff | | Load 0x2,-0x1 29dc e5fd | | Load 0x2,-0x3 29dd 8276 | v | Call 0x1,0x76 29de BODY_29d8: 29de 00cf | | Action Mark_Auxiliary 29df 00d9 | | Load_Top At_Offset_1 29e0 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 29e1 4801 |H | Short_Literal 0x1 29e2 0263 | c | Execute Discrete,Above_Bound 29e3 7011 |p | Jump_Nonzero 0x29f5 29e4 e5fb | | Load 0x2,-0x5 29e5 e5fc | | Load 0x2,-0x4 29e6 e5fe | | Load 0x2,-0x2 29e7 00db | | Load_Top At_Offset_3 29e8 e602 | | Load 0x3,0x2 29e9 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 29ea 01d7 | | Execute Vector,Field_Read 29eb e001 | | Load 0x0,0x1 29ec 1b14 | | Execute Package,Field_Read,Field_Number 0x14 29ed 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 29ee c5fb | | Store 0x2,-0x5 29ef e5fb | | Load 0x2,-0x5 29f0 6802 |h | Jump_Zero 0x29f3 29f1 00cc | | Action Pop_Block 29f2 4505 |E | Exit_Suprogram New_Top_Offset 0x5 29f3 00c8 | | Action Pop_Auxiliary_Range 29f4 3fef |? | Loop_Increasing 0x29e4 29f5 00cc | | Action Pop_Block 29f6 4505 |E | Exit_Suprogram New_Top_Offset 0x5 29f7 0000 | | .XXX[0x1] 29f8 ; -------------------------------------------------------------------------------------- 29f8 ; SUBPROGRAM 29f8 ; -------------------------------------------------------------------------------------- 29f8 29fe |) | .CONST 0x29fe ; Address of begin 29f9 0004 | | .CONST 0x0004 ; Address of exception handler 29fa 0002 | | .CONST 0x0002 ; Number of locals 29fb INIT_29f8: 29fb e5ff | | Load 0x2,-0x1 29fc e5fc | | Load 0x2,-0x4 29fd 8276 | v | Call 0x1,0x76 29fe BODY_29f8: 29fe 00cf | | Action Mark_Auxiliary 29ff 00d9 | | Load_Top At_Offset_1 2a00 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 2a01 4801 |H | Short_Literal 0x1 2a02 0263 | c | Execute Discrete,Above_Bound 2a03 7012 |p | Jump_Nonzero 0x2a16 2a04 e5fa | | Load 0x2,-0x6 2a05 e5fb | | Load 0x2,-0x5 2a06 e5fd | | Load 0x2,-0x3 2a07 e5fe | | Load 0x2,-0x2 2a08 e605 | | Load 0x3,0x5 2a09 e602 | | Load 0x3,0x2 2a0a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2a0b 01d7 | | Execute Vector,Field_Read 2a0c e001 | | Load 0x0,0x1 2a0d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2a0e 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 2a0f c5fa | | Store 0x2,-0x6 2a10 e5fa | | Load 0x2,-0x6 2a11 6802 |h | Jump_Zero 0x2a14 2a12 00cc | | Action Pop_Block 2a13 4506 |E | Exit_Suprogram New_Top_Offset 0x6 2a14 00c8 | | Action Pop_Auxiliary_Range 2a15 3fee |? | Loop_Increasing 0x2a04 2a16 00cc | | Action Pop_Block 2a17 4506 |E | Exit_Suprogram New_Top_Offset 0x6 2a18 ; -------------------------------------------------------------------------------------- 2a18 ; SUBPROGRAM 2a18 ; -------------------------------------------------------------------------------------- 2a18 2a1e |* | .CONST 0x2a1e ; Address of begin 2a19 0004 | | .CONST 0x0004 ; Address of exception handler 2a1a 0002 | | .CONST 0x0002 ; Number of locals 2a1b INIT_2a18: 2a1b e5ff | | Load 0x2,-0x1 2a1c e5fd | | Load 0x2,-0x3 2a1d 8276 | v | Call 0x1,0x76 2a1e BODY_2a18: 2a1e 00cf | | Action Mark_Auxiliary 2a1f 00d9 | | Load_Top At_Offset_1 2a20 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 2a21 4801 |H | Short_Literal 0x1 2a22 0263 | c | Execute Discrete,Above_Bound 2a23 7011 |p | Jump_Nonzero 0x2a35 2a24 e5fb | | Load 0x2,-0x5 2a25 e5fc | | Load 0x2,-0x4 2a26 e5fe | | Load 0x2,-0x2 2a27 00db | | Load_Top At_Offset_3 2a28 e602 | | Load 0x3,0x2 2a29 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2a2a 01d7 | | Execute Vector,Field_Read 2a2b e001 | | Load 0x0,0x1 2a2c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2a2d 1844 | D | Execute Package,Field_Execute,Field_Number 0x44 2a2e c5fb | | Store 0x2,-0x5 2a2f e5fb | | Load 0x2,-0x5 2a30 6802 |h | Jump_Zero 0x2a33 2a31 00cc | | Action Pop_Block 2a32 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2a33 00c8 | | Action Pop_Auxiliary_Range 2a34 3fef |? | Loop_Increasing 0x2a24 2a35 00cc | | Action Pop_Block 2a36 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2a37 0000 | | .XXX[0x1] 2a38 ; -------------------------------------------------------------------------------------- 2a38 ; SUBPROGRAM 2a38 ; -------------------------------------------------------------------------------------- 2a38 2a3e |*> | .CONST 0x2a3e ; Address of begin 2a39 0004 | | .CONST 0x0004 ; Address of exception handler 2a3a 0002 | | .CONST 0x0002 ; Number of locals 2a3b INIT_2a38: 2a3b e5ff | | Load 0x2,-0x1 2a3c e5fd | | Load 0x2,-0x3 2a3d 8276 | v | Call 0x1,0x76 2a3e BODY_2a38: 2a3e 00cf | | Action Mark_Auxiliary 2a3f 00d9 | | Load_Top At_Offset_1 2a40 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 2a41 4801 |H | Short_Literal 0x1 2a42 0263 | c | Execute Discrete,Above_Bound 2a43 7011 |p | Jump_Nonzero 0x2a55 2a44 e5fb | | Load 0x2,-0x5 2a45 e5fc | | Load 0x2,-0x4 2a46 e5fe | | Load 0x2,-0x2 2a47 00db | | Load_Top At_Offset_3 2a48 e602 | | Load 0x3,0x2 2a49 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2a4a 01d7 | | Execute Vector,Field_Read 2a4b e001 | | Load 0x0,0x1 2a4c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2a4d 1845 | E | Execute Package,Field_Execute,Field_Number 0x45 2a4e c5fb | | Store 0x2,-0x5 2a4f e5fb | | Load 0x2,-0x5 2a50 6802 |h | Jump_Zero 0x2a53 2a51 00cc | | Action Pop_Block 2a52 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2a53 00c8 | | Action Pop_Auxiliary_Range 2a54 3fef |? | Loop_Increasing 0x2a44 2a55 00cc | | Action Pop_Block 2a56 4505 |E | Exit_Suprogram New_Top_Offset 0x5 2a57 0000 | | .XXX[0x1] 2a58 ; -------------------------------------------------------------------------------------- 2a58 ; SUBPROGRAM 2a58 ; -------------------------------------------------------------------------------------- 2a58 2a6d |*m | .CONST 0x2a6d ; Address of begin 2a59 0004 | | .CONST 0x0004 ; Address of exception handler 2a5a 0005 | | .CONST 0x0005 ; Number of locals 2a5b INIT_2a58: 2a5b 605c |`\ | Indirect_Literal Discrete,0x2ab8,{0x00000000, 0x0000282d} 2a5c 6057 |`W | Indirect_Literal Discrete,0x2ab4,{0x00000000, 0x0000282c} 2a5d 6052 |`R | Indirect_Literal Discrete,0x2ab0,{0x00000000, 0x0000282b} 2a5e e5fe | | Load 0x2,-0x2 2a5f e402 | | Load 0x2,0x2 2a60 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 2a61 802c | , | Call 0x0,0x2c 2a62 4801 |H | Short_Literal 0x1 2a63 00d9 | | Load_Top At_Offset_1 2a64 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 2a65 e001 | | Load 0x0,0x1 2a66 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2a67 1b13 | | Execute Package,Field_Read,Field_Number 0x13 2a68 035b | [ | Declare_Type Array,Constrained 2a69 0337 | 7 | Declare_Variable Array 2a6a 00e2 | | Load_Encached Integer_Cache 2a6b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 2a6c 00e1 | | Load_Encached Boolean_Cache 2a6d BODY_2a58: 2a6d 00db | | Load_Top At_Offset_3 2a6e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 2a6f a403 | | Store_Unchecked 0x2,0x3 2a70 00cf | | Action Mark_Auxiliary 2a71 e602 | | Load 0x3,0x2 2a72 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2a73 01d9 | | Execute Vector,Reverse_Bounds 2a74 0263 | c | Execute Discrete,Above_Bound 2a75 7019 |p | Jump_Nonzero 0x2a8f 2a76 e403 | | Load 0x2,0x3 2a77 00e1 | | Load_Encached Boolean_Cache 2a78 00da | | Load_Top At_Offset_2 2a79 e602 | | Load 0x3,0x2 2a7a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2a7b 01d7 | | Execute Vector,Field_Read 2a7c e402 | | Load 0x2,0x2 2a7d 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 2a7e 82ba | | Call 0x1,0xba 2a7f c605 | | Store 0x3,0x5 2a80 c403 | | Store 0x2,0x3 2a81 00db | | Load_Top At_Offset_3 2a82 680a |h | Jump_Zero 0x2a8d 2a83 e604 | | Load 0x3,0x4 2a84 0a01 | | Execute_Immediate Plus,0x1 2a85 c604 | | Store 0x3,0x4 2a86 00d8 | | Load_Top At_Offset_0 2a87 e602 | | Load 0x3,0x2 2a88 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2a89 01d7 | | Execute Vector,Field_Read 2a8a e604 | | Load 0x3,0x4 2a8b e603 | | Load 0x3,0x3 2a8c 01d6 | | Execute Vector,Field_Write 2a8d 00c8 | | Action Pop_Auxiliary_Range 2a8e 3fe7 |? | Loop_Increasing 0x2a76 2a8f 00ce | | Action Pop_Auxiliary 2a90 00d9 | | Load_Top At_Offset_1 2a91 e001 | | Load 0x0,0x1 2a92 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2a93 1b14 | | Execute Package,Field_Read,Field_Number 0x14 2a94 1c08 | | Execute_Immediate Run_Utility,0x8 2a95 e403 | | Load 0x2,0x3 2a96 00d9 | | Load_Top At_Offset_1 2a97 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 2a98 4801 |H | Short_Literal 0x1 2a99 00db | | Load_Top At_Offset_3 2a9a e603 | | Load 0x3,0x3 2a9b 01cf | | Execute Vector,Slice_Read 2a9c 00d9 | | Load_Top At_Offset_1 2a9d 00d8 | | Load_Top At_Offset_0 2a9e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 2a9f 00da | | Load_Top At_Offset_2 2aa0 01da | | Execute Vector,Bounds 2aa1 00da | | Load_Top At_Offset_2 2aa2 01da | | Execute Vector,Bounds 2aa3 00da | | Load_Top At_Offset_2 2aa4 027f | | Execute Discrete,Equal 2aa5 7001 |p | Jump_Nonzero 0x2aa7 2aa6 08e0 | | Execute_Immediate Raise,0xe0 2aa7 00cd | | Action Spare6_Action 2aa8 027f | | Execute Discrete,Equal 2aa9 7001 |p | Jump_Nonzero 0x2aab 2aaa 08e0 | | Execute_Immediate Raise,0xe0 2aab 00d2 | | Pop_Control Pop_Count_2 2aac 00d9 | | Load_Top At_Offset_1 2aad 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 2aae 00cb | | Action Pop_Block_With_Result 2aaf 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 2ab0 0000 0000 | | .LITERAL {0x00000000, 0x0000282b} 2ab4 0000 0000 | | .LITERAL {0x00000000, 0x0000282c} 2ab8 0000 0000 | | .LITERAL {0x00000000, 0x0000282d} 2abc 0000 0000 | | .BLANK 0000[0x4] 2ac0 ; -------------------------------------------------------------------------------------- 2ac0 ; SUBPROGRAM 2ac0 ; -------------------------------------------------------------------------------------- 2ac0 2ac3 |* | .CONST 0x2ac3 ; Address of begin 2ac1 0004 | | .CONST 0x0004 ; Address of exception handler 2ac2 0001 | | .CONST 0x0001 ; Number of locals 2ac3 BODY_2ac0: 2ac3 INIT_2ac0: 2ac3 4608 |F | Jump_Case 0x9 2ac4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 2ac5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 2ac6 7819 |x | Jump 0x2ae0 ; case 0x2 2ac7 7818 |x | Jump 0x2ae0 ; case 0x3 2ac8 7817 |x | Jump 0x2ae0 ; case 0x4 2ac9 7816 |x | Jump 0x2ae0 ; case 0x5 2aca 7815 |x | Jump 0x2ae0 ; case 0x6 2acb 7801 |x | Jump 0x2acd ; case 0x7 2acc 7809 |x | Jump 0x2ad6 ; case 0x8 2acd 00db | | Load_Top At_Offset_3 2ace 4801 |H | Short_Literal 0x1 2acf e5fe | | Load 0x2,-0x2 2ad0 e20f | | Load 0x1,0xf 2ad1 035b | [ | Declare_Type Array,Constrained 2ad2 4801 |H | Short_Literal 0x1 2ad3 e5ff | | Load 0x2,-0x1 2ad4 031b | | Declare_Type Variant_Record,Constrained 2ad5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 2ad6 00db | | Load_Top At_Offset_3 2ad7 00db | | Load_Top At_Offset_3 2ad8 02fc | | Declare_Variable Variant_Record,With_Constraint 2ad9 4801 |H | Short_Literal 0x1 2ada e5fe | | Load 0x2,-0x2 2adb e20f | | Load 0x1,0xf 2adc 0334 | 4 | Declare_Variable Array,With_Constraint 2add 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3 2ade 016a | j | QQ_execute Variant_Record,XXX 2adf 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 2ae0 0869 | i | Execute_Immediate Raise,0x69 2ae1 0000 0000 | | .BLANK 0000[0x7] 2ae8 ; -------------------------------------------------------------------------------------- 2ae8 ; SUBPROGRAM 2ae8 ; -------------------------------------------------------------------------------------- 2ae8 2aeb |* | .CONST 0x2aeb ; Address of begin 2ae9 0004 | | .CONST 0x0004 ; Address of exception handler 2aea 0001 | | .CONST 0x0001 ; Number of locals 2aeb BODY_2ae8: 2aeb INIT_2ae8: 2aeb 4608 |F | Jump_Case 0x9 2aec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 2aed 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 2aee 7819 |x | Jump 0x2b08 ; case 0x2 2aef 7818 |x | Jump 0x2b08 ; case 0x3 2af0 7817 |x | Jump 0x2b08 ; case 0x4 2af1 7816 |x | Jump 0x2b08 ; case 0x5 2af2 7815 |x | Jump 0x2b08 ; case 0x6 2af3 7801 |x | Jump 0x2af5 ; case 0x7 2af4 7809 |x | Jump 0x2afe ; case 0x8 2af5 00db | | Load_Top At_Offset_3 2af6 4801 |H | Short_Literal 0x1 2af7 e5fe | | Load 0x2,-0x2 2af8 e229 | ) | Load 0x1,0x29 2af9 035b | [ | Declare_Type Array,Constrained 2afa 4801 |H | Short_Literal 0x1 2afb e5ff | | Load 0x2,-0x1 2afc 031b | | Declare_Type Variant_Record,Constrained 2afd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 2afe 00db | | Load_Top At_Offset_3 2aff 00db | | Load_Top At_Offset_3 2b00 02fc | | Declare_Variable Variant_Record,With_Constraint 2b01 4801 |H | Short_Literal 0x1 2b02 e5fe | | Load 0x2,-0x2 2b03 e229 | ) | Load 0x1,0x29 2b04 0334 | 4 | Declare_Variable Array,With_Constraint 2b05 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3 2b06 016a | j | QQ_execute Variant_Record,XXX 2b07 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 2b08 0869 | i | Execute_Immediate Raise,0x69 2b09 0000 0000 | | .BLANK 0000[0x7] 2b10 ; -------------------------------------------------------------------------------------- 2b10 ; SUBPROGRAM 2b10 ; -------------------------------------------------------------------------------------- 2b10 2b25 |+% | .CONST 0x2b25 ; Address of begin 2b11 0004 | | .CONST 0x0004 ; Address of exception handler 2b12 0017 | | .CONST 0x0017 ; Number of locals 2b13 INIT_2b10: 2b13 029a 2b2b | ++| Declare_Subprogram INIT_2b28,For_Outer_Call,Visible,Unelaborated 2b15 029a 2b3b | +;| Declare_Subprogram INIT_2b38,For_Outer_Call,Visible,Unelaborated 2b17 00bf | | Action Accept_Activation 2b18 e001 | | Load 0x0,0x1 2b19 e002 | | Load 0x0,0x2 2b1a e20f | | Load 0x1,0xf 2b1b e210 | | Load 0x1,0x10 2b1c e003 | | Load 0x0,0x3 2b1d 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 2b1e 0387 | | Declare_Variable Package 2b1f 00d8 | | Load_Top At_Offset_0 2b20 020f | | Execute Module,Activate 2b21 1d15 | | Execute_Immediate Reference_Lex_1,0x15 2b22 00c7 | | Action Elaborate_Subprogram 2b23 1d16 | | Execute_Immediate Reference_Lex_1,0x16 2b24 00c7 | | Action Elaborate_Subprogram 2b25 BODY_2b10: 2b25 00bc | | Action Signal_Activated 2b26 00bb | | Action Signal_Completion 2b27 0000 | | .XXX[0x1] 2b28 ; -------------------------------------------------------------------------------------- 2b28 ; SUBPROGRAM 2b28 ; -------------------------------------------------------------------------------------- 2b28 2b2b |++ | .CONST 0x2b2b ; Address of begin 2b29 0004 | | .CONST 0x0004 ; Address of exception handler 2b2a 0001 | | .CONST 0x0001 ; Number of locals 2b2b BODY_2b28: 2b2b INIT_2b28: 2b2b 00da | | Load_Top At_Offset_2 2b2c 0219 | | Execute Heap_Access,All_Read 2b2d 00d8 | | Load_Top At_Offset_0 2b2e 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 2b2f e5ff | | Load 0x2,-0x1 2b30 e5fe | | Load 0x2,-0x2 2b31 e20f | | Load 0x1,0xf 2b32 0119 | | Execute Any,Check_In_Formal_Type 2b33 e217 | | Load 0x1,0x17 2b34 1811 | | Execute Package,Field_Execute,Field_Number 0x11 2b35 00d9 | | Load_Top At_Offset_1 2b36 3811 |8 | Execute Record,Field_Write,Field_Number 0x11 2b37 4503 |E | Exit_Suprogram New_Top_Offset 0x3 2b38 ; -------------------------------------------------------------------------------------- 2b38 ; SUBPROGRAM 2b38 ; -------------------------------------------------------------------------------------- 2b38 2b3b |+; | .CONST 0x2b3b ; Address of begin 2b39 2b44 |+D | .CONST 0x2b44 ; Address of exception handler 2b3a 0001 | | .CONST 0x0001 ; Number of locals 2b3b BODY_2b38: 2b3b INIT_2b38: 2b3b 00da | | Load_Top At_Offset_2 2b3c 0217 | | Execute Heap_Access,All_Reference 2b3d 3c11 |< | Execute Record,Field_Read,Field_Number 0x11 2b3e 00db | | Load_Top At_Offset_3 2b3f e217 | | Load 0x1,0x17 2b40 1813 | | Execute Package,Field_Execute,Field_Number 0x13 2b41 e210 | | Load 0x1,0x10 2b42 0213 | | Execute Heap_Access,Check_In_Type 2b43 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 2b44 TRAP_2b38: 2b44 486b |Hk | Short_Literal 0x6b 2b45 010f | | Execute Exception,Equal 2b46 6802 |h | Jump_Zero 0x2b49 2b47 e210 | | Load 0x1,0x10 2b48 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 2b49 0100 | | Execute Exception,Raise 2b4a ; -------------------------------------------------------------------------------------- 2b4a ; STRING TABLE 2b4a ; -------------------------------------------------------------------------------------- 2b4a 0096 | | .STRTAB 0x0096->0x2b95 ; "TARGET_MACHINE_FIELD" 2b4b 00a8 | | .STRTAB 0x00a8->0x2b9f ; "TARGET_ACCOUNT_FIELD" 2b4c 00ba | | .STRTAB 0x00ba->0x2ba9 ; "TARGET_DIRECTORY_FIELD" 2b4d 00ce | | .STRTAB 0x00ce->0x2bb4 ; "TARGET_LIBRARY_FIELD" 2b4e 00e0 | | .STRTAB 0x00e0->0x2bbe ; "CONFIGURATION_FIELD" 2b4f 00f1 | | .STRTAB 0x00f1->0x2bc7 ; "HAS_UNIT_CONFIGURATIONS_FIELD" 2b50 010c | | .STRTAB 0x010c->0x2bd6 ; "HAS_UNIT_BUILD_TIMES_FIELD" 2b51 0124 | $ | .STRTAB 0x0124->0x2be3 ; "C" 2b52 0123 | # | .STRTAB 0x0123->0x2be3 ; "S" 2b53 0122 | " | .STRTAB 0x0122->0x2be4 ; "SPEC_PART" 2b54 0129 | ) | .STRTAB 0x0129->0x2be8 ; "BODY_PART" 2b55 0130 | 0 | .STRTAB 0x0130->0x2bed ; "ON_MACHINE" 2b56 0138 | 8 | .STRTAB 0x0138->0x2bf2 ; "IS_ATTR" 2b57 013d | = | .STRTAB 0x013d->0x2bf5 ; "HAS_ATTR" 2b58 0143 | C | .STRTAB 0x0143->0x2bf9 ; "CONFIG" 2b59 0147 | G | .STRTAB 0x0147->0x2bfc ; "REFRESHED" 2b5a 014e | N | .STRTAB 0x014e->0x2c01 ; "UPDATED" 2b5b 0153 | S | .STRTAB 0x0153->0x2c04 ; "DOWNLOADED" 2b5c 015b | [ | .STRTAB 0x015b->0x2c09 ; "STAMPED" 2b5d 0160 | ` | .STRTAB 0x0160->0x2c0d ; "BUILT" 2b5e 0163 | c | .STRTAB 0x0163->0x2c0f ; "NAMED" 2b5f 0166 | f | .STRTAB 0x0166->0x2c12 ; "TARGET_NAMED" 2b60 0170 | p | .STRTAB 0x0170->0x2c18 ; "SECONDARY_NAMED" 2b61 017d | } | .STRTAB 0x017d->0x2c1f ; "PRIMARY_NAMED" 2b62 0188 | | .STRTAB 0x0188->0x2c26 ; "RETAINED" 2b63 018e | | .STRTAB 0x018e->0x2c2a ; "SN" 2b64 018e | | .STRTAB 0x018e->0x2c2b ; "BASIC_FRESH" 2b65 0197 | | .STRTAB 0x0197->0x2c30 ; "FULL_FRESH" 2b66 019f | | .STRTAB 0x019f->0x2c35 ; "CONFIGURED" 2b67 01a7 | | .STRTAB 0x01a7->0x2c3a ; "DOWNLOADABLE" 2b68 01b1 | | .STRTAB 0x01b1->0x2c40 ; "SECONDARY_UNIT" 2b69 01bd | | .STRTAB 0x01bd->0x2c47 ; "SEPARATE_GENERIC_BODIES" 2b6a 01d2 | | .STRTAB 0x01d2->0x2c53 ; "SECONDARY_UNIT" 2b6b 01de | | .STRTAB 0x01de->0x2c5a ; "TARGET_NAME" 2b6c 01e7 | | .STRTAB 0x01e7->0x2c5f ; "TARGET_UNIT" 2b6d 01f0 | | .STRTAB 0x01f0->0x2c65 ; "NIL" 2b6e 01f1 | | .STRTAB 0x01f1->0x2c66 ; "NEGATE" 2b6f 01f5 | | .STRTAB 0x01f5->0x2c69 ; "AND_THEN" 2b70 01fb | | .STRTAB 0x01fb->0x2c6d ; "OR_ELSE" 2b71 0200 | | .STRTAB 0x0200->0x2c71 ; "CLASS" 2b72 0203 | | .STRTAB 0x0203->0x2c73 ; "SUBCLASS" 2b73 0209 | | .STRTAB 0x0209->0x2c77 ; "UNIT_STATE" 2b74 0211 | | .STRTAB 0x0211->0x2c7c ; "IS_QUERY" 2b75 0217 | | .STRTAB 0x0217->0x2c80 ; "HAS_QUERY" 2b76 021e | | .STRTAB 0x021e->0x2c85 ; "CONFIG" 2b77 0222 | " | .STRTAB 0x0222->0x2c88 ; "REFRESHED" 2b78 0229 | ) | .STRTAB 0x0229->0x2c8c ; "UPDATED" 2b79 022e | . | .STRTAB 0x022e->0x2c90 ; "DOWNLOADED" 2b7a 0236 | 6 | .STRTAB 0x0236->0x2c95 ; "STAMPED" 2b7b 023b | ; | .STRTAB 0x023b->0x2c98 ; "BUILT" 2b7c 023e | > | .STRTAB 0x023e->0x2c9b ; "NAMED" 2b7d 0241 | A | .STRTAB 0x0241->0x2c9d ; "TARGET_NAMED" 2b7e 024b | K | .STRTAB 0x024b->0x2ca3 ; "SECONDARY_NAMED" 2b7f 0258 | X | .STRTAB 0x0258->0x2cab ; "PRIMARY_NAMED" 2b80 0263 | c | .STRTAB 0x0263->0x2cb1 ; "RETAINED" 2b81 0269 | i | .STRTAB 0x0269->0x2cb5 ; "SN" 2b82 0269 | i | .STRTAB 0x0269->0x2cb6 ; "UNIT_PART" 2b83 0270 | p | .STRTAB 0x0270->0x2cbb ; ":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 :" 2b84 039b | | .STRTAB 0x039b->0x2d51 ; "Created state file for world \x22" 2b85 03b7 | | .STRTAB 0x03b7->0x2d60 ; "\x22." 2b86 03b7 | | .STRTAB 0x03b7->0x2d61 ; "AT" 2b87 03b7 | | .STRTAB 0x03b7->0x2d62 ; ".." 2b88 03b7 | | .STRTAB 0x03b7->0x2d63 ; "'IS" 2b89 03b8 | | .STRTAB 0x03b8->0x2d65 ; "'HAS" 2b8a 03ba | | .STRTAB 0x03ba->0x2d67 ; "'" 2b8b 03b9 | | .STRTAB 0x03b9->0x2d67 ; "(" 2b8c 03b8 | | .STRTAB 0x03b8->0x2d68 ; "Warning: ON_MACHINES query attribute will be ignored." 2b8d 03eb | | .STRTAB 0x03eb->0x2d82 ; "Target_Account has been set to \x22" 2b8e 0409 | | .STRTAB 0x0409->0x2d92 ; "Target_Directory has been set to \x22" 2b8f 0429 | ) | .STRTAB 0x0429->0x2da3 ; "Target_Library has been set to \x22" 2b90 0447 | G | .STRTAB 0x0447->0x2db3 ; "Configuration has been set to \x22" 2b91 0464 | d | .STRTAB 0x0464->0x2dc3 ; "Target_Machine has been set to \x22" 2b92 0482 | | .STRTAB 0x0482->0x2dd3 ; "State file for " 2b93 048f | | .STRTAB 0x048f->0x2dda ; " has been closed." 2b94 049e | | .STREND 0x049e->0x2de3 2b95 5441 5247 |TARG| .STRTAB_STRINGS 2de3 0000 0000 | | .BLANK 0000[0x5] 2de8 ; -------------------------------------------------------------------------------------- 2de8 ; Debug Table 2de8 ; -------------------------------------------------------------------------------------- 2de8 0004 000a | | .DEBUG4 0x0004,0x000a,0xe365,0x0000,0x0001,0x0000 2dee 0000 006c | l| .XXX[0x2] 2df0 0000 0000 | | .BLANK 0000[0x8] 2df8 0001 0404 | | .XXX[0x8] 2dfa 0000 0700 | | 2dfc 8000 0000 | | 2dfe 0000 0000 | |