|
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: 5120 (0x1400) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 08d0 | | .CONST 0x08d0 ; 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 8006 | | .CONST 0x8006 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 029b | | .CONST 0x029b ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 008a | | .CONST 0x008a ; Number of locals 000b INIT_0008: 000b e001 | | Load 0x0,0x1 000c 1b13 | | Execute Package,Field_Read,Field_Number 0x13 000d 0129 | ) | Execute Any,Make_Visible 000e 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated 0010 00e3 | | Load_Encached Natural_Cache 0011 0266 | f | Execute Discrete,Bounds 0012 00db | | Load_Top At_Offset_3 0013 02a0 | | Declare_Subprogram Null_Subprogram 0014 4801 |H | Short_Literal 0x1 0015 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 0016 00e3 | | Load_Encached Natural_Cache 0017 e002 | | Load 0x0,0x2 0018 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0019 4801 |H | Short_Literal 0x1 001a 628d |b | Indirect_Literal Discrete,0x2a8,{0x00000000, 0x7fffffff} 001b e20f | | Load 0x1,0xf 001c 034f | O | Declare_Type Array,Constrained,Visible,Bounds_With_Object 001d 029f 0843 | C| Declare_Subprogram INIT_0840,For_Call 001f 4800 |H | Short_Literal 0x0 0020 4801 |H | Short_Literal 0x1 0021 4801 |H | Short_Literal 0x1 0022 4800 |H | Short_Literal 0x0 0023 4801 |H | Short_Literal 0x1 0024 4801 |H | Short_Literal 0x1 0025 031e | | Declare_Type Variant_Record,Defined,Visible 0026 e003 | | Load 0x0,0x3 0027 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0028 0129 | ) | Execute Any,Make_Visible 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 00c4 | | Action Make_Default 0099 00c4 | | Action Make_Default 009a 00c4 | | Action Make_Default 009b 00c4 | | Action Make_Default 009c 00c4 | | Action Make_Default 009d 00c4 | | Action Make_Default 009e 00c4 | | Action Make_Default 009f 00c4 | | Action Make_Default 00a0 00c4 | | Action Make_Default 00a1 00c4 | | Action Make_Default 00a2 00e9 | | Load_Encached String_Cache 00a3 0129 | ) | Execute Any,Make_Visible 00a4 c262 | b | Store 0x1,0x62 00a5 029a 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call,Visible,Unelaborated 00a7 c27a | z | Store 0x1,0x7a 00a8 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated 00aa c213 | | Store 0x1,0x13 00ab 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated 00ad c27d | } | Store 0x1,0x7d 00ae 029a 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call,Visible,Unelaborated 00b0 c283 | | Store 0x1,0x83 00b1 029a 030b | | Declare_Subprogram INIT_0308,For_Outer_Call,Visible,Unelaborated 00b3 c214 | | Store 0x1,0x14 00b4 029a 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call,Visible,Unelaborated 00b6 c215 | | Store 0x1,0x15 00b7 029a 0333 | 3| Declare_Subprogram INIT_0330,For_Outer_Call,Visible,Unelaborated 00b9 c216 | | Store 0x1,0x16 00ba 029a 033b | ;| Declare_Subprogram INIT_0338,For_Outer_Call,Visible,Unelaborated 00bc c217 | | Store 0x1,0x17 00bd 029a 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call,Visible,Unelaborated 00bf c218 | | Store 0x1,0x18 00c0 029a 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call,Visible,Unelaborated 00c2 c275 | u | Store 0x1,0x75 00c3 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated 00c5 c276 | v | Store 0x1,0x76 00c6 029a 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call,Visible,Unelaborated 00c8 c27b | { | Store 0x1,0x7b 00c9 029a 0383 | | Declare_Subprogram INIT_0380,For_Outer_Call,Visible,Unelaborated 00cb c27c | | | Store 0x1,0x7c 00cc 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated 00ce c266 | f | Store 0x1,0x66 00cf 029a 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call,Visible,Unelaborated 00d1 c267 | g | Store 0x1,0x67 00d2 029a 03b3 | | Declare_Subprogram INIT_03b0,For_Outer_Call,Visible,Unelaborated 00d4 c268 | h | Store 0x1,0x68 00d5 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated 00d7 c269 | i | Store 0x1,0x69 00d8 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated 00da c286 | | Store 0x1,0x86 00db 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated 00dd c26a | j | Store 0x1,0x6a 00de 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated 00e0 c220 | | Store 0x1,0x20 00e1 029a 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Visible,Unelaborated 00e3 c221 | ! | Store 0x1,0x21 00e4 029a 0423 | #| Declare_Subprogram INIT_0420,For_Outer_Call,Visible,Unelaborated 00e6 c26b | k | Store 0x1,0x6b 00e7 029a 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call,Visible,Unelaborated 00e9 c223 | # | Store 0x1,0x23 00ea 029a 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Visible,Unelaborated 00ec c224 | $ | Store 0x1,0x24 00ed 029a 0443 | C| Declare_Subprogram INIT_0440,For_Outer_Call,Visible,Unelaborated 00ef c225 | % | Store 0x1,0x25 00f0 029a 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call,Visible,Unelaborated 00f2 c226 | & | Store 0x1,0x26 00f3 e001 | | Load 0x0,0x1 00f4 1b14 | | Execute Package,Field_Read,Field_Number 0x14 00f5 0129 | ) | Execute Any,Make_Visible 00f6 c227 | ' | Store 0x1,0x27 00f7 00e3 | | Load_Encached Natural_Cache 00f8 0266 | f | Execute Discrete,Bounds 00f9 e001 | | Load 0x0,0x1 00fa 1b14 | | Execute Package,Field_Read,Field_Number 0x14 00fb 02a0 | | Declare_Subprogram Null_Subprogram 00fc 4801 |H | Short_Literal 0x1 00fd 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 00fe c228 | ( | Store 0x1,0x28 00ff 00e3 | | Load_Encached Natural_Cache 0100 e002 | | Load 0x0,0x2 0101 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0102 4801 |H | Short_Literal 0x1 0103 61a4 |a | Indirect_Literal Discrete,0x2a8,{0x00000000, 0x7fffffff} 0104 e228 | ( | Load 0x1,0x28 0105 034f | O | Declare_Type Array,Constrained,Visible,Bounds_With_Object 0106 029f 086b | k| Declare_Subprogram INIT_0868,For_Call 0108 4800 |H | Short_Literal 0x0 0109 4801 |H | Short_Literal 0x1 010a 4801 |H | Short_Literal 0x1 010b 4800 |H | Short_Literal 0x0 010c 4801 |H | Short_Literal 0x1 010d 4801 |H | Short_Literal 0x1 010e 031e | | Declare_Type Variant_Record,Defined,Visible 010f c229 | ) | Store 0x1,0x29 0110 029a 0463 | c| Declare_Subprogram INIT_0460,For_Outer_Call,Visible,Unelaborated 0112 c22a | * | Store 0x1,0x2a 0113 029a 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call,Visible,Unelaborated 0115 c22b | + | Store 0x1,0x2b 0116 029a 047b | {| Declare_Subprogram INIT_0478,For_Outer_Call,Visible,Unelaborated 0118 c22c | , | Store 0x1,0x2c 0119 029a 0483 | | Declare_Subprogram INIT_0480,For_Outer_Call,Visible,Unelaborated 011b c22d | - | Store 0x1,0x2d 011c 029a 0493 | | Declare_Subprogram INIT_0490,For_Outer_Call,Visible,Unelaborated 011e c22e | . | Store 0x1,0x2e 011f 029a 04a3 | | Declare_Subprogram INIT_04a0,For_Outer_Call,Visible,Unelaborated 0121 c22f | / | Store 0x1,0x2f 0122 029a 04b3 | | Declare_Subprogram INIT_04b0,For_Outer_Call,Visible,Unelaborated 0124 c230 | 0 | Store 0x1,0x30 0125 029a 04c3 | | Declare_Subprogram INIT_04c0,For_Outer_Call,Visible,Unelaborated 0127 c231 | 1 | Store 0x1,0x31 0128 029a 04d3 | | Declare_Subprogram INIT_04d0,For_Outer_Call,Visible,Unelaborated 012a c232 | 2 | Store 0x1,0x32 012b 029a 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call,Visible,Unelaborated 012d c233 | 3 | Store 0x1,0x33 012e 029a 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call,Visible,Unelaborated 0130 c234 | 4 | Store 0x1,0x34 0131 029a 0503 | | Declare_Subprogram INIT_0500,For_Outer_Call,Visible,Unelaborated 0133 c235 | 5 | Store 0x1,0x35 0134 029a 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call,Visible,Unelaborated 0136 c236 | 6 | Store 0x1,0x36 0137 029a 0523 | #| Declare_Subprogram INIT_0520,For_Outer_Call,Visible,Unelaborated 0139 c237 | 7 | Store 0x1,0x37 013a 029a 0533 | 3| Declare_Subprogram INIT_0530,For_Outer_Call,Visible,Unelaborated 013c c238 | 8 | Store 0x1,0x38 013d 029a 0543 | C| Declare_Subprogram INIT_0540,For_Outer_Call,Visible,Unelaborated 013f c239 | 9 | Store 0x1,0x39 0140 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated 0142 c23a | : | Store 0x1,0x3a 0143 029a 055b | [| Declare_Subprogram INIT_0558,For_Outer_Call,Visible,Unelaborated 0145 c23b | ; | Store 0x1,0x3b 0146 029a 0563 | c| Declare_Subprogram INIT_0560,For_Outer_Call,Visible,Unelaborated 0148 c23c | < | Store 0x1,0x3c 0149 029a 056b | k| Declare_Subprogram INIT_0568,For_Outer_Call,Visible,Unelaborated 014b c23d | = | Store 0x1,0x3d 014c 029a 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call,Visible,Unelaborated 014e c284 | | Store 0x1,0x84 014f 029a 057b | {| Declare_Subprogram INIT_0578,For_Outer_Call,Visible,Unelaborated 0151 c285 | | Store 0x1,0x85 0152 029a 0583 | | Declare_Subprogram INIT_0580,For_Outer_Call,Visible,Unelaborated 0154 c23e | > | Store 0x1,0x3e 0155 029a 0593 | | Declare_Subprogram INIT_0590,For_Outer_Call,Visible,Unelaborated 0157 c23f | ? | Store 0x1,0x3f 0158 029a 05a3 | | Declare_Subprogram INIT_05a0,For_Outer_Call,Visible,Unelaborated 015a c240 | @ | Store 0x1,0x40 015b 029a 05bb | | Declare_Subprogram INIT_05b8,For_Outer_Call,Visible,Unelaborated 015d c241 | A | Store 0x1,0x41 015e 029a 05c3 | | Declare_Subprogram INIT_05c0,For_Outer_Call,Visible,Unelaborated 0160 c242 | B | Store 0x1,0x42 0161 029a 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call,Visible,Unelaborated 0163 c243 | C | Store 0x1,0x43 0164 029a 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call,Visible,Unelaborated 0166 c244 | D | Store 0x1,0x44 0167 029a 05db | | Declare_Subprogram INIT_05d8,For_Outer_Call,Visible,Unelaborated 0169 c245 | E | Store 0x1,0x45 016a 029a 05eb | | Declare_Subprogram INIT_05e8,For_Outer_Call,Visible,Unelaborated 016c c246 | F | Store 0x1,0x46 016d 029a 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call,Visible,Unelaborated 016f c247 | G | Store 0x1,0x47 0170 029a 060b | | Declare_Subprogram INIT_0608,For_Outer_Call,Visible,Unelaborated 0172 c248 | H | Store 0x1,0x48 0173 029a 0623 | #| Declare_Subprogram INIT_0620,For_Outer_Call,Visible,Unelaborated 0175 c249 | I | Store 0x1,0x49 0176 029a 0633 | 3| Declare_Subprogram INIT_0630,For_Outer_Call,Visible,Unelaborated 0178 c24a | J | Store 0x1,0x4a 0179 029a 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call,Visible,Unelaborated 017b c24b | K | Store 0x1,0x4b 017c 029a 065b | [| Declare_Subprogram INIT_0658,For_Outer_Call,Visible,Unelaborated 017e c24c | L | Store 0x1,0x4c 017f 029a 0673 | s| Declare_Subprogram INIT_0670,For_Outer_Call,Visible,Unelaborated 0181 c24d | M | Store 0x1,0x4d 0182 029a 0683 | | Declare_Subprogram INIT_0680,For_Outer_Call,Visible,Unelaborated 0184 c24e | N | Store 0x1,0x4e 0185 029a 069b | | Declare_Subprogram INIT_0698,For_Outer_Call,Visible,Unelaborated 0187 c27f | | Store 0x1,0x7f 0188 029a 06a3 | | Declare_Subprogram INIT_06a0,For_Outer_Call,Visible,Unelaborated 018a c280 | | Store 0x1,0x80 018b 029a 06b3 | | Declare_Subprogram INIT_06b0,For_Outer_Call,Visible,Unelaborated 018d c281 | | Store 0x1,0x81 018e 029a 06c3 | | Declare_Subprogram INIT_06c0,For_Outer_Call,Visible,Unelaborated 0190 c282 | | Store 0x1,0x82 0191 029a 06db | | Declare_Subprogram INIT_06d8,For_Outer_Call,Visible,Unelaborated 0193 c26e | n | Store 0x1,0x6e 0194 029a 06e3 | | Declare_Subprogram INIT_06e0,For_Outer_Call,Visible,Unelaborated 0196 c26f | o | Store 0x1,0x6f 0197 029a 06f3 | | Declare_Subprogram INIT_06f0,For_Outer_Call,Visible,Unelaborated 0199 c270 | p | Store 0x1,0x70 019a 029a 0703 | | Declare_Subprogram INIT_0700,For_Outer_Call,Visible,Unelaborated 019c c271 | q | Store 0x1,0x71 019d 029a 071b | | Declare_Subprogram INIT_0718,For_Outer_Call,Visible,Unelaborated 019f c24f | O | Store 0x1,0x4f 01a0 029a 072b | +| Declare_Subprogram INIT_0728,For_Outer_Call,Visible,Unelaborated 01a2 c250 | P | Store 0x1,0x50 01a3 029a 0743 | C| Declare_Subprogram INIT_0740,For_Outer_Call,Visible,Unelaborated 01a5 c251 | Q | Store 0x1,0x51 01a6 029a 0753 | S| Declare_Subprogram INIT_0750,For_Outer_Call,Visible,Unelaborated 01a8 c252 | R | Store 0x1,0x52 01a9 029a 076b | k| Declare_Subprogram INIT_0768,For_Outer_Call,Visible,Unelaborated 01ab c253 | S | Store 0x1,0x53 01ac 029a 077b | {| Declare_Subprogram INIT_0778,For_Outer_Call,Visible,Unelaborated 01ae c287 | | Store 0x1,0x87 01af 029a 0793 | | Declare_Subprogram INIT_0790,For_Outer_Call,Visible,Unelaborated 01b1 c255 | U | Store 0x1,0x55 01b2 029a 07ab | | Declare_Subprogram INIT_07a8,For_Outer_Call,Visible,Unelaborated 01b4 c288 | | Store 0x1,0x88 01b5 029a 07c3 | | Declare_Subprogram INIT_07c0,For_Outer_Call,Visible,Unelaborated 01b7 c289 | | Store 0x1,0x89 01b8 029a 07db | | Declare_Subprogram INIT_07d8,For_Outer_Call,Visible,Unelaborated 01ba c28a | | Store 0x1,0x8a 01bb 029a 07f3 | | Declare_Subprogram INIT_07f0,For_Outer_Call,Visible,Unelaborated 01bd c259 | Y | Store 0x1,0x59 01be 029a 07fb | | Declare_Subprogram INIT_07f8,For_Outer_Call,Visible,Unelaborated 01c0 c25a | Z | Store 0x1,0x5a 01c1 029a 0803 | | Declare_Subprogram INIT_0800,For_Outer_Call,Visible,Unelaborated 01c3 c25b | [ | Store 0x1,0x5b 01c4 029a 080b | | Declare_Subprogram INIT_0808,For_Outer_Call,Visible,Unelaborated 01c6 c272 | r | Store 0x1,0x72 01c7 029a 081b | | Declare_Subprogram INIT_0818,For_Outer_Call,Visible,Unelaborated 01c9 c273 | s | Store 0x1,0x73 01ca 029a 082b | +| Declare_Subprogram INIT_0828,For_Outer_Call,Visible,Unelaborated 01cc c25e | ^ | Store 0x1,0x5e 01cd 029a 0833 | 3| Declare_Subprogram INIT_0830,For_Outer_Call,Visible,Unelaborated 01cf c25f | _ | Store 0x1,0x5f 01d0 029a 083b | ;| Declare_Subprogram INIT_0838,For_Outer_Call,Visible,Unelaborated 01d2 c260 | ` | Store 0x1,0x60 01d3 4807 |H | Short_Literal 0x7 01d4 0093 0893 | | push_full_address INIT_0890 01d6 02a0 | | Declare_Subprogram Null_Subprogram 01d7 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated 01d8 c261 | a | Store 0x1,0x61 01d9 00bf | | Action Accept_Activation 01da 1d0e | | Execute_Immediate Reference_Lex_1,0xe 01db 00c7 | | Action Elaborate_Subprogram 01dc 1d7a | z | Execute_Immediate Reference_Lex_1,0x7a 01dd 00c7 | | Action Elaborate_Subprogram 01de 1d13 | | Execute_Immediate Reference_Lex_1,0x13 01df 00c7 | | Action Elaborate_Subprogram 01e0 1d7d | } | Execute_Immediate Reference_Lex_1,0x7d 01e1 00c7 | | Action Elaborate_Subprogram 01e2 1d83 | | Execute_Immediate Reference_Lex_1,0x83 01e3 00c7 | | Action Elaborate_Subprogram 01e4 1d14 | | Execute_Immediate Reference_Lex_1,0x14 01e5 00c7 | | Action Elaborate_Subprogram 01e6 1d15 | | Execute_Immediate Reference_Lex_1,0x15 01e7 00c7 | | Action Elaborate_Subprogram 01e8 1d16 | | Execute_Immediate Reference_Lex_1,0x16 01e9 00c7 | | Action Elaborate_Subprogram 01ea 1d17 | | Execute_Immediate Reference_Lex_1,0x17 01eb 00c7 | | Action Elaborate_Subprogram 01ec 1d18 | | Execute_Immediate Reference_Lex_1,0x18 01ed 00c7 | | Action Elaborate_Subprogram 01ee 1d75 | u | Execute_Immediate Reference_Lex_1,0x75 01ef 00c7 | | Action Elaborate_Subprogram 01f0 1d76 | v | Execute_Immediate Reference_Lex_1,0x76 01f1 00c7 | | Action Elaborate_Subprogram 01f2 1d7b | { | Execute_Immediate Reference_Lex_1,0x7b 01f3 00c7 | | Action Elaborate_Subprogram 01f4 1d7c | | | Execute_Immediate Reference_Lex_1,0x7c 01f5 00c7 | | Action Elaborate_Subprogram 01f6 1d66 | f | Execute_Immediate Reference_Lex_1,0x66 01f7 00c7 | | Action Elaborate_Subprogram 01f8 1d67 | g | Execute_Immediate Reference_Lex_1,0x67 01f9 00c7 | | Action Elaborate_Subprogram 01fa 1d68 | h | Execute_Immediate Reference_Lex_1,0x68 01fb 00c7 | | Action Elaborate_Subprogram 01fc 1d69 | i | Execute_Immediate Reference_Lex_1,0x69 01fd 00c7 | | Action Elaborate_Subprogram 01fe 1d6a | j | Execute_Immediate Reference_Lex_1,0x6a 01ff 00c7 | | Action Elaborate_Subprogram 0200 1d86 | | Execute_Immediate Reference_Lex_1,0x86 0201 00c7 | | Action Elaborate_Subprogram 0202 1d20 | | Execute_Immediate Reference_Lex_1,0x20 0203 00c7 | | Action Elaborate_Subprogram 0204 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 0205 00c7 | | Action Elaborate_Subprogram 0206 1d6b | k | Execute_Immediate Reference_Lex_1,0x6b 0207 00c7 | | Action Elaborate_Subprogram 0208 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 0209 00c7 | | Action Elaborate_Subprogram 020a 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 020b 00c7 | | Action Elaborate_Subprogram 020c 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 020d 00c7 | | Action Elaborate_Subprogram 020e 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 020f 00c7 | | Action Elaborate_Subprogram 0210 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 0211 00c7 | | Action Elaborate_Subprogram 0212 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 0213 00c7 | | Action Elaborate_Subprogram 0214 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 0215 00c7 | | Action Elaborate_Subprogram 0216 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 0217 00c7 | | Action Elaborate_Subprogram 0218 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 0219 00c7 | | Action Elaborate_Subprogram 021a 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 021b 00c7 | | Action Elaborate_Subprogram 021c 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 021d 00c7 | | Action Elaborate_Subprogram 021e 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 021f 00c7 | | Action Elaborate_Subprogram 0220 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 0221 00c7 | | Action Elaborate_Subprogram 0222 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 0223 00c7 | | Action Elaborate_Subprogram 0224 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34 0225 00c7 | | Action Elaborate_Subprogram 0226 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 0227 00c7 | | Action Elaborate_Subprogram 0228 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36 0229 00c7 | | Action Elaborate_Subprogram 022a 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37 022b 00c7 | | Action Elaborate_Subprogram 022c 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38 022d 00c7 | | Action Elaborate_Subprogram 022e 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39 022f 00c7 | | Action Elaborate_Subprogram 0230 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a 0231 00c7 | | Action Elaborate_Subprogram 0232 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b 0233 00c7 | | Action Elaborate_Subprogram 0234 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c 0235 00c7 | | Action Elaborate_Subprogram 0236 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d 0237 00c7 | | Action Elaborate_Subprogram 0238 1d84 | | Execute_Immediate Reference_Lex_1,0x84 0239 00c7 | | Action Elaborate_Subprogram 023a 1d85 | | Execute_Immediate Reference_Lex_1,0x85 023b 00c7 | | Action Elaborate_Subprogram 023c 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e 023d 00c7 | | Action Elaborate_Subprogram 023e 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f 023f 00c7 | | Action Elaborate_Subprogram 0240 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40 0241 00c7 | | Action Elaborate_Subprogram 0242 1d41 | A | Execute_Immediate Reference_Lex_1,0x41 0243 00c7 | | Action Elaborate_Subprogram 0244 1d42 | B | Execute_Immediate Reference_Lex_1,0x42 0245 00c7 | | Action Elaborate_Subprogram 0246 1d43 | C | Execute_Immediate Reference_Lex_1,0x43 0247 00c7 | | Action Elaborate_Subprogram 0248 1d44 | D | Execute_Immediate Reference_Lex_1,0x44 0249 00c7 | | Action Elaborate_Subprogram 024a 1d45 | E | Execute_Immediate Reference_Lex_1,0x45 024b 00c7 | | Action Elaborate_Subprogram 024c 1d46 | F | Execute_Immediate Reference_Lex_1,0x46 024d 00c7 | | Action Elaborate_Subprogram 024e 1d47 | G | Execute_Immediate Reference_Lex_1,0x47 024f 00c7 | | Action Elaborate_Subprogram 0250 1d48 | H | Execute_Immediate Reference_Lex_1,0x48 0251 00c7 | | Action Elaborate_Subprogram 0252 1d49 | I | Execute_Immediate Reference_Lex_1,0x49 0253 00c7 | | Action Elaborate_Subprogram 0254 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a 0255 00c7 | | Action Elaborate_Subprogram 0256 1d4b | K | Execute_Immediate Reference_Lex_1,0x4b 0257 00c7 | | Action Elaborate_Subprogram 0258 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c 0259 00c7 | | Action Elaborate_Subprogram 025a 1d4d | M | Execute_Immediate Reference_Lex_1,0x4d 025b 00c7 | | Action Elaborate_Subprogram 025c 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e 025d 00c7 | | Action Elaborate_Subprogram 025e 1d7f | | Execute_Immediate Reference_Lex_1,0x7f 025f 00c7 | | Action Elaborate_Subprogram 0260 1d80 | | Execute_Immediate Reference_Lex_1,0x80 0261 00c7 | | Action Elaborate_Subprogram 0262 1d81 | | Execute_Immediate Reference_Lex_1,0x81 0263 00c7 | | Action Elaborate_Subprogram 0264 1d82 | | Execute_Immediate Reference_Lex_1,0x82 0265 00c7 | | Action Elaborate_Subprogram 0266 1d6e | n | Execute_Immediate Reference_Lex_1,0x6e 0267 00c7 | | Action Elaborate_Subprogram 0268 1d6f | o | Execute_Immediate Reference_Lex_1,0x6f 0269 00c7 | | Action Elaborate_Subprogram 026a 1d70 | p | Execute_Immediate Reference_Lex_1,0x70 026b 00c7 | | Action Elaborate_Subprogram 026c 1d71 | q | Execute_Immediate Reference_Lex_1,0x71 026d 00c7 | | Action Elaborate_Subprogram 026e 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f 026f 00c7 | | Action Elaborate_Subprogram 0270 1d50 | P | Execute_Immediate Reference_Lex_1,0x50 0271 00c7 | | Action Elaborate_Subprogram 0272 1d51 | Q | Execute_Immediate Reference_Lex_1,0x51 0273 00c7 | | Action Elaborate_Subprogram 0274 1d52 | R | Execute_Immediate Reference_Lex_1,0x52 0275 00c7 | | Action Elaborate_Subprogram 0276 1d53 | S | Execute_Immediate Reference_Lex_1,0x53 0277 00c7 | | Action Elaborate_Subprogram 0278 1d87 | | Execute_Immediate Reference_Lex_1,0x87 0279 00c7 | | Action Elaborate_Subprogram 027a 1d55 | U | Execute_Immediate Reference_Lex_1,0x55 027b 00c7 | | Action Elaborate_Subprogram 027c 1d88 | | Execute_Immediate Reference_Lex_1,0x88 027d 00c7 | | Action Elaborate_Subprogram 027e 1d89 | | Execute_Immediate Reference_Lex_1,0x89 027f 00c7 | | Action Elaborate_Subprogram 0280 1d8a | | Execute_Immediate Reference_Lex_1,0x8a 0281 00c7 | | Action Elaborate_Subprogram 0282 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59 0283 00c7 | | Action Elaborate_Subprogram 0284 1d5a | Z | Execute_Immediate Reference_Lex_1,0x5a 0285 00c7 | | Action Elaborate_Subprogram 0286 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b 0287 00c7 | | Action Elaborate_Subprogram 0288 1d72 | r | Execute_Immediate Reference_Lex_1,0x72 0289 00c7 | | Action Elaborate_Subprogram 028a 1d73 | s | Execute_Immediate Reference_Lex_1,0x73 028b 00c7 | | Action Elaborate_Subprogram 028c 1d5e | ^ | Execute_Immediate Reference_Lex_1,0x5e 028d 00c7 | | Action Elaborate_Subprogram 028e 1d5f | _ | Execute_Immediate Reference_Lex_1,0x5f 028f 00c7 | | Action Elaborate_Subprogram 0290 1d60 | ` | Execute_Immediate Reference_Lex_1,0x60 0291 00c7 | | Action Elaborate_Subprogram 0292 e004 | | Load 0x0,0x4 0293 e005 | | Load 0x0,0x5 0294 e006 | | Load 0x0,0x6 0295 e007 | | Load 0x0,0x7 0296 4804 |H | Short_Literal 0x4 0297 e261 | a | Load 0x1,0x61 0298 020e | | Execute Module,Augment_Imports 0299 e261 | a | Load 0x1,0x61 029a 020d | | Execute Module,Elaborate 029b BODY_0008: 029b 00bc | | Action Signal_Activated 029c 00bb | | Action Signal_Completion 029d 0000 0000 | | .XXX[0x3] 029f 0000 | | 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 e007 | | Load 0x0,0x7 02a4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 02a5 180e | | Execute Package,Field_Execute,Field_Number 0xe 02a6 00ca | | Action Exit_Nullary_Function 02a7 0000 | | .XXX[0x1] 02a8 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 02ac 0000 0000 | | .BLANK 0000[0x4] 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 e5f9 | | Load 0x2,-0x7 02b4 e5fa | | Load 0x2,-0x6 02b5 e008 | | Load 0x0,0x8 02b6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02b7 e5fb | | Load 0x2,-0x5 02b8 e006 | | Load 0x0,0x6 02b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02ba 00d9 | | Load_Top At_Offset_1 02bb 00d0 | | Action Swap_Control 02bc 0260 | ` | Execute Discrete,In_Type 02bd 7001 |p | Jump_Nonzero 0x2bf 02be 0801 | | Execute_Immediate Raise,0x1 02bf e5fc | | Load 0x2,-0x4 02c0 e5fd | | Load 0x2,-0x3 02c1 e5fe | | Load 0x2,-0x2 02c2 e5ff | | Load 0x2,-0x1 02c3 e007 | | Load 0x0,0x7 02c4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 02c5 1892 | | Execute Package,Field_Execute,Field_Number 0x92 02c6 c5f9 | | Store 0x2,-0x7 02c7 4507 |E | Exit_Suprogram New_Top_Offset 0x7 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 e006 | | Load 0x0,0x6 02ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02cf 00d9 | | Load_Top At_Offset_1 02d0 00d0 | | Action Swap_Control 02d1 0260 | ` | Execute Discrete,In_Type 02d2 7001 |p | Jump_Nonzero 0x2d4 02d3 0801 | | Execute_Immediate Raise,0x1 02d4 e5ff | | Load 0x2,-0x1 02d5 e007 | | Load 0x0,0x7 02d6 1b16 | | Execute Package,Field_Read,Field_Number 0x16 02d7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02d8 c5fd | | Store 0x2,-0x3 02d9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02da 0000 0000 | | .BLANK 0000[0x6] 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02e3 | | .CONST 0x02e3 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0001 | | .CONST 0x0001 ; Number of locals 02e3 BODY_02e0: 02e3 INIT_02e0: 02e3 e5fd | | Load 0x2,-0x3 02e4 e5fe | | Load 0x2,-0x2 02e5 e006 | | Load 0x0,0x6 02e6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02e7 00d9 | | Load_Top At_Offset_1 02e8 00d0 | | Action Swap_Control 02e9 0260 | ` | Execute Discrete,In_Type 02ea 7001 |p | Jump_Nonzero 0x2ec 02eb 0801 | | Execute_Immediate Raise,0x1 02ec e007 | | Load 0x0,0x7 02ed 1b14 | | Execute Package,Field_Read,Field_Number 0x14 02ee 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 02ef e5ff | | Load 0x2,-0x1 02f0 e007 | | Load 0x0,0x7 02f1 1b16 | | Execute Package,Field_Read,Field_Number 0x16 02f2 1891 | | Execute Package,Field_Execute,Field_Number 0x91 02f3 c5fd | | Store 0x2,-0x3 02f4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02f5 0000 0000 | | .XXX[0x3] 02f7 0000 | | 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 00db | | Load_Top At_Offset_3 02fc e006 | | Load 0x0,0x6 02fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02fe 00d9 | | Load_Top At_Offset_1 02ff 00d0 | | Action Swap_Control 0300 0260 | ` | Execute Discrete,In_Type 0301 7001 |p | Jump_Nonzero 0x303 0302 0801 | | Execute_Immediate Raise,0x1 0303 00db | | Load_Top At_Offset_3 0304 e007 | | Load 0x0,0x7 0305 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0306 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e 0307 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 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 e5fb | | Load 0x2,-0x5 030c e5fd | | Load 0x2,-0x3 030d e5fc | | Load 0x2,-0x4 030e e006 | | Load 0x0,0x6 030f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0310 00d9 | | Load_Top At_Offset_1 0311 00d0 | | Action Swap_Control 0312 0260 | ` | Execute Discrete,In_Type 0313 7001 |p | Jump_Nonzero 0x315 0314 0801 | | Execute_Immediate Raise,0x1 0315 e5fe | | Load 0x2,-0x2 0316 e5ff | | Load 0x2,-0x1 0317 e007 | | Load 0x0,0x7 0318 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0319 1814 | | Execute Package,Field_Execute,Field_Number 0x14 031a c5fb | | Store 0x2,-0x5 031b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 031c 0000 0000 | | .BLANK 0000[0x4] 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 e5fc | | Load 0x2,-0x4 0324 e5fd | | Load 0x2,-0x3 0325 e5fe | | Load 0x2,-0x2 0326 e5ff | | Load 0x2,-0x1 0327 e007 | | Load 0x0,0x7 0328 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0329 1815 | | Execute Package,Field_Execute,Field_Number 0x15 032a c5fc | | Store 0x2,-0x4 032b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 032c 0000 0000 | | .BLANK 0000[0x4] 0330 ; -------------------------------------------------------------------------------------- 0330 ; SUBPROGRAM 0330 ; -------------------------------------------------------------------------------------- 0330 0333 | 3 | .CONST 0x0333 ; Address of begin 0331 0004 | | .CONST 0x0004 ; Address of exception handler 0332 0001 | | .CONST 0x0001 ; Number of locals 0333 BODY_0330: 0333 INIT_0330: 0333 00da | | Load_Top At_Offset_2 0334 e007 | | Load 0x0,0x7 0335 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0336 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0337 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 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 e5fd | | Load 0x2,-0x3 033c e5fe | | Load 0x2,-0x2 033d 0120 | | Execute Any,Is_Value 033e 6803 |h | Jump_Zero 0x342 033f e009 | | Load 0x0,0x9 0340 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0341 7801 |x | Jump 0x343 0342 e5fe | | Load 0x2,-0x2 0343 e5ff | | Load 0x2,-0x1 0344 e007 | | Load 0x0,0x7 0345 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0346 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0347 c5fe | | Store 0x2,-0x2 0348 c5fd | | Store 0x2,-0x3 0349 4502 |E | Exit_Suprogram New_Top_Offset 0x2 034a 0000 0000 | | .BLANK 0000[0x6] 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 0353 | S | .CONST 0x0353 ; Address of begin 0351 0004 | | .CONST 0x0004 ; Address of exception handler 0352 0001 | | .CONST 0x0001 ; Number of locals 0353 BODY_0350: 0353 INIT_0350: 0353 e5fd | | Load 0x2,-0x3 0354 00e3 | | Load_Encached Natural_Cache 0355 e5ff | | Load 0x2,-0x1 0356 e007 | | Load 0x0,0x7 0357 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0358 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0359 c5fe | | Store 0x2,-0x2 035a c5fd | | Store 0x2,-0x3 035b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 035c 0000 0000 | | .BLANK 0000[0x4] 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 00da | | Load_Top At_Offset_2 0364 e007 | | Load 0x0,0x7 0365 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0366 187a | z | Execute Package,Field_Execute,Field_Number 0x7a 0367 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0368 ; -------------------------------------------------------------------------------------- 0368 ; SUBPROGRAM 0368 ; -------------------------------------------------------------------------------------- 0368 036b | k | .CONST 0x036b ; Address of begin 0369 0004 | | .CONST 0x0004 ; Address of exception handler 036a 0001 | | .CONST 0x0001 ; Number of locals 036b BODY_0368: 036b INIT_0368: 036b e5fd | | Load 0x2,-0x3 036c e5fe | | Load 0x2,-0x2 036d e5ff | | Load 0x2,-0x1 036e e007 | | Load 0x0,0x7 036f 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0370 187b | { | Execute Package,Field_Execute,Field_Number 0x7b 0371 c5fd | | Store 0x2,-0x3 0372 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0373 0000 0000 | | .BLANK 0000[0x5] 0378 ; -------------------------------------------------------------------------------------- 0378 ; SUBPROGRAM 0378 ; -------------------------------------------------------------------------------------- 0378 037b | { | .CONST 0x037b ; Address of begin 0379 0004 | | .CONST 0x0004 ; Address of exception handler 037a 0001 | | .CONST 0x0001 ; Number of locals 037b BODY_0378: 037b INIT_0378: 037b 00da | | Load_Top At_Offset_2 037c e007 | | Load 0x0,0x7 037d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 037e 187c | | | Execute Package,Field_Execute,Field_Number 0x7c 037f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0380 ; -------------------------------------------------------------------------------------- 0380 ; SUBPROGRAM 0380 ; -------------------------------------------------------------------------------------- 0380 0383 | | .CONST 0x0383 ; Address of begin 0381 0004 | | .CONST 0x0004 ; Address of exception handler 0382 0001 | | .CONST 0x0001 ; Number of locals 0383 BODY_0380: 0383 INIT_0380: 0383 e5fd | | Load 0x2,-0x3 0384 e5fe | | Load 0x2,-0x2 0385 e5ff | | Load 0x2,-0x1 0386 e007 | | Load 0x0,0x7 0387 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0388 187d | } | Execute Package,Field_Execute,Field_Number 0x7d 0389 c5fd | | Store 0x2,-0x3 038a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 038b 0000 0000 | | .BLANK 0000[0x5] 0390 ; -------------------------------------------------------------------------------------- 0390 ; SUBPROGRAM 0390 ; -------------------------------------------------------------------------------------- 0390 0393 | | .CONST 0x0393 ; Address of begin 0391 0004 | | .CONST 0x0004 ; Address of exception handler 0392 0001 | | .CONST 0x0001 ; Number of locals 0393 BODY_0390: 0393 INIT_0390: 0393 e5fc | | Load 0x2,-0x4 0394 e5fd | | Load 0x2,-0x3 0395 e007 | | Load 0x0,0x7 0396 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0397 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 0398 e5fe | | Load 0x2,-0x2 0399 e5ff | | Load 0x2,-0x1 039a e007 | | Load 0x0,0x7 039b 1b16 | | Execute Package,Field_Read,Field_Number 0x16 039c 188b | | Execute Package,Field_Execute,Field_Number 0x8b 039d c5fc | | Store 0x2,-0x4 039e 4504 |E | Exit_Suprogram New_Top_Offset 0x4 039f 0000 | | .XXX[0x1] 03a0 ; -------------------------------------------------------------------------------------- 03a0 ; SUBPROGRAM 03a0 ; -------------------------------------------------------------------------------------- 03a0 03a3 | | .CONST 0x03a3 ; Address of begin 03a1 0004 | | .CONST 0x0004 ; Address of exception handler 03a2 0001 | | .CONST 0x0001 ; Number of locals 03a3 BODY_03a0: 03a3 INIT_03a0: 03a3 e5fc | | Load 0x2,-0x4 03a4 e5fd | | Load 0x2,-0x3 03a5 e5fe | | Load 0x2,-0x2 03a6 e007 | | Load 0x0,0x7 03a7 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03a8 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 03a9 e5ff | | Load 0x2,-0x1 03aa e007 | | Load 0x0,0x7 03ab 1b16 | | Execute Package,Field_Read,Field_Number 0x16 03ac 188c | | Execute Package,Field_Execute,Field_Number 0x8c 03ad c5fd | | Store 0x2,-0x3 03ae c5fc | | Store 0x2,-0x4 03af 4503 |E | Exit_Suprogram New_Top_Offset 0x3 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 e5fc | | Load 0x2,-0x4 03b4 e5fd | | Load 0x2,-0x3 03b5 e007 | | Load 0x0,0x7 03b6 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03b7 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 03b8 e5fe | | Load 0x2,-0x2 03b9 e5ff | | Load 0x2,-0x1 03ba e007 | | Load 0x0,0x7 03bb 1b16 | | Execute Package,Field_Read,Field_Number 0x16 03bc 188d | | Execute Package,Field_Execute,Field_Number 0x8d 03bd c5fc | | Store 0x2,-0x4 03be 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03bf 0000 | | .XXX[0x1] 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 e5fb | | Load 0x2,-0x5 03c4 e007 | | Load 0x0,0x7 03c5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03c7 e5fd | | Load 0x2,-0x3 03c8 e007 | | Load 0x0,0x7 03c9 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03ca 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 03cb e5fe | | Load 0x2,-0x2 03cc e5ff | | Load 0x2,-0x1 03cd e007 | | Load 0x0,0x7 03ce 1b16 | | Execute Package,Field_Read,Field_Number 0x16 03cf 188e | | Execute Package,Field_Execute,Field_Number 0x8e 03d0 c5fc | | Store 0x2,-0x4 03d1 c5fb | | Store 0x2,-0x5 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 e5fb | | Load 0x2,-0x5 03dc e007 | | Load 0x0,0x7 03dd 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03de 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03df e5fd | | Load 0x2,-0x3 03e0 e007 | | Load 0x0,0x7 03e1 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03e2 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 03e3 e5fe | | Load 0x2,-0x2 03e4 e5ff | | Load 0x2,-0x1 03e5 e007 | | Load 0x0,0x7 03e6 1b16 | | Execute Package,Field_Read,Field_Number 0x16 03e7 188f | | Execute Package,Field_Execute,Field_Number 0x8f 03e8 c5fc | | Store 0x2,-0x4 03e9 c5fb | | Store 0x2,-0x5 03ea 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03eb 0000 0000 | | .BLANK 0000[0x5] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 03f3 | | .CONST 0x03f3 ; Address of begin 03f1 0004 | | .CONST 0x0004 ; Address of exception handler 03f2 0001 | | .CONST 0x0001 ; Number of locals 03f3 BODY_03f0: 03f3 INIT_03f0: 03f3 e5fd | | Load 0x2,-0x3 03f4 e007 | | Load 0x0,0x7 03f5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03f6 1b59 | Y | Execute Package,Field_Read,Field_Number 0x59 03f7 e5fe | | Load 0x2,-0x2 03f8 e5ff | | Load 0x2,-0x1 03f9 e007 | | Load 0x0,0x7 03fa 1b16 | | Execute Package,Field_Read,Field_Number 0x16 03fb 1890 | | Execute Package,Field_Execute,Field_Number 0x90 03fc e00a | | Load 0x0,0xa 03fd 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03fe 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 03ff 0000 | | .XXX[0x1] 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 e5fd | | Load 0x2,-0x3 0404 e5fe | | Load 0x2,-0x2 0405 e5ff | | Load 0x2,-0x1 0406 e00b | | Load 0x0,0xb 0407 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0408 e007 | | Load 0x0,0x7 0409 1b16 | | Execute Package,Field_Read,Field_Number 0x16 040a 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 040b c5fd | | Store 0x2,-0x3 040c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 040d 0000 0000 | | .XXX[0x3] 040f 0000 | | 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 e5fd | | Load 0x2,-0x3 0414 e5fe | | Load 0x2,-0x2 0415 e5ff | | Load 0x2,-0x1 0416 e007 | | Load 0x0,0x7 0417 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0418 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0419 c5fd | | Store 0x2,-0x3 041a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 041b 0000 0000 | | .BLANK 0000[0x5] 0420 ; -------------------------------------------------------------------------------------- 0420 ; SUBPROGRAM 0420 ; -------------------------------------------------------------------------------------- 0420 0423 | # | .CONST 0x0423 ; Address of begin 0421 0004 | | .CONST 0x0004 ; Address of exception handler 0422 0001 | | .CONST 0x0001 ; Number of locals 0423 BODY_0420: 0423 INIT_0420: 0423 e5fd | | Load 0x2,-0x3 0424 e5fe | | Load 0x2,-0x2 0425 e5ff | | Load 0x2,-0x1 0426 e007 | | Load 0x0,0x7 0427 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0428 186e | n | Execute Package,Field_Execute,Field_Number 0x6e 0429 c5fd | | Store 0x2,-0x3 042a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 042b 0000 0000 | | .BLANK 0000[0x5] 0430 ; -------------------------------------------------------------------------------------- 0430 ; SUBPROGRAM 0430 ; -------------------------------------------------------------------------------------- 0430 0433 | 3 | .CONST 0x0433 ; Address of begin 0431 0004 | | .CONST 0x0004 ; Address of exception handler 0432 0001 | | .CONST 0x0001 ; Number of locals 0433 BODY_0430: 0433 INIT_0430: 0433 00da | | Load_Top At_Offset_2 0434 e007 | | Load 0x0,0x7 0435 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0436 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0437 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 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 00da | | Load_Top At_Offset_2 043c e007 | | Load 0x0,0x7 043d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 043e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 043f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0440 ; -------------------------------------------------------------------------------------- 0440 ; SUBPROGRAM 0440 ; -------------------------------------------------------------------------------------- 0440 0443 | C | .CONST 0x0443 ; Address of begin 0441 0004 | | .CONST 0x0004 ; Address of exception handler 0442 0001 | | .CONST 0x0001 ; Number of locals 0443 BODY_0440: 0443 INIT_0440: 0443 00da | | Load_Top At_Offset_2 0444 e007 | | Load 0x0,0x7 0445 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0446 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0447 00d8 | | Load_Top At_Offset_0 0448 e00c | | Load 0x0,0xc 0449 1b0f | | Execute Package,Field_Read,Field_Number 0xf 044a 0122 | " | Execute Any,Make_Root_Type 044b 0260 | ` | Execute Discrete,In_Type 044c 7001 |p | Jump_Nonzero 0x44e 044d 0801 | | Execute_Immediate Raise,0x1 044e e00c | | Load 0x0,0xc 044f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0450 00d9 | | Load_Top At_Offset_1 0451 00d0 | | Action Swap_Control 0452 0260 | ` | Execute Discrete,In_Type 0453 7001 |p | Jump_Nonzero 0x455 0454 0801 | | Execute_Immediate Raise,0x1 0455 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0456 0000 0000 | | .XXX[0x2] 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 00da | | Load_Top At_Offset_2 045c e007 | | Load 0x0,0x7 045d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 045e 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 045f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 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 00da | | Load_Top At_Offset_2 0464 e007 | | Load 0x0,0x7 0465 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0466 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0467 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 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 e5fd | | Load 0x2,-0x3 046c e5fe | | Load 0x2,-0x2 046d e5ff | | Load 0x2,-0x1 046e e007 | | Load 0x0,0x7 046f 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0470 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0471 c5fd | | Store 0x2,-0x3 0472 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0473 0000 0000 | | .BLANK 0000[0x5] 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 1b16 | | Execute Package,Field_Read,Field_Number 0x16 047e 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 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 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0488 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 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 00da | | Load_Top At_Offset_2 0494 e007 | | Load 0x0,0x7 0495 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0496 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 0497 e00d | | Load 0x0,0xd 0498 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0499 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 049a 0000 0000 | | .BLANK 0000[0x6] 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 e5fd | | Load 0x2,-0x3 04a4 e5fe | | Load 0x2,-0x2 04a5 e5ff | | Load 0x2,-0x1 04a6 e007 | | Load 0x0,0x7 04a7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 04a8 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 04a9 c5fd | | Store 0x2,-0x3 04aa 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04ab 0000 0000 | | .BLANK 0000[0x5] 04b0 ; -------------------------------------------------------------------------------------- 04b0 ; SUBPROGRAM 04b0 ; -------------------------------------------------------------------------------------- 04b0 04b3 | | .CONST 0x04b3 ; Address of begin 04b1 0004 | | .CONST 0x0004 ; Address of exception handler 04b2 0001 | | .CONST 0x0001 ; Number of locals 04b3 BODY_04b0: 04b3 INIT_04b0: 04b3 e5fd | | Load 0x2,-0x3 04b4 e5fe | | Load 0x2,-0x2 04b5 e5ff | | Load 0x2,-0x1 04b6 e007 | | Load 0x0,0x7 04b7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 04b8 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 04b9 c5fd | | Store 0x2,-0x3 04ba 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04bb 0000 0000 | | .BLANK 0000[0x5] 04c0 ; -------------------------------------------------------------------------------------- 04c0 ; SUBPROGRAM 04c0 ; -------------------------------------------------------------------------------------- 04c0 04c3 | | .CONST 0x04c3 ; Address of begin 04c1 0004 | | .CONST 0x0004 ; Address of exception handler 04c2 0001 | | .CONST 0x0001 ; Number of locals 04c3 BODY_04c0: 04c3 INIT_04c0: 04c3 e5fd | | Load 0x2,-0x3 04c4 e5fe | | Load 0x2,-0x2 04c5 e5ff | | Load 0x2,-0x1 04c6 e007 | | Load 0x0,0x7 04c7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 04c8 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 04c9 c5fd | | Store 0x2,-0x3 04ca 4503 |E | Exit_Suprogram New_Top_Offset 0x3 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 e5fd | | Load 0x2,-0x3 04d4 e5fe | | Load 0x2,-0x2 04d5 e5ff | | Load 0x2,-0x1 04d6 e007 | | Load 0x0,0x7 04d7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 04d8 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 04d9 c5fd | | Store 0x2,-0x3 04da 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04db 0000 0000 | | .BLANK 0000[0x5] 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 e5fd | | Load 0x2,-0x3 04e4 e5fe | | Load 0x2,-0x2 04e5 e5ff | | Load 0x2,-0x1 04e6 e007 | | Load 0x0,0x7 04e7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 04e8 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 04e9 c5fd | | Store 0x2,-0x3 04ea 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04eb 0000 0000 | | .BLANK 0000[0x5] 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 e5fd | | Load 0x2,-0x3 04f4 e5fe | | Load 0x2,-0x2 04f5 e5ff | | Load 0x2,-0x1 04f6 e007 | | Load 0x0,0x7 04f7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 04f8 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 04f9 c5fd | | Store 0x2,-0x3 04fa 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04fb 0000 0000 | | .BLANK 0000[0x5] 0500 ; -------------------------------------------------------------------------------------- 0500 ; SUBPROGRAM 0500 ; -------------------------------------------------------------------------------------- 0500 0503 | | .CONST 0x0503 ; Address of begin 0501 0004 | | .CONST 0x0004 ; Address of exception handler 0502 0001 | | .CONST 0x0001 ; Number of locals 0503 BODY_0500: 0503 INIT_0500: 0503 e5fd | | Load 0x2,-0x3 0504 e5fe | | Load 0x2,-0x2 0505 e5ff | | Load 0x2,-0x1 0506 e007 | | Load 0x0,0x7 0507 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0508 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0509 c5fd | | Store 0x2,-0x3 050a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 050b 0000 0000 | | .BLANK 0000[0x5] 0510 ; -------------------------------------------------------------------------------------- 0510 ; SUBPROGRAM 0510 ; -------------------------------------------------------------------------------------- 0510 0513 | | .CONST 0x0513 ; Address of begin 0511 0004 | | .CONST 0x0004 ; Address of exception handler 0512 0001 | | .CONST 0x0001 ; Number of locals 0513 BODY_0510: 0513 INIT_0510: 0513 e5fd | | Load 0x2,-0x3 0514 e5fe | | Load 0x2,-0x2 0515 e5ff | | Load 0x2,-0x1 0516 e007 | | Load 0x0,0x7 0517 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0518 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 0519 c5fd | | Store 0x2,-0x3 051a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 051b 0000 0000 | | .BLANK 0000[0x5] 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 e5fc | | Load 0x2,-0x4 0524 e007 | | Load 0x0,0x7 0525 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0526 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0527 e5fe | | Load 0x2,-0x2 0528 e5ff | | Load 0x2,-0x1 0529 e007 | | Load 0x0,0x7 052a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 052b 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 052c c5fd | | Store 0x2,-0x3 052d c5fc | | Store 0x2,-0x4 052e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 052f 0000 | | .XXX[0x1] 0530 ; -------------------------------------------------------------------------------------- 0530 ; SUBPROGRAM 0530 ; -------------------------------------------------------------------------------------- 0530 0533 | 3 | .CONST 0x0533 ; Address of begin 0531 0004 | | .CONST 0x0004 ; Address of exception handler 0532 0001 | | .CONST 0x0001 ; Number of locals 0533 BODY_0530: 0533 INIT_0530: 0533 e5fc | | Load 0x2,-0x4 0534 e007 | | Load 0x0,0x7 0535 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0536 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0537 e5fe | | Load 0x2,-0x2 0538 e5ff | | Load 0x2,-0x1 0539 e007 | | Load 0x0,0x7 053a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 053b 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 053c c5fd | | Store 0x2,-0x3 053d c5fc | | Store 0x2,-0x4 053e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 053f 0000 | | .XXX[0x1] 0540 ; -------------------------------------------------------------------------------------- 0540 ; SUBPROGRAM 0540 ; -------------------------------------------------------------------------------------- 0540 0543 | C | .CONST 0x0543 ; Address of begin 0541 0004 | | .CONST 0x0004 ; Address of exception handler 0542 0001 | | .CONST 0x0001 ; Number of locals 0543 BODY_0540: 0543 INIT_0540: 0543 e5fc | | Load 0x2,-0x4 0544 e007 | | Load 0x0,0x7 0545 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0546 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0547 e5fe | | Load 0x2,-0x2 0548 e5ff | | Load 0x2,-0x1 0549 e007 | | Load 0x0,0x7 054a 1b16 | | Execute Package,Field_Read,Field_Number 0x16 054b 183a | : | Execute Package,Field_Execute,Field_Number 0x3a 054c c5fd | | Store 0x2,-0x3 054d c5fc | | Store 0x2,-0x4 054e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 054f 0000 | | .XXX[0x1] 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 00da | | Load_Top At_Offset_2 0554 e007 | | Load 0x0,0x7 0555 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0556 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 0557 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0558 ; -------------------------------------------------------------------------------------- 0558 ; SUBPROGRAM 0558 ; -------------------------------------------------------------------------------------- 0558 055b | [ | .CONST 0x055b ; Address of begin 0559 0004 | | .CONST 0x0004 ; Address of exception handler 055a 0001 | | .CONST 0x0001 ; Number of locals 055b BODY_0558: 055b INIT_0558: 055b 00da | | Load_Top At_Offset_2 055c e007 | | Load 0x0,0x7 055d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 055e 183c | < | Execute Package,Field_Execute,Field_Number 0x3c 055f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0560 ; -------------------------------------------------------------------------------------- 0560 ; SUBPROGRAM 0560 ; -------------------------------------------------------------------------------------- 0560 0563 | c | .CONST 0x0563 ; Address of begin 0561 0004 | | .CONST 0x0004 ; Address of exception handler 0562 0001 | | .CONST 0x0001 ; Number of locals 0563 BODY_0560: 0563 INIT_0560: 0563 00da | | Load_Top At_Offset_2 0564 e007 | | Load 0x0,0x7 0565 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0566 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 0567 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 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 1b16 | | Execute Package,Field_Read,Field_Number 0x16 056e 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 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 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0576 1887 | | Execute Package,Field_Execute,Field_Number 0x87 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 1b16 | | Execute Package,Field_Read,Field_Number 0x16 057e 1888 | | Execute Package,Field_Execute,Field_Number 0x88 057f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0580 ; -------------------------------------------------------------------------------------- 0580 ; SUBPROGRAM 0580 ; -------------------------------------------------------------------------------------- 0580 0583 | | .CONST 0x0583 ; Address of begin 0581 0004 | | .CONST 0x0004 ; Address of exception handler 0582 0001 | | .CONST 0x0001 ; Number of locals 0583 BODY_0580: 0583 INIT_0580: 0583 00da | | Load_Top At_Offset_2 0584 e007 | | Load 0x0,0x7 0585 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0586 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 0587 e00e | | Load 0x0,0xe 0588 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0589 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 058a 0000 0000 | | .BLANK 0000[0x6] 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 00db | | Load_Top At_Offset_3 0594 e006 | | Load 0x0,0x6 0595 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0596 00d9 | | Load_Top At_Offset_1 0597 00d0 | | Action Swap_Control 0598 0260 | ` | Execute Discrete,In_Type 0599 7001 |p | Jump_Nonzero 0x59b 059a 0801 | | Execute_Immediate Raise,0x1 059b 00db | | Load_Top At_Offset_3 059c e007 | | Load 0x0,0x7 059d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 059e 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 059f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05a0 ; -------------------------------------------------------------------------------------- 05a0 ; SUBPROGRAM 05a0 ; -------------------------------------------------------------------------------------- 05a0 05a3 | | .CONST 0x05a3 ; Address of begin 05a1 0004 | | .CONST 0x0004 ; Address of exception handler 05a2 0001 | | .CONST 0x0001 ; Number of locals 05a3 BODY_05a0: 05a3 INIT_05a0: 05a3 e5fc | | Load 0x2,-0x4 05a4 e5fd | | Load 0x2,-0x3 05a5 e006 | | Load 0x0,0x6 05a6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05a7 00d9 | | Load_Top At_Offset_1 05a8 00d0 | | Action Swap_Control 05a9 0260 | ` | Execute Discrete,In_Type 05aa 7001 |p | Jump_Nonzero 0x5ac 05ab 0801 | | Execute_Immediate Raise,0x1 05ac e5fe | | Load 0x2,-0x2 05ad e5ff | | Load 0x2,-0x1 05ae e007 | | Load 0x0,0x7 05af 1b16 | | Execute Package,Field_Read,Field_Number 0x16 05b0 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 05b1 c5fc | | Store 0x2,-0x4 05b2 4504 |E | Exit_Suprogram New_Top_Offset 0x4 05b3 0000 0000 | | .BLANK 0000[0x5] 05b8 ; -------------------------------------------------------------------------------------- 05b8 ; SUBPROGRAM 05b8 ; -------------------------------------------------------------------------------------- 05b8 05bb | | .CONST 0x05bb ; Address of begin 05b9 0004 | | .CONST 0x0004 ; Address of exception handler 05ba 0001 | | .CONST 0x0001 ; Number of locals 05bb BODY_05b8: 05bb INIT_05b8: 05bb 00da | | Load_Top At_Offset_2 05bc e007 | | Load 0x0,0x7 05bd 1b16 | | Execute Package,Field_Read,Field_Number 0x16 05be 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 05bf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05c0 ; -------------------------------------------------------------------------------------- 05c0 ; SUBPROGRAM 05c0 ; -------------------------------------------------------------------------------------- 05c0 05c3 | | .CONST 0x05c3 ; Address of begin 05c1 0004 | | .CONST 0x0004 ; Address of exception handler 05c2 0001 | | .CONST 0x0001 ; Number of locals 05c3 BODY_05c0: 05c3 INIT_05c0: 05c3 00da | | Load_Top At_Offset_2 05c4 e007 | | Load 0x0,0x7 05c5 1b16 | | Execute Package,Field_Read,Field_Number 0x16 05c6 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 05c7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05c8 ; -------------------------------------------------------------------------------------- 05c8 ; SUBPROGRAM 05c8 ; -------------------------------------------------------------------------------------- 05c8 05cb | | .CONST 0x05cb ; Address of begin 05c9 0004 | | .CONST 0x0004 ; Address of exception handler 05ca 0001 | | .CONST 0x0001 ; Number of locals 05cb BODY_05c8: 05cb INIT_05c8: 05cb 00da | | Load_Top At_Offset_2 05cc e007 | | Load 0x0,0x7 05cd 1b16 | | Execute Package,Field_Read,Field_Number 0x16 05ce 1844 | D | Execute Package,Field_Execute,Field_Number 0x44 05cf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05d0 ; -------------------------------------------------------------------------------------- 05d0 ; SUBPROGRAM 05d0 ; -------------------------------------------------------------------------------------- 05d0 05d3 | | .CONST 0x05d3 ; Address of begin 05d1 0004 | | .CONST 0x0004 ; Address of exception handler 05d2 0001 | | .CONST 0x0001 ; Number of locals 05d3 BODY_05d0: 05d3 INIT_05d0: 05d3 00da | | Load_Top At_Offset_2 05d4 e007 | | Load 0x0,0x7 05d5 1b16 | | Execute Package,Field_Read,Field_Number 0x16 05d6 1845 | E | Execute Package,Field_Execute,Field_Number 0x45 05d7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05d8 ; -------------------------------------------------------------------------------------- 05d8 ; SUBPROGRAM 05d8 ; -------------------------------------------------------------------------------------- 05d8 05db | | .CONST 0x05db ; Address of begin 05d9 0004 | | .CONST 0x0004 ; Address of exception handler 05da 0001 | | .CONST 0x0001 ; Number of locals 05db BODY_05d8: 05db INIT_05d8: 05db e5fd | | Load 0x2,-0x3 05dc e5fe | | Load 0x2,-0x2 05dd e5ff | | Load 0x2,-0x1 05de e007 | | Load 0x0,0x7 05df 1b16 | | Execute Package,Field_Read,Field_Number 0x16 05e0 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 05e1 c5fd | | Store 0x2,-0x3 05e2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 05e3 0000 0000 | | .BLANK 0000[0x5] 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 00da | | Load_Top At_Offset_2 05ec e007 | | Load 0x0,0x7 05ed 1b16 | | Execute Package,Field_Read,Field_Number 0x16 05ee 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 05ef e00f | | Load 0x0,0xf 05f0 1811 | | Execute Package,Field_Execute,Field_Number 0x11 05f1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05f2 0000 0000 | | .BLANK 0000[0x6] 05f8 ; -------------------------------------------------------------------------------------- 05f8 ; SUBPROGRAM 05f8 ; -------------------------------------------------------------------------------------- 05f8 05fb | | .CONST 0x05fb ; Address of begin 05f9 0004 | | .CONST 0x0004 ; Address of exception handler 05fa 0001 | | .CONST 0x0001 ; Number of locals 05fb BODY_05f8: 05fb INIT_05f8: 05fb 00db | | Load_Top At_Offset_3 05fc e006 | | Load 0x0,0x6 05fd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05fe 00d9 | | Load_Top At_Offset_1 05ff 00d0 | | Action Swap_Control 0600 0260 | ` | Execute Discrete,In_Type 0601 7001 |p | Jump_Nonzero 0x603 0602 0801 | | Execute_Immediate Raise,0x1 0603 00db | | Load_Top At_Offset_3 0604 e007 | | Load 0x0,0x7 0605 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0606 1848 | H | Execute Package,Field_Execute,Field_Number 0x48 0607 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0608 ; -------------------------------------------------------------------------------------- 0608 ; SUBPROGRAM 0608 ; -------------------------------------------------------------------------------------- 0608 060b | | .CONST 0x060b ; Address of begin 0609 0004 | | .CONST 0x0004 ; Address of exception handler 060a 0001 | | .CONST 0x0001 ; Number of locals 060b BODY_0608: 060b INIT_0608: 060b e5fc | | Load 0x2,-0x4 060c e5fd | | Load 0x2,-0x3 060d e006 | | Load 0x0,0x6 060e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 060f 00d9 | | Load_Top At_Offset_1 0610 00d0 | | Action Swap_Control 0611 0260 | ` | Execute Discrete,In_Type 0612 7001 |p | Jump_Nonzero 0x614 0613 0801 | | Execute_Immediate Raise,0x1 0614 e5fe | | Load 0x2,-0x2 0615 e5ff | | Load 0x2,-0x1 0616 e007 | | Load 0x0,0x7 0617 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0618 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0619 c5fc | | Store 0x2,-0x4 061a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 061b 0000 0000 | | .BLANK 0000[0x5] 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 00db | | Load_Top At_Offset_3 0624 e006 | | Load 0x0,0x6 0625 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0626 00d9 | | Load_Top At_Offset_1 0627 00d0 | | Action Swap_Control 0628 0260 | ` | Execute Discrete,In_Type 0629 7001 |p | Jump_Nonzero 0x62b 062a 0801 | | Execute_Immediate Raise,0x1 062b 00db | | Load_Top At_Offset_3 062c e007 | | Load 0x0,0x7 062d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 062e 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 062f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0630 ; -------------------------------------------------------------------------------------- 0630 ; SUBPROGRAM 0630 ; -------------------------------------------------------------------------------------- 0630 0633 | 3 | .CONST 0x0633 ; Address of begin 0631 0004 | | .CONST 0x0004 ; Address of exception handler 0632 0001 | | .CONST 0x0001 ; Number of locals 0633 BODY_0630: 0633 INIT_0630: 0633 e5fc | | Load 0x2,-0x4 0634 e5fd | | Load 0x2,-0x3 0635 e006 | | Load 0x0,0x6 0636 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0637 00d9 | | Load_Top At_Offset_1 0638 00d0 | | Action Swap_Control 0639 0260 | ` | Execute Discrete,In_Type 063a 7001 |p | Jump_Nonzero 0x63c 063b 0801 | | Execute_Immediate Raise,0x1 063c e5fe | | Load 0x2,-0x2 063d e5ff | | Load 0x2,-0x1 063e e007 | | Load 0x0,0x7 063f 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0640 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0641 c5fc | | Store 0x2,-0x4 0642 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0643 0000 0000 | | .BLANK 0000[0x5] 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 064b | K | .CONST 0x064b ; Address of begin 0649 0004 | | .CONST 0x0004 ; Address of exception handler 064a 0001 | | .CONST 0x0001 ; Number of locals 064b BODY_0648: 064b INIT_0648: 064b 00db | | Load_Top At_Offset_3 064c e006 | | Load 0x0,0x6 064d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 064e 00d9 | | Load_Top At_Offset_1 064f 00d0 | | Action Swap_Control 0650 0260 | ` | Execute Discrete,In_Type 0651 7001 |p | Jump_Nonzero 0x653 0652 0801 | | Execute_Immediate Raise,0x1 0653 00db | | Load_Top At_Offset_3 0654 e007 | | Load 0x0,0x7 0655 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0656 184c | L | Execute Package,Field_Execute,Field_Number 0x4c 0657 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0658 ; -------------------------------------------------------------------------------------- 0658 ; SUBPROGRAM 0658 ; -------------------------------------------------------------------------------------- 0658 065b | [ | .CONST 0x065b ; Address of begin 0659 0004 | | .CONST 0x0004 ; Address of exception handler 065a 0001 | | .CONST 0x0001 ; Number of locals 065b BODY_0658: 065b INIT_0658: 065b e5fc | | Load 0x2,-0x4 065c e5fd | | Load 0x2,-0x3 065d e006 | | Load 0x0,0x6 065e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 065f 00d9 | | Load_Top At_Offset_1 0660 00d0 | | Action Swap_Control 0661 0260 | ` | Execute Discrete,In_Type 0662 7001 |p | Jump_Nonzero 0x664 0663 0801 | | Execute_Immediate Raise,0x1 0664 e5fe | | Load 0x2,-0x2 0665 e5ff | | Load 0x2,-0x1 0666 e007 | | Load 0x0,0x7 0667 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0668 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 0669 c5fc | | Store 0x2,-0x4 066a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 066b 0000 0000 | | .BLANK 0000[0x5] 0670 ; -------------------------------------------------------------------------------------- 0670 ; SUBPROGRAM 0670 ; -------------------------------------------------------------------------------------- 0670 0673 | s | .CONST 0x0673 ; Address of begin 0671 0004 | | .CONST 0x0004 ; Address of exception handler 0672 0001 | | .CONST 0x0001 ; Number of locals 0673 BODY_0670: 0673 INIT_0670: 0673 00db | | Load_Top At_Offset_3 0674 e006 | | Load 0x0,0x6 0675 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0676 00d9 | | Load_Top At_Offset_1 0677 00d0 | | Action Swap_Control 0678 0260 | ` | Execute Discrete,In_Type 0679 7001 |p | Jump_Nonzero 0x67b 067a 0801 | | Execute_Immediate Raise,0x1 067b 00db | | Load_Top At_Offset_3 067c e007 | | Load 0x0,0x7 067d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 067e 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 067f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0680 ; -------------------------------------------------------------------------------------- 0680 ; SUBPROGRAM 0680 ; -------------------------------------------------------------------------------------- 0680 0683 | | .CONST 0x0683 ; Address of begin 0681 0004 | | .CONST 0x0004 ; Address of exception handler 0682 0001 | | .CONST 0x0001 ; Number of locals 0683 BODY_0680: 0683 INIT_0680: 0683 e5fc | | Load 0x2,-0x4 0684 e5fd | | Load 0x2,-0x3 0685 e006 | | Load 0x0,0x6 0686 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0687 00d9 | | Load_Top At_Offset_1 0688 00d0 | | Action Swap_Control 0689 0260 | ` | Execute Discrete,In_Type 068a 7001 |p | Jump_Nonzero 0x68c 068b 0801 | | Execute_Immediate Raise,0x1 068c e5fe | | Load 0x2,-0x2 068d e5ff | | Load 0x2,-0x1 068e e007 | | Load 0x0,0x7 068f 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0690 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0691 c5fc | | Store 0x2,-0x4 0692 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0693 0000 0000 | | .BLANK 0000[0x5] 0698 ; -------------------------------------------------------------------------------------- 0698 ; SUBPROGRAM 0698 ; -------------------------------------------------------------------------------------- 0698 069b | | .CONST 0x069b ; Address of begin 0699 0004 | | .CONST 0x0004 ; Address of exception handler 069a 0001 | | .CONST 0x0001 ; Number of locals 069b BODY_0698: 069b INIT_0698: 069b 00da | | Load_Top At_Offset_2 069c e007 | | Load 0x0,0x7 069d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 069e 187f | | Execute Package,Field_Execute,Field_Number 0x7f 069f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06a0 ; -------------------------------------------------------------------------------------- 06a0 ; SUBPROGRAM 06a0 ; -------------------------------------------------------------------------------------- 06a0 06a3 | | .CONST 0x06a3 ; Address of begin 06a1 0004 | | .CONST 0x0004 ; Address of exception handler 06a2 0001 | | .CONST 0x0001 ; Number of locals 06a3 BODY_06a0: 06a3 INIT_06a0: 06a3 e5fd | | Load 0x2,-0x3 06a4 e5fe | | Load 0x2,-0x2 06a5 e5ff | | Load 0x2,-0x1 06a6 e007 | | Load 0x0,0x7 06a7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 06a8 1880 | | Execute Package,Field_Execute,Field_Number 0x80 06a9 c5fd | | Store 0x2,-0x3 06aa 4503 |E | Exit_Suprogram New_Top_Offset 0x3 06ab 0000 0000 | | .BLANK 0000[0x5] 06b0 ; -------------------------------------------------------------------------------------- 06b0 ; SUBPROGRAM 06b0 ; -------------------------------------------------------------------------------------- 06b0 06b3 | | .CONST 0x06b3 ; Address of begin 06b1 0004 | | .CONST 0x0004 ; Address of exception handler 06b2 0001 | | .CONST 0x0001 ; Number of locals 06b3 BODY_06b0: 06b3 INIT_06b0: 06b3 00db | | Load_Top At_Offset_3 06b4 e006 | | Load 0x0,0x6 06b5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 06b6 00d9 | | Load_Top At_Offset_1 06b7 00d0 | | Action Swap_Control 06b8 0260 | ` | Execute Discrete,In_Type 06b9 7001 |p | Jump_Nonzero 0x6bb 06ba 0801 | | Execute_Immediate Raise,0x1 06bb 00db | | Load_Top At_Offset_3 06bc e007 | | Load 0x0,0x7 06bd 1b16 | | Execute Package,Field_Read,Field_Number 0x16 06be 1881 | | Execute Package,Field_Execute,Field_Number 0x81 06bf 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06c0 ; -------------------------------------------------------------------------------------- 06c0 ; SUBPROGRAM 06c0 ; -------------------------------------------------------------------------------------- 06c0 06c3 | | .CONST 0x06c3 ; Address of begin 06c1 0004 | | .CONST 0x0004 ; Address of exception handler 06c2 0001 | | .CONST 0x0001 ; Number of locals 06c3 BODY_06c0: 06c3 INIT_06c0: 06c3 e5fc | | Load 0x2,-0x4 06c4 e5fd | | Load 0x2,-0x3 06c5 e006 | | Load 0x0,0x6 06c6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 06c7 00d9 | | Load_Top At_Offset_1 06c8 00d0 | | Action Swap_Control 06c9 0260 | ` | Execute Discrete,In_Type 06ca 7001 |p | Jump_Nonzero 0x6cc 06cb 0801 | | Execute_Immediate Raise,0x1 06cc e5fe | | Load 0x2,-0x2 06cd e5ff | | Load 0x2,-0x1 06ce e007 | | Load 0x0,0x7 06cf 1b16 | | Execute Package,Field_Read,Field_Number 0x16 06d0 1882 | | Execute Package,Field_Execute,Field_Number 0x82 06d1 c5fc | | Store 0x2,-0x4 06d2 4504 |E | Exit_Suprogram New_Top_Offset 0x4 06d3 0000 0000 | | .BLANK 0000[0x5] 06d8 ; -------------------------------------------------------------------------------------- 06d8 ; SUBPROGRAM 06d8 ; -------------------------------------------------------------------------------------- 06d8 06db | | .CONST 0x06db ; Address of begin 06d9 0004 | | .CONST 0x0004 ; Address of exception handler 06da 0001 | | .CONST 0x0001 ; Number of locals 06db BODY_06d8: 06db INIT_06d8: 06db 00da | | Load_Top At_Offset_2 06dc e007 | | Load 0x0,0x7 06dd 1b16 | | Execute Package,Field_Read,Field_Number 0x16 06de 1871 | q | Execute Package,Field_Execute,Field_Number 0x71 06df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06e0 ; -------------------------------------------------------------------------------------- 06e0 ; SUBPROGRAM 06e0 ; -------------------------------------------------------------------------------------- 06e0 06e3 | | .CONST 0x06e3 ; Address of begin 06e1 0004 | | .CONST 0x0004 ; Address of exception handler 06e2 0001 | | .CONST 0x0001 ; Number of locals 06e3 BODY_06e0: 06e3 INIT_06e0: 06e3 e5fd | | Load 0x2,-0x3 06e4 e5fe | | Load 0x2,-0x2 06e5 e5ff | | Load 0x2,-0x1 06e6 e007 | | Load 0x0,0x7 06e7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 06e8 1872 | r | Execute Package,Field_Execute,Field_Number 0x72 06e9 c5fd | | Store 0x2,-0x3 06ea 4503 |E | Exit_Suprogram New_Top_Offset 0x3 06eb 0000 0000 | | .BLANK 0000[0x5] 06f0 ; -------------------------------------------------------------------------------------- 06f0 ; SUBPROGRAM 06f0 ; -------------------------------------------------------------------------------------- 06f0 06f3 | | .CONST 0x06f3 ; Address of begin 06f1 0004 | | .CONST 0x0004 ; Address of exception handler 06f2 0001 | | .CONST 0x0001 ; Number of locals 06f3 BODY_06f0: 06f3 INIT_06f0: 06f3 00db | | Load_Top At_Offset_3 06f4 e006 | | Load 0x0,0x6 06f5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 06f6 00d9 | | Load_Top At_Offset_1 06f7 00d0 | | Action Swap_Control 06f8 0260 | ` | Execute Discrete,In_Type 06f9 7001 |p | Jump_Nonzero 0x6fb 06fa 0801 | | Execute_Immediate Raise,0x1 06fb 00db | | Load_Top At_Offset_3 06fc e007 | | Load 0x0,0x7 06fd 1b16 | | Execute Package,Field_Read,Field_Number 0x16 06fe 1873 | s | Execute Package,Field_Execute,Field_Number 0x73 06ff 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0700 ; -------------------------------------------------------------------------------------- 0700 ; SUBPROGRAM 0700 ; -------------------------------------------------------------------------------------- 0700 0703 | | .CONST 0x0703 ; Address of begin 0701 0004 | | .CONST 0x0004 ; Address of exception handler 0702 0001 | | .CONST 0x0001 ; Number of locals 0703 BODY_0700: 0703 INIT_0700: 0703 e5fc | | Load 0x2,-0x4 0704 e5fd | | Load 0x2,-0x3 0705 e006 | | Load 0x0,0x6 0706 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0707 00d9 | | Load_Top At_Offset_1 0708 00d0 | | Action Swap_Control 0709 0260 | ` | Execute Discrete,In_Type 070a 7001 |p | Jump_Nonzero 0x70c 070b 0801 | | Execute_Immediate Raise,0x1 070c e5fe | | Load 0x2,-0x2 070d e5ff | | Load 0x2,-0x1 070e e007 | | Load 0x0,0x7 070f 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0710 1874 | t | Execute Package,Field_Execute,Field_Number 0x74 0711 c5fc | | Store 0x2,-0x4 0712 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0713 0000 0000 | | .BLANK 0000[0x5] 0718 ; -------------------------------------------------------------------------------------- 0718 ; SUBPROGRAM 0718 ; -------------------------------------------------------------------------------------- 0718 071b | | .CONST 0x071b ; Address of begin 0719 0004 | | .CONST 0x0004 ; Address of exception handler 071a 0001 | | .CONST 0x0001 ; Number of locals 071b BODY_0718: 071b INIT_0718: 071b 00db | | Load_Top At_Offset_3 071c e006 | | Load 0x0,0x6 071d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 071e 00d9 | | Load_Top At_Offset_1 071f 00d0 | | Action Swap_Control 0720 0260 | ` | Execute Discrete,In_Type 0721 7001 |p | Jump_Nonzero 0x723 0722 0801 | | Execute_Immediate Raise,0x1 0723 00db | | Load_Top At_Offset_3 0724 e007 | | Load 0x0,0x7 0725 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0726 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 0727 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0728 ; -------------------------------------------------------------------------------------- 0728 ; SUBPROGRAM 0728 ; -------------------------------------------------------------------------------------- 0728 072b | + | .CONST 0x072b ; Address of begin 0729 0004 | | .CONST 0x0004 ; Address of exception handler 072a 0001 | | .CONST 0x0001 ; Number of locals 072b BODY_0728: 072b INIT_0728: 072b e5fc | | Load 0x2,-0x4 072c e5fd | | Load 0x2,-0x3 072d e006 | | Load 0x0,0x6 072e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 072f 00d9 | | Load_Top At_Offset_1 0730 00d0 | | Action Swap_Control 0731 0260 | ` | Execute Discrete,In_Type 0732 7001 |p | Jump_Nonzero 0x734 0733 0801 | | Execute_Immediate Raise,0x1 0734 e5fe | | Load 0x2,-0x2 0735 e5ff | | Load 0x2,-0x1 0736 e007 | | Load 0x0,0x7 0737 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0738 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 0739 c5fc | | Store 0x2,-0x4 073a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 073b 0000 0000 | | .BLANK 0000[0x5] 0740 ; -------------------------------------------------------------------------------------- 0740 ; SUBPROGRAM 0740 ; -------------------------------------------------------------------------------------- 0740 0743 | C | .CONST 0x0743 ; Address of begin 0741 0004 | | .CONST 0x0004 ; Address of exception handler 0742 0001 | | .CONST 0x0001 ; Number of locals 0743 BODY_0740: 0743 INIT_0740: 0743 00db | | Load_Top At_Offset_3 0744 e006 | | Load 0x0,0x6 0745 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0746 00d9 | | Load_Top At_Offset_1 0747 00d0 | | Action Swap_Control 0748 0260 | ` | Execute Discrete,In_Type 0749 7001 |p | Jump_Nonzero 0x74b 074a 0801 | | Execute_Immediate Raise,0x1 074b 00db | | Load_Top At_Offset_3 074c e007 | | Load 0x0,0x7 074d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 074e 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 074f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0750 ; -------------------------------------------------------------------------------------- 0750 ; SUBPROGRAM 0750 ; -------------------------------------------------------------------------------------- 0750 0753 | S | .CONST 0x0753 ; Address of begin 0751 0004 | | .CONST 0x0004 ; Address of exception handler 0752 0001 | | .CONST 0x0001 ; Number of locals 0753 BODY_0750: 0753 INIT_0750: 0753 e5fc | | Load 0x2,-0x4 0754 e5fd | | Load 0x2,-0x3 0755 e006 | | Load 0x0,0x6 0756 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0757 00d9 | | Load_Top At_Offset_1 0758 00d0 | | Action Swap_Control 0759 0260 | ` | Execute Discrete,In_Type 075a 7001 |p | Jump_Nonzero 0x75c 075b 0801 | | Execute_Immediate Raise,0x1 075c e5fe | | Load 0x2,-0x2 075d e5ff | | Load 0x2,-0x1 075e e007 | | Load 0x0,0x7 075f 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0760 1853 | S | Execute Package,Field_Execute,Field_Number 0x53 0761 c5fc | | Store 0x2,-0x4 0762 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0763 0000 0000 | | .BLANK 0000[0x5] 0768 ; -------------------------------------------------------------------------------------- 0768 ; SUBPROGRAM 0768 ; -------------------------------------------------------------------------------------- 0768 076b | k | .CONST 0x076b ; Address of begin 0769 0004 | | .CONST 0x0004 ; Address of exception handler 076a 0001 | | .CONST 0x0001 ; Number of locals 076b BODY_0768: 076b INIT_0768: 076b 00db | | Load_Top At_Offset_3 076c e006 | | Load 0x0,0x6 076d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 076e 00d9 | | Load_Top At_Offset_1 076f 00d0 | | Action Swap_Control 0770 0260 | ` | Execute Discrete,In_Type 0771 7001 |p | Jump_Nonzero 0x773 0772 0801 | | Execute_Immediate Raise,0x1 0773 00db | | Load_Top At_Offset_3 0774 e007 | | Load 0x0,0x7 0775 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0776 1854 | T | Execute Package,Field_Execute,Field_Number 0x54 0777 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0778 ; -------------------------------------------------------------------------------------- 0778 ; SUBPROGRAM 0778 ; -------------------------------------------------------------------------------------- 0778 077b | { | .CONST 0x077b ; Address of begin 0779 0004 | | .CONST 0x0004 ; Address of exception handler 077a 0001 | | .CONST 0x0001 ; Number of locals 077b BODY_0778: 077b INIT_0778: 077b e5fb | | Load 0x2,-0x5 077c e5fc | | Load 0x2,-0x4 077d e006 | | Load 0x0,0x6 077e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 077f 00d9 | | Load_Top At_Offset_1 0780 00d0 | | Action Swap_Control 0781 0260 | ` | Execute Discrete,In_Type 0782 7001 |p | Jump_Nonzero 0x784 0783 0801 | | Execute_Immediate Raise,0x1 0784 e5fd | | Load 0x2,-0x3 0785 e5fe | | Load 0x2,-0x2 0786 e5ff | | Load 0x2,-0x1 0787 e007 | | Load 0x0,0x7 0788 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0789 1893 | | Execute Package,Field_Execute,Field_Number 0x93 078a c5fb | | Store 0x2,-0x5 078b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 078c 0000 0000 | | .BLANK 0000[0x4] 0790 ; -------------------------------------------------------------------------------------- 0790 ; SUBPROGRAM 0790 ; -------------------------------------------------------------------------------------- 0790 0793 | | .CONST 0x0793 ; Address of begin 0791 0004 | | .CONST 0x0004 ; Address of exception handler 0792 0001 | | .CONST 0x0001 ; Number of locals 0793 BODY_0790: 0793 INIT_0790: 0793 e5fd | | Load 0x2,-0x3 0794 e006 | | Load 0x0,0x6 0795 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0796 00d9 | | Load_Top At_Offset_1 0797 00d0 | | Action Swap_Control 0798 0260 | ` | Execute Discrete,In_Type 0799 7001 |p | Jump_Nonzero 0x79b 079a 0801 | | Execute_Immediate Raise,0x1 079b e5fe | | Load 0x2,-0x2 079c e5ff | | Load 0x2,-0x1 079d e007 | | Load 0x0,0x7 079e 1b16 | | Execute Package,Field_Read,Field_Number 0x16 079f 1856 | V | Execute Package,Field_Execute,Field_Number 0x56 07a0 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 07a1 0000 0000 | | .BLANK 0000[0x7] 07a8 ; -------------------------------------------------------------------------------------- 07a8 ; SUBPROGRAM 07a8 ; -------------------------------------------------------------------------------------- 07a8 07ab | | .CONST 0x07ab ; Address of begin 07a9 0004 | | .CONST 0x0004 ; Address of exception handler 07aa 0001 | | .CONST 0x0001 ; Number of locals 07ab BODY_07a8: 07ab INIT_07a8: 07ab e5fa | | Load 0x2,-0x6 07ac e5fb | | Load 0x2,-0x5 07ad e006 | | Load 0x0,0x6 07ae 1b0e | | Execute Package,Field_Read,Field_Number 0xe 07af 00d9 | | Load_Top At_Offset_1 07b0 00d0 | | Action Swap_Control 07b1 0260 | ` | Execute Discrete,In_Type 07b2 7001 |p | Jump_Nonzero 0x7b4 07b3 0801 | | Execute_Immediate Raise,0x1 07b4 e5fc | | Load 0x2,-0x4 07b5 e5fd | | Load 0x2,-0x3 07b6 e5fe | | Load 0x2,-0x2 07b7 e5ff | | Load 0x2,-0x1 07b8 e007 | | Load 0x0,0x7 07b9 1b16 | | Execute Package,Field_Read,Field_Number 0x16 07ba 1894 | | Execute Package,Field_Execute,Field_Number 0x94 07bb c5fa | | Store 0x2,-0x6 07bc 4506 |E | Exit_Suprogram New_Top_Offset 0x6 07bd 0000 0000 | | .XXX[0x3] 07bf 0000 | | 07c0 ; -------------------------------------------------------------------------------------- 07c0 ; SUBPROGRAM 07c0 ; -------------------------------------------------------------------------------------- 07c0 07c3 | | .CONST 0x07c3 ; Address of begin 07c1 0004 | | .CONST 0x0004 ; Address of exception handler 07c2 0001 | | .CONST 0x0001 ; Number of locals 07c3 BODY_07c0: 07c3 INIT_07c0: 07c3 e5fb | | Load 0x2,-0x5 07c4 e5fc | | Load 0x2,-0x4 07c5 e006 | | Load 0x0,0x6 07c6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 07c7 00d9 | | Load_Top At_Offset_1 07c8 00d0 | | Action Swap_Control 07c9 0260 | ` | Execute Discrete,In_Type 07ca 7001 |p | Jump_Nonzero 0x7cc 07cb 0801 | | Execute_Immediate Raise,0x1 07cc e5fd | | Load 0x2,-0x3 07cd e5fe | | Load 0x2,-0x2 07ce e5ff | | Load 0x2,-0x1 07cf e007 | | Load 0x0,0x7 07d0 1b16 | | Execute Package,Field_Read,Field_Number 0x16 07d1 1895 | | Execute Package,Field_Execute,Field_Number 0x95 07d2 c5fb | | Store 0x2,-0x5 07d3 4505 |E | Exit_Suprogram New_Top_Offset 0x5 07d4 0000 0000 | | .BLANK 0000[0x4] 07d8 ; -------------------------------------------------------------------------------------- 07d8 ; SUBPROGRAM 07d8 ; -------------------------------------------------------------------------------------- 07d8 07db | | .CONST 0x07db ; Address of begin 07d9 0004 | | .CONST 0x0004 ; Address of exception handler 07da 0001 | | .CONST 0x0001 ; Number of locals 07db BODY_07d8: 07db INIT_07d8: 07db e5fb | | Load 0x2,-0x5 07dc e5fc | | Load 0x2,-0x4 07dd e006 | | Load 0x0,0x6 07de 1b0e | | Execute Package,Field_Read,Field_Number 0xe 07df 00d9 | | Load_Top At_Offset_1 07e0 00d0 | | Action Swap_Control 07e1 0260 | ` | Execute Discrete,In_Type 07e2 7001 |p | Jump_Nonzero 0x7e4 07e3 0801 | | Execute_Immediate Raise,0x1 07e4 e5fd | | Load 0x2,-0x3 07e5 e5fe | | Load 0x2,-0x2 07e6 e5ff | | Load 0x2,-0x1 07e7 e007 | | Load 0x0,0x7 07e8 1b16 | | Execute Package,Field_Read,Field_Number 0x16 07e9 1896 | | Execute Package,Field_Execute,Field_Number 0x96 07ea c5fb | | Store 0x2,-0x5 07eb 4505 |E | Exit_Suprogram New_Top_Offset 0x5 07ec 0000 0000 | | .BLANK 0000[0x4] 07f0 ; -------------------------------------------------------------------------------------- 07f0 ; SUBPROGRAM 07f0 ; -------------------------------------------------------------------------------------- 07f0 07f3 | | .CONST 0x07f3 ; Address of begin 07f1 0004 | | .CONST 0x0004 ; Address of exception handler 07f2 0001 | | .CONST 0x0001 ; Number of locals 07f3 BODY_07f0: 07f3 INIT_07f0: 07f3 00da | | Load_Top At_Offset_2 07f4 e007 | | Load 0x0,0x7 07f5 1b16 | | Execute Package,Field_Read,Field_Number 0x16 07f6 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 07f7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07f8 ; -------------------------------------------------------------------------------------- 07f8 ; SUBPROGRAM 07f8 ; -------------------------------------------------------------------------------------- 07f8 07fb | | .CONST 0x07fb ; Address of begin 07f9 0004 | | .CONST 0x0004 ; Address of exception handler 07fa 0001 | | .CONST 0x0001 ; Number of locals 07fb BODY_07f8: 07fb INIT_07f8: 07fb 00da | | Load_Top At_Offset_2 07fc e007 | | Load 0x0,0x7 07fd 1b16 | | Execute Package,Field_Read,Field_Number 0x16 07fe 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b 07ff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0800 ; -------------------------------------------------------------------------------------- 0800 ; SUBPROGRAM 0800 ; -------------------------------------------------------------------------------------- 0800 0803 | | .CONST 0x0803 ; Address of begin 0801 0004 | | .CONST 0x0004 ; Address of exception handler 0802 0001 | | .CONST 0x0001 ; Number of locals 0803 BODY_0800: 0803 INIT_0800: 0803 00da | | Load_Top At_Offset_2 0804 e007 | | Load 0x0,0x7 0805 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0806 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c 0807 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0808 ; -------------------------------------------------------------------------------------- 0808 ; SUBPROGRAM 0808 ; -------------------------------------------------------------------------------------- 0808 080b | | .CONST 0x080b ; Address of begin 0809 0004 | | .CONST 0x0004 ; Address of exception handler 080a 0001 | | .CONST 0x0001 ; Number of locals 080b BODY_0808: 080b INIT_0808: 080b e5fc | | Load 0x2,-0x4 080c e007 | | Load 0x0,0x7 080d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 080e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 080f e5fe | | Load 0x2,-0x2 0810 e5ff | | Load 0x2,-0x1 0811 e007 | | Load 0x0,0x7 0812 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0813 1875 | u | Execute Package,Field_Execute,Field_Number 0x75 0814 c5fd | | Store 0x2,-0x3 0815 c5fc | | Store 0x2,-0x4 0816 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0817 0000 | | .XXX[0x1] 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 00db | | Load_Top At_Offset_3 081c 00db | | Load_Top At_Offset_3 081d e007 | | Load 0x0,0x7 081e 1b16 | | Execute Package,Field_Read,Field_Number 0x16 081f 1876 | v | Execute Package,Field_Execute,Field_Number 0x76 0820 e00a | | Load 0x0,0xa 0821 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0822 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0823 0000 0000 | | .BLANK 0000[0x5] 0828 ; -------------------------------------------------------------------------------------- 0828 ; SUBPROGRAM 0828 ; -------------------------------------------------------------------------------------- 0828 082b | + | .CONST 0x082b ; Address of begin 0829 0004 | | .CONST 0x0004 ; Address of exception handler 082a 0001 | | .CONST 0x0001 ; Number of locals 082b BODY_0828: 082b INIT_0828: 082b 00da | | Load_Top At_Offset_2 082c e007 | | Load 0x0,0x7 082d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 082e 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 082f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0830 ; -------------------------------------------------------------------------------------- 0830 ; SUBPROGRAM 0830 ; -------------------------------------------------------------------------------------- 0830 0833 | 3 | .CONST 0x0833 ; Address of begin 0831 0004 | | .CONST 0x0004 ; Address of exception handler 0832 0001 | | .CONST 0x0001 ; Number of locals 0833 BODY_0830: 0833 INIT_0830: 0833 00da | | Load_Top At_Offset_2 0834 e007 | | Load 0x0,0x7 0835 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0836 1860 | ` | Execute Package,Field_Execute,Field_Number 0x60 0837 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0838 ; -------------------------------------------------------------------------------------- 0838 ; SUBPROGRAM 0838 ; -------------------------------------------------------------------------------------- 0838 083b | ; | .CONST 0x083b ; Address of begin 0839 0004 | | .CONST 0x0004 ; Address of exception handler 083a 0001 | | .CONST 0x0001 ; Number of locals 083b BODY_0838: 083b INIT_0838: 083b 00da | | Load_Top At_Offset_2 083c e007 | | Load 0x0,0x7 083d 1b16 | | Execute Package,Field_Read,Field_Number 0x16 083e 1861 | a | Execute Package,Field_Execute,Field_Number 0x61 083f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0840 ; -------------------------------------------------------------------------------------- 0840 ; SUBPROGRAM 0840 ; -------------------------------------------------------------------------------------- 0840 0843 | C | .CONST 0x0843 ; Address of begin 0841 0004 | | .CONST 0x0004 ; Address of exception handler 0842 0001 | | .CONST 0x0001 ; Number of locals 0843 BODY_0840: 0843 INIT_0840: 0843 4608 |F | Jump_Case 0x9 0844 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0845 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0846 7819 |x | Jump 0x860 ; case 0x2 0847 7818 |x | Jump 0x860 ; case 0x3 0848 7817 |x | Jump 0x860 ; case 0x4 0849 7816 |x | Jump 0x860 ; case 0x5 084a 7815 |x | Jump 0x860 ; case 0x6 084b 7801 |x | Jump 0x84d ; case 0x7 084c 7809 |x | Jump 0x856 ; case 0x8 084d 00db | | Load_Top At_Offset_3 084e 4801 |H | Short_Literal 0x1 084f e5fe | | Load 0x2,-0x2 0850 e20f | | Load 0x1,0xf 0851 035b | [ | Declare_Type Array,Constrained 0852 4801 |H | Short_Literal 0x1 0853 e5ff | | Load 0x2,-0x1 0854 031b | | Declare_Type Variant_Record,Constrained 0855 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0856 00db | | Load_Top At_Offset_3 0857 00db | | Load_Top At_Offset_3 0858 02fc | | Declare_Variable Variant_Record,With_Constraint 0859 4801 |H | Short_Literal 0x1 085a e5fe | | Load 0x2,-0x2 085b e20f | | Load 0x1,0xf 085c 0334 | 4 | Declare_Variable Array,With_Constraint 085d 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3 085e 016a | j | QQ_execute Variant_Record,XXX 085f 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0860 0869 | i | Execute_Immediate Raise,0x69 0861 0000 0000 | | .BLANK 0000[0x7] 0868 ; -------------------------------------------------------------------------------------- 0868 ; SUBPROGRAM 0868 ; -------------------------------------------------------------------------------------- 0868 086b | k | .CONST 0x086b ; Address of begin 0869 0004 | | .CONST 0x0004 ; Address of exception handler 086a 0001 | | .CONST 0x0001 ; Number of locals 086b BODY_0868: 086b INIT_0868: 086b 4608 |F | Jump_Case 0x9 086c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 086d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 086e 7819 |x | Jump 0x888 ; case 0x2 086f 7818 |x | Jump 0x888 ; case 0x3 0870 7817 |x | Jump 0x888 ; case 0x4 0871 7816 |x | Jump 0x888 ; case 0x5 0872 7815 |x | Jump 0x888 ; case 0x6 0873 7801 |x | Jump 0x875 ; case 0x7 0874 7809 |x | Jump 0x87e ; case 0x8 0875 00db | | Load_Top At_Offset_3 0876 4801 |H | Short_Literal 0x1 0877 e5fe | | Load 0x2,-0x2 0878 e228 | ( | Load 0x1,0x28 0879 035b | [ | Declare_Type Array,Constrained 087a 4801 |H | Short_Literal 0x1 087b e5ff | | Load 0x2,-0x1 087c 031b | | Declare_Type Variant_Record,Constrained 087d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 087e 00db | | Load_Top At_Offset_3 087f 00db | | Load_Top At_Offset_3 0880 02fc | | Declare_Variable Variant_Record,With_Constraint 0881 4801 |H | Short_Literal 0x1 0882 e5fe | | Load 0x2,-0x2 0883 e228 | ( | Load 0x1,0x28 0884 0334 | 4 | Declare_Variable Array,With_Constraint 0885 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3 0886 016a | j | QQ_execute Variant_Record,XXX 0887 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0888 0869 | i | Execute_Immediate Raise,0x69 0889 0000 0000 | | .BLANK 0000[0x7] 0890 ; -------------------------------------------------------------------------------------- 0890 ; SUBPROGRAM 0890 ; -------------------------------------------------------------------------------------- 0890 08b0 | | .CONST 0x08b0 ; Address of begin 0891 0004 | | .CONST 0x0004 ; Address of exception handler 0892 0017 | | .CONST 0x0017 ; Number of locals 0893 INIT_0890: 0893 e20f | | Load 0x1,0xf 0894 02a0 | | Declare_Subprogram Null_Subprogram 0895 03ae | | Declare_Type Heap_Access,Defined,Visible 0896 029a 08bb | | Declare_Subprogram INIT_08b8,For_Outer_Call,Visible,Unelaborated 0898 029a 08cb | | Declare_Subprogram INIT_08c8,For_Outer_Call,Visible,Unelaborated 089a 00bf | | Action Accept_Activation 089b e001 | | Load 0x0,0x1 089c e002 | | Load 0x0,0x2 089d e20f | | Load 0x1,0xf 089e e214 | | Load 0x1,0x14 089f 1d10 | | Execute_Immediate Reference_Lex_1,0x10 08a0 1d11 | | Execute_Immediate Reference_Lex_1,0x11 08a1 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 08a2 00c4 | | Action Make_Default 08a3 e003 | | Load 0x0,0x3 08a4 1817 | | Execute Package,Field_Execute,Field_Number 0x17 08a5 c21e | | Store 0x1,0x1e 08a6 e004 | | Load 0x0,0x4 08a7 1b16 | | Execute Package,Field_Read,Field_Number 0x16 08a8 1b62 | b | Execute Package,Field_Read,Field_Number 0x62 08a9 0387 | | Declare_Variable Package 08aa 00d8 | | Load_Top At_Offset_0 08ab 020f | | Execute Module,Activate 08ac 1d15 | | Execute_Immediate Reference_Lex_1,0x15 08ad 00c7 | | Action Elaborate_Subprogram 08ae 1d16 | | Execute_Immediate Reference_Lex_1,0x16 08af 00c7 | | Action Elaborate_Subprogram 08b0 BODY_0890: 08b0 00bc | | Action Signal_Activated 08b1 00bb | | Action Signal_Completion 08b2 0000 0000 | | .BLANK 0000[0x6] 08b8 ; -------------------------------------------------------------------------------------- 08b8 ; SUBPROGRAM 08b8 ; -------------------------------------------------------------------------------------- 08b8 08bb | | .CONST 0x08bb ; Address of begin 08b9 0004 | | .CONST 0x0004 ; Address of exception handler 08ba 0001 | | .CONST 0x0001 ; Number of locals 08bb BODY_08b8: 08bb INIT_08b8: 08bb e5fd | | Load 0x2,-0x3 08bc e5fe | | Load 0x2,-0x2 08bd e20f | | Load 0x1,0xf 08be 0119 | | Execute Any,Check_In_Formal_Type 08bf e5ff | | Load 0x2,-0x1 08c0 e217 | | Load 0x1,0x17 08c1 1815 | | Execute Package,Field_Execute,Field_Number 0x15 08c2 c5fd | | Store 0x2,-0x3 08c3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 08c4 0000 0000 | | .BLANK 0000[0x4] 08c8 ; -------------------------------------------------------------------------------------- 08c8 ; SUBPROGRAM 08c8 ; -------------------------------------------------------------------------------------- 08c8 08cb | | .CONST 0x08cb ; Address of begin 08c9 0004 | | .CONST 0x0004 ; Address of exception handler 08ca 0001 | | .CONST 0x0001 ; Number of locals 08cb BODY_08c8: 08cb INIT_08c8: 08cb 00da | | Load_Top At_Offset_2 08cc e217 | | Load 0x1,0x17 08cd 1816 | | Execute Package,Field_Execute,Field_Number 0x16 08ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08cf 0000 | | .XXX[0x1] 08d0 ; -------------------------------------------------------------------------------------- 08d0 ; Debug Table 08d0 ; -------------------------------------------------------------------------------------- 08d0 0004 000d | | .DEBUG4 0x0004,0x000d,0xd953,0x0000,0x0001,0x0000 08d6 0000 16b2 | | .XXX[0xa6] 08d8 005a e0da | Z | 08da 0000 0036 | 6| 08dc 004a 500e | JP | 08de 0000 17b2 | | 08e0 005a e0da | Z | 08e2 0000 0036 | 6| 08e4 004a 500e | JP | 08e6 0000 18b2 | | 08e8 005a e0da | Z | 08ea 0000 0036 | 6| 08ec 004a 500e | JP | 08ee 0000 19b2 | | 08f0 005a e0da | Z | 08f2 0000 0036 | 6| 08f4 004a 500e | JP | 08f6 0000 1a32 | 2| 08f8 005a e0da | Z | 08fa 0000 0036 | 6| 08fc 004a 500e | JP | 08fe 0000 1b32 | 2| 0900 005a e0da | Z | 0902 0000 0036 | 6| 0904 004a 500e | JP | 0906 0000 1c32 | 2| 0908 005a e0da | Z | 090a 0000 0036 | 6| 090c 004a 500e | JP | 090e 0000 1d32 | 2| 0910 005a e0da | Z | 0912 0000 0036 | 6| 0914 004a 500e | JP | 0916 0000 1e32 | 2| 0918 005a e0da | Z | 091a 0000 0036 | 6| 091c 004a 500e | JP | 091e 0000 1f32 | 2| 0920 005a e0da | Z | 0922 0000 0036 | 6| 0924 004a 500e | JP | 0926 0000 20b2 | | 0928 005a e0da | Z | 092a 0000 0036 | 6| 092c 004a 500e | JP | 092e 0000 2232 | "2| 0930 005a e0da | Z | 0932 0000 0036 | 6| 0934 004a 500e | JP | 0936 0000 23b2 | # | 0938 005a e0da | Z | 093a 0000 0036 | 6| 093c 004a 500e | JP | 093e 0000 2532 | %2| 0940 005a e0da | Z | 0942 0000 0036 | 6| 0944 004a 500e | JP | 0946 0000 2732 | '2| 0948 005a e0da | Z | 094a 0000 0036 | 6| 094c 004a 500e | JP | 094e 0000 28b2 | ( | 0950 005a e0da | Z | 0952 0000 0036 | 6| 0954 004a 500e | JP | 0956 0000 2ab2 | * | 0958 005a e0da | Z | 095a 0000 0036 | 6| 095c 004a 500e | JP | 095e 0000 2d32 | -2| 0960 005a e0da | Z | 0962 0000 07d8 | | 0964 005a e8da | Z | 0966 0000 0000 | | 0968 0006 f804 | | 096a 0000 0032 | 2| 096c 0006 f804 | | 096e 0000 0720 | | 0970 0006 f804 | | 0972 0000 0032 | 2| 0974 0006 f804 | | 0976 0000 06a0 | | 0978 0001 0404 | | 097a 0800 0888 | | 097c 0000 0000 | | .BLANK 0000[0xa] 0986 0057 26c5 | W& | .XXX[0x2] 0988 0000 0000 | | .BLANK 0000[0x7] 098f 0048 | H | .XXX[0x1] 0990 0000 0000 | | .BLANK 0000[0x8] 0998 005a e0da | Z | .XXX[0x5] 099a 0800 0480 | | 099c 8000 | | 099d 0000 0000 | | .BLANK 0000[0x9] 09a6 0057 26c5 | W& | .XXX[0x2] 09a8 0000 0000 | | .BLANK 0000[0x7] 09af 0054 | T | .XXX[0x1] 09b0 0000 0000 | | .BLANK 0000[0x8] 09b8 005a e0da | Z | .XXX[0x5] 09ba 0800 0600 | | 09bc 8000 | | 09bd 0000 0000 | | .BLANK 0000[0x9] 09c6 0057 26c5 | W& | .XXX[0x2] 09c8 0000 0000 | | .BLANK 0000[0x7] 09cf 0060 | ` | .XXX[0x1] 09d0 0000 0000 | | .BLANK 0000[0x8] 09d8 0001 0404 | | .XXX[0x5] 09da 0000 0280 | | 09dc 8000 | | 09dd 0000 0000 | | .BLANK 0000[0x9] 09e6 0057 26c5 | W& | .XXX[0x2] 09e8 0000 0000 | | .BLANK 0000[0x7] 09ef 006c | l | .XXX[0x1] 09f0 0000 0000 | | .BLANK 0000[0x8] 09f8 0001 0404 | | .XXX[0x8] 09fa 0000 0700 | | 09fc 8000 0000 | | 09fe 0000 0000 | |