|
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: 7168 (0x1c00) 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 0c08 | | .CONST 0x0c08 ; 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 8007 | | .CONST 0x8007 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 026d | m | .CONST 0x026d ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 00dc | | .CONST 0x00dc ; Number of locals 000b INIT_0008: 000b 00c4 | | Action Make_Default 000c 00c4 | | Action Make_Default 000d 00c4 | | Action Make_Default 000e 00c4 | | Action Make_Default 000f 00c4 | | Action Make_Default 0010 00c4 | | Action Make_Default 0011 00c4 | | Action Make_Default 0012 00c4 | | Action Make_Default 0013 00c4 | | Action Make_Default 0014 00c4 | | Action Make_Default 0015 00c4 | | Action Make_Default 0016 00c4 | | Action Make_Default 0017 00c4 | | Action Make_Default 0018 00c4 | | Action Make_Default 0019 00c4 | | Action Make_Default 001a 00c4 | | Action Make_Default 001b 00c4 | | Action Make_Default 001c 00c4 | | Action Make_Default 001d 00c4 | | Action Make_Default 001e 00c4 | | Action Make_Default 001f 00c4 | | Action Make_Default 0020 00c4 | | Action Make_Default 0021 00c4 | | Action Make_Default 0022 00c4 | | Action Make_Default 0023 00c4 | | Action Make_Default 0024 00c4 | | Action Make_Default 0025 00c4 | | Action Make_Default 0026 00c4 | | Action Make_Default 0027 00c4 | | Action Make_Default 0028 00c4 | | Action Make_Default 0029 00c4 | | Action Make_Default 002a 00c4 | | Action Make_Default 002b 00c4 | | Action Make_Default 002c 00c4 | | Action Make_Default 002d 00c4 | | Action Make_Default 002e 00c4 | | Action Make_Default 002f 00c4 | | Action Make_Default 0030 00c4 | | Action Make_Default 0031 00c4 | | Action Make_Default 0032 00c4 | | Action Make_Default 0033 00c4 | | Action Make_Default 0034 00c4 | | Action Make_Default 0035 00c4 | | Action Make_Default 0036 00c4 | | Action Make_Default 0037 00c4 | | Action Make_Default 0038 00c4 | | Action Make_Default 0039 00c4 | | Action Make_Default 003a 00c4 | | Action Make_Default 003b 00c4 | | Action Make_Default 003c 00c4 | | Action Make_Default 003d 00c4 | | Action Make_Default 003e 00c4 | | Action Make_Default 003f 00c4 | | Action Make_Default 0040 00c4 | | Action Make_Default 0041 00c4 | | Action Make_Default 0042 00c4 | | Action Make_Default 0043 00c4 | | Action Make_Default 0044 00c4 | | Action Make_Default 0045 00c4 | | Action Make_Default 0046 00c4 | | Action Make_Default 0047 00c4 | | Action Make_Default 0048 00c4 | | Action Make_Default 0049 00c4 | | Action Make_Default 004a 00c4 | | Action Make_Default 004b 00c4 | | Action Make_Default 004c 00c4 | | Action Make_Default 004d 00c4 | | Action Make_Default 004e 00c4 | | Action Make_Default 004f 00c4 | | Action Make_Default 0050 00c4 | | Action Make_Default 0051 00c4 | | Action Make_Default 0052 00c4 | | Action Make_Default 0053 00c4 | | Action Make_Default 0054 00c4 | | Action Make_Default 0055 00c4 | | Action Make_Default 0056 00c4 | | Action Make_Default 0057 00c4 | | Action Make_Default 0058 00c4 | | Action Make_Default 0059 00c4 | | Action Make_Default 005a 00c4 | | Action Make_Default 005b 00c4 | | Action Make_Default 005c 00c4 | | Action Make_Default 005d 00c4 | | Action Make_Default 005e 00c4 | | Action Make_Default 005f 00c4 | | Action Make_Default 0060 00c4 | | Action Make_Default 0061 00c4 | | Action Make_Default 0062 00c4 | | Action Make_Default 0063 00c4 | | Action Make_Default 0064 00c4 | | Action Make_Default 0065 00c4 | | Action Make_Default 0066 00c4 | | Action Make_Default 0067 00c4 | | Action Make_Default 0068 00c4 | | Action Make_Default 0069 00c4 | | Action Make_Default 006a 00c4 | | Action Make_Default 006b 00c4 | | Action Make_Default 006c 00c4 | | Action Make_Default 006d 00c4 | | Action Make_Default 006e 00c4 | | Action Make_Default 006f 00c4 | | Action Make_Default 0070 00c4 | | Action Make_Default 0071 00c4 | | Action Make_Default 0072 00c4 | | Action Make_Default 0073 00c4 | | Action Make_Default 0074 00c4 | | Action Make_Default 0075 00c4 | | Action Make_Default 0076 00c4 | | Action Make_Default 0077 00c4 | | Action Make_Default 0078 00c4 | | Action Make_Default 0079 00c4 | | Action Make_Default 007a 00c4 | | Action Make_Default 007b 00c4 | | Action Make_Default 007c 00c4 | | Action Make_Default 007d 00c4 | | Action Make_Default 007e 00c4 | | Action Make_Default 007f 00c4 | | Action Make_Default 0080 00c4 | | Action Make_Default 0081 00c4 | | Action Make_Default 0082 00c4 | | Action Make_Default 0083 00c4 | | Action Make_Default 0084 00c4 | | Action Make_Default 0085 00c4 | | Action Make_Default 0086 00c4 | | Action Make_Default 0087 00c4 | | Action Make_Default 0088 00c4 | | Action Make_Default 0089 00c4 | | Action Make_Default 008a 00c4 | | Action Make_Default 008b 00c4 | | Action Make_Default 008c 00c4 | | Action Make_Default 008d 00c4 | | Action Make_Default 008e 00c4 | | Action Make_Default 008f 00c4 | | Action Make_Default 0090 00c4 | | Action Make_Default 0091 00c4 | | Action Make_Default 0092 00c4 | | Action Make_Default 0093 00c4 | | Action Make_Default 0094 00c4 | | Action Make_Default 0095 00c4 | | Action Make_Default 0096 00c4 | | Action Make_Default 0097 00c4 | | Action Make_Default 0098 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 00c4 | | Action Make_Default 00a3 00c4 | | Action Make_Default 00a4 00c4 | | Action Make_Default 00a5 00c4 | | Action Make_Default 00a6 00c4 | | Action Make_Default 00a7 00c4 | | Action Make_Default 00a8 00c4 | | Action Make_Default 00a9 00c4 | | Action Make_Default 00aa 00c4 | | Action Make_Default 00ab 00c4 | | Action Make_Default 00ac 00c4 | | Action Make_Default 00ad 00c4 | | Action Make_Default 00ae 00c4 | | Action Make_Default 00af 00c4 | | Action Make_Default 00b0 00c4 | | Action Make_Default 00b1 00c4 | | Action Make_Default 00b2 00c4 | | Action Make_Default 00b3 00c4 | | Action Make_Default 00b4 00c4 | | Action Make_Default 00b5 00c4 | | Action Make_Default 00b6 00c4 | | Action Make_Default 00b7 00c4 | | Action Make_Default 00b8 00c4 | | Action Make_Default 00b9 00c4 | | Action Make_Default 00ba 00c4 | | Action Make_Default 00bb 00c4 | | Action Make_Default 00bc 00c4 | | Action Make_Default 00bd 00c4 | | Action Make_Default 00be 00c4 | | Action Make_Default 00bf 00c4 | | Action Make_Default 00c0 00c4 | | Action Make_Default 00c1 00c4 | | Action Make_Default 00c2 00c4 | | Action Make_Default 00c3 00c4 | | Action Make_Default 00c4 00c4 | | Action Make_Default 00c5 00c4 | | Action Make_Default 00c6 00c4 | | Action Make_Default 00c7 00c4 | | Action Make_Default 00c8 00c4 | | Action Make_Default 00c9 00c4 | | Action Make_Default 00ca 00c4 | | Action Make_Default 00cb 00c4 | | Action Make_Default 00cc 00c4 | | Action Make_Default 00cd 00c4 | | Action Make_Default 00ce 00c4 | | Action Make_Default 00cf 00c4 | | Action Make_Default 00d0 00c4 | | Action Make_Default 00d1 00c4 | | Action Make_Default 00d2 00c4 | | Action Make_Default 00d3 00c4 | | Action Make_Default 00d4 00c4 | | Action Make_Default 00d5 00c4 | | Action Make_Default 00d6 4800 |H | Short_Literal 0x0 00d7 48ff |H | Short_Literal 0xff 00d8 00e5 | | Load_Encached Long_Integer_Cache 00d9 03f9 | | Declare_Type Discrete,Constrained,Visible 00da c2be | | Store 0x1,0xbe 00db 4800 |H | Short_Literal 0x0 00dc 48ff |H | Short_Literal 0xff 00dd 00e5 | | Load_Encached Long_Integer_Cache 00de 03f9 | | Declare_Type Discrete,Constrained,Visible 00df c2bf | | Store 0x1,0xbf 00e0 4800 |H | Short_Literal 0x0 00e1 4803 |H | Short_Literal 0x3 00e2 029f 02a3 | | Declare_Subprogram INIT_02a0,For_Call 00e4 03fe | | Declare_Type Discrete,Defined,Visible 00e5 c2c3 | | Store 0x1,0xc3 00e6 4800 |H | Short_Literal 0x0 00e7 4804 |H | Short_Literal 0x4 00e8 029f 02cb | | Declare_Subprogram INIT_02c8,For_Call 00ea 03fe | | Declare_Type Discrete,Defined,Visible 00eb c2c4 | | Store 0x1,0xc4 00ec e2c4 | | Load 0x1,0xc4 00ed 0266 | f | Execute Discrete,Bounds 00ee 00e1 | | Load_Encached Boolean_Cache 00ef 02a0 | | Declare_Subprogram Null_Subprogram 00f0 4801 |H | Short_Literal 0x1 00f1 035e | ^ | Declare_Type Array,Defined,Visible 00f2 c2c5 | | Store 0x1,0xc5 00f3 4800 |H | Short_Literal 0x0 00f4 4803 |H | Short_Literal 0x3 00f5 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call 00f7 03fe | | Declare_Type Discrete,Defined,Visible 00f8 c2c6 | | Store 0x1,0xc6 00f9 4800 |H | Short_Literal 0x0 00fa 4801 |H | Short_Literal 0x1 00fb 029f 031b | | Declare_Subprogram INIT_0318,For_Call 00fd 03fe | | Declare_Type Discrete,Defined,Visible 00fe c2c9 | | Store 0x1,0xc9 00ff 4800 |H | Short_Literal 0x0 0100 4801 |H | Short_Literal 0x1 0101 029f 0343 | C| Declare_Subprogram INIT_0340,For_Call 0103 03fe | | Declare_Type Discrete,Defined,Visible 0104 c2cb | | Store 0x1,0xcb 0105 4802 |H | Short_Literal 0x2 0106 032b | + | Declare_Type Record,Incomplete,Visible 0107 c262 | b | Store 0x1,0x62 0108 e001 | | Load 0x0,0x1 0109 0129 | ) | Execute Any,Make_Visible 010a c2bc | | Store 0x1,0xbc 010b 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated 010d c263 | c | Store 0x1,0x63 010e 029a 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call,Visible,Unelaborated 0110 c264 | d | Store 0x1,0x64 0111 029a 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call,Visible,Unelaborated 0113 c265 | e | Store 0x1,0x65 0114 029a 0383 | | Declare_Subprogram INIT_0380,For_Outer_Call,Visible,Unelaborated 0116 c266 | f | Store 0x1,0x66 0117 029a 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call,Visible,Unelaborated 0119 c267 | g | Store 0x1,0x67 011a 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated 011c c268 | h | Store 0x1,0x68 011d 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated 011f c269 | i | Store 0x1,0x69 0120 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated 0122 c26a | j | Store 0x1,0x6a 0123 029a 040b | | Declare_Subprogram INIT_0408,For_Outer_Call,Visible,Unelaborated 0125 c26d | m | Store 0x1,0x6d 0126 029a 0423 | #| Declare_Subprogram INIT_0420,For_Outer_Call,Visible,Unelaborated 0128 c26e | n | Store 0x1,0x6e 0129 029a 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Visible,Unelaborated 012b c2b1 | | Store 0x1,0xb1 012c 029a 0453 | S| Declare_Subprogram INIT_0450,For_Outer_Call,Visible,Unelaborated 012e c2b2 | | Store 0x1,0xb2 012f 029a 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call,Visible,Unelaborated 0131 c26f | o | Store 0x1,0x6f 0132 029a 04a3 | | Declare_Subprogram INIT_04a0,For_Outer_Call,Visible,Unelaborated 0134 c270 | p | Store 0x1,0x70 0135 029a 04b3 | | Declare_Subprogram INIT_04b0,For_Outer_Call,Visible,Unelaborated 0137 c271 | q | Store 0x1,0x71 0138 029a 04cb | | Declare_Subprogram INIT_04c8,For_Outer_Call,Visible,Unelaborated 013a c272 | r | Store 0x1,0x72 013b 029a 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call,Visible,Unelaborated 013d c2d0 | | Store 0x1,0xd0 013e 4800 |H | Short_Literal 0x0 013f 4803 |H | Short_Literal 0x3 0140 029f 04fb | | Declare_Subprogram INIT_04f8,For_Call 0142 03fe | | Declare_Type Discrete,Defined,Visible 0143 c2b3 | | Store 0x1,0xb3 0144 029a 0523 | #| Declare_Subprogram INIT_0520,For_Outer_Call,Visible,Unelaborated 0146 c274 | t | Store 0x1,0x74 0147 029a 054b | K| Declare_Subprogram INIT_0548,For_Outer_Call,Visible,Unelaborated 0149 c275 | u | Store 0x1,0x75 014a 029a 055b | [| Declare_Subprogram INIT_0558,For_Outer_Call,Visible,Unelaborated 014c c276 | v | Store 0x1,0x76 014d 029a 0583 | | Declare_Subprogram INIT_0580,For_Outer_Call,Visible,Unelaborated 014f c277 | w | Store 0x1,0x77 0150 029a 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call,Visible,Unelaborated 0152 c278 | x | Store 0x1,0x78 0153 029a 061b | | Declare_Subprogram INIT_0618,For_Outer_Call,Visible,Unelaborated 0155 c279 | y | Store 0x1,0x79 0156 029a 0643 | C| Declare_Subprogram INIT_0640,For_Outer_Call,Visible,Unelaborated 0158 c27a | z | Store 0x1,0x7a 0159 029a 067b | {| Declare_Subprogram INIT_0678,For_Outer_Call,Visible,Unelaborated 015b c27b | { | Store 0x1,0x7b 015c 029a 0683 | | Declare_Subprogram INIT_0680,For_Outer_Call,Visible,Unelaborated 015e c27c | | | Store 0x1,0x7c 015f 029a 0693 | | Declare_Subprogram INIT_0690,For_Outer_Call,Visible,Unelaborated 0161 c2a9 | | Store 0x1,0xa9 0162 029a 069b | | Declare_Subprogram INIT_0698,For_Outer_Call,Visible,Unelaborated 0164 c27d | } | Store 0x1,0x7d 0165 029a 06b3 | | Declare_Subprogram INIT_06b0,For_Outer_Call,Visible,Unelaborated 0167 c2cc | | Store 0x1,0xcc 0168 029a 06c3 | | Declare_Subprogram INIT_06c0,For_Outer_Call,Visible,Unelaborated 016a c2cd | | Store 0x1,0xcd 016b 029a 06d3 | | Declare_Subprogram INIT_06d0,For_Outer_Call,Visible,Unelaborated 016d c287 | | Store 0x1,0x87 016e 029a 06eb | | Declare_Subprogram INIT_06e8,For_Outer_Call,Visible,Unelaborated 0170 c2ce | | Store 0x1,0xce 0171 029a 06fb | | Declare_Subprogram INIT_06f8,For_Outer_Call,Visible,Unelaborated 0173 c2cf | | Store 0x1,0xcf 0174 029a 070b | | Declare_Subprogram INIT_0708,For_Outer_Call,Visible,Unelaborated 0176 c28c | | Store 0x1,0x8c 0177 029a 0723 | #| Declare_Subprogram INIT_0720,For_Outer_Call,Visible,Unelaborated 0179 c290 | | Store 0x1,0x90 017a 029a 073b | ;| Declare_Subprogram INIT_0738,For_Outer_Call,Visible,Unelaborated 017c c26b | k | Store 0x1,0x6b 017d 029a 0753 | S| Declare_Subprogram INIT_0750,For_Outer_Call,Visible,Unelaborated 017f c2d5 | | Store 0x1,0xd5 0180 029a 076b | k| Declare_Subprogram INIT_0768,For_Outer_Call,Visible,Unelaborated 0182 c2d1 | | Store 0x1,0xd1 0183 029a 0783 | | Declare_Subprogram INIT_0780,For_Outer_Call,Visible,Unelaborated 0185 c2d2 | | Store 0x1,0xd2 0186 029a 079b | | Declare_Subprogram INIT_0798,For_Outer_Call,Visible,Unelaborated 0188 c2d3 | | Store 0x1,0xd3 0189 029a 07b3 | | Declare_Subprogram INIT_07b0,For_Outer_Call,Visible,Unelaborated 018b c2b6 | | Store 0x1,0xb6 018c 029a 07db | | Declare_Subprogram INIT_07d8,For_Outer_Call,Visible,Unelaborated 018e c2b7 | | Store 0x1,0xb7 018f 029a 07f3 | | Declare_Subprogram INIT_07f0,For_Outer_Call,Visible,Unelaborated 0191 c2c2 | | Store 0x1,0xc2 0192 029a 081b | | Declare_Subprogram INIT_0818,For_Outer_Call,Visible,Unelaborated 0194 c2d6 | | Store 0x1,0xd6 0195 029a 0833 | 3| Declare_Subprogram INIT_0830,For_Outer_Call,Visible,Unelaborated 0197 c2d7 | | Store 0x1,0xd7 0198 029a 084b | K| Declare_Subprogram INIT_0848,For_Outer_Call,Visible,Unelaborated 019a c2b8 | | Store 0x1,0xb8 019b 029a 085b | [| Declare_Subprogram INIT_0858,For_Outer_Call,Visible,Unelaborated 019d c2b9 | | Store 0x1,0xb9 019e 029a 087b | {| Declare_Subprogram INIT_0878,For_Outer_Call,Visible,Unelaborated 01a0 c224 | $ | Store 0x1,0x24 01a1 029a 0883 | | Declare_Subprogram INIT_0880,For_Outer_Call,Visible,Unelaborated 01a3 c225 | % | Store 0x1,0x25 01a4 029a 088b | | Declare_Subprogram INIT_0888,For_Outer_Call,Visible,Unelaborated 01a6 c256 | V | Store 0x1,0x56 01a7 029a 08a3 | | Declare_Subprogram INIT_08a0,For_Outer_Call,Visible,Unelaborated 01a9 c257 | W | Store 0x1,0x57 01aa 029a 08ab | | Declare_Subprogram INIT_08a8,For_Outer_Call,Visible,Unelaborated 01ac c226 | & | Store 0x1,0x26 01ad 029a 08e3 | | Declare_Subprogram INIT_08e0,For_Outer_Call,Visible,Unelaborated 01af c2ca | | Store 0x1,0xca 01b0 029a 08fb | | Declare_Subprogram INIT_08f8,For_Outer_Call,Visible,Unelaborated 01b2 c2ba | | Store 0x1,0xba 01b3 029a 0923 | #| Declare_Subprogram INIT_0920,For_Outer_Call,Visible,Unelaborated 01b5 c2bb | | Store 0x1,0xbb 01b6 029a 0943 | C| Declare_Subprogram INIT_0940,For_Outer_Call,Visible,Unelaborated 01b8 c29e | | Store 0x1,0x9e 01b9 029a 096b | k| Declare_Subprogram INIT_0968,For_Outer_Call,Visible,Unelaborated 01bb c29f | | Store 0x1,0x9f 01bc 029a 0973 | s| Declare_Subprogram INIT_0970,For_Outer_Call,Visible,Unelaborated 01be c2a0 | | Store 0x1,0xa0 01bf 029a 097b | {| Declare_Subprogram INIT_0978,For_Outer_Call,Visible,Unelaborated 01c1 c2a1 | | Store 0x1,0xa1 01c2 029a 0983 | | Declare_Subprogram INIT_0980,For_Outer_Call,Visible,Unelaborated 01c4 c2c7 | | Store 0x1,0xc7 01c5 029a 0993 | | Declare_Subprogram INIT_0990,For_Outer_Call,Visible,Unelaborated 01c7 c2c8 | | Store 0x1,0xc8 01c8 e2be | | Load 0x1,0xbe 01c9 e2bf | | Load 0x1,0xbf 01ca 02a0 | | Declare_Subprogram Null_Subprogram 01cb 4802 |H | Short_Literal 0x2 01cc 032d | - | Declare_Type Record,Defined 01cd c2a2 | | Store 0x1,0xa2 01ce e2a2 | | Load 0x1,0xa2 01cf 0322 | " | Declare_Variable Record 01d0 4800 |H | Short_Literal 0x0 01d1 00d9 | | Load_Top At_Offset_1 01d2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01d3 4800 |H | Short_Literal 0x0 01d4 00d9 | | Load_Top At_Offset_1 01d5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01d6 c2af | | Store 0x1,0xaf 01d7 e002 | | Load 0x0,0x2 01d8 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 01d9 e2a2 | | Load 0x1,0xa2 01da 029f 0b5b | [| Declare_Subprogram INIT_0b58,For_Call 01dc e262 | b | Load 0x1,0x62 01dd 0326 | & | Complete_Type Record,By_Defining 01de e262 | b | Load 0x1,0x62 01df 0322 | " | Declare_Variable Record 01e0 e003 | | Load 0x0,0x3 01e1 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 01e2 00d9 | | Load_Top At_Offset_1 01e3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01e4 e2af | | Load 0x1,0xaf 01e5 00d9 | | Load_Top At_Offset_1 01e6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01e7 c2a4 | | Store 0x1,0xa4 01e8 00bf | | Action Accept_Activation 01e9 e2bf | | Load 0x1,0xbf 01ea 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 01eb 029d 0a1b | | Declare_Subprogram INIT_0a18,For_Outer_Call 01ed 1d64 | d | Execute_Immediate Reference_Lex_1,0x64 01ee 00c7 | | Action Elaborate_Subprogram 01ef 1d65 | e | Execute_Immediate Reference_Lex_1,0x65 01f0 00c7 | | Action Elaborate_Subprogram 01f1 1d63 | c | Execute_Immediate Reference_Lex_1,0x63 01f2 00c7 | | Action Elaborate_Subprogram 01f3 1d66 | f | Execute_Immediate Reference_Lex_1,0x66 01f4 00c7 | | Action Elaborate_Subprogram 01f5 1d67 | g | Execute_Immediate Reference_Lex_1,0x67 01f6 00c7 | | Action Elaborate_Subprogram 01f7 1d68 | h | Execute_Immediate Reference_Lex_1,0x68 01f8 00c7 | | Action Elaborate_Subprogram 01f9 1d69 | i | Execute_Immediate Reference_Lex_1,0x69 01fa 00c7 | | Action Elaborate_Subprogram 01fb 1d6a | j | Execute_Immediate Reference_Lex_1,0x6a 01fc 00c7 | | Action Elaborate_Subprogram 01fd 1dd3 | | Execute_Immediate Reference_Lex_1,0xd3 01fe 00c7 | | Action Elaborate_Subprogram 01ff 1dc2 | | Execute_Immediate Reference_Lex_1,0xc2 0200 00c7 | | Action Elaborate_Subprogram 0201 1d6d | m | Execute_Immediate Reference_Lex_1,0x6d 0202 00c7 | | Action Elaborate_Subprogram 0203 1d6e | n | Execute_Immediate Reference_Lex_1,0x6e 0204 00c7 | | Action Elaborate_Subprogram 0205 1db1 | | Execute_Immediate Reference_Lex_1,0xb1 0206 00c7 | | Action Elaborate_Subprogram 0207 1db2 | | Execute_Immediate Reference_Lex_1,0xb2 0208 00c7 | | Action Elaborate_Subprogram 0209 1d6f | o | Execute_Immediate Reference_Lex_1,0x6f 020a 00c7 | | Action Elaborate_Subprogram 020b 1d70 | p | Execute_Immediate Reference_Lex_1,0x70 020c 00c7 | | Action Elaborate_Subprogram 020d 029d 0a2b | +| Declare_Subprogram INIT_0a28,For_Outer_Call 020f 1d71 | q | Execute_Immediate Reference_Lex_1,0x71 0210 00c7 | | Action Elaborate_Subprogram 0211 1d72 | r | Execute_Immediate Reference_Lex_1,0x72 0212 00c7 | | Action Elaborate_Subprogram 0213 1d74 | t | Execute_Immediate Reference_Lex_1,0x74 0214 00c7 | | Action Elaborate_Subprogram 0215 1d75 | u | Execute_Immediate Reference_Lex_1,0x75 0216 00c7 | | Action Elaborate_Subprogram 0217 1dd0 | | Execute_Immediate Reference_Lex_1,0xd0 0218 00c7 | | Action Elaborate_Subprogram 0219 1d76 | v | Execute_Immediate Reference_Lex_1,0x76 021a 00c7 | | Action Elaborate_Subprogram 021b 029d 0a4b | K| Declare_Subprogram INIT_0a48,For_Outer_Call 021d 1d77 | w | Execute_Immediate Reference_Lex_1,0x77 021e 00c7 | | Action Elaborate_Subprogram 021f 1da9 | | Execute_Immediate Reference_Lex_1,0xa9 0220 00c7 | | Action Elaborate_Subprogram 0221 1d78 | x | Execute_Immediate Reference_Lex_1,0x78 0222 00c7 | | Action Elaborate_Subprogram 0223 1d79 | y | Execute_Immediate Reference_Lex_1,0x79 0224 00c7 | | Action Elaborate_Subprogram 0225 1d7a | z | Execute_Immediate Reference_Lex_1,0x7a 0226 00c7 | | Action Elaborate_Subprogram 0227 1d7b | { | Execute_Immediate Reference_Lex_1,0x7b 0228 00c7 | | Action Elaborate_Subprogram 0229 1d7c | | | Execute_Immediate Reference_Lex_1,0x7c 022a 00c7 | | Action Elaborate_Subprogram 022b 1d7d | } | Execute_Immediate Reference_Lex_1,0x7d 022c 00c7 | | Action Elaborate_Subprogram 022d 1dcc | | Execute_Immediate Reference_Lex_1,0xcc 022e 00c7 | | Action Elaborate_Subprogram 022f 1dcd | | Execute_Immediate Reference_Lex_1,0xcd 0230 00c7 | | Action Elaborate_Subprogram 0231 1d87 | | Execute_Immediate Reference_Lex_1,0x87 0232 00c7 | | Action Elaborate_Subprogram 0233 1dce | | Execute_Immediate Reference_Lex_1,0xce 0234 00c7 | | Action Elaborate_Subprogram 0235 1dcf | | Execute_Immediate Reference_Lex_1,0xcf 0236 00c7 | | Action Elaborate_Subprogram 0237 1d8c | | Execute_Immediate Reference_Lex_1,0x8c 0238 00c7 | | Action Elaborate_Subprogram 0239 1d90 | | Execute_Immediate Reference_Lex_1,0x90 023a 00c7 | | Action Elaborate_Subprogram 023b 1d6b | k | Execute_Immediate Reference_Lex_1,0x6b 023c 00c7 | | Action Elaborate_Subprogram 023d 1dd5 | | Execute_Immediate Reference_Lex_1,0xd5 023e 00c7 | | Action Elaborate_Subprogram 023f 1dd1 | | Execute_Immediate Reference_Lex_1,0xd1 0240 00c7 | | Action Elaborate_Subprogram 0241 1dd2 | | Execute_Immediate Reference_Lex_1,0xd2 0242 00c7 | | Action Elaborate_Subprogram 0243 029d 0a83 | | Declare_Subprogram INIT_0a80,For_Outer_Call 0245 1db6 | | Execute_Immediate Reference_Lex_1,0xb6 0246 00c7 | | Action Elaborate_Subprogram 0247 1db7 | | Execute_Immediate Reference_Lex_1,0xb7 0248 00c7 | | Action Elaborate_Subprogram 0249 1dd6 | | Execute_Immediate Reference_Lex_1,0xd6 024a 00c7 | | Action Elaborate_Subprogram 024b 1dd7 | | Execute_Immediate Reference_Lex_1,0xd7 024c 00c7 | | Action Elaborate_Subprogram 024d 1db8 | | Execute_Immediate Reference_Lex_1,0xb8 024e 00c7 | | Action Elaborate_Subprogram 024f 1db9 | | Execute_Immediate Reference_Lex_1,0xb9 0250 00c7 | | Action Elaborate_Subprogram 0251 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0252 00c7 | | Action Elaborate_Subprogram 0253 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0254 00c7 | | Action Elaborate_Subprogram 0255 1d56 | V | Execute_Immediate Reference_Lex_1,0x56 0256 00c7 | | Action Elaborate_Subprogram 0257 1d57 | W | Execute_Immediate Reference_Lex_1,0x57 0258 00c7 | | Action Elaborate_Subprogram 0259 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 025a 00c7 | | Action Elaborate_Subprogram 025b 1dca | | Execute_Immediate Reference_Lex_1,0xca 025c 00c7 | | Action Elaborate_Subprogram 025d 1dba | | Execute_Immediate Reference_Lex_1,0xba 025e 00c7 | | Action Elaborate_Subprogram 025f 1dbb | | Execute_Immediate Reference_Lex_1,0xbb 0260 00c7 | | Action Elaborate_Subprogram 0261 1d9e | | Execute_Immediate Reference_Lex_1,0x9e 0262 00c7 | | Action Elaborate_Subprogram 0263 1d9f | | Execute_Immediate Reference_Lex_1,0x9f 0264 00c7 | | Action Elaborate_Subprogram 0265 1da0 | | Execute_Immediate Reference_Lex_1,0xa0 0266 00c7 | | Action Elaborate_Subprogram 0267 1da1 | | Execute_Immediate Reference_Lex_1,0xa1 0268 00c7 | | Action Elaborate_Subprogram 0269 1dc7 | | Execute_Immediate Reference_Lex_1,0xc7 026a 00c7 | | Action Elaborate_Subprogram 026b 1dc8 | | Execute_Immediate Reference_Lex_1,0xc8 026c 00c7 | | Action Elaborate_Subprogram 026d BODY_0008: 026d 00ea | | Load_Encached Null_String_Cache 026e 4800 |H | Short_Literal 0x0 026f e004 | | Load 0x0,0x4 0270 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 0271 e004 | | Load 0x0,0x4 0272 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0273 00ea | | Load_Encached Null_String_Cache 0274 4800 |H | Short_Literal 0x0 0275 e004 | | Load 0x0,0x4 0276 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0277 e004 | | Load 0x0,0x4 0278 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0279 00ea | | Load_Encached Null_String_Cache 027a 00ea | | Load_Encached Null_String_Cache 027b e004 | | Load 0x0,0x4 027c 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 027d e004 | | Load 0x0,0x4 027e 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 027f 00ea | | Load_Encached Null_String_Cache 0280 00ea | | Load_Encached Null_String_Cache 0281 e004 | | Load 0x0,0x4 0282 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 0283 e004 | | Load 0x0,0x4 0284 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0285 00ea | | Load_Encached Null_String_Cache 0286 00ea | | Load_Encached Null_String_Cache 0287 e004 | | Load 0x0,0x4 0288 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 0289 e004 | | Load 0x0,0x4 028a 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 028b 00ea | | Load_Encached Null_String_Cache 028c 00ea | | Load_Encached Null_String_Cache 028d e004 | | Load 0x0,0x4 028e 1b20 | | Execute Package,Field_Read,Field_Number 0x20 028f e004 | | Load 0x0,0x4 0290 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0291 00ea | | Load_Encached Null_String_Cache 0292 4800 |H | Short_Literal 0x0 0293 e004 | | Load 0x0,0x4 0294 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0295 e004 | | Load 0x0,0x4 0296 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0297 00bc | | Action Signal_Activated 0298 00bb | | Action Signal_Completion 0299 0000 0000 | | .BLANK 0000[0x7] 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 4607 |F | Jump_Case 0x8 02a4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 02a5 7806 |x | Jump 0x2ac ; case 0x1 02a6 7809 |x | Jump 0x2b0 ; case 0x2 02a7 780d |x | Jump 0x2b5 ; case 0x3 02a8 7810 |x | Jump 0x2b9 ; case 0x4 02a9 7811 |x | Jump 0x2bb ; case 0x5 02aa 7812 |x | Jump 0x2bd ; case 0x6 02ab 7815 |x | Jump 0x2c1 ; case 0x7 02ac 00da | | Load_Top At_Offset_2 02ad 0091 0b6a | j| Action Push_String_Extended_Indexed,0xb6a ; "UPPER" 02af 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02b0 00db | | Load_Top At_Offset_3 02b1 00db | | Load_Top At_Offset_3 02b2 00e0 | | Load_Encached Standard_Cache 02b3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 02b4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02b5 00da | | Load_Top At_Offset_2 02b6 00e0 | | Load_Encached Standard_Cache 02b7 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02b8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02b9 00db | | Load_Top At_Offset_3 02ba 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02bb 00db | | Load_Top At_Offset_3 02bc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02bd e2c3 | | Load 0x1,0xc3 02be 00dc | | Load_Top At_Offset_4 02bf 0267 | g | Execute Discrete,Predecessor 02c0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02c1 e2c3 | | Load 0x1,0xc3 02c2 00dc | | Load_Top At_Offset_4 02c3 0268 | h | Execute Discrete,Successor 02c4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02c5 0000 0000 | | .XXX[0x3] 02c7 0000 | | 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 4607 |F | Jump_Case 0x8 02cc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 02cd 7806 |x | Jump 0x2d4 ; case 0x1 02ce 7809 |x | Jump 0x2d8 ; case 0x2 02cf 780d |x | Jump 0x2dd ; case 0x3 02d0 7810 |x | Jump 0x2e1 ; case 0x4 02d1 7811 |x | Jump 0x2e3 ; case 0x5 02d2 7812 |x | Jump 0x2e5 ; case 0x6 02d3 7815 |x | Jump 0x2e9 ; case 0x7 02d4 00da | | Load_Top At_Offset_2 02d5 0091 0b6e | n| Action Push_String_Extended_Indexed,0xb6e ; "ASSEMBLE" 02d7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02d8 00db | | Load_Top At_Offset_3 02d9 00db | | Load_Top At_Offset_3 02da 00e0 | | Load_Encached Standard_Cache 02db 181b | | Execute Package,Field_Execute,Field_Number 0x1b 02dc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02dd 00da | | Load_Top At_Offset_2 02de 00e0 | | Load_Encached Standard_Cache 02df 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02e0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02e1 00db | | Load_Top At_Offset_3 02e2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02e3 00db | | Load_Top At_Offset_3 02e4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02e5 e2c4 | | Load 0x1,0xc4 02e6 00dc | | Load_Top At_Offset_4 02e7 0267 | g | Execute Discrete,Predecessor 02e8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02e9 e2c4 | | Load 0x1,0xc4 02ea 00dc | | Load_Top At_Offset_4 02eb 0268 | h | Execute Discrete,Successor 02ec 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02ed 0000 0000 | | .XXX[0x3] 02ef 0000 | | 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 02f3 | | .CONST 0x02f3 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0001 | | .CONST 0x0001 ; Number of locals 02f3 BODY_02f0: 02f3 INIT_02f0: 02f3 4607 |F | Jump_Case 0x8 02f4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 02f5 7806 |x | Jump 0x2fc ; case 0x1 02f6 7809 |x | Jump 0x300 ; case 0x2 02f7 780d |x | Jump 0x305 ; case 0x3 02f8 7810 |x | Jump 0x309 ; case 0x4 02f9 7811 |x | Jump 0x30b ; case 0x5 02fa 7812 |x | Jump 0x30d ; case 0x6 02fb 7815 |x | Jump 0x311 ; case 0x7 02fc 00da | | Load_Top At_Offset_2 02fd 0091 0b73 | s| Action Push_String_Extended_Indexed,0xb73 ; "ON_NORMAL" 02ff 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0300 00db | | Load_Top At_Offset_3 0301 00db | | Load_Top At_Offset_3 0302 00e0 | | Load_Encached Standard_Cache 0303 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0304 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0305 00da | | Load_Top At_Offset_2 0306 00e0 | | Load_Encached Standard_Cache 0307 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0308 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0309 00db | | Load_Top At_Offset_3 030a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 030b 00db | | Load_Top At_Offset_3 030c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 030d e2c6 | | Load 0x1,0xc6 030e 00dc | | Load_Top At_Offset_4 030f 0267 | g | Execute Discrete,Predecessor 0310 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0311 e2c6 | | Load 0x1,0xc6 0312 00dc | | Load_Top At_Offset_4 0313 0268 | h | Execute Discrete,Successor 0314 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0315 0000 0000 | | .XXX[0x3] 0317 0000 | | 0318 ; -------------------------------------------------------------------------------------- 0318 ; SUBPROGRAM 0318 ; -------------------------------------------------------------------------------------- 0318 031b | | .CONST 0x031b ; Address of begin 0319 0004 | | .CONST 0x0004 ; Address of exception handler 031a 0001 | | .CONST 0x0001 ; Number of locals 031b BODY_0318: 031b INIT_0318: 031b 4607 |F | Jump_Case 0x8 031c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 031d 7806 |x | Jump 0x324 ; case 0x1 031e 7809 |x | Jump 0x328 ; case 0x2 031f 780d |x | Jump 0x32d ; case 0x3 0320 7810 |x | Jump 0x331 ; case 0x4 0321 7811 |x | Jump 0x333 ; case 0x5 0322 7812 |x | Jump 0x335 ; case 0x6 0323 7815 |x | Jump 0x339 ; case 0x7 0324 00da | | Load_Top At_Offset_2 0325 0091 0b77 | w| Action Push_String_Extended_Indexed,0xb77 ; "FTP" 0327 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0328 00db | | Load_Top At_Offset_3 0329 00db | | Load_Top At_Offset_3 032a 00e0 | | Load_Encached Standard_Cache 032b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 032c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 032d 00da | | Load_Top At_Offset_2 032e 00e0 | | Load_Encached Standard_Cache 032f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0330 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0331 00db | | Load_Top At_Offset_3 0332 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0333 00db | | Load_Top At_Offset_3 0334 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0335 e2c9 | | Load 0x1,0xc9 0336 00dc | | Load_Top At_Offset_4 0337 0267 | g | Execute Discrete,Predecessor 0338 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0339 e2c9 | | Load 0x1,0xc9 033a 00dc | | Load_Top At_Offset_4 033b 0268 | h | Execute Discrete,Successor 033c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 033d 0000 0000 | | .XXX[0x3] 033f 0000 | | 0340 ; -------------------------------------------------------------------------------------- 0340 ; SUBPROGRAM 0340 ; -------------------------------------------------------------------------------------- 0340 0343 | C | .CONST 0x0343 ; Address of begin 0341 0004 | | .CONST 0x0004 ; Address of exception handler 0342 0001 | | .CONST 0x0001 ; Number of locals 0343 BODY_0340: 0343 INIT_0340: 0343 4607 |F | Jump_Case 0x8 0344 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0345 7806 |x | Jump 0x34c ; case 0x1 0346 7809 |x | Jump 0x350 ; case 0x2 0347 780d |x | Jump 0x355 ; case 0x3 0348 7810 |x | Jump 0x359 ; case 0x4 0349 7811 |x | Jump 0x35b ; case 0x5 034a 7812 |x | Jump 0x35d ; case 0x6 034b 7815 |x | Jump 0x361 ; case 0x7 034c 00da | | Load_Top At_Offset_2 034d 0091 0b79 | y| Action Push_String_Extended_Indexed,0xb79 ; "TEXT" 034f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0350 00db | | Load_Top At_Offset_3 0351 00db | | Load_Top At_Offset_3 0352 00e0 | | Load_Encached Standard_Cache 0353 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0354 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0355 00da | | Load_Top At_Offset_2 0356 00e0 | | Load_Encached Standard_Cache 0357 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0358 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0359 00db | | Load_Top At_Offset_3 035a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 035b 00db | | Load_Top At_Offset_3 035c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 035d e2cb | | Load 0x1,0xcb 035e 00dc | | Load_Top At_Offset_4 035f 0267 | g | Execute Discrete,Predecessor 0360 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0361 e2cb | | Load 0x1,0xcb 0362 00dc | | Load_Top At_Offset_4 0363 0268 | h | Execute Discrete,Successor 0364 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0365 0000 0000 | | .XXX[0x3] 0367 0000 | | 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 00da | | Load_Top At_Offset_2 036c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 036d 0320 | | Declare_Variable Record,Duplicate 036e 00cd | | Action Spare6_Action 036f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0370 ; -------------------------------------------------------------------------------------- 0370 ; SUBPROGRAM 0370 ; -------------------------------------------------------------------------------------- 0370 0373 | s | .CONST 0x0373 ; Address of begin 0371 0004 | | .CONST 0x0004 ; Address of exception handler 0372 0001 | | .CONST 0x0001 ; Number of locals 0373 BODY_0370: 0373 INIT_0370: 0373 00da | | Load_Top At_Offset_2 0374 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0375 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0376 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0377 0000 | | .XXX[0x1] 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 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 037d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 037e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 037f 0000 | | .XXX[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 e262 | b | Load 0x1,0x62 0384 0322 | " | Declare_Variable Record 0385 00db | | Load_Top At_Offset_3 0386 00d9 | | Load_Top At_Offset_1 0387 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0388 00d8 | | Load_Top At_Offset_0 0389 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 038a e5ff | | Load 0x2,-0x1 038b e005 | | Load 0x0,0x5 038c 180f | | Execute Package,Field_Execute,Field_Number 0xf 038d e005 | | Load 0x0,0x5 038e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 038f 00d8 | | Load_Top At_Offset_0 0390 e2be | | Load 0x1,0xbe 0391 0260 | ` | Execute Discrete,In_Type 0392 7001 |p | Jump_Nonzero 0x394 0393 0801 | | Execute_Immediate Raise,0x1 0394 00d9 | | Load_Top At_Offset_1 0395 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0396 e2d8 | | Load 0x1,0xd8 0397 00d0 | | Action Swap_Control 0398 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0399 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 039a 0000 0000 | | .BLANK 0000[0x6] 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 e262 | b | Load 0x1,0x62 03a4 0322 | " | Declare_Variable Record 03a5 00db | | Load_Top At_Offset_3 03a6 00d8 | | Load_Top At_Offset_0 03a7 00e3 | | Load_Encached Natural_Cache 03a8 0260 | ` | Execute Discrete,In_Type 03a9 7001 |p | Jump_Nonzero 0x3ab 03aa 0801 | | Execute_Immediate Raise,0x1 03ab e005 | | Load 0x0,0x5 03ac 1814 | | Execute Package,Field_Execute,Field_Number 0x14 03ad e005 | | Load 0x0,0x5 03ae 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03af 00d9 | | Load_Top At_Offset_1 03b0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03b1 00d8 | | Load_Top At_Offset_0 03b2 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 03b3 e5ff | | Load 0x2,-0x1 03b4 00d9 | | Load_Top At_Offset_1 03b5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03b6 e2d8 | | Load 0x1,0xd8 03b7 00d0 | | Action Swap_Control 03b8 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03b9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03ba 0000 0000 | | .BLANK 0000[0x6] 03c0 ; -------------------------------------------------------------------------------------- 03c0 ; SUBPROGRAM 03c0 ; -------------------------------------------------------------------------------------- 03c0 03c3 | | .CONST 0x03c3 ; Address of begin 03c1 03ca | | .CONST 0x03ca ; Address of exception handler 03c2 0001 | | .CONST 0x0001 ; Number of locals 03c3 BODY_03c0: 03c3 INIT_03c0: 03c3 00da | | Load_Top At_Offset_2 03c4 8263 | c | Call 0x1,0x63 03c5 e006 | | Load 0x0,0x6 03c6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03c7 e007 | | Load 0x0,0x7 03c8 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b 03c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03ca TRAP_03c0: 03ca e007 | | Load 0x0,0x7 03cb 1b17 | | Execute Package,Field_Read,Field_Number 0x17 03cc 010f | | Execute Exception,Equal 03cd 6802 |h | Jump_Zero 0x3d0 03ce e2bc | | Load 0x1,0xbc 03cf 0257 | W | Execute Discrete,Raise 03d0 0100 | | Execute Exception,Raise 03d1 0000 0000 | | .BLANK 0000[0x7] 03d8 ; -------------------------------------------------------------------------------------- 03d8 ; SUBPROGRAM 03d8 ; -------------------------------------------------------------------------------------- 03d8 03db | | .CONST 0x03db ; Address of begin 03d9 03e2 | | .CONST 0x03e2 ; Address of exception handler 03da 0001 | | .CONST 0x0001 ; Number of locals 03db BODY_03d8: 03db INIT_03d8: 03db 00da | | Load_Top At_Offset_2 03dc 8263 | c | Call 0x1,0x63 03dd e006 | | Load 0x0,0x6 03de 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03df e007 | | Load 0x0,0x7 03e0 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c 03e1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03e2 TRAP_03d8: 03e2 e007 | | Load 0x0,0x7 03e3 1b17 | | Execute Package,Field_Read,Field_Number 0x17 03e4 010f | | Execute Exception,Equal 03e5 6802 |h | Jump_Zero 0x3e8 03e6 e2bc | | Load 0x1,0xbc 03e7 0257 | W | Execute Discrete,Raise 03e8 0100 | | Execute Exception,Raise 03e9 0000 0000 | | .BLANK 0000[0x7] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 03f3 | | .CONST 0x03f3 ; Address of begin 03f1 03fa | | .CONST 0x03fa ; Address of exception handler 03f2 0001 | | .CONST 0x0001 ; Number of locals 03f3 BODY_03f0: 03f3 INIT_03f0: 03f3 00da | | Load_Top At_Offset_2 03f4 8263 | c | Call 0x1,0x63 03f5 e006 | | Load 0x0,0x6 03f6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03f7 e007 | | Load 0x0,0x7 03f8 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d 03f9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03fa TRAP_03f0: 03fa e007 | | Load 0x0,0x7 03fb 1b17 | | Execute Package,Field_Read,Field_Number 0x17 03fc 010f | | Execute Exception,Equal 03fd 6802 |h | Jump_Zero 0x400 03fe e2bc | | Load 0x1,0xbc 03ff 0257 | W | Execute Discrete,Raise 0400 0100 | | Execute Exception,Raise 0401 0000 0000 | | .BLANK 0000[0x7] 0408 ; -------------------------------------------------------------------------------------- 0408 ; SUBPROGRAM 0408 ; -------------------------------------------------------------------------------------- 0408 040b | | .CONST 0x040b ; Address of begin 0409 0417 | | .CONST 0x0417 ; Address of exception handler 040a 0001 | | .CONST 0x0001 ; Number of locals 040b BODY_0408: 040b INIT_0408: 040b 00da | | Load_Top At_Offset_2 040c 8263 | c | Call 0x1,0x63 040d e006 | | Load 0x0,0x6 040e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 040f e007 | | Load 0x0,0x7 0410 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 0411 00d8 | | Load_Top At_Offset_0 0412 00e4 | | Load_Encached Positive_Cache 0413 0260 | ` | Execute Discrete,In_Type 0414 7001 |p | Jump_Nonzero 0x416 0415 0801 | | Execute_Immediate Raise,0x1 0416 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0417 TRAP_0408: 0417 e007 | | Load 0x0,0x7 0418 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0419 010f | | Execute Exception,Equal 041a 6802 |h | Jump_Zero 0x41d 041b e2bc | | Load 0x1,0xbc 041c 0257 | W | Execute Discrete,Raise 041d 0100 | | Execute Exception,Raise 041e 0000 0000 | | .XXX[0x2] 0420 ; -------------------------------------------------------------------------------------- 0420 ; SUBPROGRAM 0420 ; -------------------------------------------------------------------------------------- 0420 0423 | # | .CONST 0x0423 ; Address of begin 0421 042a | * | .CONST 0x042a ; Address of exception handler 0422 0001 | | .CONST 0x0001 ; Number of locals 0423 BODY_0420: 0423 INIT_0420: 0423 00da | | Load_Top At_Offset_2 0424 8263 | c | Call 0x1,0x63 0425 e006 | | Load 0x0,0x6 0426 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0427 e007 | | Load 0x0,0x7 0428 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0429 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 042a TRAP_0420: 042a e007 | | Load 0x0,0x7 042b 1b17 | | Execute Package,Field_Read,Field_Number 0x17 042c 010f | | Execute Exception,Equal 042d 6802 |h | Jump_Zero 0x430 042e e2bc | | Load 0x1,0xbc 042f 0257 | W | Execute Discrete,Raise 0430 0100 | | Execute Exception,Raise 0431 0000 0000 | | .BLANK 0000[0x7] 0438 ; -------------------------------------------------------------------------------------- 0438 ; SUBPROGRAM 0438 ; -------------------------------------------------------------------------------------- 0438 043b | ; | .CONST 0x043b ; Address of begin 0439 0442 | B | .CONST 0x0442 ; 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 8263 | c | Call 0x1,0x63 043d e006 | | Load 0x0,0x6 043e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 043f e007 | | Load 0x0,0x7 0440 184a | J | Execute Package,Field_Execute,Field_Number 0x4a 0441 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0442 TRAP_0438: 0442 e007 | | Load 0x0,0x7 0443 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0444 010f | | Execute Exception,Equal 0445 6802 |h | Jump_Zero 0x448 0446 e2bc | | Load 0x1,0xbc 0447 0257 | W | Execute Discrete,Raise 0448 0100 | | Execute Exception,Raise 0449 0000 0000 | | .BLANK 0000[0x7] 0450 ; -------------------------------------------------------------------------------------- 0450 ; SUBPROGRAM 0450 ; -------------------------------------------------------------------------------------- 0450 0453 | S | .CONST 0x0453 ; Address of begin 0451 045a | Z | .CONST 0x045a ; Address of exception handler 0452 0001 | | .CONST 0x0001 ; Number of locals 0453 BODY_0450: 0453 INIT_0450: 0453 00da | | Load_Top At_Offset_2 0454 8263 | c | Call 0x1,0x63 0455 e006 | | Load 0x0,0x6 0456 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0457 e007 | | Load 0x0,0x7 0458 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0459 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 045a TRAP_0450: 045a e007 | | Load 0x0,0x7 045b 1b17 | | Execute Package,Field_Read,Field_Number 0x17 045c 010f | | Execute Exception,Equal 045d 6802 |h | Jump_Zero 0x460 045e e2bc | | Load 0x1,0xbc 045f 0257 | W | Execute Discrete,Raise 0460 0100 | | Execute Exception,Raise 0461 0000 0000 | | .BLANK 0000[0x7] 0468 ; -------------------------------------------------------------------------------------- 0468 ; SUBPROGRAM 0468 ; -------------------------------------------------------------------------------------- 0468 047a | z | .CONST 0x047a ; Address of begin 0469 0004 | | .CONST 0x0004 ; Address of exception handler 046a 0004 | | .CONST 0x0004 ; Number of locals 046b INIT_0468: 046b 4820 |H | Short_Literal 0x20 046c e5fe | | Load 0x2,-0x2 046d e008 | | Load 0x0,0x8 046e 181c | | Execute Package,Field_Execute,Field_Number 0x1c 046f 82d9 | | Call 0x1,0xd9 0470 00db | | Load_Top At_Offset_3 0471 8263 | c | Call 0x1,0x63 0472 e006 | | Load 0x0,0x6 0473 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0474 e007 | | Load 0x0,0x7 0475 184c | L | Execute Package,Field_Execute,Field_Number 0x4c 0476 00d8 | | Load_Top At_Offset_0 0477 01db | | Execute Vector,Length 0478 00e3 | | Load_Encached Natural_Cache 0479 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 047a BODY_0468: 047a 00d8 | | Load_Top At_Offset_0 047b 0c01 | | Execute_Immediate Greater_Equal,0x1 047c 681d |h | Jump_Zero 0x49a 047d 00da | | Load_Top At_Offset_2 047e 01db | | Execute Vector,Length 047f 7002 |p | Jump_Nonzero 0x482 0480 00ea | | Load_Encached Null_String_Cache 0481 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0482 00da | | Load_Top At_Offset_2 0483 01db | | Execute Vector,Length 0484 00d9 | | Load_Top At_Offset_1 0485 027c | | | Execute Discrete,Less 0486 6804 |h | Jump_Zero 0x48b 0487 00da | | Load_Top At_Offset_2 0488 00da | | Load_Top At_Offset_2 0489 01cc | | Execute Vector,Catenate 048a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 048b 4801 |H | Short_Literal 0x1 048c 00db | | Load_Top At_Offset_3 048d 00db | | Load_Top At_Offset_3 048e e008 | | Load 0x0,0x8 048f 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0490 00db | | Load_Top At_Offset_3 0491 01dc | | Execute Vector,Last 0492 027f | | Execute Discrete,Equal 0493 6802 |h | Jump_Zero 0x496 0494 00da | | Load_Top At_Offset_2 0495 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0496 00da | | Load_Top At_Offset_2 0497 00da | | Load_Top At_Offset_2 0498 01cc | | Execute Vector,Catenate 0499 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 049a 00da | | Load_Top At_Offset_2 049b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 049c 0000 0000 | | .BLANK 0000[0x4] 04a0 ; -------------------------------------------------------------------------------------- 04a0 ; SUBPROGRAM 04a0 ; -------------------------------------------------------------------------------------- 04a0 04a9 | | .CONST 0x04a9 ; Address of begin 04a1 0004 | | .CONST 0x0004 ; Address of exception handler 04a2 0003 | | .CONST 0x0003 ; Number of locals 04a3 INIT_04a0: 04a3 00db | | Load_Top At_Offset_3 04a4 00db | | Load_Top At_Offset_3 04a5 826f | o | Call 0x1,0x6f 04a6 e5fd | | Load 0x2,-0x3 04a7 e5ff | | Load 0x2,-0x1 04a8 826f | o | Call 0x1,0x6f 04a9 BODY_04a0: 04a9 00d9 | | Load_Top At_Offset_1 04aa 00d9 | | Load_Top At_Offset_1 04ab 01cc | | Execute Vector,Catenate 04ac 82d9 | | Call 0x1,0xd9 04ad 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 04ae 0000 0000 | | .XXX[0x2] 04b0 ; -------------------------------------------------------------------------------------- 04b0 ; SUBPROGRAM 04b0 ; -------------------------------------------------------------------------------------- 04b0 04b7 | | .CONST 0x04b7 ; Address of begin 04b1 0004 | | .CONST 0x0004 ; Address of exception handler 04b2 0002 | | .CONST 0x0002 ; Number of locals 04b3 INIT_04b0: 04b3 00da | | Load_Top At_Offset_2 04b4 e5fe | | Load 0x2,-0x2 04b5 e5fd | | Load 0x2,-0x3 04b6 82da | | Call 0x1,0xda 04b7 BODY_04b0: 04b7 00d8 | | Load_Top At_Offset_0 04b8 01db | | Execute Vector,Length 04b9 7007 |p | Jump_Nonzero 0x4c1 04ba e5fe | | Load 0x2,-0x2 04bb e5ff | | Load 0x2,-0x1 04bc 826f | o | Call 0x1,0x6f 04bd e5fd | | Load 0x2,-0x3 04be 01cc | | Execute Vector,Catenate 04bf 82d9 | | Call 0x1,0xd9 04c0 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 04c1 00d8 | | Load_Top At_Offset_0 04c2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 04c3 0000 0000 | | .BLANK 0000[0x5] 04c8 ; -------------------------------------------------------------------------------------- 04c8 ; SUBPROGRAM 04c8 ; -------------------------------------------------------------------------------------- 04c8 04cb | | .CONST 0x04cb ; Address of begin 04c9 04d7 | | .CONST 0x04d7 ; Address of exception handler 04ca 0001 | | .CONST 0x0001 ; Number of locals 04cb BODY_04c8: 04cb INIT_04c8: 04cb 00da | | Load_Top At_Offset_2 04cc 8263 | c | Call 0x1,0x63 04cd e006 | | Load 0x0,0x6 04ce 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04cf e007 | | Load 0x0,0x7 04d0 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 04d1 00d8 | | Load_Top At_Offset_0 04d2 00e4 | | Load_Encached Positive_Cache 04d3 0260 | ` | Execute Discrete,In_Type 04d4 7001 |p | Jump_Nonzero 0x4d6 04d5 0801 | | Execute_Immediate Raise,0x1 04d6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04d7 TRAP_04c8: 04d7 e007 | | Load 0x0,0x7 04d8 1b17 | | Execute Package,Field_Read,Field_Number 0x17 04d9 010f | | Execute Exception,Equal 04da 6802 |h | Jump_Zero 0x4dd 04db e2bc | | Load 0x1,0xbc 04dc 0257 | W | Execute Discrete,Raise 04dd 0100 | | Execute Exception,Raise 04de 0000 0000 | | .XXX[0x2] 04e0 ; -------------------------------------------------------------------------------------- 04e0 ; SUBPROGRAM 04e0 ; -------------------------------------------------------------------------------------- 04e0 04e3 | | .CONST 0x04e3 ; Address of begin 04e1 04ea | | .CONST 0x04ea ; Address of exception handler 04e2 0001 | | .CONST 0x0001 ; Number of locals 04e3 BODY_04e0: 04e3 INIT_04e0: 04e3 00da | | Load_Top At_Offset_2 04e4 8263 | c | Call 0x1,0x63 04e5 e006 | | Load 0x0,0x6 04e6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04e7 e007 | | Load 0x0,0x7 04e8 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 04e9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04ea TRAP_04e0: 04ea e007 | | Load 0x0,0x7 04eb 1b17 | | Execute Package,Field_Read,Field_Number 0x17 04ec 010f | | Execute Exception,Equal 04ed 6802 |h | Jump_Zero 0x4f0 04ee e2bc | | Load 0x1,0xbc 04ef 0257 | W | Execute Discrete,Raise 04f0 0100 | | Execute Exception,Raise 04f1 0000 0000 | | .BLANK 0000[0x7] 04f8 ; -------------------------------------------------------------------------------------- 04f8 ; SUBPROGRAM 04f8 ; -------------------------------------------------------------------------------------- 04f8 04fb | | .CONST 0x04fb ; Address of begin 04f9 0004 | | .CONST 0x0004 ; Address of exception handler 04fa 0001 | | .CONST 0x0001 ; Number of locals 04fb BODY_04f8: 04fb INIT_04f8: 04fb 4607 |F | Jump_Case 0x8 04fc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 04fd 7806 |x | Jump 0x504 ; case 0x1 04fe 7809 |x | Jump 0x508 ; case 0x2 04ff 780d |x | Jump 0x50d ; case 0x3 0500 7810 |x | Jump 0x511 ; case 0x4 0501 7811 |x | Jump 0x513 ; case 0x5 0502 7812 |x | Jump 0x515 ; case 0x6 0503 7815 |x | Jump 0x519 ; case 0x7 0504 00da | | Load_Top At_Offset_2 0505 0091 0b7b | {| Action Push_String_Extended_Indexed,0xb7b ; "ADA_SPEC" 0507 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0508 00db | | Load_Top At_Offset_3 0509 00db | | Load_Top At_Offset_3 050a 00e0 | | Load_Encached Standard_Cache 050b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 050c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 050d 00da | | Load_Top At_Offset_2 050e 00e0 | | Load_Encached Standard_Cache 050f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0510 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0511 00db | | Load_Top At_Offset_3 0512 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0513 00db | | Load_Top At_Offset_3 0514 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0515 e2b3 | | Load 0x1,0xb3 0516 00dc | | Load_Top At_Offset_4 0517 0267 | g | Execute Discrete,Predecessor 0518 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0519 e2b3 | | Load 0x1,0xb3 051a 00dc | | Load_Top At_Offset_4 051b 0268 | h | Execute Discrete,Successor 051c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 051d 0000 0000 | | .XXX[0x3] 051f 0000 | | 0520 ; -------------------------------------------------------------------------------------- 0520 ; SUBPROGRAM 0520 ; -------------------------------------------------------------------------------------- 0520 0523 | # | .CONST 0x0523 ; Address of begin 0521 053a | : | .CONST 0x053a ; Address of exception handler 0522 0001 | | .CONST 0x0001 ; Number of locals 0523 BODY_0520: 0523 INIT_0520: 0523 00db | | Load_Top At_Offset_3 0524 4603 |F | Jump_Case 0x4 0525 7805 |x | Jump 0x52b ; case 0x0 0526 780b |x | Jump 0x532 ; case 0x1 0527 7811 |x | Jump 0x539 ; case 0x2 0528 7800 |x | Jump 0x529 ; case 0x3 0529 00ea | | Load_Encached Null_String_Cache 052a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 052b 00da | | Load_Top At_Offset_2 052c 8263 | c | Call 0x1,0x63 052d e006 | | Load 0x0,0x6 052e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 052f e007 | | Load 0x0,0x7 0530 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0531 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0532 00da | | Load_Top At_Offset_2 0533 8263 | c | Call 0x1,0x63 0534 e006 | | Load 0x0,0x6 0535 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0536 e007 | | Load 0x0,0x7 0537 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 0538 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0539 0833 | 3 | Execute_Immediate Raise,0x33 053a TRAP_0520: 053a e007 | | Load 0x0,0x7 053b 1b17 | | Execute Package,Field_Read,Field_Number 0x17 053c 010f | | Execute Exception,Equal 053d 6802 |h | Jump_Zero 0x540 053e e2bc | | Load 0x1,0xbc 053f 0257 | W | Execute Discrete,Raise 0540 0100 | | Execute Exception,Raise 0541 0000 0000 | | .BLANK 0000[0x7] 0548 ; -------------------------------------------------------------------------------------- 0548 ; SUBPROGRAM 0548 ; -------------------------------------------------------------------------------------- 0548 054b | K | .CONST 0x054b ; Address of begin 0549 0004 | | .CONST 0x0004 ; Address of exception handler 054a 0001 | | .CONST 0x0001 ; Number of locals 054b BODY_0548: 054b INIT_0548: 054b 00db | | Load_Top At_Offset_3 054c 00db | | Load_Top At_Offset_3 054d 8276 | v | Call 0x1,0x76 054e 00db | | Load_Top At_Offset_3 054f 8274 | t | Call 0x1,0x74 0550 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0551 0000 0000 | | .BLANK 0000[0x7] 0558 ; -------------------------------------------------------------------------------------- 0558 ; SUBPROGRAM 0558 ; -------------------------------------------------------------------------------------- 0558 0562 | b | .CONST 0x0562 ; Address of begin 0559 0004 | | .CONST 0x0004 ; Address of exception handler 055a 0002 | | .CONST 0x0002 ; Number of locals 055b INIT_0558: 055b e002 | | Load 0x0,0x2 055c 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 055d 02c7 | | Declare_Variable Any 055e e5fe | | Load 0x2,-0x2 055f e002 | | Load 0x0,0x2 0560 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0561 a402 | | Store_Unchecked 0x2,0x2 0562 BODY_0558: 0562 00d8 | | Load_Top At_Offset_0 0563 e009 | | Load 0x0,0x9 0564 180d | | Execute Package,Field_Execute,Field_Number 0xd 0565 012f | / | Execute Any,Equal 0566 680e |h | Jump_Zero 0x575 0567 e5fe | | Load 0x2,-0x2 0568 e00a | | Load 0x0,0xa 0569 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 056a 6802 |h | Jump_Zero 0x56d 056b 4800 |H | Short_Literal 0x0 056c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 056d e5fe | | Load 0x2,-0x2 056e e00a | | Load 0x0,0xa 056f 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 0570 6802 |h | Jump_Zero 0x573 0571 4801 |H | Short_Literal 0x1 0572 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0573 4803 |H | Short_Literal 0x3 0574 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0575 00d8 | | Load_Top At_Offset_0 0576 e009 | | Load 0x0,0x9 0577 180f | | Execute Package,Field_Execute,Field_Number 0xf 0578 012f | / | Execute Any,Equal 0579 6802 |h | Jump_Zero 0x57c 057a 4802 |H | Short_Literal 0x2 057b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 057c 4803 |H | Short_Literal 0x3 057d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 057e 0000 0000 | | .XXX[0x2] 0580 ; -------------------------------------------------------------------------------------- 0580 ; SUBPROGRAM 0580 ; -------------------------------------------------------------------------------------- 0580 05a5 | | .CONST 0x05a5 ; Address of begin 0581 0004 | | .CONST 0x0004 ; Address of exception handler 0582 0009 | | .CONST 0x0009 ; Number of locals 0583 INIT_0580: 0583 00db | | Load_Top At_Offset_3 0584 e002 | | Load 0x0,0x2 0585 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0586 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0587 00d8 | | Load_Top At_Offset_0 0588 e002 | | Load 0x0,0x2 0589 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 058a 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 058b e5ff | | Load 0x2,-0x1 058c 82c2 | | Call 0x1,0xc2 058d e5fe | | Load 0x2,-0x2 058e e5ff | | Load 0x2,-0x1 058f 8276 | v | Call 0x1,0x76 0590 e2b3 | | Load 0x1,0xb3 0591 03f1 | | Declare_Variable Discrete,With_Value 0592 e5fd | | Load 0x2,-0x3 0593 00d9 | | Load_Top At_Offset_1 0594 82db | | Call 0x1,0xdb 0595 e5ff | | Load 0x2,-0x1 0596 82c2 | | Call 0x1,0xc2 0597 00d8 | | Load_Top At_Offset_0 0598 e5ff | | Load 0x2,-0x1 0599 82d0 | | Call 0x1,0xd0 059a 01cc | | Execute Vector,Catenate 059b 00da | | Load_Top At_Offset_2 059c e5ff | | Load 0x2,-0x1 059d 8274 | t | Call 0x1,0x74 059e 01cc | | Execute Vector,Catenate 059f 0007 | | Action Break_Optional 05a0 00e3 | | Load_Encached Natural_Cache 05a1 029f 0a8b | | Declare_Subprogram INIT_0a88,For_Call 05a3 029f 0aa3 | | Declare_Subprogram INIT_0aa0,For_Call 05a5 BODY_0580: 05a5 8408 | | Call 0x2,0x8 05a6 e404 | | Load 0x2,0x4 05a7 0f02 | | Execute_Immediate Equal,0x2 05a8 6802 |h | Jump_Zero 0x5ab 05a9 8409 | | Call 0x2,0x9 05aa 784e |xN | Jump 0x5f9 05ab e403 | | Load 0x2,0x3 05ac 01dd | | Execute Vector,First 05ad e5ff | | Load 0x2,-0x1 05ae 8272 | r | Call 0x1,0x72 05af 0273 | s | Execute Discrete,Plus 05b0 e405 | | Load 0x2,0x5 05b1 01db | | Execute Vector,Length 05b2 0272 | r | Execute Discrete,Minus 05b3 0aff | | Execute_Immediate Plus,-0x1 05b4 005b | [ | Store_Top Discrete,At_Offset_3 05b5 00da | | Load_Top At_Offset_2 05b6 e403 | | Load 0x2,0x3 05b7 01dc | | Execute Vector,Last 05b8 027b | { | Execute Discrete,Greater_Equal 05b9 6804 |h | Jump_Zero 0x5be 05ba e403 | | Load 0x2,0x3 05bb e406 | | Load 0x2,0x6 05bc 01cc | | Execute Vector,Catenate 05bd 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 05be 00da | | Load_Top At_Offset_2 05bf e403 | | Load 0x2,0x3 05c0 01dd | | Execute Vector,First 05c1 027c | | | Execute Discrete,Less 05c2 6820 |h | Jump_Zero 0x5e3 05c3 e00b | | Load 0x0,0xb 05c4 180e | | Execute Package,Field_Execute,Field_Number 0xe 05c5 4801 |H | Short_Literal 0x1 05c6 4802 |H | Short_Literal 0x2 05c7 e00c | | Load 0x0,0xc 05c8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 05c9 035b | [ | Declare_Type Array,Constrained 05ca 0337 | 7 | Declare_Variable Array 05cb e402 | | Load 0x2,0x2 05cc e00c | | Load 0x0,0xc 05cd 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05ce e00c | | Load 0x0,0xc 05cf 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05d0 0119 | | Execute Any,Check_In_Formal_Type 05d1 4801 |H | Short_Literal 0x1 05d2 00da | | Load_Top At_Offset_2 05d3 01d6 | | Execute Vector,Field_Write 05d4 e5ff | | Load 0x2,-0x1 05d5 8272 | r | Call 0x1,0x72 05d6 e00c | | Load 0x0,0xc 05d7 1812 | | Execute Package,Field_Execute,Field_Number 0x12 05d8 e00c | | Load 0x0,0xc 05d9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05da 0119 | | Execute Any,Check_In_Formal_Type 05db 4802 |H | Short_Literal 0x2 05dc 00da | | Load_Top At_Offset_2 05dd 01d6 | | Execute Vector,Field_Write 05de 601d |` | Indirect_Literal Discrete,0x5fc,{0x00000000, 0x000081b8} 05df e00d | | Load 0x0,0xd 05e0 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 05e1 00ea | | Load_Encached Null_String_Cache 05e2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 05e3 00da | | Load_Top At_Offset_2 05e4 e403 | | Load 0x2,0x3 05e5 01d7 | | Execute Vector,Field_Read 05e6 0f5f | _ | Execute_Immediate Equal,0x5f 05e7 6809 |h | Jump_Zero 0x5f1 05e8 e403 | | Load 0x2,0x3 05e9 01dd | | Execute Vector,First 05ea 00db | | Load_Top At_Offset_3 05eb 0aff | | Execute_Immediate Plus,-0x1 05ec e403 | | Load 0x2,0x3 05ed 01cf | | Execute Vector,Slice_Read 05ee e406 | | Load 0x2,0x6 05ef 01cc | | Execute Vector,Catenate 05f0 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 05f1 e403 | | Load 0x2,0x3 05f2 01dd | | Execute Vector,First 05f3 00db | | Load_Top At_Offset_3 05f4 e403 | | Load 0x2,0x3 05f5 01cf | | Execute Vector,Slice_Read 05f6 e406 | | Load 0x2,0x6 05f7 01cc | | Execute Vector,Catenate 05f8 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 05f9 0831 | 1 | Execute_Immediate Raise,0x31 05fa 0000 0000 | | .XXX[0x2] 05fc 0000 0000 | | .LITERAL {0x00000000, 0x000081b8} 0600 ; -------------------------------------------------------------------------------------- 0600 ; SUBPROGRAM 0600 ; -------------------------------------------------------------------------------------- 0600 0607 | | .CONST 0x0607 ; Address of begin 0601 0004 | | .CONST 0x0004 ; Address of exception handler 0602 0002 | | .CONST 0x0002 ; Number of locals 0603 INIT_0600: 0603 00da | | Load_Top At_Offset_2 0604 e5fd | | Load 0x2,-0x3 0605 e5fe | | Load 0x2,-0x2 0606 82da | | Call 0x1,0xda 0607 BODY_0600: 0607 00d8 | | Load_Top At_Offset_0 0608 01db | | Execute Vector,Length 0609 7007 |p | Jump_Nonzero 0x611 060a e5fd | | Load 0x2,-0x3 060b e5ff | | Load 0x2,-0x1 060c 826f | o | Call 0x1,0x6f 060d e5fe | | Load 0x2,-0x2 060e 01cc | | Execute Vector,Catenate 060f 82d9 | | Call 0x1,0xd9 0610 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0611 00d8 | | Load_Top At_Offset_0 0612 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0613 0000 0000 | | .BLANK 0000[0x5] 0618 ; -------------------------------------------------------------------------------------- 0618 ; SUBPROGRAM 0618 ; -------------------------------------------------------------------------------------- 0618 0623 | # | .CONST 0x0623 ; Address of begin 0619 0004 | | .CONST 0x0004 ; Address of exception handler 061a 0002 | | .CONST 0x0002 ; Number of locals 061b INIT_0618: 061b 4801 |H | Short_Literal 0x1 061c e5fe | | Load 0x2,-0x2 061d e5ff | | Load 0x2,-0x1 061e 82d0 | | Call 0x1,0xd0 061f e008 | | Load 0x0,0x8 0620 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0621 00e3 | | Load_Encached Natural_Cache 0622 03f1 | | Declare_Variable Discrete,With_Value 0623 BODY_0618: 0623 00d8 | | Load_Top At_Offset_0 0624 7004 |p | Jump_Nonzero 0x629 0625 e5fe | | Load 0x2,-0x2 0626 0335 | 5 | Declare_Variable Array,Duplicate 0627 00cd | | Action Spare6_Action 0628 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0629 e5fe | | Load 0x2,-0x2 062a 01dd | | Execute Vector,First 062b 00d9 | | Load_Top At_Offset_1 062c e5ff | | Load 0x2,-0x1 062d 82d0 | | Call 0x1,0xd0 062e 01db | | Execute Vector,Length 062f 0272 | r | Execute Discrete,Minus 0630 00d8 | | Load_Top At_Offset_0 0631 00e2 | | Load_Encached Integer_Cache 0632 0260 | ` | Execute Discrete,In_Type 0633 7001 |p | Jump_Nonzero 0x635 0634 0801 | | Execute_Immediate Raise,0x1 0635 e5fe | | Load 0x2,-0x2 0636 01cf | | Execute Vector,Slice_Read 0637 0335 | 5 | Declare_Variable Array,Duplicate 0638 00cd | | Action Spare6_Action 0639 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 063a 0000 0000 | | .BLANK 0000[0x6] 0640 ; -------------------------------------------------------------------------------------- 0640 ; SUBPROGRAM 0640 ; -------------------------------------------------------------------------------------- 0640 064b | K | .CONST 0x064b ; Address of begin 0641 0004 | | .CONST 0x0004 ; Address of exception handler 0642 0002 | | .CONST 0x0002 ; Number of locals 0643 INIT_0640: 0643 4801 |H | Short_Literal 0x1 0644 e5fe | | Load 0x2,-0x2 0645 e5ff | | Load 0x2,-0x1 0646 82d0 | | Call 0x1,0xd0 0647 e008 | | Load 0x0,0x8 0648 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0649 00e3 | | Load_Encached Natural_Cache 064a 03f1 | | Declare_Variable Discrete,With_Value 064b BODY_0640: 064b 00d8 | | Load_Top At_Offset_0 064c 7002 |p | Jump_Nonzero 0x64f 064d 00ea | | Load_Encached Null_String_Cache 064e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 064f e5fd | | Load 0x2,-0x3 0650 6812 |h | Jump_Zero 0x663 0651 00d8 | | Load_Top At_Offset_0 0652 e5ff | | Load 0x2,-0x1 0653 82d0 | | Call 0x1,0xd0 0654 01db | | Execute Vector,Length 0655 0272 | r | Execute Discrete,Minus 0656 0a01 | | Execute_Immediate Plus,0x1 0657 00d8 | | Load_Top At_Offset_0 0658 00e2 | | Load_Encached Integer_Cache 0659 0260 | ` | Execute Discrete,In_Type 065a 7001 |p | Jump_Nonzero 0x65c 065b 0801 | | Execute_Immediate Raise,0x1 065c e5fe | | Load 0x2,-0x2 065d 01dc | | Execute Vector,Last 065e e5fe | | Load 0x2,-0x2 065f 01cf | | Execute Vector,Slice_Read 0660 0335 | 5 | Declare_Variable Array,Duplicate 0661 00cd | | Action Spare6_Action 0662 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0663 00d8 | | Load_Top At_Offset_0 0664 0a01 | | Execute_Immediate Plus,0x1 0665 00d8 | | Load_Top At_Offset_0 0666 00e2 | | Load_Encached Integer_Cache 0667 0260 | ` | Execute Discrete,In_Type 0668 7001 |p | Jump_Nonzero 0x66a 0669 0801 | | Execute_Immediate Raise,0x1 066a e5fe | | Load 0x2,-0x2 066b 01dc | | Execute Vector,Last 066c e5fe | | Load 0x2,-0x2 066d 01cf | | Execute Vector,Slice_Read 066e 0335 | 5 | Declare_Variable Array,Duplicate 066f 00cd | | Action Spare6_Action 0670 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0671 0000 0000 | | .BLANK 0000[0x7] 0678 ; -------------------------------------------------------------------------------------- 0678 ; SUBPROGRAM 0678 ; -------------------------------------------------------------------------------------- 0678 067b | { | .CONST 0x067b ; Address of begin 0679 0004 | | .CONST 0x0004 ; Address of exception handler 067a 0001 | | .CONST 0x0001 ; Number of locals 067b BODY_0678: 067b INIT_0678: 067b e00e | | Load 0x0,0xe 067c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 067d 0257 | W | Execute Discrete,Raise 067e 0000 0000 | | .XXX[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 00db | | Load_Top At_Offset_3 0684 01db | | Execute Vector,Length 0685 0c01 | | Execute_Immediate Greater_Equal,0x1 0686 6805 |h | Jump_Zero 0x68c 0687 00da | | Load_Top At_Offset_2 0688 82d0 | | Call 0x1,0xd0 0689 e5fe | | Load 0x2,-0x2 068a 01cc | | Execute Vector,Catenate 068b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 068c 00ea | | Load_Encached Null_String_Cache 068d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 068e 0000 0000 | | .XXX[0x2] 0690 ; -------------------------------------------------------------------------------------- 0690 ; SUBPROGRAM 0690 ; -------------------------------------------------------------------------------------- 0690 0693 | | .CONST 0x0693 ; Address of begin 0691 0004 | | .CONST 0x0004 ; Address of exception handler 0692 0001 | | .CONST 0x0001 ; Number of locals 0693 BODY_0690: 0693 INIT_0690: 0693 08e2 | | Execute_Immediate Raise,0xe2 0694 0000 0000 | | .BLANK 0000[0x4] 0698 ; -------------------------------------------------------------------------------------- 0698 ; SUBPROGRAM 0698 ; -------------------------------------------------------------------------------------- 0698 069b | | .CONST 0x069b ; Address of begin 0699 06a2 | | .CONST 0x06a2 ; 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 8263 | c | Call 0x1,0x63 069d e006 | | Load 0x0,0x6 069e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 069f e007 | | Load 0x0,0x7 06a0 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 06a1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06a2 TRAP_0698: 06a2 e007 | | Load 0x0,0x7 06a3 1b17 | | Execute Package,Field_Read,Field_Number 0x17 06a4 010f | | Execute Exception,Equal 06a5 6802 |h | Jump_Zero 0x6a8 06a6 e2bc | | Load 0x1,0xbc 06a7 0257 | W | Execute Discrete,Raise 06a8 0100 | | Execute Exception,Raise 06a9 0000 0000 | | .BLANK 0000[0x7] 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 00da | | Load_Top At_Offset_2 06b4 8263 | c | Call 0x1,0x63 06b5 e006 | | Load 0x0,0x6 06b6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 06b7 e007 | | Load 0x0,0x7 06b8 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 06b9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06ba 0000 0000 | | .BLANK 0000[0x6] 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 00da | | Load_Top At_Offset_2 06c4 8263 | c | Call 0x1,0x63 06c5 e006 | | Load 0x0,0x6 06c6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 06c7 e007 | | Load 0x0,0x7 06c8 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 06c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06ca 0000 0000 | | .BLANK 0000[0x6] 06d0 ; -------------------------------------------------------------------------------------- 06d0 ; SUBPROGRAM 06d0 ; -------------------------------------------------------------------------------------- 06d0 06d3 | | .CONST 0x06d3 ; Address of begin 06d1 06da | | .CONST 0x06da ; Address of exception handler 06d2 0001 | | .CONST 0x0001 ; Number of locals 06d3 BODY_06d0: 06d3 INIT_06d0: 06d3 00da | | Load_Top At_Offset_2 06d4 8263 | c | Call 0x1,0x63 06d5 e006 | | Load 0x0,0x6 06d6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 06d7 e007 | | Load 0x0,0x7 06d8 1853 | S | Execute Package,Field_Execute,Field_Number 0x53 06d9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06da TRAP_06d0: 06da e007 | | Load 0x0,0x7 06db 1b17 | | Execute Package,Field_Read,Field_Number 0x17 06dc 010f | | Execute Exception,Equal 06dd 6802 |h | Jump_Zero 0x6e0 06de e2bc | | Load 0x1,0xbc 06df 0257 | W | Execute Discrete,Raise 06e0 0100 | | Execute Exception,Raise 06e1 0000 0000 | | .BLANK 0000[0x7] 06e8 ; -------------------------------------------------------------------------------------- 06e8 ; SUBPROGRAM 06e8 ; -------------------------------------------------------------------------------------- 06e8 06eb | | .CONST 0x06eb ; Address of begin 06e9 0004 | | .CONST 0x0004 ; Address of exception handler 06ea 0001 | | .CONST 0x0001 ; Number of locals 06eb BODY_06e8: 06eb INIT_06e8: 06eb 00da | | Load_Top At_Offset_2 06ec 8263 | c | Call 0x1,0x63 06ed e006 | | Load 0x0,0x6 06ee 1811 | | Execute Package,Field_Execute,Field_Number 0x11 06ef e007 | | Load 0x0,0x7 06f0 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 06f1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06f2 0000 0000 | | .BLANK 0000[0x6] 06f8 ; -------------------------------------------------------------------------------------- 06f8 ; SUBPROGRAM 06f8 ; -------------------------------------------------------------------------------------- 06f8 06fb | | .CONST 0x06fb ; Address of begin 06f9 0004 | | .CONST 0x0004 ; Address of exception handler 06fa 0001 | | .CONST 0x0001 ; Number of locals 06fb BODY_06f8: 06fb INIT_06f8: 06fb 00da | | Load_Top At_Offset_2 06fc 8263 | c | Call 0x1,0x63 06fd e006 | | Load 0x0,0x6 06fe 1811 | | Execute Package,Field_Execute,Field_Number 0x11 06ff e007 | | Load 0x0,0x7 0700 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0701 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0702 0000 0000 | | .BLANK 0000[0x6] 0708 ; -------------------------------------------------------------------------------------- 0708 ; SUBPROGRAM 0708 ; -------------------------------------------------------------------------------------- 0708 070b | | .CONST 0x070b ; Address of begin 0709 0712 | | .CONST 0x0712 ; Address of exception handler 070a 0001 | | .CONST 0x0001 ; Number of locals 070b BODY_0708: 070b INIT_0708: 070b 00da | | Load_Top At_Offset_2 070c 8263 | c | Call 0x1,0x63 070d e006 | | Load 0x0,0x6 070e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 070f e007 | | Load 0x0,0x7 0710 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 0711 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0712 TRAP_0708: 0712 e007 | | Load 0x0,0x7 0713 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0714 010f | | Execute Exception,Equal 0715 6802 |h | Jump_Zero 0x718 0716 e2bc | | Load 0x1,0xbc 0717 0257 | W | Execute Discrete,Raise 0718 0100 | | Execute Exception,Raise 0719 0000 0000 | | .BLANK 0000[0x7] 0720 ; -------------------------------------------------------------------------------------- 0720 ; SUBPROGRAM 0720 ; -------------------------------------------------------------------------------------- 0720 0723 | # | .CONST 0x0723 ; Address of begin 0721 072a | * | .CONST 0x072a ; Address of exception handler 0722 0001 | | .CONST 0x0001 ; Number of locals 0723 BODY_0720: 0723 INIT_0720: 0723 00da | | Load_Top At_Offset_2 0724 8263 | c | Call 0x1,0x63 0725 e006 | | Load 0x0,0x6 0726 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0727 e007 | | Load 0x0,0x7 0728 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 0729 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 072a TRAP_0720: 072a e007 | | Load 0x0,0x7 072b 1b17 | | Execute Package,Field_Read,Field_Number 0x17 072c 010f | | Execute Exception,Equal 072d 6802 |h | Jump_Zero 0x730 072e e2bc | | Load 0x1,0xbc 072f 0257 | W | Execute Discrete,Raise 0730 0100 | | Execute Exception,Raise 0731 0000 0000 | | .BLANK 0000[0x7] 0738 ; -------------------------------------------------------------------------------------- 0738 ; SUBPROGRAM 0738 ; -------------------------------------------------------------------------------------- 0738 073b | ; | .CONST 0x073b ; Address of begin 0739 0742 | B | .CONST 0x0742 ; Address of exception handler 073a 0001 | | .CONST 0x0001 ; Number of locals 073b BODY_0738: 073b INIT_0738: 073b 00da | | Load_Top At_Offset_2 073c 8263 | c | Call 0x1,0x63 073d e006 | | Load 0x0,0x6 073e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 073f e007 | | Load 0x0,0x7 0740 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a 0741 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0742 TRAP_0738: 0742 e007 | | Load 0x0,0x7 0743 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0744 010f | | Execute Exception,Equal 0745 6802 |h | Jump_Zero 0x748 0746 e2bc | | Load 0x1,0xbc 0747 0257 | W | Execute Discrete,Raise 0748 0100 | | Execute Exception,Raise 0749 0000 0000 | | .BLANK 0000[0x7] 0750 ; -------------------------------------------------------------------------------------- 0750 ; SUBPROGRAM 0750 ; -------------------------------------------------------------------------------------- 0750 0753 | S | .CONST 0x0753 ; Address of begin 0751 075a | Z | .CONST 0x075a ; Address of exception handler 0752 0001 | | .CONST 0x0001 ; Number of locals 0753 BODY_0750: 0753 INIT_0750: 0753 00da | | Load_Top At_Offset_2 0754 8263 | c | Call 0x1,0x63 0755 e006 | | Load 0x0,0x6 0756 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0757 e007 | | Load 0x0,0x7 0758 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 0759 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 075a TRAP_0750: 075a e007 | | Load 0x0,0x7 075b 1b17 | | Execute Package,Field_Read,Field_Number 0x17 075c 010f | | Execute Exception,Equal 075d 6802 |h | Jump_Zero 0x760 075e e2bc | | Load 0x1,0xbc 075f 0257 | W | Execute Discrete,Raise 0760 0100 | | Execute Exception,Raise 0761 0000 0000 | | .BLANK 0000[0x7] 0768 ; -------------------------------------------------------------------------------------- 0768 ; SUBPROGRAM 0768 ; -------------------------------------------------------------------------------------- 0768 076b | k | .CONST 0x076b ; Address of begin 0769 0772 | r | .CONST 0x0772 ; Address of exception handler 076a 0001 | | .CONST 0x0001 ; Number of locals 076b BODY_0768: 076b INIT_0768: 076b 00da | | Load_Top At_Offset_2 076c 8263 | c | Call 0x1,0x63 076d e006 | | Load 0x0,0x6 076e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 076f e007 | | Load 0x0,0x7 0770 1856 | V | Execute Package,Field_Execute,Field_Number 0x56 0771 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0772 TRAP_0768: 0772 e007 | | Load 0x0,0x7 0773 1b17 | | Execute Package,Field_Read,Field_Number 0x17 0774 010f | | Execute Exception,Equal 0775 6802 |h | Jump_Zero 0x778 0776 e2bc | | Load 0x1,0xbc 0777 0257 | W | Execute Discrete,Raise 0778 0100 | | Execute Exception,Raise 0779 0000 0000 | | .BLANK 0000[0x7] 0780 ; -------------------------------------------------------------------------------------- 0780 ; SUBPROGRAM 0780 ; -------------------------------------------------------------------------------------- 0780 0783 | | .CONST 0x0783 ; Address of begin 0781 078a | | .CONST 0x078a ; Address of exception handler 0782 0001 | | .CONST 0x0001 ; Number of locals 0783 BODY_0780: 0783 INIT_0780: 0783 00da | | Load_Top At_Offset_2 0784 8263 | c | Call 0x1,0x63 0785 e006 | | Load 0x0,0x6 0786 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0787 e007 | | Load 0x0,0x7 0788 1857 | W | Execute Package,Field_Execute,Field_Number 0x57 0789 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 078a TRAP_0780: 078a e007 | | Load 0x0,0x7 078b 1b17 | | Execute Package,Field_Read,Field_Number 0x17 078c 010f | | Execute Exception,Equal 078d 6802 |h | Jump_Zero 0x790 078e e2bc | | Load 0x1,0xbc 078f 0257 | W | Execute Discrete,Raise 0790 0100 | | Execute Exception,Raise 0791 0000 0000 | | .BLANK 0000[0x7] 0798 ; -------------------------------------------------------------------------------------- 0798 ; SUBPROGRAM 0798 ; -------------------------------------------------------------------------------------- 0798 079b | | .CONST 0x079b ; Address of begin 0799 07a2 | | .CONST 0x07a2 ; Address of exception handler 079a 0001 | | .CONST 0x0001 ; Number of locals 079b BODY_0798: 079b INIT_0798: 079b 00da | | Load_Top At_Offset_2 079c 8263 | c | Call 0x1,0x63 079d e006 | | Load 0x0,0x6 079e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 079f e007 | | Load 0x0,0x7 07a0 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 07a1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07a2 TRAP_0798: 07a2 e007 | | Load 0x0,0x7 07a3 1b17 | | Execute Package,Field_Read,Field_Number 0x17 07a4 010f | | Execute Exception,Equal 07a5 6802 |h | Jump_Zero 0x7a8 07a6 e2bc | | Load 0x1,0xbc 07a7 0257 | W | Execute Discrete,Raise 07a8 0100 | | Execute Exception,Raise 07a9 0000 0000 | | .BLANK 0000[0x7] 07b0 ; -------------------------------------------------------------------------------------- 07b0 ; SUBPROGRAM 07b0 ; -------------------------------------------------------------------------------------- 07b0 07b5 | | .CONST 0x07b5 ; Address of begin 07b1 07ca | | .CONST 0x07ca ; Address of exception handler 07b2 0002 | | .CONST 0x0002 ; Number of locals 07b3 INIT_07b0: 07b3 e007 | | Load 0x0,0x7 07b4 1b13 | | Execute Package,Field_Read,Field_Number 0x13 07b5 BODY_07b0: 07b5 00db | | Load_Top At_Offset_3 07b6 8263 | c | Call 0x1,0x63 07b7 e006 | | Load 0x0,0x6 07b8 1811 | | Execute Package,Field_Execute,Field_Number 0x11 07b9 e007 | | Load 0x0,0x7 07ba 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 07bb 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 07bc 00d8 | | Load_Top At_Offset_0 07bd 4603 |F | Jump_Case 0x4 07be 7805 |x | Jump 0x7c4 ; case 0x0 07bf 7806 |x | Jump 0x7c6 ; case 0x1 07c0 7807 |x | Jump 0x7c8 ; case 0x2 07c1 7800 |x | Jump 0x7c2 ; case 0x3 07c2 4803 |H | Short_Literal 0x3 07c3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07c4 4800 |H | Short_Literal 0x0 07c5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07c6 4801 |H | Short_Literal 0x1 07c7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07c8 4802 |H | Short_Literal 0x2 07c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07ca TRAP_07b0: 07ca e007 | | Load 0x0,0x7 07cb 1b17 | | Execute Package,Field_Read,Field_Number 0x17 07cc 010f | | Execute Exception,Equal 07cd 6802 |h | Jump_Zero 0x7d0 07ce e2bc | | Load 0x1,0xbc 07cf 0257 | W | Execute Discrete,Raise 07d0 0100 | | Execute Exception,Raise 07d1 0000 0000 | | .BLANK 0000[0x7] 07d8 ; -------------------------------------------------------------------------------------- 07d8 ; SUBPROGRAM 07d8 ; -------------------------------------------------------------------------------------- 07d8 07db | | .CONST 0x07db ; Address of begin 07d9 07e7 | | .CONST 0x07e7 ; Address of exception handler 07da 0001 | | .CONST 0x0001 ; Number of locals 07db BODY_07d8: 07db INIT_07d8: 07db 00da | | Load_Top At_Offset_2 07dc 8263 | c | Call 0x1,0x63 07dd e006 | | Load 0x0,0x6 07de 1811 | | Execute Package,Field_Execute,Field_Number 0x11 07df e007 | | Load 0x0,0x7 07e0 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 07e1 00d8 | | Load_Top At_Offset_0 07e2 00e4 | | Load_Encached Positive_Cache 07e3 0260 | ` | Execute Discrete,In_Type 07e4 7001 |p | Jump_Nonzero 0x7e6 07e5 0801 | | Execute_Immediate Raise,0x1 07e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07e7 TRAP_07d8: 07e7 e007 | | Load 0x0,0x7 07e8 1b17 | | Execute Package,Field_Read,Field_Number 0x17 07e9 010f | | Execute Exception,Equal 07ea 6802 |h | Jump_Zero 0x7ed 07eb e2bc | | Load 0x1,0xbc 07ec 0257 | W | Execute Discrete,Raise 07ed 0100 | | Execute Exception,Raise 07ee 0000 0000 | | .XXX[0x2] 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 82d3 | | Call 0x1,0xd3 07f5 6817 |h | Jump_Zero 0x80d 07f6 00da | | Load_Top At_Offset_2 07f7 82b6 | | Call 0x1,0xb6 07f8 4603 |F | Jump_Case 0x4 07f9 7807 |x | Jump 0x801 ; case 0x0 07fa 780a |x | Jump 0x805 ; case 0x1 07fb 780d |x | Jump 0x809 ; case 0x2 07fc 7800 |x | Jump 0x7fd ; case 0x3 07fd 00db | | Load_Top At_Offset_3 07fe 0335 | 5 | Declare_Variable Array,Duplicate 07ff 00cd | | Action Spare6_Action 0800 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0801 00db | | Load_Top At_Offset_3 0802 e008 | | Load 0x0,0x8 0803 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0804 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0805 00db | | Load_Top At_Offset_3 0806 e008 | | Load 0x0,0x8 0807 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0808 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0809 00db | | Load_Top At_Offset_3 080a e008 | | Load 0x0,0x8 080b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 080c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 080d 00db | | Load_Top At_Offset_3 080e 0335 | 5 | Declare_Variable Array,Duplicate 080f 00cd | | Action Spare6_Action 0810 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0811 0000 0000 | | .BLANK 0000[0x7] 0818 ; -------------------------------------------------------------------------------------- 0818 ; SUBPROGRAM 0818 ; -------------------------------------------------------------------------------------- 0818 081b | | .CONST 0x081b ; Address of begin 0819 0004 | | .CONST 0x0004 ; Address of exception handler 081a 0001 | | .CONST 0x0001 ; Number of locals 081b BODY_0818: 081b INIT_0818: 081b 00da | | Load_Top At_Offset_2 081c 827d | } | Call 0x1,0x7d 081d 00db | | Load_Top At_Offset_3 081e 82dc | | Call 0x1,0xdc 081f 01cc | | Execute Vector,Catenate 0820 e5fd | | Load 0x2,-0x3 0821 01cc | | Execute Vector,Catenate 0822 00db | | Load_Top At_Offset_3 0823 82dc | | Call 0x1,0xdc 0824 01cc | | Execute Vector,Catenate 0825 e5fe | | Load 0x2,-0x2 0826 01cc | | Execute Vector,Catenate 0827 00db | | Load_Top At_Offset_3 0828 82dc | | Call 0x1,0xdc 0829 01cc | | Execute Vector,Catenate 082a e5fc | | Load 0x2,-0x4 082b 01cc | | Execute Vector,Catenate 082c 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 082d 0000 0000 | | .XXX[0x3] 082f 0000 | | 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 8287 | | Call 0x1,0x87 0835 00db | | Load_Top At_Offset_3 0836 82dc | | Call 0x1,0xdc 0837 01cc | | Execute Vector,Catenate 0838 e5fd | | Load 0x2,-0x3 0839 01cc | | Execute Vector,Catenate 083a 00db | | Load_Top At_Offset_3 083b 82dc | | Call 0x1,0xdc 083c 01cc | | Execute Vector,Catenate 083d e5fe | | Load 0x2,-0x2 083e 01cc | | Execute Vector,Catenate 083f 00db | | Load_Top At_Offset_3 0840 82dc | | Call 0x1,0xdc 0841 01cc | | Execute Vector,Catenate 0842 e5fc | | Load 0x2,-0x4 0843 01cc | | Execute Vector,Catenate 0844 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 0845 0000 0000 | | .XXX[0x3] 0847 0000 | | 0848 ; -------------------------------------------------------------------------------------- 0848 ; SUBPROGRAM 0848 ; -------------------------------------------------------------------------------------- 0848 084b | K | .CONST 0x084b ; Address of begin 0849 0004 | | .CONST 0x0004 ; Address of exception handler 084a 0001 | | .CONST 0x0001 ; Number of locals 084b BODY_0848: 084b INIT_0848: 084b 00da | | Load_Top At_Offset_2 084c 828c | | Call 0x1,0x8c 084d 00db | | Load_Top At_Offset_3 084e 82dc | | Call 0x1,0xdc 084f 01cc | | Execute Vector,Catenate 0850 e5fd | | Load 0x2,-0x3 0851 01cc | | Execute Vector,Catenate 0852 00db | | Load_Top At_Offset_3 0853 82dc | | Call 0x1,0xdc 0854 01cc | | Execute Vector,Catenate 0855 e5fe | | Load 0x2,-0x2 0856 01cc | | Execute Vector,Catenate 0857 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0858 ; -------------------------------------------------------------------------------------- 0858 ; SUBPROGRAM 0858 ; -------------------------------------------------------------------------------------- 0858 085b | [ | .CONST 0x085b ; Address of begin 0859 0004 | | .CONST 0x0004 ; Address of exception handler 085a 0001 | | .CONST 0x0001 ; Number of locals 085b BODY_0858: 085b INIT_0858: 085b e5fc | | Load 0x2,-0x4 085c 01db | | Execute Vector,Length 085d 6810 |h | Jump_Zero 0x86e 085e 00da | | Load_Top At_Offset_2 085f 8290 | | Call 0x1,0x90 0860 00db | | Load_Top At_Offset_3 0861 82d5 | | Call 0x1,0xd5 0862 01cc | | Execute Vector,Catenate 0863 e5fc | | Load 0x2,-0x4 0864 01cc | | Execute Vector,Catenate 0865 00db | | Load_Top At_Offset_3 0866 82dc | | Call 0x1,0xdc 0867 01cc | | Execute Vector,Catenate 0868 e5fd | | Load 0x2,-0x3 0869 e5fe | | Load 0x2,-0x2 086a e5ff | | Load 0x2,-0x1 086b 8270 | p | Call 0x1,0x70 086c 01cc | | Execute Vector,Catenate 086d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 086e 00da | | Load_Top At_Offset_2 086f 8290 | | Call 0x1,0x90 0870 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0871 0000 0000 | | .BLANK 0000[0x7] 0878 ; -------------------------------------------------------------------------------------- 0878 ; SUBPROGRAM 0878 ; -------------------------------------------------------------------------------------- 0878 087b | { | .CONST 0x087b ; Address of begin 0879 0004 | | .CONST 0x0004 ; Address of exception handler 087a 0001 | | .CONST 0x0001 ; Number of locals 087b BODY_0878: 087b INIT_0878: 087b 4801 |H | Short_Literal 0x1 087c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 087d 0000 0000 | | .XXX[0x3] 087f 0000 | | 0880 ; -------------------------------------------------------------------------------------- 0880 ; SUBPROGRAM 0880 ; -------------------------------------------------------------------------------------- 0880 0883 | | .CONST 0x0883 ; Address of begin 0881 0004 | | .CONST 0x0004 ; Address of exception handler 0882 0001 | | .CONST 0x0001 ; Number of locals 0883 BODY_0880: 0883 INIT_0880: 0883 4801 |H | Short_Literal 0x1 0884 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0885 0000 0000 | | .XXX[0x3] 0887 0000 | | 0888 ; -------------------------------------------------------------------------------------- 0888 ; SUBPROGRAM 0888 ; -------------------------------------------------------------------------------------- 0888 0891 | | .CONST 0x0891 ; Address of begin 0889 0896 | | .CONST 0x0896 ; Address of exception handler 088a 0002 | | .CONST 0x0002 ; Number of locals 088b INIT_0888: 088b e262 | b | Load 0x1,0x62 088c 0322 | " | Declare_Variable Record 088d 00db | | Load_Top At_Offset_3 088e 8267 | g | Call 0x1,0x67 088f 00d9 | | Load_Top At_Offset_1 0890 017d | } | Execute Record,Structure_Write 0891 BODY_0888: 0891 00d8 | | Load_Top At_Offset_0 0892 8263 | c | Call 0x1,0x63 0893 e003 | | Load 0x0,0x3 0894 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0895 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0896 TRAP_0888: 0896 010e | | Execute Exception,Is_Constraint_Error 0897 6803 |h | Jump_Zero 0x89b 0898 0092 0b7f | | Action Push_String_Extended,0xb7f ; "<UNREGISTERED>" 089a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 089b 0100 | | Execute Exception,Raise 089c 0000 0000 | | .BLANK 0000[0x4] 08a0 ; -------------------------------------------------------------------------------------- 08a0 ; SUBPROGRAM 08a0 ; -------------------------------------------------------------------------------------- 08a0 08a3 | | .CONST 0x08a3 ; Address of begin 08a1 0004 | | .CONST 0x0004 ; Address of exception handler 08a2 0001 | | .CONST 0x0001 ; Number of locals 08a3 BODY_08a0: 08a3 INIT_08a0: 08a3 00da | | Load_Top At_Offset_2 08a4 00e0 | | Load_Encached Standard_Cache 08a5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 08a6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08a7 0000 | | .XXX[0x1] 08a8 ; -------------------------------------------------------------------------------------- 08a8 ; SUBPROGRAM 08a8 ; -------------------------------------------------------------------------------------- 08a8 08bd | | .CONST 0x08bd ; Address of begin 08a9 0004 | | .CONST 0x0004 ; Address of exception handler 08aa 0003 | | .CONST 0x0003 ; Number of locals 08ab INIT_08a8: 08ab e007 | | Load 0x0,0x7 08ac 1b10 | | Execute Package,Field_Read,Field_Number 0x10 08ad 0337 | 7 | Declare_Variable Array 08ae e00f | | Load 0x0,0xf 08af 1b0e | | Execute Package,Field_Read,Field_Number 0xe 08b0 0337 | 7 | Declare_Variable Array 08b1 00d8 | | Load_Top At_Offset_0 08b2 0335 | 5 | Declare_Variable Array,Duplicate 08b3 00cd | | Action Spare6_Action 08b4 4808 |H | Short_Literal 0x8 08b5 4800 |H | Short_Literal 0x0 08b6 4800 |H | Short_Literal 0x0 08b7 00d9 | | Load_Top At_Offset_1 08b8 e404 | | Load 0x2,0x4 08b9 01d6 | | Execute Vector,Field_Write 08ba 3ffb |? | Loop_Increasing 0x8b6 08bb 00d9 | | Load_Top At_Offset_1 08bc 01d4 | | Execute Vector,Structure_Write 08bd BODY_08a8: 08bd e5ff | | Load 0x2,-0x1 08be 8267 | g | Call 0x1,0x67 08bf 8263 | c | Call 0x1,0x63 08c0 e006 | | Load 0x0,0x6 08c1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 08c2 e007 | | Load 0x0,0x7 08c3 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 08c4 00da | | Load_Top At_Offset_2 08c5 01d4 | | Execute Vector,Structure_Write 08c6 00cf | | Action Mark_Auxiliary 08c7 4804 |H | Short_Literal 0x4 08c8 4800 |H | Short_Literal 0x0 08c9 0007 | | Action Break_Optional 08ca 00d8 | | Load_Top At_Offset_0 08cb e402 | | Load 0x2,0x2 08cc 01d7 | | Execute Vector,Field_Read 08cd 00d9 | | Load_Top At_Offset_1 08ce 00d8 | | Load_Top At_Offset_0 08cf e00f | | Load 0x0,0xf 08d0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 08d1 0260 | ` | Execute Discrete,In_Type 08d2 7001 |p | Jump_Nonzero 0x8d4 08d3 0801 | | Execute_Immediate Raise,0x1 08d4 e403 | | Load 0x2,0x3 08d5 01d6 | | Execute Vector,Field_Write 08d6 00c8 | | Action Pop_Auxiliary_Range 08d7 3ff2 |? | Loop_Increasing 0x8ca 08d8 00ce | | Action Pop_Auxiliary 08d9 00d8 | | Load_Top At_Offset_0 08da 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08db 0000 0000 | | .BLANK 0000[0x5] 08e0 ; -------------------------------------------------------------------------------------- 08e0 ; SUBPROGRAM 08e0 ; -------------------------------------------------------------------------------------- 08e0 08e5 | | .CONST 0x08e5 ; Address of begin 08e1 0004 | | .CONST 0x0004 ; Address of exception handler 08e2 0002 | | .CONST 0x0002 ; Number of locals 08e3 INIT_08e0: 08e3 e007 | | Load 0x0,0x7 08e4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 08e5 BODY_08e0: 08e5 00db | | Load_Top At_Offset_3 08e6 8263 | c | Call 0x1,0x63 08e7 e006 | | Load 0x0,0x6 08e8 1811 | | Execute Package,Field_Execute,Field_Number 0x11 08e9 e007 | | Load 0x0,0x7 08ea 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 08eb 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 08ec 00d8 | | Load_Top At_Offset_0 08ed 0f01 | | Execute_Immediate Equal,0x1 08ee 7002 |p | Jump_Nonzero 0x8f1 08ef 4801 |H | Short_Literal 0x1 08f0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08f1 4800 |H | Short_Literal 0x0 08f2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08f3 0000 0000 | | .BLANK 0000[0x5] 08f8 ; -------------------------------------------------------------------------------------- 08f8 ; SUBPROGRAM 08f8 ; -------------------------------------------------------------------------------------- 08f8 0900 | | .CONST 0x0900 ; Address of begin 08f9 0914 | | .CONST 0x0914 ; Address of exception handler 08fa 0002 | | .CONST 0x0002 ; Number of locals 08fb INIT_08f8: 08fb e002 | | Load 0x0,0x2 08fc 1b14 | | Execute Package,Field_Read,Field_Number 0x14 08fd 02ff | | Declare_Variable Variant_Record 08fe 00d8 | | Load_Top At_Offset_0 08ff 1c00 | | Execute_Immediate Run_Utility,0x0 0900 BODY_08f8: 0900 e5fd | | Load 0x2,-0x3 0901 4801 |H | Short_Literal 0x1 0902 e5fd | | Load 0x2,-0x3 0903 4801 |H | Short_Literal 0x1 0904 e5fe | | Load 0x2,-0x2 0905 e00a | | Load 0x0,0xa 0906 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0907 e00a | | Load 0x0,0xa 0908 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0909 00d9 | | Load_Top At_Offset_1 090a 016d | m | Execute Variant_Record,Structure_Write 090b 600c |` | Indirect_Literal Discrete,0x918,{0x00000000, 0x00004000} 090c e010 | | Load 0x0,0x10 090d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 090e 0092 0b80 | | Action Push_String_Extended,0xb80 ; "Ftp.Remote_Machine" 0910 00db | | Load_Top At_Offset_3 0911 e011 | | Load 0x0,0x11 0912 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 0913 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0914 TRAP_08f8: 0914 0007 | | Action Break_Optional 0915 00ea | | Load_Encached Null_String_Cache 0916 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0917 0000 | | .XXX[0x1] 0918 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 091c 0000 0000 | | .BLANK 0000[0x4] 0920 ; -------------------------------------------------------------------------------------- 0920 ; SUBPROGRAM 0920 ; -------------------------------------------------------------------------------------- 0920 0928 | ( | .CONST 0x0928 ; Address of begin 0921 093c | < | .CONST 0x093c ; Address of exception handler 0922 0002 | | .CONST 0x0002 ; Number of locals 0923 INIT_0920: 0923 e002 | | Load 0x0,0x2 0924 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0925 02ff | | Declare_Variable Variant_Record 0926 00d8 | | Load_Top At_Offset_0 0927 1c00 | | Execute_Immediate Run_Utility,0x0 0928 BODY_0920: 0928 e5fd | | Load 0x2,-0x3 0929 4801 |H | Short_Literal 0x1 092a e5fd | | Load 0x2,-0x3 092b 4801 |H | Short_Literal 0x1 092c e5fe | | Load 0x2,-0x2 092d e00a | | Load 0x0,0xa 092e 181c | | Execute Package,Field_Execute,Field_Number 0x1c 092f e00a | | Load 0x0,0xa 0930 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0931 00d9 | | Load_Top At_Offset_1 0932 016d | m | Execute Variant_Record,Structure_Write 0933 67e4 |g | Indirect_Literal Discrete,0x918,{0x00000000, 0x00004000} 0934 e010 | | Load 0x0,0x10 0935 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0936 0092 0b81 | | Action Push_String_Extended,0xb81 ; "Ftp.Remote_Directory" 0938 00db | | Load_Top At_Offset_3 0939 e011 | | Load 0x0,0x11 093a 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 093b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 093c TRAP_0920: 093c 0007 | | Action Break_Optional 093d 00ea | | Load_Encached Null_String_Cache 093e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 093f 0000 | | .XXX[0x1] 0940 ; -------------------------------------------------------------------------------------- 0940 ; SUBPROGRAM 0940 ; -------------------------------------------------------------------------------------- 0940 0952 | R | .CONST 0x0952 ; Address of begin 0941 0004 | | .CONST 0x0004 ; Address of exception handler 0942 0005 | | .CONST 0x0005 ; Number of locals 0943 INIT_0940: 0943 e00b | | Load 0x0,0xb 0944 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0945 02c7 | | Declare_Variable Any 0946 e00b | | Load 0x0,0xb 0947 180e | | Execute Package,Field_Execute,Field_Number 0xe 0948 a402 | | Store_Unchecked 0x2,0x2 0949 e00d | | Load 0x0,0xd 094a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 094b e002 | | Load 0x0,0x2 094c 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 094d 0322 | " | Declare_Variable Record 094e 00d8 | | Load_Top At_Offset_0 094f 1c00 | | Execute_Immediate Run_Utility,0x0 0950 029f 0b1b | | Declare_Subprogram INIT_0b18,For_Call 0952 BODY_0940: 0952 8405 | | Call 0x2,0x5 0953 00db | | Load_Top At_Offset_3 0954 00da | | Load_Top At_Offset_2 0955 e012 | | Load 0x0,0x12 0956 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0957 00da | | Load_Top At_Offset_2 0958 e402 | | Load 0x2,0x2 0959 00db | | Load_Top At_Offset_3 095a e013 | | Load 0x0,0x13 095b 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 095c 005b | [ | Store_Top Discrete,At_Offset_3 095d 4800 |H | Short_Literal 0x0 095e 00db | | Load_Top At_Offset_3 095f e00d | | Load 0x0,0xd 0960 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0961 7000 |p | Jump_Nonzero 0x962 0962 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0963 0000 0000 | | .BLANK 0000[0x5] 0968 ; -------------------------------------------------------------------------------------- 0968 ; SUBPROGRAM 0968 ; -------------------------------------------------------------------------------------- 0968 096b | k | .CONST 0x096b ; Address of begin 0969 0004 | | .CONST 0x0004 ; Address of exception handler 096a 0001 | | .CONST 0x0001 ; Number of locals 096b BODY_0968: 096b INIT_0968: 096b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 096c 0000 0000 | | .BLANK 0000[0x4] 0970 ; -------------------------------------------------------------------------------------- 0970 ; SUBPROGRAM 0970 ; -------------------------------------------------------------------------------------- 0970 0973 | s | .CONST 0x0973 ; Address of begin 0971 0004 | | .CONST 0x0004 ; Address of exception handler 0972 0001 | | .CONST 0x0001 ; Number of locals 0973 BODY_0970: 0973 INIT_0970: 0973 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0974 0000 0000 | | .BLANK 0000[0x4] 0978 ; -------------------------------------------------------------------------------------- 0978 ; SUBPROGRAM 0978 ; -------------------------------------------------------------------------------------- 0978 097b | { | .CONST 0x097b ; Address of begin 0979 0004 | | .CONST 0x0004 ; Address of exception handler 097a 0001 | | .CONST 0x0001 ; Number of locals 097b BODY_0978: 097b INIT_0978: 097b 00da | | Load_Top At_Offset_2 097c 829e | | Call 0x1,0x9e 097d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 097e 0000 0000 | | .XXX[0x2] 0980 ; -------------------------------------------------------------------------------------- 0980 ; SUBPROGRAM 0980 ; -------------------------------------------------------------------------------------- 0980 0983 | | .CONST 0x0983 ; Address of begin 0981 0004 | | .CONST 0x0004 ; Address of exception handler 0982 0001 | | .CONST 0x0001 ; Number of locals 0983 BODY_0980: 0983 INIT_0980: 0983 00da | | Load_Top At_Offset_2 0984 0f00 | | Execute_Immediate Equal,0x0 0985 00d8 | | Load_Top At_Offset_0 0986 e2c6 | | Load 0x1,0xc6 0987 0260 | ` | Execute Discrete,In_Type 0988 7001 |p | Jump_Nonzero 0x98a 0989 0801 | | Execute_Immediate Raise,0x1 098a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 098b 0000 0000 | | .BLANK 0000[0x5] 0990 ; -------------------------------------------------------------------------------------- 0990 ; SUBPROGRAM 0990 ; -------------------------------------------------------------------------------------- 0990 0993 | | .CONST 0x0993 ; Address of begin 0991 0004 | | .CONST 0x0004 ; Address of exception handler 0992 0001 | | .CONST 0x0001 ; Number of locals 0993 BODY_0990: 0993 INIT_0990: 0993 4801 |H | Short_Literal 0x1 0994 0092 0b82 | | Action Push_String_Extended,0xb82 ; "Assemble" 0996 e5ff | | Load 0x2,-0x1 0997 e008 | | Load 0x0,0x8 0998 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0999 6810 |h | Jump_Zero 0x9aa 099a e2c5 | | Load 0x1,0xc5 099b 0337 | 7 | Declare_Variable Array 099c 4801 |H | Short_Literal 0x1 099d 4800 |H | Short_Literal 0x0 099e 00da | | Load_Top At_Offset_2 099f 01d6 | | Execute Vector,Field_Write 09a0 4804 |H | Short_Literal 0x4 09a1 4801 |H | Short_Literal 0x1 09a2 4800 |H | Short_Literal 0x0 09a3 00d9 | | Load_Top At_Offset_1 09a4 e402 | | Load 0x2,0x2 09a5 01d6 | | Execute Vector,Field_Write 09a6 3ffb |? | Loop_Increasing 0x9a2 09a7 e2c5 | | Load 0x1,0xc5 09a8 01c3 | | Execute Vector,Check_In_Type 09a9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09aa 4801 |H | Short_Literal 0x1 09ab 0092 0b83 | | Action Push_String_Extended,0xb83 ; "Promote" 09ad e5ff | | Load 0x2,-0x1 09ae e008 | | Load 0x0,0x8 09af 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 09b0 6814 |h | Jump_Zero 0x9c5 09b1 e2c5 | | Load 0x1,0xc5 09b2 0337 | 7 | Declare_Variable Array 09b3 4801 |H | Short_Literal 0x1 09b4 4801 |H | Short_Literal 0x1 09b5 00da | | Load_Top At_Offset_2 09b6 01d6 | | Execute Vector,Field_Write 09b7 4800 |H | Short_Literal 0x0 09b8 4800 |H | Short_Literal 0x0 09b9 00da | | Load_Top At_Offset_2 09ba 01d6 | | Execute Vector,Field_Write 09bb 4804 |H | Short_Literal 0x4 09bc 4802 |H | Short_Literal 0x2 09bd 4800 |H | Short_Literal 0x0 09be 00d9 | | Load_Top At_Offset_1 09bf e402 | | Load 0x2,0x2 09c0 01d6 | | Execute Vector,Field_Write 09c1 3ffb |? | Loop_Increasing 0x9bd 09c2 e2c5 | | Load 0x1,0xc5 09c3 01c3 | | Execute Vector,Check_In_Type 09c4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09c5 4801 |H | Short_Literal 0x1 09c6 0092 0b84 | | Action Push_String_Extended,0xb84 ; "Demote" 09c8 e5ff | | Load 0x2,-0x1 09c9 e008 | | Load 0x0,0x8 09ca 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 09cb 6819 |h | Jump_Zero 0x9e5 09cc e2c5 | | Load 0x1,0xc5 09cd 0337 | 7 | Declare_Variable Array 09ce 4801 |H | Short_Literal 0x1 09cf 4802 |H | Short_Literal 0x2 09d0 00da | | Load_Top At_Offset_2 09d1 01d6 | | Execute Vector,Field_Write 09d2 4800 |H | Short_Literal 0x0 09d3 4800 |H | Short_Literal 0x0 09d4 00da | | Load_Top At_Offset_2 09d5 01d6 | | Execute Vector,Field_Write 09d6 4800 |H | Short_Literal 0x0 09d7 4801 |H | Short_Literal 0x1 09d8 00da | | Load_Top At_Offset_2 09d9 01d6 | | Execute Vector,Field_Write 09da 4800 |H | Short_Literal 0x0 09db 4803 |H | Short_Literal 0x3 09dc 00da | | Load_Top At_Offset_2 09dd 01d6 | | Execute Vector,Field_Write 09de 4800 |H | Short_Literal 0x0 09df 4804 |H | Short_Literal 0x4 09e0 00da | | Load_Top At_Offset_2 09e1 01d6 | | Execute Vector,Field_Write 09e2 e2c5 | | Load 0x1,0xc5 09e3 01c3 | | Execute Vector,Check_In_Type 09e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09e5 4801 |H | Short_Literal 0x1 09e6 0092 0b85 | | Action Push_String_Extended,0xb85 ; "Bind" 09e8 e5ff | | Load 0x2,-0x1 09e9 e008 | | Load 0x0,0x8 09ea 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 09eb 6814 |h | Jump_Zero 0xa00 09ec e2c5 | | Load 0x1,0xc5 09ed 0337 | 7 | Declare_Variable Array 09ee 4801 |H | Short_Literal 0x1 09ef 4803 |H | Short_Literal 0x3 09f0 00da | | Load_Top At_Offset_2 09f1 01d6 | | Execute Vector,Field_Write 09f2 4802 |H | Short_Literal 0x2 09f3 4800 |H | Short_Literal 0x0 09f4 4800 |H | Short_Literal 0x0 09f5 00d9 | | Load_Top At_Offset_1 09f6 e402 | | Load 0x2,0x2 09f7 01d6 | | Execute Vector,Field_Write 09f8 3ffb |? | Loop_Increasing 0x9f4 09f9 4800 |H | Short_Literal 0x0 09fa 4804 |H | Short_Literal 0x4 09fb 00da | | Load_Top At_Offset_2 09fc 01d6 | | Execute Vector,Field_Write 09fd e2c5 | | Load 0x1,0xc5 09fe 01c3 | | Execute Vector,Check_In_Type 09ff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a00 4801 |H | Short_Literal 0x1 0a01 0092 0b86 | | Action Push_String_Extended,0xb86 ; "Link" 0a03 e5ff | | Load 0x2,-0x1 0a04 e008 | | Load 0x0,0x8 0a05 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0a06 6810 |h | Jump_Zero 0xa17 0a07 e2c5 | | Load 0x1,0xc5 0a08 0337 | 7 | Declare_Variable Array 0a09 4801 |H | Short_Literal 0x1 0a0a 4804 |H | Short_Literal 0x4 0a0b 00da | | Load_Top At_Offset_2 0a0c 01d6 | | Execute Vector,Field_Write 0a0d 4803 |H | Short_Literal 0x3 0a0e 4800 |H | Short_Literal 0x0 0a0f 4800 |H | Short_Literal 0x0 0a10 00d9 | | Load_Top At_Offset_1 0a11 e402 | | Load 0x2,0x2 0a12 01d6 | | Execute Vector,Field_Write 0a13 3ffb |? | Loop_Increasing 0xa0f 0a14 e2c5 | | Load 0x1,0xc5 0a15 01c3 | | Execute Vector,Check_In_Type 0a16 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a17 0831 | 1 | Execute_Immediate Raise,0x31 0a18 ; -------------------------------------------------------------------------------------- 0a18 ; SUBPROGRAM 0a18 ; -------------------------------------------------------------------------------------- 0a18 0a1d | | .CONST 0x0a1d ; Address of begin 0a19 0004 | | .CONST 0x0004 ; Address of exception handler 0a1a 0002 | | .CONST 0x0002 ; Number of locals 0a1b INIT_0a18: 0a1b 029f 0b43 | C| Declare_Subprogram INIT_0b40,For_Call 0a1d BODY_0a18: 0a1d 00db | | Load_Top At_Offset_3 0a1e 01dd | | Execute Vector,First 0a1f 0f01 | | Execute_Immediate Equal,0x1 0a20 6802 |h | Jump_Zero 0xa23 0a21 00db | | Load_Top At_Offset_3 0a22 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a23 8402 | | Call 0x2,0x2 0a24 0831 | 1 | Execute_Immediate Raise,0x31 0a25 0000 0000 | | .XXX[0x3] 0a27 0000 | | 0a28 ; -------------------------------------------------------------------------------------- 0a28 ; SUBPROGRAM 0a28 ; -------------------------------------------------------------------------------------- 0a28 0a2b | + | .CONST 0x0a2b ; Address of begin 0a29 0004 | | .CONST 0x0004 ; Address of exception handler 0a2a 0001 | | .CONST 0x0001 ; Number of locals 0a2b BODY_0a28: 0a2b INIT_0a28: 0a2b e5fd | | Load 0x2,-0x3 0a2c 8263 | c | Call 0x1,0x63 0a2d e006 | | Load 0x0,0x6 0a2e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0a2f e007 | | Load 0x0,0x7 0a30 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e 0a31 0f04 | | Execute_Immediate Equal,0x4 0a32 680d |h | Jump_Zero 0xa40 0a33 0092 0b87 | | Action Push_String_Extended,0xb87 ; "'" 0a35 e5fe | | Load 0x2,-0x2 0a36 01cc | | Execute Vector,Catenate 0a37 0092 0b88 | | Action Push_String_Extended,0xb88 ; "(" 0a39 01cc | | Execute Vector,Catenate 0a3a 00db | | Load_Top At_Offset_3 0a3b 01cc | | Execute Vector,Catenate 0a3c 0092 0b89 | | Action Push_String_Extended,0xb89 ; ")'" 0a3e 01cc | | Execute Vector,Catenate 0a3f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0a40 00ea | | Load_Encached Null_String_Cache 0a41 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0a42 0000 0000 | | .BLANK 0000[0x6] 0a48 ; -------------------------------------------------------------------------------------- 0a48 ; SUBPROGRAM 0a48 ; -------------------------------------------------------------------------------------- 0a48 0a4b | K | .CONST 0x0a4b ; Address of begin 0a49 0004 | | .CONST 0x0004 ; Address of exception handler 0a4a 0001 | | .CONST 0x0001 ; Number of locals 0a4b BODY_0a48: 0a4b INIT_0a48: 0a4b 00da | | Load_Top At_Offset_2 0a4c 4603 |F | Jump_Case 0x4 0a4d 7805 |x | Jump 0xa53 ; case 0x0 0a4e 7811 |x | Jump 0xa60 ; case 0x1 0a4f 781d |x | Jump 0xa6d ; case 0x2 0a50 7800 |x | Jump 0xa51 ; case 0x3 0a51 00ea | | Load_Encached Null_String_Cache 0a52 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0a53 0092 0b8a | | Action Push_String_Extended,0xb8a ; "_" 0a55 4820 |H | Short_Literal 0x20 0a56 4800 |H | Short_Literal 0x0 0a57 480a |H | Short_Literal 0xa 0a58 e5fe | | Load 0x2,-0x2 0a59 e008 | | Load 0x0,0x8 0a5a 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0a5b 01cc | | Execute Vector,Catenate 0a5c 0092 0b8b | | Action Push_String_Extended,0xb8b ; "_s" 0a5e 01cc | | Execute Vector,Catenate 0a5f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0a60 0092 0b8a | | Action Push_String_Extended,0xb8a ; "_" 0a62 4820 |H | Short_Literal 0x20 0a63 4800 |H | Short_Literal 0x0 0a64 480a |H | Short_Literal 0xa 0a65 e5fe | | Load 0x2,-0x2 0a66 e008 | | Load 0x0,0x8 0a67 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0a68 01cc | | Execute Vector,Catenate 0a69 0092 0b8c | | Action Push_String_Extended,0xb8c ; "_b" 0a6b 01cc | | Execute Vector,Catenate 0a6c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0a6d 0092 0b8a | | Action Push_String_Extended,0xb8a ; "_" 0a6f 4820 |H | Short_Literal 0x20 0a70 4800 |H | Short_Literal 0x0 0a71 480a |H | Short_Literal 0xa 0a72 e5fe | | Load 0x2,-0x2 0a73 e008 | | Load 0x0,0x8 0a74 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0a75 01cc | | Execute Vector,Catenate 0a76 0092 0b8d | | Action Push_String_Extended,0xb8d ; "_t" 0a78 01cc | | Execute Vector,Catenate 0a79 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0a7a 0000 0000 | | .BLANK 0000[0x6] 0a80 ; -------------------------------------------------------------------------------------- 0a80 ; SUBPROGRAM 0a80 ; -------------------------------------------------------------------------------------- 0a80 0a83 | | .CONST 0x0a83 ; Address of begin 0a81 0004 | | .CONST 0x0004 ; Address of exception handler 0a82 0001 | | .CONST 0x0001 ; Number of locals 0a83 BODY_0a80: 0a83 INIT_0a80: 0a83 0092 0b8e | | Action Push_String_Extended,0xb8e ; " " 0a85 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a86 0000 0000 | | .XXX[0x2] 0a88 ; -------------------------------------------------------------------------------------- 0a88 ; SUBPROGRAM 0a88 ; -------------------------------------------------------------------------------------- 0a88 0a92 | | .CONST 0x0a92 ; Address of begin 0a89 0004 | | .CONST 0x0004 ; Address of exception handler 0a8a 0002 | | .CONST 0x0002 ; Number of locals 0a8b INIT_0a88: 0a8b e5ff | | Load 0x2,-0x1 0a8c 8263 | c | Call 0x1,0x63 0a8d e5fd | | Load 0x2,-0x3 0a8e e404 | | Load 0x2,0x4 0a8f e5fe | | Load 0x2,-0x2 0a90 e014 | | Load 0x0,0x14 0a91 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a92 BODY_0a88: 0a92 00d8 | | Load_Top At_Offset_0 0a93 01db | | Execute Vector,Length 0a94 6803 |h | Jump_Zero 0xa98 0a95 00d8 | | Load_Top At_Offset_0 0a96 00cb | | Action Pop_Block_With_Result 0a97 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0a98 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a99 0000 0000 | | .BLANK 0000[0x7] 0aa0 ; -------------------------------------------------------------------------------------- 0aa0 ; SUBPROGRAM 0aa0 ; -------------------------------------------------------------------------------------- 0aa0 0abd | | .CONST 0x0abd ; Address of begin 0aa1 0004 | | .CONST 0x0004 ; Address of exception handler 0aa2 0003 | | .CONST 0x0003 ; Number of locals 0aa3 INIT_0aa0: 0aa3 e00b | | Load 0x0,0xb 0aa4 180e | | Execute Package,Field_Execute,Field_Number 0xe 0aa5 4800 |H | Short_Literal 0x0 0aa6 e402 | | Load 0x2,0x2 0aa7 01dd | | Execute Vector,First 0aa8 e402 | | Load 0x2,0x2 0aa9 01dc | | Execute Vector,Last 0aaa 0af4 | | Execute_Immediate Plus,-0xc 0aab 00d8 | | Load_Top At_Offset_0 0aac 00e2 | | Load_Encached Integer_Cache 0aad 0260 | ` | Execute Discrete,In_Type 0aae 7001 |p | Jump_Nonzero 0xab0 0aaf 0801 | | Execute_Immediate Raise,0x1 0ab0 e402 | | Load 0x2,0x2 0ab1 01cf | | Execute Vector,Slice_Read 0ab2 e00a | | Load 0x0,0xa 0ab3 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0ab4 e002 | | Load 0x0,0x2 0ab5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0ab6 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0ab7 00d8 | | Load_Top At_Offset_0 0ab8 e002 | | Load 0x0,0x2 0ab9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0aba 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0abb e5ff | | Load 0x2,-0x1 0abc 82c2 | | Call 0x1,0xc2 0abd BODY_0aa0: 0abd 00d8 | | Load_Top At_Offset_0 0abe 01dd | | Execute Vector,First 0abf e5ff | | Load 0x2,-0x1 0ac0 8272 | r | Call 0x1,0x72 0ac1 0273 | s | Execute Discrete,Plus 0ac2 e405 | | Load 0x2,0x5 0ac3 01db | | Execute Vector,Length 0ac4 0272 | r | Execute Discrete,Minus 0ac5 0aff | | Execute_Immediate Plus,-0x1 0ac6 c407 | | Store 0x2,0x7 0ac7 e407 | | Load 0x2,0x7 0ac8 00d9 | | Load_Top At_Offset_1 0ac9 01dc | | Execute Vector,Last 0aca 027b | { | Execute Discrete,Greater_Equal 0acb 6805 |h | Jump_Zero 0xad1 0acc 00d8 | | Load_Top At_Offset_0 0acd e406 | | Load 0x2,0x6 0ace 01cc | | Execute Vector,Catenate 0acf 00cb | | Action Pop_Block_With_Result 0ad0 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0ad1 e407 | | Load 0x2,0x7 0ad2 00d9 | | Load_Top At_Offset_1 0ad3 01dd | | Execute Vector,First 0ad4 027c | | | Execute Discrete,Less 0ad5 6821 |h! | Jump_Zero 0xaf7 0ad6 e00b | | Load 0x0,0xb 0ad7 180e | | Execute Package,Field_Execute,Field_Number 0xe 0ad8 4801 |H | Short_Literal 0x1 0ad9 4802 |H | Short_Literal 0x2 0ada e00c | | Load 0x0,0xc 0adb 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0adc 035b | [ | Declare_Type Array,Constrained 0add 0337 | 7 | Declare_Variable Array 0ade e402 | | Load 0x2,0x2 0adf e00c | | Load 0x0,0xc 0ae0 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0ae1 e00c | | Load 0x0,0xc 0ae2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ae3 0119 | | Execute Any,Check_In_Formal_Type 0ae4 4801 |H | Short_Literal 0x1 0ae5 00da | | Load_Top At_Offset_2 0ae6 01d6 | | Execute Vector,Field_Write 0ae7 e5ff | | Load 0x2,-0x1 0ae8 8272 | r | Call 0x1,0x72 0ae9 e00c | | Load 0x0,0xc 0aea 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0aeb e00c | | Load 0x0,0xc 0aec 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0aed 0119 | | Execute Any,Check_In_Formal_Type 0aee 4802 |H | Short_Literal 0x2 0aef 00da | | Load_Top At_Offset_2 0af0 01d6 | | Execute Vector,Field_Write 0af1 601e |` | Indirect_Literal Discrete,0xb10,{0x00000000, 0x000081b8} 0af2 e00d | | Load 0x0,0xd 0af3 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0af4 00ea | | Load_Encached Null_String_Cache 0af5 00cb | | Action Pop_Block_With_Result 0af6 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0af7 e407 | | Load 0x2,0x7 0af8 00d9 | | Load_Top At_Offset_1 0af9 01d7 | | Execute Vector,Field_Read 0afa 0f5f | _ | Execute_Immediate Equal,0x5f 0afb 680a |h | Jump_Zero 0xb06 0afc 00d8 | | Load_Top At_Offset_0 0afd 01dd | | Execute Vector,First 0afe e407 | | Load 0x2,0x7 0aff 0aff | | Execute_Immediate Plus,-0x1 0b00 00da | | Load_Top At_Offset_2 0b01 01cf | | Execute Vector,Slice_Read 0b02 e406 | | Load 0x2,0x6 0b03 01cc | | Execute Vector,Catenate 0b04 00cb | | Action Pop_Block_With_Result 0b05 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0b06 00d8 | | Load_Top At_Offset_0 0b07 01dd | | Execute Vector,First 0b08 e407 | | Load 0x2,0x7 0b09 00da | | Load_Top At_Offset_2 0b0a 01cf | | Execute Vector,Slice_Read 0b0b e406 | | Load 0x2,0x6 0b0c 01cc | | Execute Vector,Catenate 0b0d 00cb | | Action Pop_Block_With_Result 0b0e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0b0f 0000 | | .XXX[0x1] 0b10 0000 0000 | | .LITERAL {0x00000000, 0x000081b8} 0b14 0000 0000 | | .BLANK 0000[0x4] 0b18 ; -------------------------------------------------------------------------------------- 0b18 ; SUBPROGRAM 0b18 ; -------------------------------------------------------------------------------------- 0b18 0b1b | | .CONST 0x0b1b ; Address of begin 0b19 0b21 | ! | .CONST 0x0b21 ; Address of exception handler 0b1a 0001 | | .CONST 0x0001 ; Number of locals 0b1b BODY_0b18: 0b1b INIT_0b18: 0b1b e5ff | | Load 0x2,-0x1 0b1c e003 | | Load 0x0,0x3 0b1d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0b1e e404 | | Load 0x2,0x4 0b1f 017d | } | Execute Record,Structure_Write 0b20 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0b21 TRAP_0b18: 0b21 010e | | Execute Exception,Is_Constraint_Error 0b22 6815 |h | Jump_Zero 0xb38 0b23 e402 | | Load 0x2,0x2 0b24 4801 |H | Short_Literal 0x1 0b25 4801 |H | Short_Literal 0x1 0b26 e00c | | Load 0x0,0xc 0b27 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b28 035b | [ | Declare_Type Array,Constrained 0b29 0337 | 7 | Declare_Variable Array 0b2a e5ff | | Load 0x2,-0x1 0b2b e00c | | Load 0x0,0xc 0b2c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0b2d e00c | | Load 0x0,0xc 0b2e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b2f 0119 | | Execute Any,Check_In_Formal_Type 0b30 4801 |H | Short_Literal 0x1 0b31 00da | | Load_Top At_Offset_2 0b32 01d6 | | Execute Vector,Field_Write 0b33 6008 |` | Indirect_Literal Discrete,0xb3c,{0x00000000, 0x00008181} 0b34 e00d | | Load 0x0,0xd 0b35 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0b36 00cc | | Action Pop_Block 0b37 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0b38 0100 | | Execute Exception,Raise 0b39 0000 0000 | | .XXX[0x3] 0b3b 0000 | | 0b3c 0000 0000 | | .LITERAL {0x00000000, 0x00008181} 0b40 ; -------------------------------------------------------------------------------------- 0b40 ; SUBPROGRAM 0b40 ; -------------------------------------------------------------------------------------- 0b40 0b51 | Q | .CONST 0x0b51 ; Address of begin 0b41 0004 | | .CONST 0x0004 ; Address of exception handler 0b42 0002 | | .CONST 0x0002 ; Number of locals 0b43 INIT_0b40: 0b43 4801 |H | Short_Literal 0x1 0b44 e5ff | | Load 0x2,-0x1 0b45 01db | | Execute Vector,Length 0b46 00d8 | | Load_Top At_Offset_0 0b47 00e2 | | Load_Encached Integer_Cache 0b48 0260 | ` | Execute Discrete,In_Type 0b49 7001 |p | Jump_Nonzero 0xb4b 0b4a 0801 | | Execute_Immediate Raise,0x1 0b4b 00e9 | | Load_Encached String_Cache 0b4c 035b | [ | Declare_Type Array,Constrained 0b4d 0337 | 7 | Declare_Variable Array 0b4e e5ff | | Load 0x2,-0x1 0b4f 00d9 | | Load_Top At_Offset_1 0b50 01d4 | | Execute Vector,Structure_Write 0b51 BODY_0b40: 0b51 00d8 | | Load_Top At_Offset_0 0b52 00e9 | | Load_Encached String_Cache 0b53 01c6 | | Execute Vector,Convert_To_Formal 0b54 00cb | | Action Pop_Block_With_Result 0b55 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b56 0000 0000 | | .XXX[0x2] 0b58 ; -------------------------------------------------------------------------------------- 0b58 ; SUBPROGRAM 0b58 ; -------------------------------------------------------------------------------------- 0b58 0b5b | [ | .CONST 0x0b5b ; Address of begin 0b59 0004 | | .CONST 0x0004 ; Address of exception handler 0b5a 0001 | | .CONST 0x0001 ; Number of locals 0b5b BODY_0b58: 0b5b INIT_0b58: 0b5b 4608 |F | Jump_Case 0x9 0b5c 7808 |x | Jump 0xb65 ; case 0x0 0b5d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0b5e 780a |x | Jump 0xb69 ; case 0x2 0b5f 7809 |x | Jump 0xb69 ; case 0x3 0b60 7808 |x | Jump 0xb69 ; case 0x4 0b61 7807 |x | Jump 0xb69 ; case 0x5 0b62 7806 |x | Jump 0xb69 ; case 0x6 0b63 7805 |x | Jump 0xb69 ; case 0x7 0b64 7804 |x | Jump 0xb69 ; case 0x8 0b65 00da | | Load_Top At_Offset_2 0b66 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0b67 1c00 | | Execute_Immediate Run_Utility,0x0 0b68 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0b69 0869 | i | Execute_Immediate Raise,0x69 0b6a ; -------------------------------------------------------------------------------------- 0b6a ; STRING TABLE 0b6a ; -------------------------------------------------------------------------------------- 0b6a 004c | L | .STRTAB 0x004c->0x0b90 ; "UPPER" 0b6b 004f | O | .STRTAB 0x004f->0x0b92 ; "LOWER" 0b6c 0052 | R | .STRTAB 0x0052->0x0b95 ; "CAPITALIZE" 0b6d 005a | Z | .STRTAB 0x005a->0x0b9a ; "DONT_CARE" 0b6e 0061 | a | .STRTAB 0x0061->0x0b9e ; "ASSEMBLE" 0b6f 0067 | g | .STRTAB 0x0067->0x0ba2 ; "PROMOTE" 0b70 006c | l | .STRTAB 0x006c->0x0ba6 ; "DEMOTE" 0b71 0070 | p | .STRTAB 0x0070->0x0ba9 ; "BIND" 0b72 0072 | r | .STRTAB 0x0072->0x0bab ; "LINK" 0b73 0074 | t | .STRTAB 0x0074->0x0bad ; "ON_NORMAL" 0b74 007b | { | .STRTAB 0x007b->0x0bb1 ; "ON_ERROR" 0b75 0081 | | .STRTAB 0x0081->0x0bb5 ; "ON_WARNING" 0b76 0089 | | .STRTAB 0x0089->0x0bba ; "ALWAYS" 0b77 008d | | .STRTAB 0x008d->0x0bbd ; "FTP" 0b78 008e | | .STRTAB 0x008e->0x0bbf ; "DTIA" 0b79 0090 | | .STRTAB 0x0090->0x0bc1 ; "TEXT" 0b7a 0092 | | .STRTAB 0x0092->0x0bc3 ; "BINARY" 0b7b 0096 | | .STRTAB 0x0096->0x0bc6 ; "ADA_SPEC" 0b7c 009c | | .STRTAB 0x009c->0x0bca ; "ADA_BODY" 0b7d 00a2 | | .STRTAB 0x00a2->0x0bce ; "SECONDARY" 0b7e 00a9 | | .STRTAB 0x00a9->0x0bd2 ; "UNKNOWN" 0b7f 00ae | | .STRTAB 0x00ae->0x0bd6 ; "<UNREGISTERED>" 0b80 00ba | | .STRTAB 0x00ba->0x0bdd ; "Ftp.Remote_Machine" 0b81 00ca | | .STRTAB 0x00ca->0x0be6 ; "Ftp.Remote_Directory" 0b82 00dc | | .STRTAB 0x00dc->0x0bf0 ; "Assemble" 0b83 00e2 | | .STRTAB 0x00e2->0x0bf4 ; "Promote" 0b84 00e7 | | .STRTAB 0x00e7->0x0bf7 ; "Demote" 0b85 00eb | | .STRTAB 0x00eb->0x0bfa ; "Bind" 0b86 00ed | | .STRTAB 0x00ed->0x0bfc ; "Link" 0b87 00ef | | .STRTAB 0x00ef->0x0bfe ; "'" 0b88 00ee | | .STRTAB 0x00ee->0x0bff ; "(" 0b89 00ed | | .STRTAB 0x00ed->0x0bff ; ")'" 0b8a 00ed | | .STRTAB 0x00ed->0x0c00 ; "_" 0b8b 00ec | | .STRTAB 0x00ec->0x0c01 ; "_s" 0b8c 00ec | | .STRTAB 0x00ec->0x0c02 ; "_b" 0b8d 00ec | | .STRTAB 0x00ec->0x0c03 ; "_t" 0b8e 00ec | | .STRTAB 0x00ec->0x0c04 ; " " 0b8f 00eb | | .STREND 0x00eb->0x0c04 0b90 5550 5045 |UPPE| .STRTAB_STRINGS 0c05 0000 0000 | | .XXX[0x3] 0c07 0000 | | 0c08 ; -------------------------------------------------------------------------------------- 0c08 ; Debug Table 0c08 ; -------------------------------------------------------------------------------------- 0c08 0004 000d | | .DEBUG4 0x0004,0x000d,0xf65d,0x0000,0x0001,0x0000 0c0e 0000 0000 | | .BLANK 0000[0x2c] 0c3a 0083 1831 | 1| .XXX[0x17] 0c3c 0000 0000 | | 0c3e 0000 0050 | P| 0c40 4504 d003 |E | 0c42 8ea3 3b17 | ; | 0c44 0039 2980 | 9) | 0c46 0000 0005 | | 0c48 0000 0000 | | 0c4a 022c cc00 | , | 0c4c 736b 8000 |sk | 0c4e 0000 0721 | !| 0c50 7800 |x | 0c51 0000 0000 | | .BLANK 0000[0x7] 0c58 0096 9800 | | .XXX[0x1d] 0c5a 1ccb a000 | | 0c5c 0000 0550 | P| 0c5e 0001 c94c | L| 0c60 0000 0000 | | 0c62 0180 0000 | | 0c64 0007 2c44 | ,D| 0c66 2240 00e6 |"@ | 0c68 d700 0000 | | 0c6a 000e 6280 | b | 0c6c 01d5 4b06 | K | 0c6e 3900 2b5d |9 +]| 0c70 c000 0000 | | 0c72 0399 7400 | t | 0c74 e4a6 | | 0c75 0000 0000 | | .BLANK 0000[0x7] 0c7c 001c fb60 | `| .XXX[0x13] 0c7e 0003 9620 | | 0c80 0000 009d | | 0c82 8b80 1d11 | | 0c84 e000 0000 | | 0c86 0540 0000 | @ | 0c88 0001 1666 | f| 0c8a 003a b000 | : | 0c8c 0000 0003 | | 0c8e a060 | ` | 0c8f 0000 0000 | | .BLANK 0000[0x8] 0c97 4b4c 000e |KL | .XXX[0x1d] 0c99 a460 0000 | ` | 0c9b 0001 d000 | | 0c9d 00e8 8f00 | | 0c9f 0000 0001 | | 0ca1 4000 0000 |@ | 0ca3 03a5 c611 | | 0ca5 2000 7560 | u`| 0ca7 0000 0000 | | 0ca9 0750 8800 | P | 0cab ee8e 831c | | 0cad 8015 aee0 | | 0caf 0000 0001 | | 0cb1 d48c 0074 | t| 0cb3 4780 |G | 0cb4 0000 0000 | | .BLANK 0000[0x7] 0cbb 0ebc 4000 | @ | .XXX[0x13] 0cbd 01d2 e200 | | 0cbf 0000 4ec5 | N | 0cc1 c00e c780 | | 0cc3 0000 0001 | | 0cc5 4000 0000 |@ | 0cc7 008b 3300 | 3 | 0cc9 1dd5 2000 | | 0ccb 0000 01d8 | | 0ccd 0200 | | 0cce 0000 0000 | | .BLANK 0000[0x7] 0cd5 0025 a600 | % | .XXX[0x1d] 0cd7 0771 7800 | qx | 0cd9 0000 0124 | $| 0cdb 0000 763c | v<| 0cdd 0000 0000 | | 0cdf 00e0 0000 | | 0ce1 0001 dab5 | | 0ce3 0890 003b | ;| 0ce5 aa40 0000 | @ | 0ce7 0003 b7e8 | | 0ce9 0000 0041 | A| 0ceb 8e40 0ad7 | @ | 0ced 7000 0000 |p | 0cef 00ee 2f00 | / | 0cf1 3b1e |; | 0cf2 0000 0000 | | .BLANK 0000[0x7] 0cf9 0007 7d68 | }h| .XXX[0xb] 0cfb 0000 ed5a | Z| 0cfd 0000 0000 | | 0cff 12b2 0043 | C| 0d01 24cb 8800 |$ | 0d03 02b8 | | 0d04 0000 0000 | | .BLANK 0000[0x4] 0d08 0043 24cb | C$ | .XXX[0x2c] 0d0a 0000 0036 | 6| 0d0c 0002 1013 | | 0d0e 0000 1332 | 2| 0d10 0043 24cb | C$ | 0d12 0000 0036 | 6| 0d14 0002 1013 | | 0d16 0000 1532 | 2| 0d18 0043 24cb | C$ | 0d1a 0000 0036 | 6| 0d1c 0002 1013 | | 0d1e 0000 1632 | 2| 0d20 0043 24cb | C$ | 0d22 0000 0036 | 6| 0d24 0002 1013 | | 0d26 0000 1732 | 2| 0d28 0043 24cb | C$ | 0d2a 0000 0036 | 6| 0d2c 0002 1013 | | 0d2e 0000 17b2 | | 0d30 0043 24cb | C$ | 0d32 8800 0138 | 8| 0d34 0000 0000 | | .BLANK 0000[0x4] 0d38 0043 24cb | C$ | .XXX[0x24] 0d3a 0000 0036 | 6| 0d3c 0002 1013 | | 0d3e 0000 1832 | 2| 0d40 0043 24cb | C$ | 0d42 0000 0016 | | 0d44 0002 1013 | | 0d46 0000 18b2 | | 0d48 000b 8004 | | 0d4a 0000 0158 | X| 0d4c 0043 28cb | C( | 0d4e 0000 0000 | | 0d50 0043 24cb | C$ | 0d52 0000 04c4 | | 0d54 0000 0000 | | 0d56 0000 0003 | | 0d58 0043 24cb | C$ | 0d5a 0800 0738 | 8| 0d5c 0000 0000 | | .BLANK 0000[0x4] 0d60 0001 0404 | | .XXX[0x10] 0d62 0800 0400 | | 0d64 0000 0000 | | 0d66 0000 0071 | q| 0d68 0043 24cb | C$ | 0d6a 0000 0002 | | 0d6c 0043 24cb | C$ | 0d6e 0000 1440 | @| 0d70 0000 0000 | | .BLANK 0000[0x7] 0d77 0037 | 7 | .XXX[0x1] 0d78 0000 0000 | | .BLANK 0000[0x7] 0d7f 0006 | | .XXX[0x1] 0d80 0000 0000 | | .BLANK 0000[0x7] 0d87 0071 000b | q | .XXX[0x5] 0d89 8004 0000 | | 0d8b 0158 | X | 0d8c 0000 0000 | | .BLANK 0000[0x74]