|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3
└─⟦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 05f8 | | .CONST 0x05f8 ; 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 8004 | | .CONST 0x8004 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 01b3 | | .CONST 0x01b3 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0056 | V | .CONST 0x0056 ; 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 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated 0010 029a 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call,Visible,Unelaborated 0012 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated 0014 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated 0016 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated 0018 00e3 | | Load_Encached Natural_Cache 0019 0266 | f | Execute Discrete,Bounds 001a e20d | | Load 0x1,0xd 001b 02a0 | | Declare_Subprogram Null_Subprogram 001c 4801 |H | Short_Literal 0x1 001d 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 001e 00e3 | | Load_Encached Natural_Cache 001f e002 | | Load 0x0,0x2 0020 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0021 4801 |H | Short_Literal 0x1 0022 619d |a | Indirect_Literal Discrete,0x1c0,{0x00000000, 0x7fffffff} 0023 e213 | | Load 0x1,0x13 0024 034f | O | Declare_Type Array,Constrained,Visible,Bounds_With_Object 0025 029f 0593 | | Declare_Subprogram INIT_0590,For_Call 0027 4800 |H | Short_Literal 0x0 0028 4801 |H | Short_Literal 0x1 0029 4801 |H | Short_Literal 0x1 002a 4800 |H | Short_Literal 0x0 002b 4801 |H | Short_Literal 0x1 002c 4801 |H | Short_Literal 0x1 002d 031e | | Declare_Type Variant_Record,Defined,Visible 002e 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 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 e003 | | Load 0x0,0x3 0072 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0073 0129 | ) | Execute Any,Make_Visible 0074 c24b | K | Store 0x1,0x4b 0075 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated 0077 c24c | L | Store 0x1,0x4c 0078 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated 007a c24d | M | Store 0x1,0x4d 007b 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated 007d c218 | | Store 0x1,0x18 007e 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated 0080 c219 | | Store 0x1,0x19 0081 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated 0083 c24e | N | Store 0x1,0x4e 0084 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated 0086 c24f | O | Store 0x1,0x4f 0087 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated 0089 c21c | | Store 0x1,0x1c 008a 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated 008c c21d | | Store 0x1,0x1d 008d 029a 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call,Visible,Unelaborated 008f c21e | | Store 0x1,0x1e 0090 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated 0092 c21f | | Store 0x1,0x1f 0093 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated 0095 c220 | | Store 0x1,0x20 0096 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated 0098 c221 | ! | Store 0x1,0x21 0099 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated 009b c222 | " | Store 0x1,0x22 009c 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated 009e c223 | # | Store 0x1,0x23 009f 029a 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call,Visible,Unelaborated 00a1 c224 | $ | Store 0x1,0x24 00a2 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated 00a4 c225 | % | Store 0x1,0x25 00a5 029a 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call,Visible,Unelaborated 00a7 c226 | & | Store 0x1,0x26 00a8 029a 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call,Visible,Unelaborated 00aa c227 | ' | Store 0x1,0x27 00ab 029a 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call,Visible,Unelaborated 00ad c228 | ( | Store 0x1,0x28 00ae 029a 030b | | Declare_Subprogram INIT_0308,For_Outer_Call,Visible,Unelaborated 00b0 c250 | P | Store 0x1,0x50 00b1 029a 0313 | | Declare_Subprogram INIT_0310,For_Outer_Call,Visible,Unelaborated 00b3 c251 | Q | Store 0x1,0x51 00b4 029a 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call,Visible,Unelaborated 00b6 c252 | R | Store 0x1,0x52 00b7 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated 00b9 c253 | S | Store 0x1,0x53 00ba 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated 00bc c254 | T | Store 0x1,0x54 00bd 029a 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call,Visible,Unelaborated 00bf c255 | U | Store 0x1,0x55 00c0 029a 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call,Visible,Unelaborated 00c2 c229 | ) | Store 0x1,0x29 00c3 029a 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call,Visible,Unelaborated 00c5 c22a | * | Store 0x1,0x2a 00c6 029a 038b | | Declare_Subprogram INIT_0388,For_Outer_Call,Visible,Unelaborated 00c8 c22b | + | Store 0x1,0x2b 00c9 029a 039b | | Declare_Subprogram INIT_0398,For_Outer_Call,Visible,Unelaborated 00cb c22c | , | Store 0x1,0x2c 00cc 029a 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call,Visible,Unelaborated 00ce c22d | - | Store 0x1,0x2d 00cf 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated 00d1 c22e | . | Store 0x1,0x2e 00d2 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated 00d4 c22f | / | Store 0x1,0x2f 00d5 029a 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call,Visible,Unelaborated 00d7 c230 | 0 | Store 0x1,0x30 00d8 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated 00da c231 | 1 | Store 0x1,0x31 00db 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated 00dd c256 | V | Store 0x1,0x56 00de 029a 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Visible,Unelaborated 00e0 c233 | 3 | Store 0x1,0x33 00e1 029a 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Visible,Unelaborated 00e3 c234 | 4 | Store 0x1,0x34 00e4 029a 0453 | S| Declare_Subprogram INIT_0450,For_Outer_Call,Visible,Unelaborated 00e6 c235 | 5 | Store 0x1,0x35 00e7 029a 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call,Visible,Unelaborated 00e9 c236 | 6 | Store 0x1,0x36 00ea 029a 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call,Visible,Unelaborated 00ec c237 | 7 | Store 0x1,0x37 00ed 029a 0473 | s| Declare_Subprogram INIT_0470,For_Outer_Call,Visible,Unelaborated 00ef c238 | 8 | Store 0x1,0x38 00f0 029a 047b | {| Declare_Subprogram INIT_0478,For_Outer_Call,Visible,Unelaborated 00f2 c239 | 9 | Store 0x1,0x39 00f3 029a 0483 | | Declare_Subprogram INIT_0480,For_Outer_Call,Visible,Unelaborated 00f5 c23a | : | Store 0x1,0x3a 00f6 029a 0493 | | Declare_Subprogram INIT_0490,For_Outer_Call,Visible,Unelaborated 00f8 c23b | ; | Store 0x1,0x3b 00f9 029a 04a3 | | Declare_Subprogram INIT_04a0,For_Outer_Call,Visible,Unelaborated 00fb c23c | < | Store 0x1,0x3c 00fc 029a 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call,Visible,Unelaborated 00fe c23d | = | Store 0x1,0x3d 00ff 029a 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call,Visible,Unelaborated 0101 c23e | > | Store 0x1,0x3e 0102 029a 04d3 | | Declare_Subprogram INIT_04d0,For_Outer_Call,Visible,Unelaborated 0104 c23f | ? | Store 0x1,0x3f 0105 029a 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call,Visible,Unelaborated 0107 c240 | @ | Store 0x1,0x40 0108 029a 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call,Visible,Unelaborated 010a c241 | A | Store 0x1,0x41 010b 029a 050b | | Declare_Subprogram INIT_0508,For_Outer_Call,Visible,Unelaborated 010d c242 | B | Store 0x1,0x42 010e 029a 0523 | #| Declare_Subprogram INIT_0520,For_Outer_Call,Visible,Unelaborated 0110 c243 | C | Store 0x1,0x43 0111 029a 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call,Visible,Unelaborated 0113 c244 | D | Store 0x1,0x44 0114 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated 0116 c245 | E | Store 0x1,0x45 0117 029a 056b | k| Declare_Subprogram INIT_0568,For_Outer_Call,Visible,Unelaborated 0119 c246 | F | Store 0x1,0x46 011a 029a 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call,Visible,Unelaborated 011c c247 | G | Store 0x1,0x47 011d 029a 057b | {| Declare_Subprogram INIT_0578,For_Outer_Call,Visible,Unelaborated 011f c248 | H | Store 0x1,0x48 0120 029a 058b | | Declare_Subprogram INIT_0588,For_Outer_Call,Visible,Unelaborated 0122 c249 | I | Store 0x1,0x49 0123 4807 |H | Short_Literal 0x7 0124 0093 05bb | | push_full_address INIT_05b8 0126 02a0 | | Declare_Subprogram Null_Subprogram 0127 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated 0128 c24a | J | Store 0x1,0x4a 0129 00bf | | Action Accept_Activation 012a 1d0e | | Execute_Immediate Reference_Lex_1,0xe 012b 00c7 | | Action Elaborate_Subprogram 012c 1d0f | | Execute_Immediate Reference_Lex_1,0xf 012d 00c7 | | Action Elaborate_Subprogram 012e 1d10 | | Execute_Immediate Reference_Lex_1,0x10 012f 00c7 | | Action Elaborate_Subprogram 0130 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0131 00c7 | | Action Elaborate_Subprogram 0132 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0133 00c7 | | Action Elaborate_Subprogram 0134 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0135 00c7 | | Action Elaborate_Subprogram 0136 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c 0137 00c7 | | Action Elaborate_Subprogram 0138 1d4d | M | Execute_Immediate Reference_Lex_1,0x4d 0139 00c7 | | Action Elaborate_Subprogram 013a 1d18 | | Execute_Immediate Reference_Lex_1,0x18 013b 00c7 | | Action Elaborate_Subprogram 013c 1d19 | | Execute_Immediate Reference_Lex_1,0x19 013d 00c7 | | Action Elaborate_Subprogram 013e 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e 013f 00c7 | | Action Elaborate_Subprogram 0140 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f 0141 00c7 | | Action Elaborate_Subprogram 0142 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0143 00c7 | | Action Elaborate_Subprogram 0144 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0145 00c7 | | Action Elaborate_Subprogram 0146 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0147 00c7 | | Action Elaborate_Subprogram 0148 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 0149 00c7 | | Action Elaborate_Subprogram 014a 1d20 | | Execute_Immediate Reference_Lex_1,0x20 014b 00c7 | | Action Elaborate_Subprogram 014c 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 014d 00c7 | | Action Elaborate_Subprogram 014e 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 014f 00c7 | | Action Elaborate_Subprogram 0150 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0151 00c7 | | Action Elaborate_Subprogram 0152 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0153 00c7 | | Action Elaborate_Subprogram 0154 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0155 00c7 | | Action Elaborate_Subprogram 0156 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 0157 00c7 | | Action Elaborate_Subprogram 0158 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0159 00c7 | | Action Elaborate_Subprogram 015a 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 015b 00c7 | | Action Elaborate_Subprogram 015c 1d50 | P | Execute_Immediate Reference_Lex_1,0x50 015d 00c7 | | Action Elaborate_Subprogram 015e 1d51 | Q | Execute_Immediate Reference_Lex_1,0x51 015f 00c7 | | Action Elaborate_Subprogram 0160 1d52 | R | Execute_Immediate Reference_Lex_1,0x52 0161 00c7 | | Action Elaborate_Subprogram 0162 1d53 | S | Execute_Immediate Reference_Lex_1,0x53 0163 00c7 | | Action Elaborate_Subprogram 0164 1d54 | T | Execute_Immediate Reference_Lex_1,0x54 0165 00c7 | | Action Elaborate_Subprogram 0166 1d55 | U | Execute_Immediate Reference_Lex_1,0x55 0167 00c7 | | Action Elaborate_Subprogram 0168 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 0169 00c7 | | Action Elaborate_Subprogram 016a 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 016b 00c7 | | Action Elaborate_Subprogram 016c 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 016d 00c7 | | Action Elaborate_Subprogram 016e 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 016f 00c7 | | Action Elaborate_Subprogram 0170 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 0171 00c7 | | Action Elaborate_Subprogram 0172 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 0173 00c7 | | Action Elaborate_Subprogram 0174 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0175 00c7 | | Action Elaborate_Subprogram 0176 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 0177 00c7 | | Action Elaborate_Subprogram 0178 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 0179 00c7 | | Action Elaborate_Subprogram 017a 1d56 | V | Execute_Immediate Reference_Lex_1,0x56 017b 00c7 | | Action Elaborate_Subprogram 017c 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 017d 00c7 | | Action Elaborate_Subprogram 017e 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34 017f 00c7 | | Action Elaborate_Subprogram 0180 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 0181 00c7 | | Action Elaborate_Subprogram 0182 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36 0183 00c7 | | Action Elaborate_Subprogram 0184 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37 0185 00c7 | | Action Elaborate_Subprogram 0186 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38 0187 00c7 | | Action Elaborate_Subprogram 0188 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39 0189 00c7 | | Action Elaborate_Subprogram 018a 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a 018b 00c7 | | Action Elaborate_Subprogram 018c 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b 018d 00c7 | | Action Elaborate_Subprogram 018e 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c 018f 00c7 | | Action Elaborate_Subprogram 0190 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d 0191 00c7 | | Action Elaborate_Subprogram 0192 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e 0193 00c7 | | Action Elaborate_Subprogram 0194 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f 0195 00c7 | | Action Elaborate_Subprogram 0196 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40 0197 00c7 | | Action Elaborate_Subprogram 0198 1d41 | A | Execute_Immediate Reference_Lex_1,0x41 0199 00c7 | | Action Elaborate_Subprogram 019a 1d42 | B | Execute_Immediate Reference_Lex_1,0x42 019b 00c7 | | Action Elaborate_Subprogram 019c 1d43 | C | Execute_Immediate Reference_Lex_1,0x43 019d 00c7 | | Action Elaborate_Subprogram 019e 1d44 | D | Execute_Immediate Reference_Lex_1,0x44 019f 00c7 | | Action Elaborate_Subprogram 01a0 1d45 | E | Execute_Immediate Reference_Lex_1,0x45 01a1 00c7 | | Action Elaborate_Subprogram 01a2 1d46 | F | Execute_Immediate Reference_Lex_1,0x46 01a3 00c7 | | Action Elaborate_Subprogram 01a4 1d47 | G | Execute_Immediate Reference_Lex_1,0x47 01a5 00c7 | | Action Elaborate_Subprogram 01a6 1d48 | H | Execute_Immediate Reference_Lex_1,0x48 01a7 00c7 | | Action Elaborate_Subprogram 01a8 1d49 | I | Execute_Immediate Reference_Lex_1,0x49 01a9 00c7 | | Action Elaborate_Subprogram 01aa e004 | | Load 0x0,0x4 01ab e005 | | Load 0x0,0x5 01ac e006 | | Load 0x0,0x6 01ad e007 | | Load 0x0,0x7 01ae 4804 |H | Short_Literal 0x4 01af e24a | J | Load 0x1,0x4a 01b0 020e | | Execute Module,Augment_Imports 01b1 e24a | J | Load 0x1,0x4a 01b2 020d | | Execute Module,Elaborate 01b3 BODY_0008: 01b3 00bc | | Action Signal_Activated 01b4 00bb | | Action Signal_Completion 01b5 0000 0000 | | .XXX[0x3] 01b7 0000 | | 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01bb | | .CONST 0x01bb ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0001 | | .CONST 0x0001 ; Number of locals 01bb BODY_01b8: 01bb INIT_01b8: 01bb e007 | | Load 0x0,0x7 01bc 1b14 | | Execute Package,Field_Read,Field_Number 0x14 01bd 180e | | Execute Package,Field_Execute,Field_Number 0xe 01be 00ca | | Action Exit_Nullary_Function 01bf 0000 | | .XXX[0x1] 01c0 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 01c4 0000 0000 | | .BLANK 0000[0x4] 01c8 ; -------------------------------------------------------------------------------------- 01c8 ; SUBPROGRAM 01c8 ; -------------------------------------------------------------------------------------- 01c8 01cb | | .CONST 0x01cb ; Address of begin 01c9 0004 | | .CONST 0x0004 ; Address of exception handler 01ca 0001 | | .CONST 0x0001 ; Number of locals 01cb BODY_01c8: 01cb INIT_01c8: 01cb 00da | | Load_Top At_Offset_2 01cc e007 | | Load 0x0,0x7 01cd 1b14 | | Execute Package,Field_Read,Field_Number 0x14 01ce 180f | | Execute Package,Field_Execute,Field_Number 0xf 01cf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; SUBPROGRAM 01d0 ; -------------------------------------------------------------------------------------- 01d0 01d3 | | .CONST 0x01d3 ; Address of begin 01d1 0004 | | .CONST 0x0004 ; Address of exception handler 01d2 0001 | | .CONST 0x0001 ; Number of locals 01d3 BODY_01d0: 01d3 INIT_01d0: 01d3 00da | | Load_Top At_Offset_2 01d4 e007 | | Load 0x0,0x7 01d5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 01d6 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01d7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01db | | .CONST 0x01db ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0001 | | .CONST 0x0001 ; Number of locals 01db BODY_01d8: 01db INIT_01d8: 01db 00da | | Load_Top At_Offset_2 01dc e007 | | Load 0x0,0x7 01dd 1b14 | | Execute Package,Field_Read,Field_Number 0x14 01de 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; SUBPROGRAM 01e0 ; -------------------------------------------------------------------------------------- 01e0 01e3 | | .CONST 0x01e3 ; Address of begin 01e1 0004 | | .CONST 0x0004 ; Address of exception handler 01e2 0001 | | .CONST 0x0001 ; Number of locals 01e3 BODY_01e0: 01e3 INIT_01e0: 01e3 00da | | Load_Top At_Offset_2 01e4 e007 | | Load 0x0,0x7 01e5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 01e6 1812 | | Execute Package,Field_Execute,Field_Number 0x12 01e7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb e007 | | Load 0x0,0x7 01ec 1b14 | | Execute Package,Field_Read,Field_Number 0x14 01ed 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01ee e008 | | Load 0x0,0x8 01ef 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01f0 00ca | | Action Exit_Nullary_Function 01f1 0000 0000 | | .BLANK 0000[0x7] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 01fb | | .CONST 0x01fb ; Address of begin 01f9 0004 | | .CONST 0x0004 ; Address of exception handler 01fa 0001 | | .CONST 0x0001 ; Number of locals 01fb BODY_01f8: 01fb INIT_01f8: 01fb e5fd | | Load 0x2,-0x3 01fc e5fe | | Load 0x2,-0x2 01fd e007 | | Load 0x0,0x7 01fe 1b14 | | Execute Package,Field_Read,Field_Number 0x14 01ff 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 0200 e5ff | | Load 0x2,-0x1 0201 e007 | | Load 0x0,0x7 0202 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0203 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 0204 c5fd | | Store 0x2,-0x3 0205 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0206 0000 0000 | | .XXX[0x2] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020b | | .CONST 0x020b ; Address of begin 0209 0004 | | .CONST 0x0004 ; Address of exception handler 020a 0001 | | .CONST 0x0001 ; Number of locals 020b BODY_0208: 020b INIT_0208: 020b e5fd | | Load 0x2,-0x3 020c e5fe | | Load 0x2,-0x2 020d e007 | | Load 0x0,0x7 020e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 020f 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 0210 e5ff | | Load 0x2,-0x1 0211 e009 | | Load 0x0,0x9 0212 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0213 e007 | | Load 0x0,0x7 0214 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0215 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b 0216 c5fd | | Store 0x2,-0x3 0217 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 021b | | .CONST 0x021b ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 0001 | | .CONST 0x0001 ; Number of locals 021b BODY_0218: 021b INIT_0218: 021b 00da | | Load_Top At_Offset_2 021c e007 | | Load 0x0,0x7 021d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 021e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 021f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0220 ; -------------------------------------------------------------------------------------- 0220 ; SUBPROGRAM 0220 ; -------------------------------------------------------------------------------------- 0220 0223 | # | .CONST 0x0223 ; Address of begin 0221 0004 | | .CONST 0x0004 ; Address of exception handler 0222 0001 | | .CONST 0x0001 ; Number of locals 0223 BODY_0220: 0223 INIT_0220: 0223 e5fd | | Load 0x2,-0x3 0224 e5fe | | Load 0x2,-0x2 0225 e5ff | | Load 0x2,-0x1 0226 e007 | | Load 0x0,0x7 0227 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0228 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0229 c5fd | | Store 0x2,-0x3 022a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 022b 0000 0000 | | .BLANK 0000[0x5] 0230 ; -------------------------------------------------------------------------------------- 0230 ; SUBPROGRAM 0230 ; -------------------------------------------------------------------------------------- 0230 0233 | 3 | .CONST 0x0233 ; Address of begin 0231 0004 | | .CONST 0x0004 ; Address of exception handler 0232 0001 | | .CONST 0x0001 ; Number of locals 0233 BODY_0230: 0233 INIT_0230: 0233 00db | | Load_Top At_Offset_3 0234 00db | | Load_Top At_Offset_3 0235 e007 | | Load 0x0,0x7 0236 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0237 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 0238 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0239 0000 0000 | | .BLANK 0000[0x7] 0240 ; -------------------------------------------------------------------------------------- 0240 ; SUBPROGRAM 0240 ; -------------------------------------------------------------------------------------- 0240 0243 | C | .CONST 0x0243 ; Address of begin 0241 0004 | | .CONST 0x0004 ; Address of exception handler 0242 0001 | | .CONST 0x0001 ; Number of locals 0243 BODY_0240: 0243 INIT_0240: 0243 00db | | Load_Top At_Offset_3 0244 00db | | Load_Top At_Offset_3 0245 e007 | | Load 0x0,0x7 0246 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0247 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0248 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0249 0000 0000 | | .BLANK 0000[0x7] 0250 ; -------------------------------------------------------------------------------------- 0250 ; SUBPROGRAM 0250 ; -------------------------------------------------------------------------------------- 0250 0253 | S | .CONST 0x0253 ; Address of begin 0251 0004 | | .CONST 0x0004 ; Address of exception handler 0252 0001 | | .CONST 0x0001 ; Number of locals 0253 BODY_0250: 0253 INIT_0250: 0253 00da | | Load_Top At_Offset_2 0254 e007 | | Load 0x0,0x7 0255 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0256 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0257 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 025b | [ | .CONST 0x025b ; Address of begin 0259 0004 | | .CONST 0x0004 ; Address of exception handler 025a 0001 | | .CONST 0x0001 ; Number of locals 025b BODY_0258: 025b INIT_0258: 025b 00da | | Load_Top At_Offset_2 025c e007 | | Load 0x0,0x7 025d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 025e 181d | | Execute Package,Field_Execute,Field_Number 0x1d 025f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0263 | c | .CONST 0x0263 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0001 | | .CONST 0x0001 ; Number of locals 0263 BODY_0260: 0263 INIT_0260: 0263 00da | | Load_Top At_Offset_2 0264 e007 | | Load 0x0,0x7 0265 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0266 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0267 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0268 ; -------------------------------------------------------------------------------------- 0268 ; SUBPROGRAM 0268 ; -------------------------------------------------------------------------------------- 0268 026b | k | .CONST 0x026b ; Address of begin 0269 0004 | | .CONST 0x0004 ; Address of exception handler 026a 0001 | | .CONST 0x0001 ; Number of locals 026b BODY_0268: 026b INIT_0268: 026b 00da | | Load_Top At_Offset_2 026c e007 | | Load 0x0,0x7 026d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 026e 181f | | Execute Package,Field_Execute,Field_Number 0x1f 026f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0270 ; -------------------------------------------------------------------------------------- 0270 ; SUBPROGRAM 0270 ; -------------------------------------------------------------------------------------- 0270 0273 | s | .CONST 0x0273 ; Address of begin 0271 0004 | | .CONST 0x0004 ; Address of exception handler 0272 0001 | | .CONST 0x0001 ; Number of locals 0273 BODY_0270: 0273 INIT_0270: 0273 e5fd | | Load 0x2,-0x3 0274 e5fe | | Load 0x2,-0x2 0275 e5ff | | Load 0x2,-0x1 0276 e007 | | Load 0x0,0x7 0277 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0278 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0279 c5fd | | Store 0x2,-0x3 027a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 027b 0000 0000 | | .BLANK 0000[0x5] 0280 ; -------------------------------------------------------------------------------------- 0280 ; SUBPROGRAM 0280 ; -------------------------------------------------------------------------------------- 0280 0283 | | .CONST 0x0283 ; Address of begin 0281 0004 | | .CONST 0x0004 ; Address of exception handler 0282 0001 | | .CONST 0x0001 ; Number of locals 0283 BODY_0280: 0283 INIT_0280: 0283 00da | | Load_Top At_Offset_2 0284 e007 | | Load 0x0,0x7 0285 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0286 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0287 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 028b | | .CONST 0x028b ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0001 | | .CONST 0x0001 ; Number of locals 028b BODY_0288: 028b INIT_0288: 028b e5fd | | Load 0x2,-0x3 028c e5fe | | Load 0x2,-0x2 028d 0120 | | Execute Any,Is_Value 028e 6803 |h | Jump_Zero 0x292 028f e00a | | Load 0x0,0xa 0290 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 0291 7801 |x | Jump 0x293 0292 e5fe | | Load 0x2,-0x2 0293 e5ff | | Load 0x2,-0x1 0294 e007 | | Load 0x0,0x7 0295 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0296 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0297 c5fe | | Store 0x2,-0x2 0298 c5fd | | Store 0x2,-0x3 0299 4502 |E | Exit_Suprogram New_Top_Offset 0x2 029a 0000 0000 | | .BLANK 0000[0x6] 02a0 ; -------------------------------------------------------------------------------------- 02a0 ; SUBPROGRAM 02a0 ; -------------------------------------------------------------------------------------- 02a0 02a3 | | .CONST 0x02a3 ; Address of begin 02a1 0004 | | .CONST 0x0004 ; Address of exception handler 02a2 0001 | | .CONST 0x0001 ; Number of locals 02a3 BODY_02a0: 02a3 INIT_02a0: 02a3 e5fd | | Load 0x2,-0x3 02a4 e00a | | Load 0x0,0xa 02a5 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 02a6 e5ff | | Load 0x2,-0x1 02a7 e007 | | Load 0x0,0x7 02a8 1b14 | | Execute Package,Field_Read,Field_Number 0x14 02a9 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 02aa c5fe | | Store 0x2,-0x2 02ab c5fd | | Store 0x2,-0x3 02ac 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02ad 0000 0000 | | .XXX[0x3] 02af 0000 | | 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02b3 | | .CONST 0x02b3 ; Address of begin 02b1 0004 | | .CONST 0x0004 ; Address of exception handler 02b2 0001 | | .CONST 0x0001 ; Number of locals 02b3 BODY_02b0: 02b3 INIT_02b0: 02b3 e5fd | | Load 0x2,-0x3 02b4 e5fe | | Load 0x2,-0x2 02b5 0120 | | Execute Any,Is_Value 02b6 6803 |h | Jump_Zero 0x2ba 02b7 e00a | | Load 0x0,0xa 02b8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02b9 7801 |x | Jump 0x2bb 02ba e5fe | | Load 0x2,-0x2 02bb e5ff | | Load 0x2,-0x1 02bc e007 | | Load 0x0,0x7 02bd 1b14 | | Execute Package,Field_Read,Field_Number 0x14 02be 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 02bf c5fe | | Store 0x2,-0x2 02c0 c5fd | | Store 0x2,-0x3 02c1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02c2 0000 0000 | | .BLANK 0000[0x6] 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; SUBPROGRAM 02c8 ; -------------------------------------------------------------------------------------- 02c8 02cb | | .CONST 0x02cb ; Address of begin 02c9 0004 | | .CONST 0x0004 ; Address of exception handler 02ca 0001 | | .CONST 0x0001 ; Number of locals 02cb BODY_02c8: 02cb INIT_02c8: 02cb e5fd | | Load 0x2,-0x3 02cc e5fe | | Load 0x2,-0x2 02cd e5ff | | Load 0x2,-0x1 02ce e007 | | Load 0x0,0x7 02cf 1b14 | | Execute Package,Field_Read,Field_Number 0x14 02d0 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 02d1 00d1 | | Pop_Control Pop_Count_1 02d2 c5fd | | Store 0x2,-0x3 02d3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02d4 0000 0000 | | .BLANK 0000[0x4] 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; SUBPROGRAM 02d8 ; -------------------------------------------------------------------------------------- 02d8 02db | | .CONST 0x02db ; Address of begin 02d9 0004 | | .CONST 0x0004 ; Address of exception handler 02da 0001 | | .CONST 0x0001 ; Number of locals 02db BODY_02d8: 02db INIT_02d8: 02db e5fd | | Load 0x2,-0x3 02dc e5fe | | Load 0x2,-0x2 02dd 0120 | | Execute Any,Is_Value 02de 6803 |h | Jump_Zero 0x2e2 02df e00a | | Load 0x0,0xa 02e0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02e1 7801 |x | Jump 0x2e3 02e2 e5fe | | Load 0x2,-0x2 02e3 e5ff | | Load 0x2,-0x1 02e4 e007 | | Load 0x0,0x7 02e5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 02e6 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 02e7 c5fe | | Store 0x2,-0x2 02e8 c5fd | | Store 0x2,-0x3 02e9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 02ea 0000 0000 | | .BLANK 0000[0x6] 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 02f3 | | .CONST 0x02f3 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0001 | | .CONST 0x0001 ; Number of locals 02f3 BODY_02f0: 02f3 INIT_02f0: 02f3 00da | | Load_Top At_Offset_2 02f4 e007 | | Load 0x0,0x7 02f5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 02f6 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 02f7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02f8 ; -------------------------------------------------------------------------------------- 02f8 ; SUBPROGRAM 02f8 ; -------------------------------------------------------------------------------------- 02f8 02fb | | .CONST 0x02fb ; Address of begin 02f9 0004 | | .CONST 0x0004 ; Address of exception handler 02fa 0001 | | .CONST 0x0001 ; Number of locals 02fb BODY_02f8: 02fb INIT_02f8: 02fb e5fd | | Load 0x2,-0x3 02fc e5fe | | Load 0x2,-0x2 02fd e5ff | | Load 0x2,-0x1 02fe e007 | | Load 0x0,0x7 02ff 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0300 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0301 c5fd | | Store 0x2,-0x3 0302 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0303 0000 0000 | | .BLANK 0000[0x5] 0308 ; -------------------------------------------------------------------------------------- 0308 ; SUBPROGRAM 0308 ; -------------------------------------------------------------------------------------- 0308 030b | | .CONST 0x030b ; Address of begin 0309 0004 | | .CONST 0x0004 ; Address of exception handler 030a 0001 | | .CONST 0x0001 ; Number of locals 030b BODY_0308: 030b INIT_0308: 030b 00da | | Load_Top At_Offset_2 030c e007 | | Load 0x0,0x7 030d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 030e 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 030f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0310 ; -------------------------------------------------------------------------------------- 0310 ; SUBPROGRAM 0310 ; -------------------------------------------------------------------------------------- 0310 0313 | | .CONST 0x0313 ; Address of begin 0311 0004 | | .CONST 0x0004 ; Address of exception handler 0312 0001 | | .CONST 0x0001 ; Number of locals 0313 BODY_0310: 0313 INIT_0310: 0313 00db | | Load_Top At_Offset_3 0314 00db | | Load_Top At_Offset_3 0315 e007 | | Load 0x0,0x7 0316 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0317 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 0318 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0319 0000 0000 | | .BLANK 0000[0x7] 0320 ; -------------------------------------------------------------------------------------- 0320 ; SUBPROGRAM 0320 ; -------------------------------------------------------------------------------------- 0320 0323 | # | .CONST 0x0323 ; Address of begin 0321 0004 | | .CONST 0x0004 ; Address of exception handler 0322 0001 | | .CONST 0x0001 ; Number of locals 0323 BODY_0320: 0323 INIT_0320: 0323 00da | | Load_Top At_Offset_2 0324 e007 | | Load 0x0,0x7 0325 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0326 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0327 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0328 ; -------------------------------------------------------------------------------------- 0328 ; SUBPROGRAM 0328 ; -------------------------------------------------------------------------------------- 0328 032b | + | .CONST 0x032b ; Address of begin 0329 0004 | | .CONST 0x0004 ; Address of exception handler 032a 0001 | | .CONST 0x0001 ; Number of locals 032b BODY_0328: 032b INIT_0328: 032b e5fd | | Load 0x2,-0x3 032c e5fe | | Load 0x2,-0x2 032d e5ff | | Load 0x2,-0x1 032e e007 | | Load 0x0,0x7 032f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0330 1853 | S | Execute Package,Field_Execute,Field_Number 0x53 0331 c5fd | | Store 0x2,-0x3 0332 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0333 0000 0000 | | .BLANK 0000[0x5] 0338 ; -------------------------------------------------------------------------------------- 0338 ; SUBPROGRAM 0338 ; -------------------------------------------------------------------------------------- 0338 033b | ; | .CONST 0x033b ; Address of begin 0339 0004 | | .CONST 0x0004 ; Address of exception handler 033a 0001 | | .CONST 0x0001 ; Number of locals 033b BODY_0338: 033b INIT_0338: 033b 00db | | Load_Top At_Offset_3 033c e006 | | Load 0x0,0x6 033d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 033e 00d9 | | Load_Top At_Offset_1 033f 00d0 | | Action Swap_Control 0340 0260 | ` | Execute Discrete,In_Type 0341 7001 |p | Jump_Nonzero 0x343 0342 0801 | | Execute_Immediate Raise,0x1 0343 00db | | Load_Top At_Offset_3 0344 e007 | | Load 0x0,0x7 0345 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0346 1854 | T | Execute Package,Field_Execute,Field_Number 0x54 0347 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0348 ; -------------------------------------------------------------------------------------- 0348 ; SUBPROGRAM 0348 ; -------------------------------------------------------------------------------------- 0348 034b | K | .CONST 0x034b ; Address of begin 0349 0004 | | .CONST 0x0004 ; Address of exception handler 034a 0001 | | .CONST 0x0001 ; Number of locals 034b BODY_0348: 034b INIT_0348: 034b e5fc | | Load 0x2,-0x4 034c e5fd | | Load 0x2,-0x3 034d e006 | | Load 0x0,0x6 034e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 034f 00d9 | | Load_Top At_Offset_1 0350 00d0 | | Action Swap_Control 0351 0260 | ` | Execute Discrete,In_Type 0352 7001 |p | Jump_Nonzero 0x354 0353 0801 | | Execute_Immediate Raise,0x1 0354 e5fe | | Load 0x2,-0x2 0355 e5ff | | Load 0x2,-0x1 0356 e007 | | Load 0x0,0x7 0357 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0358 1855 | U | Execute Package,Field_Execute,Field_Number 0x55 0359 c5fc | | Store 0x2,-0x4 035a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 035b 0000 0000 | | .BLANK 0000[0x5] 0360 ; -------------------------------------------------------------------------------------- 0360 ; SUBPROGRAM 0360 ; -------------------------------------------------------------------------------------- 0360 0363 | c | .CONST 0x0363 ; Address of begin 0361 0004 | | .CONST 0x0004 ; Address of exception handler 0362 0001 | | .CONST 0x0001 ; Number of locals 0363 BODY_0360: 0363 INIT_0360: 0363 00db | | Load_Top At_Offset_3 0364 e006 | | Load 0x0,0x6 0365 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0366 00d9 | | Load_Top At_Offset_1 0367 00d0 | | Action Swap_Control 0368 0260 | ` | Execute Discrete,In_Type 0369 7001 |p | Jump_Nonzero 0x36b 036a 0801 | | Execute_Immediate Raise,0x1 036b 00db | | Load_Top At_Offset_3 036c e007 | | Load 0x0,0x7 036d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 036e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 036f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0370 ; -------------------------------------------------------------------------------------- 0370 ; SUBPROGRAM 0370 ; -------------------------------------------------------------------------------------- 0370 0373 | s | .CONST 0x0373 ; Address of begin 0371 0004 | | .CONST 0x0004 ; Address of exception handler 0372 0001 | | .CONST 0x0001 ; Number of locals 0373 BODY_0370: 0373 INIT_0370: 0373 e5fc | | Load 0x2,-0x4 0374 e5fd | | Load 0x2,-0x3 0375 e006 | | Load 0x0,0x6 0376 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0377 00d9 | | Load_Top At_Offset_1 0378 00d0 | | Action Swap_Control 0379 0260 | ` | Execute Discrete,In_Type 037a 7001 |p | Jump_Nonzero 0x37c 037b 0801 | | Execute_Immediate Raise,0x1 037c e5fe | | Load 0x2,-0x2 037d e5ff | | Load 0x2,-0x1 037e e007 | | Load 0x0,0x7 037f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0380 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0381 c5fc | | Store 0x2,-0x4 0382 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0383 0000 0000 | | .BLANK 0000[0x5] 0388 ; -------------------------------------------------------------------------------------- 0388 ; SUBPROGRAM 0388 ; -------------------------------------------------------------------------------------- 0388 038b | | .CONST 0x038b ; Address of begin 0389 0004 | | .CONST 0x0004 ; Address of exception handler 038a 0001 | | .CONST 0x0001 ; Number of locals 038b BODY_0388: 038b INIT_0388: 038b 00db | | Load_Top At_Offset_3 038c e006 | | Load 0x0,0x6 038d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 038e 00d9 | | Load_Top At_Offset_1 038f 00d0 | | Action Swap_Control 0390 0260 | ` | Execute Discrete,In_Type 0391 7001 |p | Jump_Nonzero 0x393 0392 0801 | | Execute_Immediate Raise,0x1 0393 00db | | Load_Top At_Offset_3 0394 e007 | | Load 0x0,0x7 0395 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0396 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0397 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0398 ; -------------------------------------------------------------------------------------- 0398 ; SUBPROGRAM 0398 ; -------------------------------------------------------------------------------------- 0398 039b | | .CONST 0x039b ; Address of begin 0399 0004 | | .CONST 0x0004 ; Address of exception handler 039a 0001 | | .CONST 0x0001 ; Number of locals 039b BODY_0398: 039b INIT_0398: 039b e5fc | | Load 0x2,-0x4 039c e5fd | | Load 0x2,-0x3 039d e006 | | Load 0x0,0x6 039e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 039f 00d9 | | Load_Top At_Offset_1 03a0 00d0 | | Action Swap_Control 03a1 0260 | ` | Execute Discrete,In_Type 03a2 7001 |p | Jump_Nonzero 0x3a4 03a3 0801 | | Execute_Immediate Raise,0x1 03a4 e5fe | | Load 0x2,-0x2 03a5 e5ff | | Load 0x2,-0x1 03a6 e007 | | Load 0x0,0x7 03a7 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03a8 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 03a9 c5fc | | Store 0x2,-0x4 03aa 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03ab 0000 0000 | | .BLANK 0000[0x5] 03b0 ; -------------------------------------------------------------------------------------- 03b0 ; SUBPROGRAM 03b0 ; -------------------------------------------------------------------------------------- 03b0 03b3 | | .CONST 0x03b3 ; Address of begin 03b1 0004 | | .CONST 0x0004 ; Address of exception handler 03b2 0001 | | .CONST 0x0001 ; Number of locals 03b3 BODY_03b0: 03b3 INIT_03b0: 03b3 00db | | Load_Top At_Offset_3 03b4 e006 | | Load 0x0,0x6 03b5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03b6 00d9 | | Load_Top At_Offset_1 03b7 00d0 | | Action Swap_Control 03b8 0260 | ` | Execute Discrete,In_Type 03b9 7001 |p | Jump_Nonzero 0x3bb 03ba 0801 | | Execute_Immediate Raise,0x1 03bb 00db | | Load_Top At_Offset_3 03bc e007 | | Load 0x0,0x7 03bd 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03be 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 03bf 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03c0 ; -------------------------------------------------------------------------------------- 03c0 ; SUBPROGRAM 03c0 ; -------------------------------------------------------------------------------------- 03c0 03c3 | | .CONST 0x03c3 ; Address of begin 03c1 0004 | | .CONST 0x0004 ; Address of exception handler 03c2 0001 | | .CONST 0x0001 ; Number of locals 03c3 BODY_03c0: 03c3 INIT_03c0: 03c3 e5fc | | Load 0x2,-0x4 03c4 e5fd | | Load 0x2,-0x3 03c5 e006 | | Load 0x0,0x6 03c6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03c7 00d9 | | Load_Top At_Offset_1 03c8 00d0 | | Action Swap_Control 03c9 0260 | ` | Execute Discrete,In_Type 03ca 7001 |p | Jump_Nonzero 0x3cc 03cb 0801 | | Execute_Immediate Raise,0x1 03cc e5fe | | Load 0x2,-0x2 03cd e5ff | | Load 0x2,-0x1 03ce e007 | | Load 0x0,0x7 03cf 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03d0 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 03d1 c5fc | | Store 0x2,-0x4 03d2 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03d3 0000 0000 | | .BLANK 0000[0x5] 03d8 ; -------------------------------------------------------------------------------------- 03d8 ; SUBPROGRAM 03d8 ; -------------------------------------------------------------------------------------- 03d8 03db | | .CONST 0x03db ; Address of begin 03d9 0004 | | .CONST 0x0004 ; Address of exception handler 03da 0001 | | .CONST 0x0001 ; Number of locals 03db BODY_03d8: 03db INIT_03d8: 03db 00db | | Load_Top At_Offset_3 03dc e006 | | Load 0x0,0x6 03dd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03de 00d9 | | Load_Top At_Offset_1 03df 00d0 | | Action Swap_Control 03e0 0260 | ` | Execute Discrete,In_Type 03e1 7001 |p | Jump_Nonzero 0x3e3 03e2 0801 | | Execute_Immediate Raise,0x1 03e3 00db | | Load_Top At_Offset_3 03e4 e007 | | Load 0x0,0x7 03e5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03e6 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 03e7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03e8 ; -------------------------------------------------------------------------------------- 03e8 ; SUBPROGRAM 03e8 ; -------------------------------------------------------------------------------------- 03e8 03eb | | .CONST 0x03eb ; Address of begin 03e9 0004 | | .CONST 0x0004 ; Address of exception handler 03ea 0001 | | .CONST 0x0001 ; Number of locals 03eb BODY_03e8: 03eb INIT_03e8: 03eb e5fc | | Load 0x2,-0x4 03ec e5fd | | Load 0x2,-0x3 03ed e006 | | Load 0x0,0x6 03ee 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03ef 00d9 | | Load_Top At_Offset_1 03f0 00d0 | | Action Swap_Control 03f1 0260 | ` | Execute Discrete,In_Type 03f2 7001 |p | Jump_Nonzero 0x3f4 03f3 0801 | | Execute_Immediate Raise,0x1 03f4 e5fe | | Load 0x2,-0x2 03f5 e5ff | | Load 0x2,-0x1 03f6 e007 | | Load 0x0,0x7 03f7 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03f8 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 03f9 c5fc | | Store 0x2,-0x4 03fa 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03fb 0000 0000 | | .BLANK 0000[0x5] 0400 ; -------------------------------------------------------------------------------------- 0400 ; SUBPROGRAM 0400 ; -------------------------------------------------------------------------------------- 0400 0403 | | .CONST 0x0403 ; Address of begin 0401 0004 | | .CONST 0x0004 ; Address of exception handler 0402 0001 | | .CONST 0x0001 ; Number of locals 0403 BODY_0400: 0403 INIT_0400: 0403 00db | | Load_Top At_Offset_3 0404 e006 | | Load 0x0,0x6 0405 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0406 00d9 | | Load_Top At_Offset_1 0407 00d0 | | Action Swap_Control 0408 0260 | ` | Execute Discrete,In_Type 0409 7001 |p | Jump_Nonzero 0x40b 040a 0801 | | Execute_Immediate Raise,0x1 040b 00db | | Load_Top At_Offset_3 040c e007 | | Load 0x0,0x7 040d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 040e 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 040f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0410 ; -------------------------------------------------------------------------------------- 0410 ; SUBPROGRAM 0410 ; -------------------------------------------------------------------------------------- 0410 0413 | | .CONST 0x0413 ; Address of begin 0411 0004 | | .CONST 0x0004 ; Address of exception handler 0412 0001 | | .CONST 0x0001 ; Number of locals 0413 BODY_0410: 0413 INIT_0410: 0413 e5fb | | Load 0x2,-0x5 0414 e5fc | | Load 0x2,-0x4 0415 e006 | | Load 0x0,0x6 0416 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0417 00d9 | | Load_Top At_Offset_1 0418 00d0 | | Action Swap_Control 0419 0260 | ` | Execute Discrete,In_Type 041a 7001 |p | Jump_Nonzero 0x41c 041b 0801 | | Execute_Immediate Raise,0x1 041c e5fd | | Load 0x2,-0x3 041d e5fe | | Load 0x2,-0x2 041e e5ff | | Load 0x2,-0x1 041f e007 | | Load 0x0,0x7 0420 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0421 1856 | V | Execute Package,Field_Execute,Field_Number 0x56 0422 c5fb | | Store 0x2,-0x5 0423 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0424 0000 0000 | | .BLANK 0000[0x4] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 042b | + | .CONST 0x042b ; Address of begin 0429 0004 | | .CONST 0x0004 ; Address of exception handler 042a 0001 | | .CONST 0x0001 ; Number of locals 042b BODY_0428: 042b INIT_0428: 042b 00db | | Load_Top At_Offset_3 042c e006 | | Load 0x0,0x6 042d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 042e 00d9 | | Load_Top At_Offset_1 042f 00d0 | | Action Swap_Control 0430 0260 | ` | Execute Discrete,In_Type 0431 7001 |p | Jump_Nonzero 0x433 0432 0801 | | Execute_Immediate Raise,0x1 0433 00db | | Load_Top At_Offset_3 0434 e007 | | Load 0x0,0x7 0435 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0436 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0437 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0438 ; -------------------------------------------------------------------------------------- 0438 ; SUBPROGRAM 0438 ; -------------------------------------------------------------------------------------- 0438 043b | ; | .CONST 0x043b ; Address of begin 0439 0004 | | .CONST 0x0004 ; Address of exception handler 043a 0001 | | .CONST 0x0001 ; Number of locals 043b BODY_0438: 043b INIT_0438: 043b e5fc | | Load 0x2,-0x4 043c e5fd | | Load 0x2,-0x3 043d e006 | | Load 0x0,0x6 043e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 043f 00d9 | | Load_Top At_Offset_1 0440 00d0 | | Action Swap_Control 0441 0260 | ` | Execute Discrete,In_Type 0442 7001 |p | Jump_Nonzero 0x444 0443 0801 | | Execute_Immediate Raise,0x1 0444 e5fe | | Load 0x2,-0x2 0445 e5ff | | Load 0x2,-0x1 0446 e007 | | Load 0x0,0x7 0447 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0448 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 0449 c5fc | | Store 0x2,-0x4 044a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 044b 0000 0000 | | .BLANK 0000[0x5] 0450 ; -------------------------------------------------------------------------------------- 0450 ; SUBPROGRAM 0450 ; -------------------------------------------------------------------------------------- 0450 0453 | S | .CONST 0x0453 ; Address of begin 0451 0004 | | .CONST 0x0004 ; Address of exception handler 0452 0001 | | .CONST 0x0001 ; Number of locals 0453 BODY_0450: 0453 INIT_0450: 0453 00da | | Load_Top At_Offset_2 0454 e007 | | Load 0x0,0x7 0455 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0456 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 0457 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0458 ; -------------------------------------------------------------------------------------- 0458 ; SUBPROGRAM 0458 ; -------------------------------------------------------------------------------------- 0458 045b | [ | .CONST 0x045b ; Address of begin 0459 0004 | | .CONST 0x0004 ; Address of exception handler 045a 0001 | | .CONST 0x0001 ; Number of locals 045b BODY_0458: 045b INIT_0458: 045b e5fd | | Load 0x2,-0x3 045c e5fe | | Load 0x2,-0x2 045d e5ff | | Load 0x2,-0x1 045e e007 | | Load 0x0,0x7 045f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0460 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0461 c5fd | | Store 0x2,-0x3 0462 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0463 0000 0000 | | .BLANK 0000[0x5] 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 e007 | | Load 0x0,0x7 046d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 046e 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 046f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0470 ; -------------------------------------------------------------------------------------- 0470 ; SUBPROGRAM 0470 ; -------------------------------------------------------------------------------------- 0470 0473 | s | .CONST 0x0473 ; Address of begin 0471 0004 | | .CONST 0x0004 ; Address of exception handler 0472 0001 | | .CONST 0x0001 ; Number of locals 0473 BODY_0470: 0473 INIT_0470: 0473 00da | | Load_Top At_Offset_2 0474 e007 | | Load 0x0,0x7 0475 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0476 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0477 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0478 ; -------------------------------------------------------------------------------------- 0478 ; SUBPROGRAM 0478 ; -------------------------------------------------------------------------------------- 0478 047b | { | .CONST 0x047b ; Address of begin 0479 0004 | | .CONST 0x0004 ; Address of exception handler 047a 0001 | | .CONST 0x0001 ; Number of locals 047b BODY_0478: 047b INIT_0478: 047b 00da | | Load_Top At_Offset_2 047c e007 | | Load 0x0,0x7 047d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 047e 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 047f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0480 ; -------------------------------------------------------------------------------------- 0480 ; SUBPROGRAM 0480 ; -------------------------------------------------------------------------------------- 0480 0483 | | .CONST 0x0483 ; Address of begin 0481 0004 | | .CONST 0x0004 ; Address of exception handler 0482 0001 | | .CONST 0x0001 ; Number of locals 0483 BODY_0480: 0483 INIT_0480: 0483 e5fd | | Load 0x2,-0x3 0484 e5fe | | Load 0x2,-0x2 0485 e5ff | | Load 0x2,-0x1 0486 e007 | | Load 0x0,0x7 0487 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0488 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 0489 c5fd | | Store 0x2,-0x3 048a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 048b 0000 0000 | | .BLANK 0000[0x5] 0490 ; -------------------------------------------------------------------------------------- 0490 ; SUBPROGRAM 0490 ; -------------------------------------------------------------------------------------- 0490 0493 | | .CONST 0x0493 ; Address of begin 0491 0004 | | .CONST 0x0004 ; Address of exception handler 0492 0001 | | .CONST 0x0001 ; Number of locals 0493 BODY_0490: 0493 INIT_0490: 0493 e5fd | | Load 0x2,-0x3 0494 e5fe | | Load 0x2,-0x2 0495 e5ff | | Load 0x2,-0x1 0496 e007 | | Load 0x0,0x7 0497 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0498 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 0499 c5fd | | Store 0x2,-0x3 049a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 049b 0000 0000 | | .BLANK 0000[0x5] 04a0 ; -------------------------------------------------------------------------------------- 04a0 ; SUBPROGRAM 04a0 ; -------------------------------------------------------------------------------------- 04a0 04a3 | | .CONST 0x04a3 ; Address of begin 04a1 0004 | | .CONST 0x0004 ; Address of exception handler 04a2 0001 | | .CONST 0x0001 ; Number of locals 04a3 BODY_04a0: 04a3 INIT_04a0: 04a3 00da | | Load_Top At_Offset_2 04a4 e007 | | Load 0x0,0x7 04a5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 04a6 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 04a7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04a8 ; -------------------------------------------------------------------------------------- 04a8 ; SUBPROGRAM 04a8 ; -------------------------------------------------------------------------------------- 04a8 04ab | | .CONST 0x04ab ; Address of begin 04a9 0004 | | .CONST 0x0004 ; Address of exception handler 04aa 0001 | | .CONST 0x0001 ; Number of locals 04ab BODY_04a8: 04ab INIT_04a8: 04ab 00db | | Load_Top At_Offset_3 04ac e006 | | Load 0x0,0x6 04ad 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04ae 00d9 | | Load_Top At_Offset_1 04af 00d0 | | Action Swap_Control 04b0 0260 | ` | Execute Discrete,In_Type 04b1 7001 |p | Jump_Nonzero 0x4b3 04b2 0801 | | Execute_Immediate Raise,0x1 04b3 00db | | Load_Top At_Offset_3 04b4 e007 | | Load 0x0,0x7 04b5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 04b6 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 04b7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04b8 ; -------------------------------------------------------------------------------------- 04b8 ; SUBPROGRAM 04b8 ; -------------------------------------------------------------------------------------- 04b8 04bb | | .CONST 0x04bb ; Address of begin 04b9 0004 | | .CONST 0x0004 ; Address of exception handler 04ba 0001 | | .CONST 0x0001 ; Number of locals 04bb BODY_04b8: 04bb INIT_04b8: 04bb e5fc | | Load 0x2,-0x4 04bc e5fd | | Load 0x2,-0x3 04bd e006 | | Load 0x0,0x6 04be 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04bf 00d9 | | Load_Top At_Offset_1 04c0 00d0 | | Action Swap_Control 04c1 0260 | ` | Execute Discrete,In_Type 04c2 7001 |p | Jump_Nonzero 0x4c4 04c3 0801 | | Execute_Immediate Raise,0x1 04c4 e5fe | | Load 0x2,-0x2 04c5 e5ff | | Load 0x2,-0x1 04c6 e007 | | Load 0x0,0x7 04c7 1b14 | | Execute Package,Field_Read,Field_Number 0x14 04c8 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 04c9 c5fc | | Store 0x2,-0x4 04ca 4504 |E | Exit_Suprogram New_Top_Offset 0x4 04cb 0000 0000 | | .BLANK 0000[0x5] 04d0 ; -------------------------------------------------------------------------------------- 04d0 ; SUBPROGRAM 04d0 ; -------------------------------------------------------------------------------------- 04d0 04d3 | | .CONST 0x04d3 ; Address of begin 04d1 0004 | | .CONST 0x0004 ; Address of exception handler 04d2 0001 | | .CONST 0x0001 ; Number of locals 04d3 BODY_04d0: 04d3 INIT_04d0: 04d3 00db | | Load_Top At_Offset_3 04d4 e006 | | Load 0x0,0x6 04d5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04d6 00d9 | | Load_Top At_Offset_1 04d7 00d0 | | Action Swap_Control 04d8 0260 | ` | Execute Discrete,In_Type 04d9 7001 |p | Jump_Nonzero 0x4db 04da 0801 | | Execute_Immediate Raise,0x1 04db 00db | | Load_Top At_Offset_3 04dc e007 | | Load 0x0,0x7 04dd 1b14 | | Execute Package,Field_Read,Field_Number 0x14 04de 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 04df 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04e0 ; -------------------------------------------------------------------------------------- 04e0 ; SUBPROGRAM 04e0 ; -------------------------------------------------------------------------------------- 04e0 04e3 | | .CONST 0x04e3 ; Address of begin 04e1 0004 | | .CONST 0x0004 ; Address of exception handler 04e2 0001 | | .CONST 0x0001 ; Number of locals 04e3 BODY_04e0: 04e3 INIT_04e0: 04e3 00db | | Load_Top At_Offset_3 04e4 e006 | | Load 0x0,0x6 04e5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04e6 00d9 | | Load_Top At_Offset_1 04e7 00d0 | | Action Swap_Control 04e8 0260 | ` | Execute Discrete,In_Type 04e9 7001 |p | Jump_Nonzero 0x4eb 04ea 0801 | | Execute_Immediate Raise,0x1 04eb 00db | | Load_Top At_Offset_3 04ec e007 | | Load 0x0,0x7 04ed 1b14 | | Execute Package,Field_Read,Field_Number 0x14 04ee 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 04ef 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04f0 ; -------------------------------------------------------------------------------------- 04f0 ; SUBPROGRAM 04f0 ; -------------------------------------------------------------------------------------- 04f0 04f3 | | .CONST 0x04f3 ; Address of begin 04f1 0004 | | .CONST 0x0004 ; Address of exception handler 04f2 0001 | | .CONST 0x0001 ; Number of locals 04f3 BODY_04f0: 04f3 INIT_04f0: 04f3 e5fc | | Load 0x2,-0x4 04f4 e5fd | | Load 0x2,-0x3 04f5 e006 | | Load 0x0,0x6 04f6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04f7 00d9 | | Load_Top At_Offset_1 04f8 00d0 | | Action Swap_Control 04f9 0260 | ` | Execute Discrete,In_Type 04fa 7001 |p | Jump_Nonzero 0x4fc 04fb 0801 | | Execute_Immediate Raise,0x1 04fc e5fe | | Load 0x2,-0x2 04fd e5ff | | Load 0x2,-0x1 04fe e007 | | Load 0x0,0x7 04ff 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0500 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 0501 c5fc | | Store 0x2,-0x4 0502 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0503 0000 0000 | | .BLANK 0000[0x5] 0508 ; -------------------------------------------------------------------------------------- 0508 ; SUBPROGRAM 0508 ; -------------------------------------------------------------------------------------- 0508 050b | | .CONST 0x050b ; Address of begin 0509 0004 | | .CONST 0x0004 ; Address of exception handler 050a 0001 | | .CONST 0x0001 ; Number of locals 050b BODY_0508: 050b INIT_0508: 050b e5fd | | Load 0x2,-0x3 050c e006 | | Load 0x0,0x6 050d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 050e 00d9 | | Load_Top At_Offset_1 050f 00d0 | | Action Swap_Control 0510 0260 | ` | Execute Discrete,In_Type 0511 7001 |p | Jump_Nonzero 0x513 0512 0801 | | Execute_Immediate Raise,0x1 0513 e5fe | | Load 0x2,-0x2 0514 e5ff | | Load 0x2,-0x1 0515 e007 | | Load 0x0,0x7 0516 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0517 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 0518 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0519 0000 0000 | | .BLANK 0000[0x7] 0520 ; -------------------------------------------------------------------------------------- 0520 ; SUBPROGRAM 0520 ; -------------------------------------------------------------------------------------- 0520 0523 | # | .CONST 0x0523 ; Address of begin 0521 0004 | | .CONST 0x0004 ; Address of exception handler 0522 0001 | | .CONST 0x0001 ; Number of locals 0523 BODY_0520: 0523 INIT_0520: 0523 e5fb | | Load 0x2,-0x5 0524 e5fc | | Load 0x2,-0x4 0525 e006 | | Load 0x0,0x6 0526 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0527 00d9 | | Load_Top At_Offset_1 0528 00d0 | | Action Swap_Control 0529 0260 | ` | Execute Discrete,In_Type 052a 7001 |p | Jump_Nonzero 0x52c 052b 0801 | | Execute_Immediate Raise,0x1 052c e5fd | | Load 0x2,-0x3 052d e5fe | | Load 0x2,-0x2 052e e5ff | | Load 0x2,-0x1 052f e007 | | Load 0x0,0x7 0530 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0531 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 0532 c5fb | | Store 0x2,-0x5 0533 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0534 0000 0000 | | .BLANK 0000[0x4] 0538 ; -------------------------------------------------------------------------------------- 0538 ; SUBPROGRAM 0538 ; -------------------------------------------------------------------------------------- 0538 053b | ; | .CONST 0x053b ; Address of begin 0539 0004 | | .CONST 0x0004 ; Address of exception handler 053a 0001 | | .CONST 0x0001 ; Number of locals 053b BODY_0538: 053b INIT_0538: 053b e5fc | | Load 0x2,-0x4 053c e5fd | | Load 0x2,-0x3 053d e006 | | Load 0x0,0x6 053e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 053f 00d9 | | Load_Top At_Offset_1 0540 00d0 | | Action Swap_Control 0541 0260 | ` | Execute Discrete,In_Type 0542 7001 |p | Jump_Nonzero 0x544 0543 0801 | | Execute_Immediate Raise,0x1 0544 e5fe | | Load 0x2,-0x2 0545 e5ff | | Load 0x2,-0x1 0546 e007 | | Load 0x0,0x7 0547 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0548 1844 | D | Execute Package,Field_Execute,Field_Number 0x44 0549 c5fc | | Store 0x2,-0x4 054a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 054b 0000 0000 | | .BLANK 0000[0x5] 0550 ; -------------------------------------------------------------------------------------- 0550 ; SUBPROGRAM 0550 ; -------------------------------------------------------------------------------------- 0550 0553 | S | .CONST 0x0553 ; Address of begin 0551 0004 | | .CONST 0x0004 ; Address of exception handler 0552 0001 | | .CONST 0x0001 ; Number of locals 0553 BODY_0550: 0553 INIT_0550: 0553 e5fc | | Load 0x2,-0x4 0554 e5fd | | Load 0x2,-0x3 0555 e006 | | Load 0x0,0x6 0556 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0557 00d9 | | Load_Top At_Offset_1 0558 00d0 | | Action Swap_Control 0559 0260 | ` | Execute Discrete,In_Type 055a 7001 |p | Jump_Nonzero 0x55c 055b 0801 | | Execute_Immediate Raise,0x1 055c e5fe | | Load 0x2,-0x2 055d e5ff | | Load 0x2,-0x1 055e e007 | | Load 0x0,0x7 055f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0560 1845 | E | Execute Package,Field_Execute,Field_Number 0x45 0561 c5fc | | Store 0x2,-0x4 0562 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0563 0000 0000 | | .BLANK 0000[0x5] 0568 ; -------------------------------------------------------------------------------------- 0568 ; SUBPROGRAM 0568 ; -------------------------------------------------------------------------------------- 0568 056b | k | .CONST 0x056b ; Address of begin 0569 0004 | | .CONST 0x0004 ; Address of exception handler 056a 0001 | | .CONST 0x0001 ; Number of locals 056b BODY_0568: 056b INIT_0568: 056b 00da | | Load_Top At_Offset_2 056c e007 | | Load 0x0,0x7 056d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 056e 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 056f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0570 ; -------------------------------------------------------------------------------------- 0570 ; SUBPROGRAM 0570 ; -------------------------------------------------------------------------------------- 0570 0573 | s | .CONST 0x0573 ; Address of begin 0571 0004 | | .CONST 0x0004 ; Address of exception handler 0572 0001 | | .CONST 0x0001 ; Number of locals 0573 BODY_0570: 0573 INIT_0570: 0573 00da | | Load_Top At_Offset_2 0574 e007 | | Load 0x0,0x7 0575 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0576 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0577 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0578 ; -------------------------------------------------------------------------------------- 0578 ; SUBPROGRAM 0578 ; -------------------------------------------------------------------------------------- 0578 057b | { | .CONST 0x057b ; Address of begin 0579 0004 | | .CONST 0x0004 ; Address of exception handler 057a 0001 | | .CONST 0x0001 ; Number of locals 057b BODY_0578: 057b INIT_0578: 057b 00da | | Load_Top At_Offset_2 057c e007 | | Load 0x0,0x7 057d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 057e 1848 | H | Execute Package,Field_Execute,Field_Number 0x48 057f e008 | | Load 0x0,0x8 0580 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0581 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0582 0000 0000 | | .BLANK 0000[0x6] 0588 ; -------------------------------------------------------------------------------------- 0588 ; SUBPROGRAM 0588 ; -------------------------------------------------------------------------------------- 0588 058b | | .CONST 0x058b ; Address of begin 0589 0004 | | .CONST 0x0004 ; Address of exception handler 058a 0001 | | .CONST 0x0001 ; Number of locals 058b BODY_0588: 058b INIT_0588: 058b 00da | | Load_Top At_Offset_2 058c e007 | | Load 0x0,0x7 058d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 058e 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 058f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0590 ; -------------------------------------------------------------------------------------- 0590 ; SUBPROGRAM 0590 ; -------------------------------------------------------------------------------------- 0590 0593 | | .CONST 0x0593 ; Address of begin 0591 0004 | | .CONST 0x0004 ; Address of exception handler 0592 0001 | | .CONST 0x0001 ; Number of locals 0593 BODY_0590: 0593 INIT_0590: 0593 4608 |F | Jump_Case 0x9 0594 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0595 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0596 7819 |x | Jump 0x5b0 ; case 0x2 0597 7818 |x | Jump 0x5b0 ; case 0x3 0598 7817 |x | Jump 0x5b0 ; case 0x4 0599 7816 |x | Jump 0x5b0 ; case 0x5 059a 7815 |x | Jump 0x5b0 ; case 0x6 059b 7801 |x | Jump 0x59d ; case 0x7 059c 7809 |x | Jump 0x5a6 ; case 0x8 059d 00db | | Load_Top At_Offset_3 059e 4801 |H | Short_Literal 0x1 059f e5fe | | Load 0x2,-0x2 05a0 e213 | | Load 0x1,0x13 05a1 035b | [ | Declare_Type Array,Constrained 05a2 4801 |H | Short_Literal 0x1 05a3 e5ff | | Load 0x2,-0x1 05a4 031b | | Declare_Type Variant_Record,Constrained 05a5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05a6 00db | | Load_Top At_Offset_3 05a7 00db | | Load_Top At_Offset_3 05a8 02fc | | Declare_Variable Variant_Record,With_Constraint 05a9 4801 |H | Short_Literal 0x1 05aa e5fe | | Load 0x2,-0x2 05ab e213 | | Load 0x1,0x13 05ac 0334 | 4 | Declare_Variable Array,With_Constraint 05ad 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3 05ae 016a | j | QQ_execute Variant_Record,XXX 05af 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05b0 0869 | i | Execute_Immediate Raise,0x69 05b1 0000 0000 | | .BLANK 0000[0x7] 05b8 ; -------------------------------------------------------------------------------------- 05b8 ; SUBPROGRAM 05b8 ; -------------------------------------------------------------------------------------- 05b8 05d8 | | .CONST 0x05d8 ; Address of begin 05b9 0004 | | .CONST 0x0004 ; Address of exception handler 05ba 0017 | | .CONST 0x0017 ; Number of locals 05bb INIT_05b8: 05bb e20f | | Load 0x1,0xf 05bc 02a0 | | Declare_Subprogram Null_Subprogram 05bd 03ae | | Declare_Type Heap_Access,Defined,Visible 05be 029a 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call,Visible,Unelaborated 05c0 029a 05f3 | | Declare_Subprogram INIT_05f0,For_Outer_Call,Visible,Unelaborated 05c2 00bf | | Action Accept_Activation 05c3 e001 | | Load 0x0,0x1 05c4 e002 | | Load 0x0,0x2 05c5 e20f | | Load 0x1,0xf 05c6 e214 | | Load 0x1,0x14 05c7 1d10 | | Execute_Immediate Reference_Lex_1,0x10 05c8 1d11 | | Execute_Immediate Reference_Lex_1,0x11 05c9 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 05ca 00c4 | | Action Make_Default 05cb e003 | | Load 0x0,0x3 05cc 1817 | | Execute Package,Field_Execute,Field_Number 0x17 05cd c21e | | Store 0x1,0x1e 05ce e004 | | Load 0x0,0x4 05cf 1b14 | | Execute Package,Field_Read,Field_Number 0x14 05d0 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a 05d1 0387 | | Declare_Variable Package 05d2 00d8 | | Load_Top At_Offset_0 05d3 020f | | Execute Module,Activate 05d4 1d15 | | Execute_Immediate Reference_Lex_1,0x15 05d5 00c7 | | Action Elaborate_Subprogram 05d6 1d16 | | Execute_Immediate Reference_Lex_1,0x16 05d7 00c7 | | Action Elaborate_Subprogram 05d8 BODY_05b8: 05d8 00bc | | Action Signal_Activated 05d9 00bb | | Action Signal_Completion 05da 0000 0000 | | .BLANK 0000[0x6] 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 00db | | Load_Top At_Offset_3 05e4 e20f | | Load 0x1,0xf 05e5 0119 | | Execute Any,Check_In_Formal_Type 05e6 00db | | Load_Top At_Offset_3 05e7 e217 | | Load 0x1,0x17 05e8 1815 | | Execute Package,Field_Execute,Field_Number 0x15 05e9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 05ea 0000 0000 | | .BLANK 0000[0x6] 05f0 ; -------------------------------------------------------------------------------------- 05f0 ; SUBPROGRAM 05f0 ; -------------------------------------------------------------------------------------- 05f0 05f3 | | .CONST 0x05f3 ; Address of begin 05f1 0004 | | .CONST 0x0004 ; 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 e217 | | Load 0x1,0x17 05f5 1816 | | Execute Package,Field_Execute,Field_Number 0x16 05f6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05f7 0000 | | .XXX[0x1] 05f8 ; -------------------------------------------------------------------------------------- 05f8 ; Debug Table 05f8 ; -------------------------------------------------------------------------------------- 05f8 0004 000d | | .DEBUG4 0x0004,0x000d,0xd956,0x0000,0x0001,0x0000 05fe 01b6 203b | ;| .XXX[0x2]