|
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: 8192 (0x2000) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0f38 | 8 | .CONST 0x0f38 ; 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 8009 | | .CONST 0x8009 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 02c3 | | .CONST 0x02c3 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 00ee | | .CONST 0x00ee ; 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 00c4 | | Action Make_Default 00d7 00c4 | | Action Make_Default 00d8 00c4 | | Action Make_Default 00d9 00c4 | | Action Make_Default 00da 00c4 | | Action Make_Default 00db 00c4 | | Action Make_Default 00dc 00c4 | | Action Make_Default 00dd 00c4 | | Action Make_Default 00de 00c4 | | Action Make_Default 00df 00c4 | | Action Make_Default 00e0 00c4 | | Action Make_Default 00e1 00c4 | | Action Make_Default 00e2 00c4 | | Action Make_Default 00e3 4800 |H | Short_Literal 0x0 00e4 48ff |H | Short_Literal 0xff 00e5 00e5 | | Load_Encached Long_Integer_Cache 00e6 03f9 | | Declare_Type Discrete,Constrained,Visible 00e7 c2be | | Store 0x1,0xbe 00e8 4800 |H | Short_Literal 0x0 00e9 48ff |H | Short_Literal 0xff 00ea 00e5 | | Load_Encached Long_Integer_Cache 00eb 03f9 | | Declare_Type Discrete,Constrained,Visible 00ec c2bf | | Store 0x1,0xbf 00ed 4800 |H | Short_Literal 0x0 00ee 4803 |H | Short_Literal 0x3 00ef 029f 032b | +| Declare_Subprogram INIT_0328,For_Call 00f1 03fe | | Declare_Type Discrete,Defined,Visible 00f2 c2c3 | | Store 0x1,0xc3 00f3 4800 |H | Short_Literal 0x0 00f4 4803 |H | Short_Literal 0x3 00f5 029f 0353 | S| Declare_Subprogram INIT_0350,For_Call 00f7 03fe | | Declare_Type Discrete,Defined,Visible 00f8 c2e0 | | Store 0x1,0xe0 00f9 e2e0 | | Load 0x1,0xe0 00fa 0266 | f | Execute Discrete,Bounds 00fb 00e1 | | Load_Encached Boolean_Cache 00fc 02a0 | | Declare_Subprogram Null_Subprogram 00fd 4801 |H | Short_Literal 0x1 00fe 035e | ^ | Declare_Type Array,Defined,Visible 00ff c2c5 | | Store 0x1,0xc5 0100 4800 |H | Short_Literal 0x0 0101 4803 |H | Short_Literal 0x3 0102 029f 037b | {| Declare_Subprogram INIT_0378,For_Call 0104 03fe | | Declare_Type Discrete,Defined,Visible 0105 c2c6 | | Store 0x1,0xc6 0106 4800 |H | Short_Literal 0x0 0107 4801 |H | Short_Literal 0x1 0108 029f 03a3 | | Declare_Subprogram INIT_03a0,For_Call 010a 03fe | | Declare_Type Discrete,Defined,Visible 010b c2c9 | | Store 0x1,0xc9 010c 4800 |H | Short_Literal 0x0 010d 4801 |H | Short_Literal 0x1 010e 029f 03cb | | Declare_Subprogram INIT_03c8,For_Call 0110 03fe | | Declare_Type Discrete,Defined,Visible 0111 c2cb | | Store 0x1,0xcb 0112 4802 |H | Short_Literal 0x2 0113 032b | + | Declare_Type Record,Incomplete,Visible 0114 c262 | b | Store 0x1,0x62 0115 00e2 | | Load_Encached Integer_Cache 0116 00e1 | | Load_Encached Boolean_Cache 0117 00e9 | | Load_Encached String_Cache 0118 029f 0e73 | s| Declare_Subprogram INIT_0e70,For_Call 011a 4800 |H | Short_Literal 0x0 011b 4801 |H | Short_Literal 0x1 011c 4801 |H | Short_Literal 0x1 011d 4800 |H | Short_Literal 0x0 011e 4801 |H | Short_Literal 0x1 011f 4801 |H | Short_Literal 0x1 0120 031e | | Declare_Type Variant_Record,Defined,Visible 0121 c2e3 | | Store 0x1,0xe3 0122 e001 | | Load 0x0,0x1 0123 0129 | ) | Execute Any,Make_Visible 0124 c2bc | | Store 0x1,0xbc 0125 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated 0127 c263 | c | Store 0x1,0x63 0128 029a 03fb | | Declare_Subprogram INIT_03f8,For_Outer_Call,Visible,Unelaborated 012a c264 | d | Store 0x1,0x64 012b 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated 012d c265 | e | Store 0x1,0x65 012e 029a 040b | | Declare_Subprogram INIT_0408,For_Outer_Call,Visible,Unelaborated 0130 c266 | f | Store 0x1,0x66 0131 029a 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Visible,Unelaborated 0133 c267 | g | Store 0x1,0x67 0134 029a 044b | K| Declare_Subprogram INIT_0448,For_Outer_Call,Visible,Unelaborated 0136 c268 | h | Store 0x1,0x68 0137 029a 0463 | c| Declare_Subprogram INIT_0460,For_Outer_Call,Visible,Unelaborated 0139 c269 | i | Store 0x1,0x69 013a 029a 047b | {| Declare_Subprogram INIT_0478,For_Outer_Call,Visible,Unelaborated 013c c26a | j | Store 0x1,0x6a 013d 029a 0493 | | Declare_Subprogram INIT_0490,For_Outer_Call,Visible,Unelaborated 013f c26d | m | Store 0x1,0x6d 0140 029a 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call,Visible,Unelaborated 0142 c26e | n | Store 0x1,0x6e 0143 029a 04c3 | | Declare_Subprogram INIT_04c0,For_Outer_Call,Visible,Unelaborated 0145 c2b1 | | Store 0x1,0xb1 0146 029a 04db | | Declare_Subprogram INIT_04d8,For_Outer_Call,Visible,Unelaborated 0148 c2b2 | | Store 0x1,0xb2 0149 029a 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call,Visible,Unelaborated 014b c26f | o | Store 0x1,0x6f 014c 029a 052b | +| Declare_Subprogram INIT_0528,For_Outer_Call,Visible,Unelaborated 014e c270 | p | Store 0x1,0x70 014f 029a 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call,Visible,Unelaborated 0151 c271 | q | Store 0x1,0x71 0152 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated 0154 c272 | r | Store 0x1,0x72 0155 029a 056b | k| Declare_Subprogram INIT_0568,For_Outer_Call,Visible,Unelaborated 0157 c2d0 | | Store 0x1,0xd0 0158 4800 |H | Short_Literal 0x0 0159 4803 |H | Short_Literal 0x3 015a 029f 0583 | | Declare_Subprogram INIT_0580,For_Call 015c 03fe | | Declare_Type Discrete,Defined,Visible 015d c2b3 | | Store 0x1,0xb3 015e 029a 05ab | | Declare_Subprogram INIT_05a8,For_Outer_Call,Visible,Unelaborated 0160 c274 | t | Store 0x1,0x74 0161 029a 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call,Visible,Unelaborated 0163 c275 | u | Store 0x1,0x75 0164 029a 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call,Visible,Unelaborated 0166 c276 | v | Store 0x1,0x76 0167 029a 060b | | Declare_Subprogram INIT_0608,For_Outer_Call,Visible,Unelaborated 0169 c2e4 | | Store 0x1,0xe4 016a 029a 061b | | Declare_Subprogram INIT_0618,For_Outer_Call,Visible,Unelaborated 016c c277 | w | Store 0x1,0x77 016d 029a 0633 | 3| Declare_Subprogram INIT_0630,For_Outer_Call,Visible,Unelaborated 016f c278 | x | Store 0x1,0x78 0170 029a 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call,Visible,Unelaborated 0172 c279 | y | Store 0x1,0x79 0173 029a 0673 | s| Declare_Subprogram INIT_0670,For_Outer_Call,Visible,Unelaborated 0175 c27a | z | Store 0x1,0x7a 0176 029a 06ab | | Declare_Subprogram INIT_06a8,For_Outer_Call,Visible,Unelaborated 0178 c27b | { | Store 0x1,0x7b 0179 029a 06b3 | | Declare_Subprogram INIT_06b0,For_Outer_Call,Visible,Unelaborated 017b c27c | | | Store 0x1,0x7c 017c 029a 06c3 | | Declare_Subprogram INIT_06c0,For_Outer_Call,Visible,Unelaborated 017e c2a9 | | Store 0x1,0xa9 017f 029a 06cb | | Declare_Subprogram INIT_06c8,For_Outer_Call,Visible,Unelaborated 0181 c27d | } | Store 0x1,0x7d 0182 029a 06e3 | | Declare_Subprogram INIT_06e0,For_Outer_Call,Visible,Unelaborated 0184 c2cc | | Store 0x1,0xcc 0185 029a 06f3 | | Declare_Subprogram INIT_06f0,For_Outer_Call,Visible,Unelaborated 0187 c2cd | | Store 0x1,0xcd 0188 029a 0703 | | Declare_Subprogram INIT_0700,For_Outer_Call,Visible,Unelaborated 018a c287 | | Store 0x1,0x87 018b 029a 071b | | Declare_Subprogram INIT_0718,For_Outer_Call,Visible,Unelaborated 018d c2ce | | Store 0x1,0xce 018e 029a 072b | +| Declare_Subprogram INIT_0728,For_Outer_Call,Visible,Unelaborated 0190 c2cf | | Store 0x1,0xcf 0191 029a 073b | ;| Declare_Subprogram INIT_0738,For_Outer_Call,Visible,Unelaborated 0193 c28c | | Store 0x1,0x8c 0194 029a 0753 | S| Declare_Subprogram INIT_0750,For_Outer_Call,Visible,Unelaborated 0196 c290 | | Store 0x1,0x90 0197 029a 076b | k| Declare_Subprogram INIT_0768,For_Outer_Call,Visible,Unelaborated 0199 c26b | k | Store 0x1,0x6b 019a 029a 0783 | | Declare_Subprogram INIT_0780,For_Outer_Call,Visible,Unelaborated 019c c2d5 | | Store 0x1,0xd5 019d 029a 079b | | Declare_Subprogram INIT_0798,For_Outer_Call,Visible,Unelaborated 019f c2d1 | | Store 0x1,0xd1 01a0 029a 07b3 | | Declare_Subprogram INIT_07b0,For_Outer_Call,Visible,Unelaborated 01a2 c2d2 | | Store 0x1,0xd2 01a3 029a 07cb | | Declare_Subprogram INIT_07c8,For_Outer_Call,Visible,Unelaborated 01a5 c2d8 | | Store 0x1,0xd8 01a6 029a 07eb | | Declare_Subprogram INIT_07e8,For_Outer_Call,Visible,Unelaborated 01a8 c2d9 | | Store 0x1,0xd9 01a9 029a 080b | | Declare_Subprogram INIT_0808,For_Outer_Call,Visible,Unelaborated 01ab c2da | | Store 0x1,0xda 01ac 029a 082b | +| Declare_Subprogram INIT_0828,For_Outer_Call,Visible,Unelaborated 01ae c2db | | Store 0x1,0xdb 01af 029a 084b | K| Declare_Subprogram INIT_0848,For_Outer_Call,Visible,Unelaborated 01b1 c2dc | | Store 0x1,0xdc 01b2 029a 085b | [| Declare_Subprogram INIT_0858,For_Outer_Call,Visible,Unelaborated 01b4 c2dd | | Store 0x1,0xdd 01b5 029a 086b | k| Declare_Subprogram INIT_0868,For_Outer_Call,Visible,Unelaborated 01b7 c2d3 | | Store 0x1,0xd3 01b8 029a 0883 | | Declare_Subprogram INIT_0880,For_Outer_Call,Visible,Unelaborated 01ba c2b6 | | Store 0x1,0xb6 01bb 029a 08ab | | Declare_Subprogram INIT_08a8,For_Outer_Call,Visible,Unelaborated 01bd c2b7 | | Store 0x1,0xb7 01be 029a 08c3 | | Declare_Subprogram INIT_08c0,For_Outer_Call,Visible,Unelaborated 01c0 c2c2 | | Store 0x1,0xc2 01c1 029a 08eb | | Declare_Subprogram INIT_08e8,For_Outer_Call,Visible,Unelaborated 01c3 c2d6 | | Store 0x1,0xd6 01c4 029a 0903 | | Declare_Subprogram INIT_0900,For_Outer_Call,Visible,Unelaborated 01c6 c2d7 | | Store 0x1,0xd7 01c7 029a 091b | | Declare_Subprogram INIT_0918,For_Outer_Call,Visible,Unelaborated 01c9 c2b8 | | Store 0x1,0xb8 01ca 029a 092b | +| Declare_Subprogram INIT_0928,For_Outer_Call,Visible,Unelaborated 01cc c2b9 | | Store 0x1,0xb9 01cd 029a 094b | K| Declare_Subprogram INIT_0948,For_Outer_Call,Visible,Unelaborated 01cf c224 | $ | Store 0x1,0x24 01d0 029a 0953 | S| Declare_Subprogram INIT_0950,For_Outer_Call,Visible,Unelaborated 01d2 c225 | % | Store 0x1,0x25 01d3 029a 095b | [| Declare_Subprogram INIT_0958,For_Outer_Call,Visible,Unelaborated 01d5 c256 | V | Store 0x1,0x56 01d6 029a 0973 | s| Declare_Subprogram INIT_0970,For_Outer_Call,Visible,Unelaborated 01d8 c257 | W | Store 0x1,0x57 01d9 029a 097b | {| Declare_Subprogram INIT_0978,For_Outer_Call,Visible,Unelaborated 01db c226 | & | Store 0x1,0x26 01dc 029a 09b3 | | Declare_Subprogram INIT_09b0,For_Outer_Call,Visible,Unelaborated 01de c2ca | | Store 0x1,0xca 01df 029a 09cb | | Declare_Subprogram INIT_09c8,For_Outer_Call,Visible,Unelaborated 01e1 c2df | | Store 0x1,0xdf 01e2 029a 09eb | | Declare_Subprogram INIT_09e8,For_Outer_Call,Visible,Unelaborated 01e4 c2ba | | Store 0x1,0xba 01e5 029a 0a13 | | Declare_Subprogram INIT_0a10,For_Outer_Call,Visible,Unelaborated 01e7 c2bb | | Store 0x1,0xbb 01e8 029a 0a33 | 3| Declare_Subprogram INIT_0a30,For_Outer_Call,Visible,Unelaborated 01ea c29e | | Store 0x1,0x9e 01eb 029a 0a93 | | Declare_Subprogram INIT_0a90,For_Outer_Call,Visible,Unelaborated 01ed c29f | | Store 0x1,0x9f 01ee 029a 0a9b | | Declare_Subprogram INIT_0a98,For_Outer_Call,Visible,Unelaborated 01f0 c2a0 | | Store 0x1,0xa0 01f1 029a 0aa3 | | Declare_Subprogram INIT_0aa0,For_Outer_Call,Visible,Unelaborated 01f3 c2a1 | | Store 0x1,0xa1 01f4 029a 0aab | | Declare_Subprogram INIT_0aa8,For_Outer_Call,Visible,Unelaborated 01f6 c2e1 | | Store 0x1,0xe1 01f7 029a 0abb | | Declare_Subprogram INIT_0ab8,For_Outer_Call,Visible,Unelaborated 01f9 c2e2 | | Store 0x1,0xe2 01fa 029a 0ad3 | | Declare_Subprogram INIT_0ad0,For_Outer_Call,Visible,Unelaborated 01fc c2c7 | | Store 0x1,0xc7 01fd 029a 0ae3 | | Declare_Subprogram INIT_0ae0,For_Outer_Call,Visible,Unelaborated 01ff c2c8 | | Store 0x1,0xc8 0200 e2be | | Load 0x1,0xbe 0201 e2bf | | Load 0x1,0xbf 0202 02a0 | | Declare_Subprogram Null_Subprogram 0203 4802 |H | Short_Literal 0x2 0204 032d | - | Declare_Type Record,Defined 0205 c2a2 | | Store 0x1,0xa2 0206 e2a2 | | Load 0x1,0xa2 0207 0322 | " | Declare_Variable Record 0208 4800 |H | Short_Literal 0x0 0209 00d9 | | Load_Top At_Offset_1 020a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 020b 4800 |H | Short_Literal 0x0 020c 00d9 | | Load_Top At_Offset_1 020d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 020e c2af | | Store 0x1,0xaf 020f e002 | | Load 0x0,0x2 0210 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 0211 e2a2 | | Load 0x1,0xa2 0212 029f 0e5b | [| Declare_Subprogram INIT_0e58,For_Call 0214 e262 | b | Load 0x1,0x62 0215 0326 | & | Complete_Type Record,By_Defining 0216 e262 | b | Load 0x1,0x62 0217 0322 | " | Declare_Variable Record 0218 e003 | | Load 0x0,0x3 0219 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 021a 00d9 | | Load_Top At_Offset_1 021b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 021c e2af | | Load 0x1,0xaf 021d 00d9 | | Load_Top At_Offset_1 021e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 021f c2a4 | | Store 0x1,0xa4 0220 00bf | | Action Accept_Activation 0221 e2bf | | Load 0x1,0xbf 0222 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0223 029d 0b53 | S| Declare_Subprogram INIT_0b50,For_Outer_Call 0225 1d64 | d | Execute_Immediate Reference_Lex_1,0x64 0226 00c7 | | Action Elaborate_Subprogram 0227 1d65 | e | Execute_Immediate Reference_Lex_1,0x65 0228 00c7 | | Action Elaborate_Subprogram 0229 1d63 | c | Execute_Immediate Reference_Lex_1,0x63 022a 00c7 | | Action Elaborate_Subprogram 022b 1d66 | f | Execute_Immediate Reference_Lex_1,0x66 022c 00c7 | | Action Elaborate_Subprogram 022d 1d67 | g | Execute_Immediate Reference_Lex_1,0x67 022e 00c7 | | Action Elaborate_Subprogram 022f 1d68 | h | Execute_Immediate Reference_Lex_1,0x68 0230 00c7 | | Action Elaborate_Subprogram 0231 1d69 | i | Execute_Immediate Reference_Lex_1,0x69 0232 00c7 | | Action Elaborate_Subprogram 0233 1d6a | j | Execute_Immediate Reference_Lex_1,0x6a 0234 00c7 | | Action Elaborate_Subprogram 0235 1dd3 | | Execute_Immediate Reference_Lex_1,0xd3 0236 00c7 | | Action Elaborate_Subprogram 0237 1dc2 | | Execute_Immediate Reference_Lex_1,0xc2 0238 00c7 | | Action Elaborate_Subprogram 0239 1d6d | m | Execute_Immediate Reference_Lex_1,0x6d 023a 00c7 | | Action Elaborate_Subprogram 023b 1d6e | n | Execute_Immediate Reference_Lex_1,0x6e 023c 00c7 | | Action Elaborate_Subprogram 023d 1db1 | | Execute_Immediate Reference_Lex_1,0xb1 023e 00c7 | | Action Elaborate_Subprogram 023f 1db2 | | Execute_Immediate Reference_Lex_1,0xb2 0240 00c7 | | Action Elaborate_Subprogram 0241 1d6f | o | Execute_Immediate Reference_Lex_1,0x6f 0242 00c7 | | Action Elaborate_Subprogram 0243 1d70 | p | Execute_Immediate Reference_Lex_1,0x70 0244 00c7 | | Action Elaborate_Subprogram 0245 029d 0b63 | c| Declare_Subprogram INIT_0b60,For_Outer_Call 0247 1d71 | q | Execute_Immediate Reference_Lex_1,0x71 0248 00c7 | | Action Elaborate_Subprogram 0249 1d72 | r | Execute_Immediate Reference_Lex_1,0x72 024a 00c7 | | Action Elaborate_Subprogram 024b 1d74 | t | Execute_Immediate Reference_Lex_1,0x74 024c 00c7 | | Action Elaborate_Subprogram 024d 1d75 | u | Execute_Immediate Reference_Lex_1,0x75 024e 00c7 | | Action Elaborate_Subprogram 024f 1dd0 | | Execute_Immediate Reference_Lex_1,0xd0 0250 00c7 | | Action Elaborate_Subprogram 0251 1d76 | v | Execute_Immediate Reference_Lex_1,0x76 0252 00c7 | | Action Elaborate_Subprogram 0253 029d 0b83 | | Declare_Subprogram INIT_0b80,For_Outer_Call 0255 029d 0bbb | | Declare_Subprogram INIT_0bb8,For_Outer_Call 0257 1de4 | | Execute_Immediate Reference_Lex_1,0xe4 0258 00c7 | | Action Elaborate_Subprogram 0259 1d77 | w | Execute_Immediate Reference_Lex_1,0x77 025a 00c7 | | Action Elaborate_Subprogram 025b 1da9 | | Execute_Immediate Reference_Lex_1,0xa9 025c 00c7 | | Action Elaborate_Subprogram 025d 1d78 | x | Execute_Immediate Reference_Lex_1,0x78 025e 00c7 | | Action Elaborate_Subprogram 025f 1d79 | y | Execute_Immediate Reference_Lex_1,0x79 0260 00c7 | | Action Elaborate_Subprogram 0261 1d7a | z | Execute_Immediate Reference_Lex_1,0x7a 0262 00c7 | | Action Elaborate_Subprogram 0263 1d7b | { | Execute_Immediate Reference_Lex_1,0x7b 0264 00c7 | | Action Elaborate_Subprogram 0265 1d7c | | | Execute_Immediate Reference_Lex_1,0x7c 0266 00c7 | | Action Elaborate_Subprogram 0267 1d7d | } | Execute_Immediate Reference_Lex_1,0x7d 0268 00c7 | | Action Elaborate_Subprogram 0269 1dcc | | Execute_Immediate Reference_Lex_1,0xcc 026a 00c7 | | Action Elaborate_Subprogram 026b 1dcd | | Execute_Immediate Reference_Lex_1,0xcd 026c 00c7 | | Action Elaborate_Subprogram 026d 1d87 | | Execute_Immediate Reference_Lex_1,0x87 026e 00c7 | | Action Elaborate_Subprogram 026f 1dce | | Execute_Immediate Reference_Lex_1,0xce 0270 00c7 | | Action Elaborate_Subprogram 0271 1dcf | | Execute_Immediate Reference_Lex_1,0xcf 0272 00c7 | | Action Elaborate_Subprogram 0273 1d8c | | Execute_Immediate Reference_Lex_1,0x8c 0274 00c7 | | Action Elaborate_Subprogram 0275 1d90 | | Execute_Immediate Reference_Lex_1,0x90 0276 00c7 | | Action Elaborate_Subprogram 0277 1d6b | k | Execute_Immediate Reference_Lex_1,0x6b 0278 00c7 | | Action Elaborate_Subprogram 0279 1dd5 | | Execute_Immediate Reference_Lex_1,0xd5 027a 00c7 | | Action Elaborate_Subprogram 027b 1dd1 | | Execute_Immediate Reference_Lex_1,0xd1 027c 00c7 | | Action Elaborate_Subprogram 027d 1dd2 | | Execute_Immediate Reference_Lex_1,0xd2 027e 00c7 | | Action Elaborate_Subprogram 027f 029d 0c3b | ;| Declare_Subprogram INIT_0c38,For_Outer_Call 0281 029d 0cfb | | Declare_Subprogram INIT_0cf8,For_Outer_Call 0283 029d 0d0b | | Declare_Subprogram INIT_0d08,For_Outer_Call 0285 1dd8 | | Execute_Immediate Reference_Lex_1,0xd8 0286 00c7 | | Action Elaborate_Subprogram 0287 1dd9 | | Execute_Immediate Reference_Lex_1,0xd9 0288 00c7 | | Action Elaborate_Subprogram 0289 1dda | | Execute_Immediate Reference_Lex_1,0xda 028a 00c7 | | Action Elaborate_Subprogram 028b 1ddb | | Execute_Immediate Reference_Lex_1,0xdb 028c 00c7 | | Action Elaborate_Subprogram 028d 1ddc | | Execute_Immediate Reference_Lex_1,0xdc 028e 00c7 | | Action Elaborate_Subprogram 028f 1ddd | | Execute_Immediate Reference_Lex_1,0xdd 0290 00c7 | | Action Elaborate_Subprogram 0291 029d 0d23 | #| Declare_Subprogram INIT_0d20,For_Outer_Call 0293 1db6 | | Execute_Immediate Reference_Lex_1,0xb6 0294 00c7 | | Action Elaborate_Subprogram 0295 1db7 | | Execute_Immediate Reference_Lex_1,0xb7 0296 00c7 | | Action Elaborate_Subprogram 0297 1dd6 | | Execute_Immediate Reference_Lex_1,0xd6 0298 00c7 | | Action Elaborate_Subprogram 0299 1dd7 | | Execute_Immediate Reference_Lex_1,0xd7 029a 00c7 | | Action Elaborate_Subprogram 029b 1db8 | | Execute_Immediate Reference_Lex_1,0xb8 029c 00c7 | | Action Elaborate_Subprogram 029d 1db9 | | Execute_Immediate Reference_Lex_1,0xb9 029e 00c7 | | Action Elaborate_Subprogram 029f 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 02a0 00c7 | | Action Elaborate_Subprogram 02a1 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 02a2 00c7 | | Action Elaborate_Subprogram 02a3 1d56 | V | Execute_Immediate Reference_Lex_1,0x56 02a4 00c7 | | Action Elaborate_Subprogram 02a5 1d57 | W | Execute_Immediate Reference_Lex_1,0x57 02a6 00c7 | | Action Elaborate_Subprogram 02a7 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 02a8 00c7 | | Action Elaborate_Subprogram 02a9 1dca | | Execute_Immediate Reference_Lex_1,0xca 02aa 00c7 | | Action Elaborate_Subprogram 02ab 029d 0d2b | +| Declare_Subprogram INIT_0d28,For_Outer_Call 02ad 1ddf | | Execute_Immediate Reference_Lex_1,0xdf 02ae 00c7 | | Action Elaborate_Subprogram 02af 1dba | | Execute_Immediate Reference_Lex_1,0xba 02b0 00c7 | | Action Elaborate_Subprogram 02b1 1dbb | | Execute_Immediate Reference_Lex_1,0xbb 02b2 00c7 | | Action Elaborate_Subprogram 02b3 1d9e | | Execute_Immediate Reference_Lex_1,0x9e 02b4 00c7 | | Action Elaborate_Subprogram 02b5 1d9f | | Execute_Immediate Reference_Lex_1,0x9f 02b6 00c7 | | Action Elaborate_Subprogram 02b7 1da0 | | Execute_Immediate Reference_Lex_1,0xa0 02b8 00c7 | | Action Elaborate_Subprogram 02b9 1da1 | | Execute_Immediate Reference_Lex_1,0xa1 02ba 00c7 | | Action Elaborate_Subprogram 02bb 1de2 | | Execute_Immediate Reference_Lex_1,0xe2 02bc 00c7 | | Action Elaborate_Subprogram 02bd 1de1 | | Execute_Immediate Reference_Lex_1,0xe1 02be 00c7 | | Action Elaborate_Subprogram 02bf 1dc7 | | Execute_Immediate Reference_Lex_1,0xc7 02c0 00c7 | | Action Elaborate_Subprogram 02c1 1dc8 | | Execute_Immediate Reference_Lex_1,0xc8 02c2 00c7 | | Action Elaborate_Subprogram 02c3 BODY_0008: 02c3 4801 |H | Short_Literal 0x1 02c4 e004 | | Load 0x0,0x4 02c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02c6 4801 |H | Short_Literal 0x1 02c7 e005 | | Load 0x0,0x5 02c8 1b33 | 3 | Execute Package,Field_Read,Field_Number 0x33 02c9 e005 | | Load 0x0,0x5 02ca 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 02cb 4801 |H | Short_Literal 0x1 02cc e004 | | Load 0x0,0x4 02cd 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 02ce 4800 |H | Short_Literal 0x0 02cf e005 | | Load 0x0,0x5 02d0 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 02d1 e005 | | Load 0x0,0x5 02d2 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 02d3 4800 |H | Short_Literal 0x0 02d4 e004 | | Load 0x0,0x4 02d5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02d6 4800 |H | Short_Literal 0x0 02d7 e005 | | Load 0x0,0x5 02d8 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 02d9 e005 | | Load 0x0,0x5 02da 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 02db 4800 |H | Short_Literal 0x0 02dc e004 | | Load 0x0,0x4 02dd 1b0f | | Execute Package,Field_Read,Field_Number 0xf 02de 00ea | | Load_Encached Null_String_Cache 02df e005 | | Load 0x0,0x5 02e0 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 02e1 e005 | | Load 0x0,0x5 02e2 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 02e3 4800 |H | Short_Literal 0x0 02e4 e004 | | Load 0x0,0x4 02e5 1b10 | | Execute Package,Field_Read,Field_Number 0x10 02e6 00ea | | Load_Encached Null_String_Cache 02e7 e005 | | Load 0x0,0x5 02e8 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 02e9 e005 | | Load 0x0,0x5 02ea 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 02eb 4800 |H | Short_Literal 0x0 02ec e004 | | Load 0x0,0x4 02ed 1b15 | | Execute Package,Field_Read,Field_Number 0x15 02ee 4800 |H | Short_Literal 0x0 02ef e005 | | Load 0x0,0x5 02f0 1b1b | | Execute Package,Field_Read,Field_Number 0x1b 02f1 e005 | | Load 0x0,0x5 02f2 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 02f3 4800 |H | Short_Literal 0x0 02f4 e004 | | Load 0x0,0x4 02f5 1b16 | | Execute Package,Field_Read,Field_Number 0x16 02f6 00ea | | Load_Encached Null_String_Cache 02f7 e005 | | Load 0x0,0x5 02f8 1b20 | | Execute Package,Field_Read,Field_Number 0x20 02f9 e005 | | Load 0x0,0x5 02fa 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 02fb 4800 |H | Short_Literal 0x0 02fc e004 | | Load 0x0,0x4 02fd 1b17 | | Execute Package,Field_Read,Field_Number 0x17 02fe 00ea | | Load_Encached Null_String_Cache 02ff e005 | | Load 0x0,0x5 0300 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 0301 e005 | | Load 0x0,0x5 0302 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0303 4800 |H | Short_Literal 0x0 0304 e004 | | Load 0x0,0x4 0305 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 0306 00ea | | Load_Encached Null_String_Cache 0307 e005 | | Load 0x0,0x5 0308 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0309 e005 | | Load 0x0,0x5 030a 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 030b 4800 |H | Short_Literal 0x0 030c e004 | | Load 0x0,0x4 030d 1b19 | | Execute Package,Field_Read,Field_Number 0x19 030e 00ea | | Load_Encached Null_String_Cache 030f e005 | | Load 0x0,0x5 0310 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0311 e005 | | Load 0x0,0x5 0312 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0313 4800 |H | Short_Literal 0x0 0314 e004 | | Load 0x0,0x4 0315 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 0316 4800 |H | Short_Literal 0x0 0317 e005 | | Load 0x0,0x5 0318 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24 0319 e005 | | Load 0x0,0x5 031a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 031b 4800 |H | Short_Literal 0x0 031c e004 | | Load 0x0,0x4 031d 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 031e 4801 |H | Short_Literal 0x1 031f e005 | | Load 0x0,0x5 0320 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 0321 e005 | | Load 0x0,0x5 0322 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0323 00bc | | Action Signal_Activated 0324 00bb | | Action Signal_Completion 0325 0000 0000 | | .XXX[0x3] 0327 0000 | | 0328 ; -------------------------------------------------------------------------------------- 0328 ; SUBPROGRAM 0328 ; -------------------------------------------------------------------------------------- 0328 032b | + | .CONST 0x032b ; Address of begin 0329 0004 | | .CONST 0x0004 ; Address of exception handler 032a 0001 | | .CONST 0x0001 ; Number of locals 032b BODY_0328: 032b INIT_0328: 032b 4607 |F | Jump_Case 0x8 032c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 032d 7806 |x | Jump 0x334 ; case 0x1 032e 7809 |x | Jump 0x338 ; case 0x2 032f 780d |x | Jump 0x33d ; case 0x3 0330 7810 |x | Jump 0x341 ; case 0x4 0331 7811 |x | Jump 0x343 ; case 0x5 0332 7812 |x | Jump 0x345 ; case 0x6 0333 7815 |x | Jump 0x349 ; case 0x7 0334 00da | | Load_Top At_Offset_2 0335 0091 0e91 | | Action Push_String_Extended_Indexed,0xe91 ; "UPPER" 0337 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0338 00db | | Load_Top At_Offset_3 0339 00db | | Load_Top At_Offset_3 033a 00e0 | | Load_Encached Standard_Cache 033b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 033c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 033d 00da | | Load_Top At_Offset_2 033e 00e0 | | Load_Encached Standard_Cache 033f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0340 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0341 00db | | Load_Top At_Offset_3 0342 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0343 00db | | Load_Top At_Offset_3 0344 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0345 e2c3 | | Load 0x1,0xc3 0346 00dc | | Load_Top At_Offset_4 0347 0267 | g | Execute Discrete,Predecessor 0348 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0349 e2c3 | | Load 0x1,0xc3 034a 00dc | | Load_Top At_Offset_4 034b 0268 | h | Execute Discrete,Successor 034c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 034d 0000 0000 | | .XXX[0x3] 034f 0000 | | 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 0353 | S | .CONST 0x0353 ; Address of begin 0351 0004 | | .CONST 0x0004 ; Address of exception handler 0352 0001 | | .CONST 0x0001 ; Number of locals 0353 BODY_0350: 0353 INIT_0350: 0353 4607 |F | Jump_Case 0x8 0354 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0355 7806 |x | Jump 0x35c ; case 0x1 0356 7809 |x | Jump 0x360 ; case 0x2 0357 780d |x | Jump 0x365 ; case 0x3 0358 7810 |x | Jump 0x369 ; case 0x4 0359 7811 |x | Jump 0x36b ; case 0x5 035a 7812 |x | Jump 0x36d ; case 0x6 035b 7815 |x | Jump 0x371 ; case 0x7 035c 00da | | Load_Top At_Offset_2 035d 0091 0e95 | | Action Push_String_Extended_Indexed,0xe95 ; "ASSEMBLE" 035f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0360 00db | | Load_Top At_Offset_3 0361 00db | | Load_Top At_Offset_3 0362 00e0 | | Load_Encached Standard_Cache 0363 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0364 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0365 00da | | Load_Top At_Offset_2 0366 00e0 | | Load_Encached Standard_Cache 0367 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0368 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0369 00db | | Load_Top At_Offset_3 036a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 036b 00db | | Load_Top At_Offset_3 036c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 036d e2e0 | | Load 0x1,0xe0 036e 00dc | | Load_Top At_Offset_4 036f 0267 | g | Execute Discrete,Predecessor 0370 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0371 e2e0 | | Load 0x1,0xe0 0372 00dc | | Load_Top At_Offset_4 0373 0268 | h | Execute Discrete,Successor 0374 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0375 0000 0000 | | .XXX[0x3] 0377 0000 | | 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 4607 |F | Jump_Case 0x8 037c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 037d 7806 |x | Jump 0x384 ; case 0x1 037e 7809 |x | Jump 0x388 ; case 0x2 037f 780d |x | Jump 0x38d ; case 0x3 0380 7810 |x | Jump 0x391 ; case 0x4 0381 7811 |x | Jump 0x393 ; case 0x5 0382 7812 |x | Jump 0x395 ; case 0x6 0383 7815 |x | Jump 0x399 ; case 0x7 0384 00da | | Load_Top At_Offset_2 0385 0091 0e99 | | Action Push_String_Extended_Indexed,0xe99 ; "ON_NORMAL" 0387 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0388 00db | | Load_Top At_Offset_3 0389 00db | | Load_Top At_Offset_3 038a 00e0 | | Load_Encached Standard_Cache 038b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 038c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 038d 00da | | Load_Top At_Offset_2 038e 00e0 | | Load_Encached Standard_Cache 038f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0390 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0391 00db | | Load_Top At_Offset_3 0392 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0393 00db | | Load_Top At_Offset_3 0394 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0395 e2c6 | | Load 0x1,0xc6 0396 00dc | | Load_Top At_Offset_4 0397 0267 | g | Execute Discrete,Predecessor 0398 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0399 e2c6 | | Load 0x1,0xc6 039a 00dc | | Load_Top At_Offset_4 039b 0268 | h | Execute Discrete,Successor 039c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 039d 0000 0000 | | .XXX[0x3] 039f 0000 | | 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 4607 |F | Jump_Case 0x8 03a4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 03a5 7806 |x | Jump 0x3ac ; case 0x1 03a6 7809 |x | Jump 0x3b0 ; case 0x2 03a7 780d |x | Jump 0x3b5 ; case 0x3 03a8 7810 |x | Jump 0x3b9 ; case 0x4 03a9 7811 |x | Jump 0x3bb ; case 0x5 03aa 7812 |x | Jump 0x3bd ; case 0x6 03ab 7815 |x | Jump 0x3c1 ; case 0x7 03ac 00da | | Load_Top At_Offset_2 03ad 0091 0e9d | | Action Push_String_Extended_Indexed,0xe9d ; "FTP" 03af 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 03b0 00db | | Load_Top At_Offset_3 03b1 00db | | Load_Top At_Offset_3 03b2 00e0 | | Load_Encached Standard_Cache 03b3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 03b4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03b5 00da | | Load_Top At_Offset_2 03b6 00e0 | | Load_Encached Standard_Cache 03b7 181c | | Execute Package,Field_Execute,Field_Number 0x1c 03b8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 03b9 00db | | Load_Top At_Offset_3 03ba 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03bb 00db | | Load_Top At_Offset_3 03bc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03bd e2c9 | | Load 0x1,0xc9 03be 00dc | | Load_Top At_Offset_4 03bf 0267 | g | Execute Discrete,Predecessor 03c0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03c1 e2c9 | | Load 0x1,0xc9 03c2 00dc | | Load_Top At_Offset_4 03c3 0268 | h | Execute Discrete,Successor 03c4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03c5 0000 0000 | | .XXX[0x3] 03c7 0000 | | 03c8 ; -------------------------------------------------------------------------------------- 03c8 ; SUBPROGRAM 03c8 ; -------------------------------------------------------------------------------------- 03c8 03cb | | .CONST 0x03cb ; Address of begin 03c9 0004 | | .CONST 0x0004 ; Address of exception handler 03ca 0001 | | .CONST 0x0001 ; Number of locals 03cb BODY_03c8: 03cb INIT_03c8: 03cb 4607 |F | Jump_Case 0x8 03cc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 03cd 7806 |x | Jump 0x3d4 ; case 0x1 03ce 7809 |x | Jump 0x3d8 ; case 0x2 03cf 780d |x | Jump 0x3dd ; case 0x3 03d0 7810 |x | Jump 0x3e1 ; case 0x4 03d1 7811 |x | Jump 0x3e3 ; case 0x5 03d2 7812 |x | Jump 0x3e5 ; case 0x6 03d3 7815 |x | Jump 0x3e9 ; case 0x7 03d4 00da | | Load_Top At_Offset_2 03d5 0091 0e9f | | Action Push_String_Extended_Indexed,0xe9f ; "TEXT" 03d7 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 03d8 00db | | Load_Top At_Offset_3 03d9 00db | | Load_Top At_Offset_3 03da 00e0 | | Load_Encached Standard_Cache 03db 181b | | Execute Package,Field_Execute,Field_Number 0x1b 03dc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03dd 00da | | Load_Top At_Offset_2 03de 00e0 | | Load_Encached Standard_Cache 03df 181c | | Execute Package,Field_Execute,Field_Number 0x1c 03e0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 03e1 00db | | Load_Top At_Offset_3 03e2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03e3 00db | | Load_Top At_Offset_3 03e4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03e5 e2cb | | Load 0x1,0xcb 03e6 00dc | | Load_Top At_Offset_4 03e7 0267 | g | Execute Discrete,Predecessor 03e8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03e9 e2cb | | Load 0x1,0xcb 03ea 00dc | | Load_Top At_Offset_4 03eb 0268 | h | Execute Discrete,Successor 03ec 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 03ed 0000 0000 | | .XXX[0x3] 03ef 0000 | | 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 03f3 | | .CONST 0x03f3 ; Address of begin 03f1 0004 | | .CONST 0x0004 ; Address of exception handler 03f2 0001 | | .CONST 0x0001 ; Number of locals 03f3 BODY_03f0: 03f3 INIT_03f0: 03f3 00da | | Load_Top At_Offset_2 03f4 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 03f5 0320 | | Declare_Variable Record,Duplicate 03f6 00cd | | Action Spare6_Action 03f7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03f8 ; -------------------------------------------------------------------------------------- 03f8 ; SUBPROGRAM 03f8 ; -------------------------------------------------------------------------------------- 03f8 03fb | | .CONST 0x03fb ; Address of begin 03f9 0004 | | .CONST 0x0004 ; Address of exception handler 03fa 0001 | | .CONST 0x0001 ; Number of locals 03fb BODY_03f8: 03fb INIT_03f8: 03fb 00da | | Load_Top At_Offset_2 03fc 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 03fd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03fe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03ff 0000 | | .XXX[0x1] 0400 ; -------------------------------------------------------------------------------------- 0400 ; SUBPROGRAM 0400 ; -------------------------------------------------------------------------------------- 0400 0403 | | .CONST 0x0403 ; Address of begin 0401 0004 | | .CONST 0x0004 ; Address of exception handler 0402 0001 | | .CONST 0x0001 ; Number of locals 0403 BODY_0400: 0403 INIT_0400: 0403 00da | | Load_Top At_Offset_2 0404 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0405 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0406 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0407 0000 | | .XXX[0x1] 0408 ; -------------------------------------------------------------------------------------- 0408 ; SUBPROGRAM 0408 ; -------------------------------------------------------------------------------------- 0408 040b | | .CONST 0x040b ; Address of begin 0409 0004 | | .CONST 0x0004 ; Address of exception handler 040a 0001 | | .CONST 0x0001 ; Number of locals 040b BODY_0408: 040b INIT_0408: 040b e262 | b | Load 0x1,0x62 040c 0322 | " | Declare_Variable Record 040d 00db | | Load_Top At_Offset_3 040e 00d9 | | Load_Top At_Offset_1 040f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0410 00d8 | | Load_Top At_Offset_0 0411 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0412 e5ff | | Load 0x2,-0x1 0413 e006 | | Load 0x0,0x6 0414 180f | | Execute Package,Field_Execute,Field_Number 0xf 0415 e006 | | Load 0x0,0x6 0416 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0417 00d8 | | Load_Top At_Offset_0 0418 e2be | | Load 0x1,0xbe 0419 0260 | ` | Execute Discrete,In_Type 041a 7001 |p | Jump_Nonzero 0x41c 041b 0801 | | Execute_Immediate Raise,0x1 041c 00d9 | | Load_Top At_Offset_1 041d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 041e e2e5 | | Load 0x1,0xe5 041f 00d0 | | Action Swap_Control 0420 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0421 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0422 0000 0000 | | .BLANK 0000[0x6] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 042b | + | .CONST 0x042b ; Address of begin 0429 0004 | | .CONST 0x0004 ; Address of exception handler 042a 0001 | | .CONST 0x0001 ; Number of locals 042b BODY_0428: 042b INIT_0428: 042b e262 | b | Load 0x1,0x62 042c 0322 | " | Declare_Variable Record 042d 00db | | Load_Top At_Offset_3 042e 00d8 | | Load_Top At_Offset_0 042f 00e3 | | Load_Encached Natural_Cache 0430 0260 | ` | Execute Discrete,In_Type 0431 7001 |p | Jump_Nonzero 0x433 0432 0801 | | Execute_Immediate Raise,0x1 0433 e006 | | Load 0x0,0x6 0434 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0435 e006 | | Load 0x0,0x6 0436 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0437 00d9 | | Load_Top At_Offset_1 0438 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0439 00d8 | | Load_Top At_Offset_0 043a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 043b e5ff | | Load 0x2,-0x1 043c 00d9 | | Load_Top At_Offset_1 043d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 043e e2e5 | | Load 0x1,0xe5 043f 00d0 | | Action Swap_Control 0440 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0441 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0442 0000 0000 | | .BLANK 0000[0x6] 0448 ; -------------------------------------------------------------------------------------- 0448 ; SUBPROGRAM 0448 ; -------------------------------------------------------------------------------------- 0448 044b | K | .CONST 0x044b ; Address of begin 0449 0452 | R | .CONST 0x0452 ; Address of exception handler 044a 0001 | | .CONST 0x0001 ; Number of locals 044b BODY_0448: 044b INIT_0448: 044b 00da | | Load_Top At_Offset_2 044c 8263 | c | Call 0x1,0x63 044d e007 | | Load 0x0,0x7 044e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 044f e008 | | Load 0x0,0x8 0450 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d 0451 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0452 TRAP_0448: 0452 e008 | | Load 0x0,0x8 0453 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0454 010f | | Execute Exception,Equal 0455 6802 |h | Jump_Zero 0x458 0456 e2bc | | Load 0x1,0xbc 0457 0257 | W | Execute Discrete,Raise 0458 0100 | | Execute Exception,Raise 0459 0000 0000 | | .BLANK 0000[0x7] 0460 ; -------------------------------------------------------------------------------------- 0460 ; SUBPROGRAM 0460 ; -------------------------------------------------------------------------------------- 0460 0463 | c | .CONST 0x0463 ; Address of begin 0461 046a | j | .CONST 0x046a ; Address of exception handler 0462 0001 | | .CONST 0x0001 ; Number of locals 0463 BODY_0460: 0463 INIT_0460: 0463 00da | | Load_Top At_Offset_2 0464 8263 | c | Call 0x1,0x63 0465 e007 | | Load 0x0,0x7 0466 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0467 e008 | | Load 0x0,0x8 0468 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e 0469 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 046a TRAP_0460: 046a e008 | | Load 0x0,0x8 046b 1b18 | | Execute Package,Field_Read,Field_Number 0x18 046c 010f | | Execute Exception,Equal 046d 6802 |h | Jump_Zero 0x470 046e e2bc | | Load 0x1,0xbc 046f 0257 | W | Execute Discrete,Raise 0470 0100 | | Execute Exception,Raise 0471 0000 0000 | | .BLANK 0000[0x7] 0478 ; -------------------------------------------------------------------------------------- 0478 ; SUBPROGRAM 0478 ; -------------------------------------------------------------------------------------- 0478 047b | { | .CONST 0x047b ; Address of begin 0479 0482 | | .CONST 0x0482 ; Address of exception handler 047a 0001 | | .CONST 0x0001 ; Number of locals 047b BODY_0478: 047b INIT_0478: 047b 00da | | Load_Top At_Offset_2 047c 8263 | c | Call 0x1,0x63 047d e007 | | Load 0x0,0x7 047e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 047f e008 | | Load 0x0,0x8 0480 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f 0481 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0482 TRAP_0478: 0482 e008 | | Load 0x0,0x8 0483 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0484 010f | | Execute Exception,Equal 0485 6802 |h | Jump_Zero 0x488 0486 e2bc | | Load 0x1,0xbc 0487 0257 | W | Execute Discrete,Raise 0488 0100 | | Execute Exception,Raise 0489 0000 0000 | | .BLANK 0000[0x7] 0490 ; -------------------------------------------------------------------------------------- 0490 ; SUBPROGRAM 0490 ; -------------------------------------------------------------------------------------- 0490 0493 | | .CONST 0x0493 ; Address of begin 0491 049f | | .CONST 0x049f ; Address of exception handler 0492 0001 | | .CONST 0x0001 ; Number of locals 0493 BODY_0490: 0493 INIT_0490: 0493 00da | | Load_Top At_Offset_2 0494 8263 | c | Call 0x1,0x63 0495 e007 | | Load 0x0,0x7 0496 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0497 e008 | | Load 0x0,0x8 0498 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0499 00d8 | | Load_Top At_Offset_0 049a 00e4 | | Load_Encached Positive_Cache 049b 0260 | ` | Execute Discrete,In_Type 049c 7001 |p | Jump_Nonzero 0x49e 049d 0801 | | Execute_Immediate Raise,0x1 049e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 049f TRAP_0490: 049f e008 | | Load 0x0,0x8 04a0 1b18 | | Execute Package,Field_Read,Field_Number 0x18 04a1 010f | | Execute Exception,Equal 04a2 6802 |h | Jump_Zero 0x4a5 04a3 e2bc | | Load 0x1,0xbc 04a4 0257 | W | Execute Discrete,Raise 04a5 0100 | | Execute Exception,Raise 04a6 0000 0000 | | .XXX[0x2] 04a8 ; -------------------------------------------------------------------------------------- 04a8 ; SUBPROGRAM 04a8 ; -------------------------------------------------------------------------------------- 04a8 04ab | | .CONST 0x04ab ; Address of begin 04a9 04b2 | | .CONST 0x04b2 ; Address of exception handler 04aa 0001 | | .CONST 0x0001 ; Number of locals 04ab BODY_04a8: 04ab INIT_04a8: 04ab 00da | | Load_Top At_Offset_2 04ac 8263 | c | Call 0x1,0x63 04ad e007 | | Load 0x0,0x7 04ae 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04af e008 | | Load 0x0,0x8 04b0 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 04b1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04b2 TRAP_04a8: 04b2 e008 | | Load 0x0,0x8 04b3 1b18 | | Execute Package,Field_Read,Field_Number 0x18 04b4 010f | | Execute Exception,Equal 04b5 6802 |h | Jump_Zero 0x4b8 04b6 e2bc | | Load 0x1,0xbc 04b7 0257 | W | Execute Discrete,Raise 04b8 0100 | | Execute Exception,Raise 04b9 0000 0000 | | .BLANK 0000[0x7] 04c0 ; -------------------------------------------------------------------------------------- 04c0 ; SUBPROGRAM 04c0 ; -------------------------------------------------------------------------------------- 04c0 04c3 | | .CONST 0x04c3 ; Address of begin 04c1 04ca | | .CONST 0x04ca ; Address of exception handler 04c2 0001 | | .CONST 0x0001 ; Number of locals 04c3 BODY_04c0: 04c3 INIT_04c0: 04c3 00da | | Load_Top At_Offset_2 04c4 8263 | c | Call 0x1,0x63 04c5 e007 | | Load 0x0,0x7 04c6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04c7 e008 | | Load 0x0,0x8 04c8 184c | L | Execute Package,Field_Execute,Field_Number 0x4c 04c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04ca TRAP_04c0: 04ca e008 | | Load 0x0,0x8 04cb 1b18 | | Execute Package,Field_Read,Field_Number 0x18 04cc 010f | | Execute Exception,Equal 04cd 6802 |h | Jump_Zero 0x4d0 04ce e2bc | | Load 0x1,0xbc 04cf 0257 | W | Execute Discrete,Raise 04d0 0100 | | Execute Exception,Raise 04d1 0000 0000 | | .BLANK 0000[0x7] 04d8 ; -------------------------------------------------------------------------------------- 04d8 ; SUBPROGRAM 04d8 ; -------------------------------------------------------------------------------------- 04d8 04db | | .CONST 0x04db ; Address of begin 04d9 04e2 | | .CONST 0x04e2 ; Address of exception handler 04da 0001 | | .CONST 0x0001 ; Number of locals 04db BODY_04d8: 04db INIT_04d8: 04db 00da | | Load_Top At_Offset_2 04dc 8263 | c | Call 0x1,0x63 04dd e007 | | Load 0x0,0x7 04de 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04df e008 | | Load 0x0,0x8 04e0 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 04e1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04e2 TRAP_04d8: 04e2 e008 | | Load 0x0,0x8 04e3 1b18 | | Execute Package,Field_Read,Field_Number 0x18 04e4 010f | | Execute Exception,Equal 04e5 6802 |h | Jump_Zero 0x4e8 04e6 e2bc | | Load 0x1,0xbc 04e7 0257 | W | Execute Discrete,Raise 04e8 0100 | | Execute Exception,Raise 04e9 0000 0000 | | .BLANK 0000[0x7] 04f0 ; -------------------------------------------------------------------------------------- 04f0 ; SUBPROGRAM 04f0 ; -------------------------------------------------------------------------------------- 04f0 0502 | | .CONST 0x0502 ; Address of begin 04f1 0004 | | .CONST 0x0004 ; Address of exception handler 04f2 0004 | | .CONST 0x0004 ; Number of locals 04f3 INIT_04f0: 04f3 4820 |H | Short_Literal 0x20 04f4 e5fe | | Load 0x2,-0x2 04f5 e009 | | Load 0x0,0x9 04f6 181c | | Execute Package,Field_Execute,Field_Number 0x1c 04f7 82e6 | | Call 0x1,0xe6 04f8 00db | | Load_Top At_Offset_3 04f9 8263 | c | Call 0x1,0x63 04fa e007 | | Load 0x0,0x7 04fb 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04fc e008 | | Load 0x0,0x8 04fd 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 04fe 00d8 | | Load_Top At_Offset_0 04ff 01db | | Execute Vector,Length 0500 00e3 | | Load_Encached Natural_Cache 0501 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 0502 BODY_04f0: 0502 00d8 | | Load_Top At_Offset_0 0503 0c01 | | Execute_Immediate Greater_Equal,0x1 0504 681d |h | Jump_Zero 0x522 0505 00da | | Load_Top At_Offset_2 0506 01db | | Execute Vector,Length 0507 7002 |p | Jump_Nonzero 0x50a 0508 00ea | | Load_Encached Null_String_Cache 0509 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 050a 00da | | Load_Top At_Offset_2 050b 01db | | Execute Vector,Length 050c 00d9 | | Load_Top At_Offset_1 050d 027c | | | Execute Discrete,Less 050e 6804 |h | Jump_Zero 0x513 050f 00da | | Load_Top At_Offset_2 0510 00da | | Load_Top At_Offset_2 0511 01cc | | Execute Vector,Catenate 0512 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0513 4801 |H | Short_Literal 0x1 0514 00db | | Load_Top At_Offset_3 0515 00db | | Load_Top At_Offset_3 0516 e009 | | Load 0x0,0x9 0517 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0518 00db | | Load_Top At_Offset_3 0519 01dc | | Execute Vector,Last 051a 027f | | Execute Discrete,Equal 051b 6802 |h | Jump_Zero 0x51e 051c 00da | | Load_Top At_Offset_2 051d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 051e 00da | | Load_Top At_Offset_2 051f 00da | | Load_Top At_Offset_2 0520 01cc | | Execute Vector,Catenate 0521 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0522 00da | | Load_Top At_Offset_2 0523 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0524 0000 0000 | | .BLANK 0000[0x4] 0528 ; -------------------------------------------------------------------------------------- 0528 ; SUBPROGRAM 0528 ; -------------------------------------------------------------------------------------- 0528 0531 | 1 | .CONST 0x0531 ; Address of begin 0529 0004 | | .CONST 0x0004 ; Address of exception handler 052a 0003 | | .CONST 0x0003 ; Number of locals 052b INIT_0528: 052b 00db | | Load_Top At_Offset_3 052c 00db | | Load_Top At_Offset_3 052d 826f | o | Call 0x1,0x6f 052e e5fd | | Load 0x2,-0x3 052f e5ff | | Load 0x2,-0x1 0530 826f | o | Call 0x1,0x6f 0531 BODY_0528: 0531 00d9 | | Load_Top At_Offset_1 0532 00d9 | | Load_Top At_Offset_1 0533 01cc | | Execute Vector,Catenate 0534 82e6 | | Call 0x1,0xe6 0535 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0536 0000 0000 | | .XXX[0x2] 0538 ; -------------------------------------------------------------------------------------- 0538 ; SUBPROGRAM 0538 ; -------------------------------------------------------------------------------------- 0538 053f | ? | .CONST 0x053f ; Address of begin 0539 0004 | | .CONST 0x0004 ; Address of exception handler 053a 0002 | | .CONST 0x0002 ; Number of locals 053b INIT_0538: 053b 00da | | Load_Top At_Offset_2 053c e5fe | | Load 0x2,-0x2 053d e5fd | | Load 0x2,-0x3 053e 82e7 | | Call 0x1,0xe7 053f BODY_0538: 053f 00d8 | | Load_Top At_Offset_0 0540 01db | | Execute Vector,Length 0541 7007 |p | Jump_Nonzero 0x549 0542 e5fe | | Load 0x2,-0x2 0543 e5ff | | Load 0x2,-0x1 0544 826f | o | Call 0x1,0x6f 0545 e5fd | | Load 0x2,-0x3 0546 01cc | | Execute Vector,Catenate 0547 82e6 | | Call 0x1,0xe6 0548 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0549 00d8 | | Load_Top At_Offset_0 054a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 054b 0000 0000 | | .BLANK 0000[0x5] 0550 ; -------------------------------------------------------------------------------------- 0550 ; SUBPROGRAM 0550 ; -------------------------------------------------------------------------------------- 0550 0553 | S | .CONST 0x0553 ; Address of begin 0551 055f | _ | .CONST 0x055f ; Address of exception handler 0552 0001 | | .CONST 0x0001 ; Number of locals 0553 BODY_0550: 0553 INIT_0550: 0553 00da | | Load_Top At_Offset_2 0554 8263 | c | Call 0x1,0x63 0555 e007 | | Load 0x0,0x7 0556 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0557 e008 | | Load 0x0,0x8 0558 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f 0559 00d8 | | Load_Top At_Offset_0 055a 00e4 | | Load_Encached Positive_Cache 055b 0260 | ` | Execute Discrete,In_Type 055c 7001 |p | Jump_Nonzero 0x55e 055d 0801 | | Execute_Immediate Raise,0x1 055e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 055f TRAP_0550: 055f e008 | | Load 0x0,0x8 0560 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0561 010f | | Execute Exception,Equal 0562 6802 |h | Jump_Zero 0x565 0563 e2bc | | Load 0x1,0xbc 0564 0257 | W | Execute Discrete,Raise 0565 0100 | | Execute Exception,Raise 0566 0000 0000 | | .XXX[0x2] 0568 ; -------------------------------------------------------------------------------------- 0568 ; SUBPROGRAM 0568 ; -------------------------------------------------------------------------------------- 0568 056b | k | .CONST 0x056b ; Address of begin 0569 0572 | r | .CONST 0x0572 ; Address of exception handler 056a 0001 | | .CONST 0x0001 ; Number of locals 056b BODY_0568: 056b INIT_0568: 056b 00da | | Load_Top At_Offset_2 056c 8263 | c | Call 0x1,0x63 056d e007 | | Load 0x0,0x7 056e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 056f e008 | | Load 0x0,0x8 0570 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 0571 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0572 TRAP_0568: 0572 e008 | | Load 0x0,0x8 0573 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0574 010f | | Execute Exception,Equal 0575 6802 |h | Jump_Zero 0x578 0576 e2bc | | Load 0x1,0xbc 0577 0257 | W | Execute Discrete,Raise 0578 0100 | | Execute Exception,Raise 0579 0000 0000 | | .BLANK 0000[0x7] 0580 ; -------------------------------------------------------------------------------------- 0580 ; SUBPROGRAM 0580 ; -------------------------------------------------------------------------------------- 0580 0583 | | .CONST 0x0583 ; Address of begin 0581 0004 | | .CONST 0x0004 ; Address of exception handler 0582 0001 | | .CONST 0x0001 ; Number of locals 0583 BODY_0580: 0583 INIT_0580: 0583 4607 |F | Jump_Case 0x8 0584 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0585 7806 |x | Jump 0x58c ; case 0x1 0586 7809 |x | Jump 0x590 ; case 0x2 0587 780d |x | Jump 0x595 ; case 0x3 0588 7810 |x | Jump 0x599 ; case 0x4 0589 7811 |x | Jump 0x59b ; case 0x5 058a 7812 |x | Jump 0x59d ; case 0x6 058b 7815 |x | Jump 0x5a1 ; case 0x7 058c 00da | | Load_Top At_Offset_2 058d 0091 0ea1 | | Action Push_String_Extended_Indexed,0xea1 ; "ADA_SPEC" 058f 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0590 00db | | Load_Top At_Offset_3 0591 00db | | Load_Top At_Offset_3 0592 00e0 | | Load_Encached Standard_Cache 0593 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0594 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0595 00da | | Load_Top At_Offset_2 0596 00e0 | | Load_Encached Standard_Cache 0597 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0598 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0599 00db | | Load_Top At_Offset_3 059a 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 059b 00db | | Load_Top At_Offset_3 059c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 059d e2b3 | | Load 0x1,0xb3 059e 00dc | | Load_Top At_Offset_4 059f 0267 | g | Execute Discrete,Predecessor 05a0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05a1 e2b3 | | Load 0x1,0xb3 05a2 00dc | | Load_Top At_Offset_4 05a3 0268 | h | Execute Discrete,Successor 05a4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05a5 0000 0000 | | .XXX[0x3] 05a7 0000 | | 05a8 ; -------------------------------------------------------------------------------------- 05a8 ; SUBPROGRAM 05a8 ; -------------------------------------------------------------------------------------- 05a8 05ab | | .CONST 0x05ab ; Address of begin 05a9 05c2 | | .CONST 0x05c2 ; Address of exception handler 05aa 0001 | | .CONST 0x0001 ; Number of locals 05ab BODY_05a8: 05ab INIT_05a8: 05ab 00db | | Load_Top At_Offset_3 05ac 4603 |F | Jump_Case 0x4 05ad 7805 |x | Jump 0x5b3 ; case 0x0 05ae 780b |x | Jump 0x5ba ; case 0x1 05af 7811 |x | Jump 0x5c1 ; case 0x2 05b0 7800 |x | Jump 0x5b1 ; case 0x3 05b1 00ea | | Load_Encached Null_String_Cache 05b2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05b3 00da | | Load_Top At_Offset_2 05b4 8263 | c | Call 0x1,0x63 05b5 e007 | | Load 0x0,0x7 05b6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 05b7 e008 | | Load 0x0,0x8 05b8 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 05b9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05ba 00da | | Load_Top At_Offset_2 05bb 8263 | c | Call 0x1,0x63 05bc e007 | | Load 0x0,0x7 05bd 1811 | | Execute Package,Field_Execute,Field_Number 0x11 05be e008 | | Load 0x0,0x8 05bf 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 05c0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05c1 0833 | 3 | Execute_Immediate Raise,0x33 05c2 TRAP_05a8: 05c2 e008 | | Load 0x0,0x8 05c3 1b18 | | Execute Package,Field_Read,Field_Number 0x18 05c4 010f | | Execute Exception,Equal 05c5 6802 |h | Jump_Zero 0x5c8 05c6 e2bc | | Load 0x1,0xbc 05c7 0257 | W | Execute Discrete,Raise 05c8 0100 | | Execute Exception,Raise 05c9 0000 0000 | | .BLANK 0000[0x7] 05d0 ; -------------------------------------------------------------------------------------- 05d0 ; SUBPROGRAM 05d0 ; -------------------------------------------------------------------------------------- 05d0 05d3 | | .CONST 0x05d3 ; Address of begin 05d1 0004 | | .CONST 0x0004 ; Address of exception handler 05d2 0001 | | .CONST 0x0001 ; Number of locals 05d3 BODY_05d0: 05d3 INIT_05d0: 05d3 00db | | Load_Top At_Offset_3 05d4 00db | | Load_Top At_Offset_3 05d5 8276 | v | Call 0x1,0x76 05d6 00db | | Load_Top At_Offset_3 05d7 8274 | t | Call 0x1,0x74 05d8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05d9 0000 0000 | | .BLANK 0000[0x7] 05e0 ; -------------------------------------------------------------------------------------- 05e0 ; SUBPROGRAM 05e0 ; -------------------------------------------------------------------------------------- 05e0 05ea | | .CONST 0x05ea ; Address of begin 05e1 0004 | | .CONST 0x0004 ; Address of exception handler 05e2 0002 | | .CONST 0x0002 ; Number of locals 05e3 INIT_05e0: 05e3 e002 | | Load 0x0,0x2 05e4 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 05e5 02c7 | | Declare_Variable Any 05e6 e5fe | | Load 0x2,-0x2 05e7 e002 | | Load 0x0,0x2 05e8 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 05e9 a402 | | Store_Unchecked 0x2,0x2 05ea BODY_05e0: 05ea 00d8 | | Load_Top At_Offset_0 05eb e00a | | Load 0x0,0xa 05ec 180d | | Execute Package,Field_Execute,Field_Number 0xd 05ed 012f | / | Execute Any,Equal 05ee 680e |h | Jump_Zero 0x5fd 05ef e5fe | | Load 0x2,-0x2 05f0 e00b | | Load 0x0,0xb 05f1 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 05f2 6802 |h | Jump_Zero 0x5f5 05f3 4800 |H | Short_Literal 0x0 05f4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05f5 e5fe | | Load 0x2,-0x2 05f6 e00b | | Load 0x0,0xb 05f7 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 05f8 6802 |h | Jump_Zero 0x5fb 05f9 4801 |H | Short_Literal 0x1 05fa 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05fb 4803 |H | Short_Literal 0x3 05fc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 05fd 00d8 | | Load_Top At_Offset_0 05fe e00a | | Load 0x0,0xa 05ff 180f | | Execute Package,Field_Execute,Field_Number 0xf 0600 012f | / | Execute Any,Equal 0601 6802 |h | Jump_Zero 0x604 0602 4802 |H | Short_Literal 0x2 0603 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0604 4803 |H | Short_Literal 0x3 0605 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0606 0000 0000 | | .XXX[0x2] 0608 ; -------------------------------------------------------------------------------------- 0608 ; SUBPROGRAM 0608 ; -------------------------------------------------------------------------------------- 0608 0612 | | .CONST 0x0612 ; Address of begin 0609 0004 | | .CONST 0x0004 ; Address of exception handler 060a 0003 | | .CONST 0x0003 ; Number of locals 060b INIT_0608: 060b 00db | | Load_Top At_Offset_3 060c 00db | | Load_Top At_Offset_3 060d 8276 | v | Call 0x1,0x76 060e e2b3 | | Load 0x1,0xb3 060f 03f1 | | Declare_Variable Discrete,With_Value 0610 029f 0d3b | ;| Declare_Subprogram INIT_0d38,For_Call 0612 BODY_0608: 0612 8403 | | Call 0x2,0x3 0613 0831 | 1 | Execute_Immediate Raise,0x31 0614 0000 0000 | | .BLANK 0000[0x4] 0618 ; -------------------------------------------------------------------------------------- 0618 ; SUBPROGRAM 0618 ; -------------------------------------------------------------------------------------- 0618 061f | | .CONST 0x061f ; Address of begin 0619 0004 | | .CONST 0x0004 ; Address of exception handler 061a 0002 | | .CONST 0x0002 ; Number of locals 061b INIT_0618: 061b e5fd | | Load 0x2,-0x3 061c e5fe | | Load 0x2,-0x2 061d e5ff | | Load 0x2,-0x1 061e 82e4 | | Call 0x1,0xe4 061f BODY_0618: 061f 00d8 | | Load_Top At_Offset_0 0620 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0621 7002 |p | Jump_Nonzero 0x624 0622 00ea | | Load_Encached Null_String_Cache 0623 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0624 4801 |H | Short_Literal 0x1 0625 00d9 | | Load_Top At_Offset_1 0626 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0627 00da | | Load_Top At_Offset_2 0628 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0629 01cf | | Execute Vector,Slice_Read 062a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 062b 0000 0000 | | .BLANK 0000[0x5] 0630 ; -------------------------------------------------------------------------------------- 0630 ; SUBPROGRAM 0630 ; -------------------------------------------------------------------------------------- 0630 0637 | 7 | .CONST 0x0637 ; Address of begin 0631 0004 | | .CONST 0x0004 ; Address of exception handler 0632 0002 | | .CONST 0x0002 ; Number of locals 0633 INIT_0630: 0633 00da | | Load_Top At_Offset_2 0634 e5fd | | Load 0x2,-0x3 0635 e5fe | | Load 0x2,-0x2 0636 82e7 | | Call 0x1,0xe7 0637 BODY_0630: 0637 00d8 | | Load_Top At_Offset_0 0638 01db | | Execute Vector,Length 0639 7007 |p | Jump_Nonzero 0x641 063a e5fd | | Load 0x2,-0x3 063b e5ff | | Load 0x2,-0x1 063c 826f | o | Call 0x1,0x6f 063d e5fe | | Load 0x2,-0x2 063e 01cc | | Execute Vector,Catenate 063f 82e6 | | Call 0x1,0xe6 0640 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0641 00d8 | | Load_Top At_Offset_0 0642 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0643 0000 0000 | | .BLANK 0000[0x5] 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 0653 | S | .CONST 0x0653 ; Address of begin 0649 0004 | | .CONST 0x0004 ; Address of exception handler 064a 0002 | | .CONST 0x0002 ; Number of locals 064b INIT_0648: 064b 4801 |H | Short_Literal 0x1 064c e5fe | | Load 0x2,-0x2 064d e5ff | | Load 0x2,-0x1 064e 82d0 | | Call 0x1,0xd0 064f e009 | | Load 0x0,0x9 0650 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0651 00e3 | | Load_Encached Natural_Cache 0652 03f1 | | Declare_Variable Discrete,With_Value 0653 BODY_0648: 0653 00d8 | | Load_Top At_Offset_0 0654 7004 |p | Jump_Nonzero 0x659 0655 e5fe | | Load 0x2,-0x2 0656 0335 | 5 | Declare_Variable Array,Duplicate 0657 00cd | | Action Spare6_Action 0658 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0659 e5fe | | Load 0x2,-0x2 065a 01dd | | Execute Vector,First 065b 00d9 | | Load_Top At_Offset_1 065c e5ff | | Load 0x2,-0x1 065d 82d0 | | Call 0x1,0xd0 065e 01db | | Execute Vector,Length 065f 0272 | r | Execute Discrete,Minus 0660 00d8 | | Load_Top At_Offset_0 0661 00e2 | | Load_Encached Integer_Cache 0662 0260 | ` | Execute Discrete,In_Type 0663 7001 |p | Jump_Nonzero 0x665 0664 0801 | | Execute_Immediate Raise,0x1 0665 e5fe | | Load 0x2,-0x2 0666 01cf | | Execute Vector,Slice_Read 0667 0335 | 5 | Declare_Variable Array,Duplicate 0668 00cd | | Action Spare6_Action 0669 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 066a 0000 0000 | | .BLANK 0000[0x6] 0670 ; -------------------------------------------------------------------------------------- 0670 ; SUBPROGRAM 0670 ; -------------------------------------------------------------------------------------- 0670 067b | { | .CONST 0x067b ; Address of begin 0671 0004 | | .CONST 0x0004 ; Address of exception handler 0672 0002 | | .CONST 0x0002 ; Number of locals 0673 INIT_0670: 0673 4801 |H | Short_Literal 0x1 0674 e5fe | | Load 0x2,-0x2 0675 e5ff | | Load 0x2,-0x1 0676 82d0 | | Call 0x1,0xd0 0677 e009 | | Load 0x0,0x9 0678 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0679 00e3 | | Load_Encached Natural_Cache 067a 03f1 | | Declare_Variable Discrete,With_Value 067b BODY_0670: 067b 00d8 | | Load_Top At_Offset_0 067c 7002 |p | Jump_Nonzero 0x67f 067d 00ea | | Load_Encached Null_String_Cache 067e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 067f e5fd | | Load 0x2,-0x3 0680 6812 |h | Jump_Zero 0x693 0681 00d8 | | Load_Top At_Offset_0 0682 e5ff | | Load 0x2,-0x1 0683 82d0 | | Call 0x1,0xd0 0684 01db | | Execute Vector,Length 0685 0272 | r | Execute Discrete,Minus 0686 0a01 | | Execute_Immediate Plus,0x1 0687 00d8 | | Load_Top At_Offset_0 0688 00e2 | | Load_Encached Integer_Cache 0689 0260 | ` | Execute Discrete,In_Type 068a 7001 |p | Jump_Nonzero 0x68c 068b 0801 | | Execute_Immediate Raise,0x1 068c e5fe | | Load 0x2,-0x2 068d 01dc | | Execute Vector,Last 068e e5fe | | Load 0x2,-0x2 068f 01cf | | Execute Vector,Slice_Read 0690 0335 | 5 | Declare_Variable Array,Duplicate 0691 00cd | | Action Spare6_Action 0692 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0693 00d8 | | Load_Top At_Offset_0 0694 0a01 | | Execute_Immediate Plus,0x1 0695 00d8 | | Load_Top At_Offset_0 0696 00e2 | | Load_Encached Integer_Cache 0697 0260 | ` | Execute Discrete,In_Type 0698 7001 |p | Jump_Nonzero 0x69a 0699 0801 | | Execute_Immediate Raise,0x1 069a e5fe | | Load 0x2,-0x2 069b 01dc | | Execute Vector,Last 069c e5fe | | Load 0x2,-0x2 069d 01cf | | Execute Vector,Slice_Read 069e 0335 | 5 | Declare_Variable Array,Duplicate 069f 00cd | | Action Spare6_Action 06a0 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 06a1 0000 0000 | | .BLANK 0000[0x7] 06a8 ; -------------------------------------------------------------------------------------- 06a8 ; SUBPROGRAM 06a8 ; -------------------------------------------------------------------------------------- 06a8 06ab | | .CONST 0x06ab ; Address of begin 06a9 0004 | | .CONST 0x0004 ; Address of exception handler 06aa 0001 | | .CONST 0x0001 ; Number of locals 06ab BODY_06a8: 06ab INIT_06a8: 06ab e00c | | Load 0x0,0xc 06ac 1b12 | | Execute Package,Field_Read,Field_Number 0x12 06ad 0257 | W | Execute Discrete,Raise 06ae 0000 0000 | | .XXX[0x2] 06b0 ; -------------------------------------------------------------------------------------- 06b0 ; SUBPROGRAM 06b0 ; -------------------------------------------------------------------------------------- 06b0 06b3 | | .CONST 0x06b3 ; Address of begin 06b1 0004 | | .CONST 0x0004 ; Address of exception handler 06b2 0001 | | .CONST 0x0001 ; Number of locals 06b3 BODY_06b0: 06b3 INIT_06b0: 06b3 00db | | Load_Top At_Offset_3 06b4 01db | | Execute Vector,Length 06b5 0c01 | | Execute_Immediate Greater_Equal,0x1 06b6 6805 |h | Jump_Zero 0x6bc 06b7 00da | | Load_Top At_Offset_2 06b8 82d0 | | Call 0x1,0xd0 06b9 e5fe | | Load 0x2,-0x2 06ba 01cc | | Execute Vector,Catenate 06bb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06bc 00ea | | Load_Encached Null_String_Cache 06bd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 06be 0000 0000 | | .XXX[0x2] 06c0 ; -------------------------------------------------------------------------------------- 06c0 ; SUBPROGRAM 06c0 ; -------------------------------------------------------------------------------------- 06c0 06c3 | | .CONST 0x06c3 ; Address of begin 06c1 0004 | | .CONST 0x0004 ; Address of exception handler 06c2 0001 | | .CONST 0x0001 ; Number of locals 06c3 BODY_06c0: 06c3 INIT_06c0: 06c3 08e2 | | Execute_Immediate Raise,0xe2 06c4 0000 0000 | | .BLANK 0000[0x4] 06c8 ; -------------------------------------------------------------------------------------- 06c8 ; SUBPROGRAM 06c8 ; -------------------------------------------------------------------------------------- 06c8 06cb | | .CONST 0x06cb ; Address of begin 06c9 06d2 | | .CONST 0x06d2 ; Address of exception handler 06ca 0001 | | .CONST 0x0001 ; Number of locals 06cb BODY_06c8: 06cb INIT_06c8: 06cb 00da | | Load_Top At_Offset_2 06cc 8263 | c | Call 0x1,0x63 06cd e007 | | Load 0x0,0x7 06ce 1811 | | Execute Package,Field_Execute,Field_Number 0x11 06cf e008 | | Load 0x0,0x8 06d0 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 06d1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06d2 TRAP_06c8: 06d2 e008 | | Load 0x0,0x8 06d3 1b18 | | Execute Package,Field_Read,Field_Number 0x18 06d4 010f | | Execute Exception,Equal 06d5 6802 |h | Jump_Zero 0x6d8 06d6 e2bc | | Load 0x1,0xbc 06d7 0257 | W | Execute Discrete,Raise 06d8 0100 | | Execute Exception,Raise 06d9 0000 0000 | | .BLANK 0000[0x7] 06e0 ; -------------------------------------------------------------------------------------- 06e0 ; SUBPROGRAM 06e0 ; -------------------------------------------------------------------------------------- 06e0 06e3 | | .CONST 0x06e3 ; Address of begin 06e1 0004 | | .CONST 0x0004 ; Address of exception handler 06e2 0001 | | .CONST 0x0001 ; Number of locals 06e3 BODY_06e0: 06e3 INIT_06e0: 06e3 00da | | Load_Top At_Offset_2 06e4 8263 | c | Call 0x1,0x63 06e5 e007 | | Load 0x0,0x7 06e6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 06e7 e008 | | Load 0x0,0x8 06e8 1853 | S | Execute Package,Field_Execute,Field_Number 0x53 06e9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06ea 0000 0000 | | .BLANK 0000[0x6] 06f0 ; -------------------------------------------------------------------------------------- 06f0 ; SUBPROGRAM 06f0 ; -------------------------------------------------------------------------------------- 06f0 06f3 | | .CONST 0x06f3 ; Address of begin 06f1 0004 | | .CONST 0x0004 ; Address of exception handler 06f2 0001 | | .CONST 0x0001 ; Number of locals 06f3 BODY_06f0: 06f3 INIT_06f0: 06f3 00da | | Load_Top At_Offset_2 06f4 8263 | c | Call 0x1,0x63 06f5 e007 | | Load 0x0,0x7 06f6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 06f7 e008 | | Load 0x0,0x8 06f8 1854 | T | Execute Package,Field_Execute,Field_Number 0x54 06f9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06fa 0000 0000 | | .BLANK 0000[0x6] 0700 ; -------------------------------------------------------------------------------------- 0700 ; SUBPROGRAM 0700 ; -------------------------------------------------------------------------------------- 0700 0703 | | .CONST 0x0703 ; Address of begin 0701 070a | | .CONST 0x070a ; Address of exception handler 0702 0001 | | .CONST 0x0001 ; Number of locals 0703 BODY_0700: 0703 INIT_0700: 0703 00da | | Load_Top At_Offset_2 0704 8263 | c | Call 0x1,0x63 0705 e007 | | Load 0x0,0x7 0706 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0707 e008 | | Load 0x0,0x8 0708 1855 | U | Execute Package,Field_Execute,Field_Number 0x55 0709 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 070a TRAP_0700: 070a e008 | | Load 0x0,0x8 070b 1b18 | | Execute Package,Field_Read,Field_Number 0x18 070c 010f | | Execute Exception,Equal 070d 6802 |h | Jump_Zero 0x710 070e e2bc | | Load 0x1,0xbc 070f 0257 | W | Execute Discrete,Raise 0710 0100 | | Execute Exception,Raise 0711 0000 0000 | | .BLANK 0000[0x7] 0718 ; -------------------------------------------------------------------------------------- 0718 ; SUBPROGRAM 0718 ; -------------------------------------------------------------------------------------- 0718 071b | | .CONST 0x071b ; Address of begin 0719 0004 | | .CONST 0x0004 ; Address of exception handler 071a 0001 | | .CONST 0x0001 ; Number of locals 071b BODY_0718: 071b INIT_0718: 071b 00da | | Load_Top At_Offset_2 071c 8263 | c | Call 0x1,0x63 071d e007 | | Load 0x0,0x7 071e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 071f e008 | | Load 0x0,0x8 0720 1853 | S | Execute Package,Field_Execute,Field_Number 0x53 0721 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0722 0000 0000 | | .BLANK 0000[0x6] 0728 ; -------------------------------------------------------------------------------------- 0728 ; SUBPROGRAM 0728 ; -------------------------------------------------------------------------------------- 0728 072b | + | .CONST 0x072b ; Address of begin 0729 0004 | | .CONST 0x0004 ; Address of exception handler 072a 0001 | | .CONST 0x0001 ; Number of locals 072b BODY_0728: 072b INIT_0728: 072b 00da | | Load_Top At_Offset_2 072c 8263 | c | Call 0x1,0x63 072d e007 | | Load 0x0,0x7 072e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 072f e008 | | Load 0x0,0x8 0730 1854 | T | Execute Package,Field_Execute,Field_Number 0x54 0731 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0732 0000 0000 | | .BLANK 0000[0x6] 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 e007 | | Load 0x0,0x7 073e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 073f e008 | | Load 0x0,0x8 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 e008 | | Load 0x0,0x8 0743 1b18 | | Execute Package,Field_Read,Field_Number 0x18 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 e007 | | Load 0x0,0x7 0756 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0757 e008 | | Load 0x0,0x8 0758 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b 0759 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 075a TRAP_0750: 075a e008 | | Load 0x0,0x8 075b 1b18 | | Execute Package,Field_Read,Field_Number 0x18 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 e007 | | Load 0x0,0x7 076e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 076f e008 | | Load 0x0,0x8 0770 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c 0771 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0772 TRAP_0768: 0772 e008 | | Load 0x0,0x8 0773 1b18 | | Execute Package,Field_Read,Field_Number 0x18 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 e007 | | Load 0x0,0x7 0786 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0787 e008 | | Load 0x0,0x8 0788 1844 | D | Execute Package,Field_Execute,Field_Number 0x44 0789 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 078a TRAP_0780: 078a e008 | | Load 0x0,0x8 078b 1b18 | | Execute Package,Field_Read,Field_Number 0x18 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 e007 | | Load 0x0,0x7 079e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 079f e008 | | Load 0x0,0x8 07a0 1858 | X | Execute Package,Field_Execute,Field_Number 0x58 07a1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07a2 TRAP_0798: 07a2 e008 | | Load 0x0,0x8 07a3 1b18 | | Execute Package,Field_Read,Field_Number 0x18 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 07b3 | | .CONST 0x07b3 ; Address of begin 07b1 07ba | | .CONST 0x07ba ; Address of exception handler 07b2 0001 | | .CONST 0x0001 ; Number of locals 07b3 BODY_07b0: 07b3 INIT_07b0: 07b3 00da | | Load_Top At_Offset_2 07b4 8263 | c | Call 0x1,0x63 07b5 e007 | | Load 0x0,0x7 07b6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 07b7 e008 | | Load 0x0,0x8 07b8 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 07b9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07ba TRAP_07b0: 07ba e008 | | Load 0x0,0x8 07bb 1b18 | | Execute Package,Field_Read,Field_Number 0x18 07bc 010f | | Execute Exception,Equal 07bd 6802 |h | Jump_Zero 0x7c0 07be e2bc | | Load 0x1,0xbc 07bf 0257 | W | Execute Discrete,Raise 07c0 0100 | | Execute Exception,Raise 07c1 0000 0000 | | .BLANK 0000[0x7] 07c8 ; -------------------------------------------------------------------------------------- 07c8 ; SUBPROGRAM 07c8 ; -------------------------------------------------------------------------------------- 07c8 07d4 | | .CONST 0x07d4 ; Address of begin 07c9 0004 | | .CONST 0x0004 ; Address of exception handler 07ca 0002 | | .CONST 0x0002 ; Number of locals 07cb INIT_07c8: 07cb e002 | | Load 0x0,0x2 07cc 1b0f | | Execute Package,Field_Read,Field_Number 0xf 07cd 02c7 | | Declare_Variable Any 07ce e5fd | | Load 0x2,-0x3 07cf 4800 |H | Short_Literal 0x0 07d0 e5fe | | Load 0x2,-0x2 07d1 e00b | | Load 0x0,0xb 07d2 181c | | Execute Package,Field_Execute,Field_Number 0x1c 07d3 a402 | | Store_Unchecked 0x2,0x2 07d4 BODY_07c8: 07d4 e5fd | | Load 0x2,-0x3 07d5 e5fe | | Load 0x2,-0x2 07d6 4800 |H | Short_Literal 0x0 07d7 e5fd | | Load 0x2,-0x3 07d8 e402 | | Load 0x2,0x2 07d9 82ea | | Call 0x1,0xea 07da e005 | | Load 0x0,0x5 07db 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 07dc e005 | | Load 0x0,0x5 07dd 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 07de 4800 |H | Short_Literal 0x0 07df 4801 |H | Short_Literal 0x1 07e0 e5ff | | Load 0x2,-0x1 07e1 82ec | | Call 0x1,0xec 07e2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 07e3 0000 0000 | | .BLANK 0000[0x5] 07e8 ; -------------------------------------------------------------------------------------- 07e8 ; SUBPROGRAM 07e8 ; -------------------------------------------------------------------------------------- 07e8 07f4 | | .CONST 0x07f4 ; Address of begin 07e9 0004 | | .CONST 0x0004 ; Address of exception handler 07ea 0002 | | .CONST 0x0002 ; Number of locals 07eb INIT_07e8: 07eb e002 | | Load 0x0,0x2 07ec 1b0f | | Execute Package,Field_Read,Field_Number 0xf 07ed 02c7 | | Declare_Variable Any 07ee e5fd | | Load 0x2,-0x3 07ef 4800 |H | Short_Literal 0x0 07f0 e5fe | | Load 0x2,-0x2 07f1 e00b | | Load 0x0,0xb 07f2 181c | | Execute Package,Field_Execute,Field_Number 0x1c 07f3 a402 | | Store_Unchecked 0x2,0x2 07f4 BODY_07e8: 07f4 e5fd | | Load 0x2,-0x3 07f5 e5fe | | Load 0x2,-0x2 07f6 4800 |H | Short_Literal 0x0 07f7 e5fd | | Load 0x2,-0x3 07f8 e402 | | Load 0x2,0x2 07f9 82ea | | Call 0x1,0xea 07fa e005 | | Load 0x0,0x5 07fb 1b1e | | Execute Package,Field_Read,Field_Number 0x1e 07fc e005 | | Load 0x0,0x5 07fd 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 07fe 4801 |H | Short_Literal 0x1 07ff 4801 |H | Short_Literal 0x1 0800 e5ff | | Load 0x2,-0x1 0801 82ec | | Call 0x1,0xec 0802 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0803 0000 0000 | | .BLANK 0000[0x5] 0808 ; -------------------------------------------------------------------------------------- 0808 ; SUBPROGRAM 0808 ; -------------------------------------------------------------------------------------- 0808 0814 | | .CONST 0x0814 ; Address of begin 0809 0004 | | .CONST 0x0004 ; Address of exception handler 080a 0002 | | .CONST 0x0002 ; Number of locals 080b INIT_0808: 080b e002 | | Load 0x0,0x2 080c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 080d 02c7 | | Declare_Variable Any 080e e5fd | | Load 0x2,-0x3 080f 4800 |H | Short_Literal 0x0 0810 e5fe | | Load 0x2,-0x2 0811 e00b | | Load 0x0,0xb 0812 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0813 a402 | | Store_Unchecked 0x2,0x2 0814 BODY_0808: 0814 e5fd | | Load 0x2,-0x3 0815 e5fe | | Load 0x2,-0x2 0816 4800 |H | Short_Literal 0x0 0817 e5fd | | Load 0x2,-0x3 0818 e402 | | Load 0x2,0x2 0819 82ea | | Call 0x1,0xea 081a e005 | | Load 0x0,0x5 081b 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 081c e005 | | Load 0x0,0x5 081d 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 081e 4800 |H | Short_Literal 0x0 081f 4803 |H | Short_Literal 0x3 0820 e5ff | | Load 0x2,-0x1 0821 82ec | | Call 0x1,0xec 0822 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0823 0000 0000 | | .BLANK 0000[0x5] 0828 ; -------------------------------------------------------------------------------------- 0828 ; SUBPROGRAM 0828 ; -------------------------------------------------------------------------------------- 0828 0834 | 4 | .CONST 0x0834 ; Address of begin 0829 0004 | | .CONST 0x0004 ; Address of exception handler 082a 0002 | | .CONST 0x0002 ; Number of locals 082b INIT_0828: 082b e002 | | Load 0x0,0x2 082c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 082d 02c7 | | Declare_Variable Any 082e e5fd | | Load 0x2,-0x3 082f 4800 |H | Short_Literal 0x0 0830 e5fe | | Load 0x2,-0x2 0831 e00b | | Load 0x0,0xb 0832 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0833 a402 | | Store_Unchecked 0x2,0x2 0834 BODY_0828: 0834 e5fd | | Load 0x2,-0x3 0835 e5fe | | Load 0x2,-0x2 0836 4800 |H | Short_Literal 0x0 0837 e5fd | | Load 0x2,-0x3 0838 e402 | | Load 0x2,0x2 0839 82ea | | Call 0x1,0xea 083a e005 | | Load 0x0,0x5 083b 1b20 | | Execute Package,Field_Read,Field_Number 0x20 083c e005 | | Load 0x0,0x5 083d 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 083e 4801 |H | Short_Literal 0x1 083f 4803 |H | Short_Literal 0x3 0840 e5ff | | Load 0x2,-0x1 0841 82ec | | Call 0x1,0xec 0842 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0843 0000 0000 | | .BLANK 0000[0x5] 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 e5fc | | Load 0x2,-0x4 084c e5fd | | Load 0x2,-0x3 084d 00ea | | Load_Encached Null_String_Cache 084e 4800 |H | Short_Literal 0x0 084f e5fe | | Load 0x2,-0x2 0850 82eb | | Call 0x1,0xeb 0851 e5ff | | Load 0x2,-0x1 0852 82ec | | Call 0x1,0xec 0853 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0854 0000 0000 | | .BLANK 0000[0x4] 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 e5fd | | Load 0x2,-0x3 085d 00ea | | Load_Encached Null_String_Cache 085e 4801 |H | Short_Literal 0x1 085f e5fe | | Load 0x2,-0x2 0860 82eb | | Call 0x1,0xeb 0861 e5ff | | Load 0x2,-0x1 0862 82ec | | Call 0x1,0xec 0863 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0864 0000 0000 | | .BLANK 0000[0x4] 0868 ; -------------------------------------------------------------------------------------- 0868 ; SUBPROGRAM 0868 ; -------------------------------------------------------------------------------------- 0868 086b | k | .CONST 0x086b ; Address of begin 0869 0872 | r | .CONST 0x0872 ; Address of exception handler 086a 0001 | | .CONST 0x0001 ; Number of locals 086b BODY_0868: 086b INIT_0868: 086b 00da | | Load_Top At_Offset_2 086c 8263 | c | Call 0x1,0x63 086d e007 | | Load 0x0,0x7 086e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 086f e008 | | Load 0x0,0x8 0870 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 0871 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0872 TRAP_0868: 0872 e008 | | Load 0x0,0x8 0873 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0874 010f | | Execute Exception,Equal 0875 6802 |h | Jump_Zero 0x878 0876 e2bc | | Load 0x1,0xbc 0877 0257 | W | Execute Discrete,Raise 0878 0100 | | Execute Exception,Raise 0879 0000 0000 | | .BLANK 0000[0x7] 0880 ; -------------------------------------------------------------------------------------- 0880 ; SUBPROGRAM 0880 ; -------------------------------------------------------------------------------------- 0880 0885 | | .CONST 0x0885 ; Address of begin 0881 089a | | .CONST 0x089a ; Address of exception handler 0882 0002 | | .CONST 0x0002 ; Number of locals 0883 INIT_0880: 0883 e008 | | Load 0x0,0x8 0884 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0885 BODY_0880: 0885 00db | | Load_Top At_Offset_3 0886 8263 | c | Call 0x1,0x63 0887 e007 | | Load 0x0,0x7 0888 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0889 e008 | | Load 0x0,0x8 088a 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 088b 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 088c 00d8 | | Load_Top At_Offset_0 088d 4603 |F | Jump_Case 0x4 088e 7805 |x | Jump 0x894 ; case 0x0 088f 7806 |x | Jump 0x896 ; case 0x1 0890 7807 |x | Jump 0x898 ; case 0x2 0891 7800 |x | Jump 0x892 ; case 0x3 0892 4803 |H | Short_Literal 0x3 0893 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0894 4800 |H | Short_Literal 0x0 0895 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0896 4801 |H | Short_Literal 0x1 0897 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0898 4802 |H | Short_Literal 0x2 0899 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 089a TRAP_0880: 089a e008 | | Load 0x0,0x8 089b 1b18 | | Execute Package,Field_Read,Field_Number 0x18 089c 010f | | Execute Exception,Equal 089d 6802 |h | Jump_Zero 0x8a0 089e e2bc | | Load 0x1,0xbc 089f 0257 | W | Execute Discrete,Raise 08a0 0100 | | Execute Exception,Raise 08a1 0000 0000 | | .BLANK 0000[0x7] 08a8 ; -------------------------------------------------------------------------------------- 08a8 ; SUBPROGRAM 08a8 ; -------------------------------------------------------------------------------------- 08a8 08ab | | .CONST 0x08ab ; Address of begin 08a9 08b7 | | .CONST 0x08b7 ; Address of exception handler 08aa 0001 | | .CONST 0x0001 ; Number of locals 08ab BODY_08a8: 08ab INIT_08a8: 08ab 00da | | Load_Top At_Offset_2 08ac 8263 | c | Call 0x1,0x63 08ad e007 | | Load 0x0,0x7 08ae 1811 | | Execute Package,Field_Execute,Field_Number 0x11 08af e008 | | Load 0x0,0x8 08b0 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 08b1 00d8 | | Load_Top At_Offset_0 08b2 00e4 | | Load_Encached Positive_Cache 08b3 0260 | ` | Execute Discrete,In_Type 08b4 7001 |p | Jump_Nonzero 0x8b6 08b5 0801 | | Execute_Immediate Raise,0x1 08b6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08b7 TRAP_08a8: 08b7 e008 | | Load 0x0,0x8 08b8 1b18 | | Execute Package,Field_Read,Field_Number 0x18 08b9 010f | | Execute Exception,Equal 08ba 6802 |h | Jump_Zero 0x8bd 08bb e2bc | | Load 0x1,0xbc 08bc 0257 | W | Execute Discrete,Raise 08bd 0100 | | Execute Exception,Raise 08be 0000 0000 | | .XXX[0x2] 08c0 ; -------------------------------------------------------------------------------------- 08c0 ; SUBPROGRAM 08c0 ; -------------------------------------------------------------------------------------- 08c0 08c3 | | .CONST 0x08c3 ; Address of begin 08c1 0004 | | .CONST 0x0004 ; Address of exception handler 08c2 0001 | | .CONST 0x0001 ; Number of locals 08c3 BODY_08c0: 08c3 INIT_08c0: 08c3 00da | | Load_Top At_Offset_2 08c4 82d3 | | Call 0x1,0xd3 08c5 6817 |h | Jump_Zero 0x8dd 08c6 00da | | Load_Top At_Offset_2 08c7 82b6 | | Call 0x1,0xb6 08c8 4603 |F | Jump_Case 0x4 08c9 7807 |x | Jump 0x8d1 ; case 0x0 08ca 780a |x | Jump 0x8d5 ; case 0x1 08cb 780d |x | Jump 0x8d9 ; case 0x2 08cc 7800 |x | Jump 0x8cd ; case 0x3 08cd 00db | | Load_Top At_Offset_3 08ce 0335 | 5 | Declare_Variable Array,Duplicate 08cf 00cd | | Action Spare6_Action 08d0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 08d1 00db | | Load_Top At_Offset_3 08d2 e009 | | Load 0x0,0x9 08d3 1814 | | Execute Package,Field_Execute,Field_Number 0x14 08d4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 08d5 00db | | Load_Top At_Offset_3 08d6 e009 | | Load 0x0,0x9 08d7 1815 | | Execute Package,Field_Execute,Field_Number 0x15 08d8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 08d9 00db | | Load_Top At_Offset_3 08da e009 | | Load 0x0,0x9 08db 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 08dc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 08dd 00db | | Load_Top At_Offset_3 08de 0335 | 5 | Declare_Variable Array,Duplicate 08df 00cd | | Action Spare6_Action 08e0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 08e1 0000 0000 | | .BLANK 0000[0x7] 08e8 ; -------------------------------------------------------------------------------------- 08e8 ; SUBPROGRAM 08e8 ; -------------------------------------------------------------------------------------- 08e8 08eb | | .CONST 0x08eb ; Address of begin 08e9 0004 | | .CONST 0x0004 ; Address of exception handler 08ea 0001 | | .CONST 0x0001 ; Number of locals 08eb BODY_08e8: 08eb INIT_08e8: 08eb 00da | | Load_Top At_Offset_2 08ec 827d | } | Call 0x1,0x7d 08ed 00db | | Load_Top At_Offset_3 08ee 82ed | | Call 0x1,0xed 08ef 01cc | | Execute Vector,Catenate 08f0 e5fd | | Load 0x2,-0x3 08f1 01cc | | Execute Vector,Catenate 08f2 00db | | Load_Top At_Offset_3 08f3 82ed | | Call 0x1,0xed 08f4 01cc | | Execute Vector,Catenate 08f5 e5fe | | Load 0x2,-0x2 08f6 01cc | | Execute Vector,Catenate 08f7 00db | | Load_Top At_Offset_3 08f8 82ed | | Call 0x1,0xed 08f9 01cc | | Execute Vector,Catenate 08fa e5fc | | Load 0x2,-0x4 08fb 01cc | | Execute Vector,Catenate 08fc 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 08fd 0000 0000 | | .XXX[0x3] 08ff 0000 | | 0900 ; -------------------------------------------------------------------------------------- 0900 ; SUBPROGRAM 0900 ; -------------------------------------------------------------------------------------- 0900 0903 | | .CONST 0x0903 ; Address of begin 0901 0004 | | .CONST 0x0004 ; Address of exception handler 0902 0001 | | .CONST 0x0001 ; Number of locals 0903 BODY_0900: 0903 INIT_0900: 0903 00da | | Load_Top At_Offset_2 0904 8287 | | Call 0x1,0x87 0905 00db | | Load_Top At_Offset_3 0906 82ed | | Call 0x1,0xed 0907 01cc | | Execute Vector,Catenate 0908 e5fd | | Load 0x2,-0x3 0909 01cc | | Execute Vector,Catenate 090a 00db | | Load_Top At_Offset_3 090b 82ed | | Call 0x1,0xed 090c 01cc | | Execute Vector,Catenate 090d e5fe | | Load 0x2,-0x2 090e 01cc | | Execute Vector,Catenate 090f 00db | | Load_Top At_Offset_3 0910 82ed | | Call 0x1,0xed 0911 01cc | | Execute Vector,Catenate 0912 e5fc | | Load 0x2,-0x4 0913 01cc | | Execute Vector,Catenate 0914 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 0915 0000 0000 | | .XXX[0x3] 0917 0000 | | 0918 ; -------------------------------------------------------------------------------------- 0918 ; SUBPROGRAM 0918 ; -------------------------------------------------------------------------------------- 0918 091b | | .CONST 0x091b ; Address of begin 0919 0004 | | .CONST 0x0004 ; Address of exception handler 091a 0001 | | .CONST 0x0001 ; Number of locals 091b BODY_0918: 091b INIT_0918: 091b 00da | | Load_Top At_Offset_2 091c 828c | | Call 0x1,0x8c 091d 00db | | Load_Top At_Offset_3 091e 82ed | | Call 0x1,0xed 091f 01cc | | Execute Vector,Catenate 0920 e5fd | | Load 0x2,-0x3 0921 01cc | | Execute Vector,Catenate 0922 00db | | Load_Top At_Offset_3 0923 82ed | | Call 0x1,0xed 0924 01cc | | Execute Vector,Catenate 0925 e5fe | | Load 0x2,-0x2 0926 01cc | | Execute Vector,Catenate 0927 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0928 ; -------------------------------------------------------------------------------------- 0928 ; SUBPROGRAM 0928 ; -------------------------------------------------------------------------------------- 0928 092b | + | .CONST 0x092b ; Address of begin 0929 0004 | | .CONST 0x0004 ; Address of exception handler 092a 0001 | | .CONST 0x0001 ; Number of locals 092b BODY_0928: 092b INIT_0928: 092b e5fc | | Load 0x2,-0x4 092c 01db | | Execute Vector,Length 092d 6810 |h | Jump_Zero 0x93e 092e 00da | | Load_Top At_Offset_2 092f 8290 | | Call 0x1,0x90 0930 00db | | Load_Top At_Offset_3 0931 82d5 | | Call 0x1,0xd5 0932 01cc | | Execute Vector,Catenate 0933 e5fc | | Load 0x2,-0x4 0934 01cc | | Execute Vector,Catenate 0935 00db | | Load_Top At_Offset_3 0936 82ed | | Call 0x1,0xed 0937 01cc | | Execute Vector,Catenate 0938 e5fd | | Load 0x2,-0x3 0939 e5fe | | Load 0x2,-0x2 093a e5ff | | Load 0x2,-0x1 093b 8270 | p | Call 0x1,0x70 093c 01cc | | Execute Vector,Catenate 093d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 093e 00da | | Load_Top At_Offset_2 093f 8290 | | Call 0x1,0x90 0940 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0941 0000 0000 | | .BLANK 0000[0x7] 0948 ; -------------------------------------------------------------------------------------- 0948 ; SUBPROGRAM 0948 ; -------------------------------------------------------------------------------------- 0948 094b | K | .CONST 0x094b ; Address of begin 0949 0004 | | .CONST 0x0004 ; Address of exception handler 094a 0001 | | .CONST 0x0001 ; Number of locals 094b BODY_0948: 094b INIT_0948: 094b 4801 |H | Short_Literal 0x1 094c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 094d 0000 0000 | | .XXX[0x3] 094f 0000 | | 0950 ; -------------------------------------------------------------------------------------- 0950 ; SUBPROGRAM 0950 ; -------------------------------------------------------------------------------------- 0950 0953 | S | .CONST 0x0953 ; Address of begin 0951 0004 | | .CONST 0x0004 ; Address of exception handler 0952 0001 | | .CONST 0x0001 ; Number of locals 0953 BODY_0950: 0953 INIT_0950: 0953 4801 |H | Short_Literal 0x1 0954 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0955 0000 0000 | | .XXX[0x3] 0957 0000 | | 0958 ; -------------------------------------------------------------------------------------- 0958 ; SUBPROGRAM 0958 ; -------------------------------------------------------------------------------------- 0958 0961 | a | .CONST 0x0961 ; Address of begin 0959 0966 | f | .CONST 0x0966 ; Address of exception handler 095a 0002 | | .CONST 0x0002 ; Number of locals 095b INIT_0958: 095b e262 | b | Load 0x1,0x62 095c 0322 | " | Declare_Variable Record 095d 00db | | Load_Top At_Offset_3 095e 8267 | g | Call 0x1,0x67 095f 00d9 | | Load_Top At_Offset_1 0960 017d | } | Execute Record,Structure_Write 0961 BODY_0958: 0961 00d8 | | Load_Top At_Offset_0 0962 8263 | c | Call 0x1,0x63 0963 e003 | | Load 0x0,0x3 0964 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0965 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0966 TRAP_0958: 0966 010e | | Execute Exception,Is_Constraint_Error 0967 6803 |h | Jump_Zero 0x96b 0968 0092 0ea5 | | Action Push_String_Extended,0xea5 ; "<UNREGISTERED>" 096a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 096b 0100 | | Execute Exception,Raise 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 00da | | Load_Top At_Offset_2 0974 00e0 | | Load_Encached Standard_Cache 0975 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0976 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0977 0000 | | .XXX[0x1] 0978 ; -------------------------------------------------------------------------------------- 0978 ; SUBPROGRAM 0978 ; -------------------------------------------------------------------------------------- 0978 098d | | .CONST 0x098d ; Address of begin 0979 0004 | | .CONST 0x0004 ; Address of exception handler 097a 0003 | | .CONST 0x0003 ; Number of locals 097b INIT_0978: 097b e008 | | Load 0x0,0x8 097c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 097d 0337 | 7 | Declare_Variable Array 097e e00d | | Load 0x0,0xd 097f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0980 0337 | 7 | Declare_Variable Array 0981 00d8 | | Load_Top At_Offset_0 0982 0335 | 5 | Declare_Variable Array,Duplicate 0983 00cd | | Action Spare6_Action 0984 4808 |H | Short_Literal 0x8 0985 4800 |H | Short_Literal 0x0 0986 4800 |H | Short_Literal 0x0 0987 00d9 | | Load_Top At_Offset_1 0988 e404 | | Load 0x2,0x4 0989 01d6 | | Execute Vector,Field_Write 098a 3ffb |? | Loop_Increasing 0x986 098b 00d9 | | Load_Top At_Offset_1 098c 01d4 | | Execute Vector,Structure_Write 098d BODY_0978: 098d e5ff | | Load 0x2,-0x1 098e 8267 | g | Call 0x1,0x67 098f 8263 | c | Call 0x1,0x63 0990 e007 | | Load 0x0,0x7 0991 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0992 e008 | | Load 0x0,0x8 0993 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0994 00da | | Load_Top At_Offset_2 0995 01d4 | | Execute Vector,Structure_Write 0996 00cf | | Action Mark_Auxiliary 0997 4804 |H | Short_Literal 0x4 0998 4800 |H | Short_Literal 0x0 0999 0007 | | Action Break_Optional 099a 00d8 | | Load_Top At_Offset_0 099b e402 | | Load 0x2,0x2 099c 01d7 | | Execute Vector,Field_Read 099d 00d9 | | Load_Top At_Offset_1 099e 00d8 | | Load_Top At_Offset_0 099f e00d | | Load 0x0,0xd 09a0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 09a1 0260 | ` | Execute Discrete,In_Type 09a2 7001 |p | Jump_Nonzero 0x9a4 09a3 0801 | | Execute_Immediate Raise,0x1 09a4 e403 | | Load 0x2,0x3 09a5 01d6 | | Execute Vector,Field_Write 09a6 00c8 | | Action Pop_Auxiliary_Range 09a7 3ff2 |? | Loop_Increasing 0x99a 09a8 00ce | | Action Pop_Auxiliary 09a9 00d8 | | Load_Top At_Offset_0 09aa 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09ab 0000 0000 | | .BLANK 0000[0x5] 09b0 ; -------------------------------------------------------------------------------------- 09b0 ; SUBPROGRAM 09b0 ; -------------------------------------------------------------------------------------- 09b0 09b5 | | .CONST 0x09b5 ; Address of begin 09b1 0004 | | .CONST 0x0004 ; Address of exception handler 09b2 0002 | | .CONST 0x0002 ; Number of locals 09b3 INIT_09b0: 09b3 e008 | | Load 0x0,0x8 09b4 1b16 | | Execute Package,Field_Read,Field_Number 0x16 09b5 BODY_09b0: 09b5 00db | | Load_Top At_Offset_3 09b6 8263 | c | Call 0x1,0x63 09b7 e007 | | Load 0x0,0x7 09b8 1811 | | Execute Package,Field_Execute,Field_Number 0x11 09b9 e008 | | Load 0x0,0x8 09ba 1861 | a | Execute Package,Field_Execute,Field_Number 0x61 09bb 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 09bc 00d8 | | Load_Top At_Offset_0 09bd 0f01 | | Execute_Immediate Equal,0x1 09be 7002 |p | Jump_Nonzero 0x9c1 09bf 4801 |H | Short_Literal 0x1 09c0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09c1 4800 |H | Short_Literal 0x0 09c2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09c3 0000 0000 | | .BLANK 0000[0x5] 09c8 ; -------------------------------------------------------------------------------------- 09c8 ; SUBPROGRAM 09c8 ; -------------------------------------------------------------------------------------- 09c8 09cb | | .CONST 0x09cb ; Address of begin 09c9 0004 | | .CONST 0x0004 ; Address of exception handler 09ca 0001 | | .CONST 0x0001 ; Number of locals 09cb BODY_09c8: 09cb INIT_09c8: 09cb 00da | | Load_Top At_Offset_2 09cc 01db | | Execute Vector,Length 09cd 700f |p | Jump_Nonzero 0x9dd 09ce e5fd | | Load 0x2,-0x3 09cf 82ee | | Call 0x1,0xee 09d0 0f00 | | Execute_Immediate Equal,0x0 09d1 e5fd | | Load 0x2,-0x3 09d2 82ee | | Call 0x1,0xee 09d3 0f01 | | Execute_Immediate Equal,0x1 09d4 0278 | x | Execute Discrete,Or 09d5 6805 |h | Jump_Zero 0x9db 09d6 00db | | Load_Top At_Offset_3 09d7 0092 0ea6 | | Action Push_String_Extended,0xea6 ; ".exe" 09d9 01cc | | Execute Vector,Catenate 09da 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 09db 00ea | | Load_Encached Null_String_Cache 09dc 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 09dd 00da | | Load_Top At_Offset_2 09de 0335 | 5 | Declare_Variable Array,Duplicate 09df 00cd | | Action Spare6_Action 09e0 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 09e1 0000 0000 | | .BLANK 0000[0x7] 09e8 ; -------------------------------------------------------------------------------------- 09e8 ; SUBPROGRAM 09e8 ; -------------------------------------------------------------------------------------- 09e8 09f0 | | .CONST 0x09f0 ; Address of begin 09e9 0a04 | | .CONST 0x0a04 ; Address of exception handler 09ea 0002 | | .CONST 0x0002 ; Number of locals 09eb INIT_09e8: 09eb e002 | | Load 0x0,0x2 09ec 1b14 | | Execute Package,Field_Read,Field_Number 0x14 09ed 02ff | | Declare_Variable Variant_Record 09ee 00d8 | | Load_Top At_Offset_0 09ef 1c00 | | Execute_Immediate Run_Utility,0x0 09f0 BODY_09e8: 09f0 e5fd | | Load 0x2,-0x3 09f1 4801 |H | Short_Literal 0x1 09f2 e5fd | | Load 0x2,-0x3 09f3 4801 |H | Short_Literal 0x1 09f4 e5fe | | Load 0x2,-0x2 09f5 e00b | | Load 0x0,0xb 09f6 181c | | Execute Package,Field_Execute,Field_Number 0x1c 09f7 e00b | | Load 0x0,0xb 09f8 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 09f9 00d9 | | Load_Top At_Offset_1 09fa 016d | m | Execute Variant_Record,Structure_Write 09fb 600c |` | Indirect_Literal Discrete,0xa08,{0x00000000, 0x00004000} 09fc e00e | | Load 0x0,0xe 09fd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 09fe 0092 0ea7 | | Action Push_String_Extended,0xea7 ; "Ftp.Remote_Machine" 0a00 00db | | Load_Top At_Offset_3 0a01 e00f | | Load 0x0,0xf 0a02 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 0a03 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0a04 TRAP_09e8: 0a04 0007 | | Action Break_Optional 0a05 00ea | | Load_Encached Null_String_Cache 0a06 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0a07 0000 | | .XXX[0x1] 0a08 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0a0c 0000 0000 | | .BLANK 0000[0x4] 0a10 ; -------------------------------------------------------------------------------------- 0a10 ; SUBPROGRAM 0a10 ; -------------------------------------------------------------------------------------- 0a10 0a18 | | .CONST 0x0a18 ; Address of begin 0a11 0a2c | , | .CONST 0x0a2c ; Address of exception handler 0a12 0002 | | .CONST 0x0002 ; Number of locals 0a13 INIT_0a10: 0a13 e002 | | Load 0x0,0x2 0a14 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0a15 02ff | | Declare_Variable Variant_Record 0a16 00d8 | | Load_Top At_Offset_0 0a17 1c00 | | Execute_Immediate Run_Utility,0x0 0a18 BODY_0a10: 0a18 e5fd | | Load 0x2,-0x3 0a19 4801 |H | Short_Literal 0x1 0a1a e5fd | | Load 0x2,-0x3 0a1b 4801 |H | Short_Literal 0x1 0a1c e5fe | | Load 0x2,-0x2 0a1d e00b | | Load 0x0,0xb 0a1e 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0a1f e00b | | Load 0x0,0xb 0a20 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0a21 00d9 | | Load_Top At_Offset_1 0a22 016d | m | Execute Variant_Record,Structure_Write 0a23 67e4 |g | Indirect_Literal Discrete,0xa08,{0x00000000, 0x00004000} 0a24 e00e | | Load 0x0,0xe 0a25 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0a26 0092 0ea8 | | Action Push_String_Extended,0xea8 ; "Ftp.Remote_Directory" 0a28 00db | | Load_Top At_Offset_3 0a29 e00f | | Load 0x0,0xf 0a2a 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 0a2b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0a2c TRAP_0a10: 0a2c 0007 | | Action Break_Optional 0a2d 00ea | | Load_Encached Null_String_Cache 0a2e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0a2f 0000 | | .XXX[0x1] 0a30 ; -------------------------------------------------------------------------------------- 0a30 ; SUBPROGRAM 0a30 ; -------------------------------------------------------------------------------------- 0a30 0a42 | B | .CONST 0x0a42 ; Address of begin 0a31 0004 | | .CONST 0x0004 ; Address of exception handler 0a32 0005 | | .CONST 0x0005 ; Number of locals 0a33 INIT_0a30: 0a33 e010 | | Load 0x0,0x10 0a34 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0a35 02c7 | | Declare_Variable Any 0a36 e010 | | Load 0x0,0x10 0a37 180e | | Execute Package,Field_Execute,Field_Number 0xe 0a38 a402 | | Store_Unchecked 0x2,0x2 0a39 e011 | | Load 0x0,0x11 0a3a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0a3b e002 | | Load 0x0,0x2 0a3c 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 0a3d 0322 | " | Declare_Variable Record 0a3e 00d8 | | Load_Top At_Offset_0 0a3f 1c00 | | Execute_Immediate Run_Utility,0x0 0a40 029f 0d53 | S| Declare_Subprogram INIT_0d50,For_Call 0a42 BODY_0a30: 0a42 8405 | | Call 0x2,0x5 0a43 4800 |H | Short_Literal 0x0 0a44 e004 | | Load 0x0,0x4 0a45 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0a46 e5ff | | Load 0x2,-0x1 0a47 01cc | | Execute Vector,Catenate 0a48 e004 | | Load 0x0,0x4 0a49 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0a4a 01cc | | Execute Vector,Catenate 0a4b 00ea | | Load_Encached Null_String_Cache 0a4c e5ff | | Load 0x2,-0x1 0a4d e005 | | Load 0x0,0x5 0a4e 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 0a4f 01cc | | Execute Vector,Catenate 0a50 e005 | | Load 0x0,0x5 0a51 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0a52 4800 |H | Short_Literal 0x0 0a53 e004 | | Load 0x0,0x4 0a54 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0a55 e5ff | | Load 0x2,-0x1 0a56 01cc | | Execute Vector,Catenate 0a57 e004 | | Load 0x0,0x4 0a58 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0a59 01cc | | Execute Vector,Catenate 0a5a 00ea | | Load_Encached Null_String_Cache 0a5b e5ff | | Load 0x2,-0x1 0a5c e005 | | Load 0x0,0x5 0a5d 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0a5e 01cc | | Execute Vector,Catenate 0a5f e005 | | Load 0x0,0x5 0a60 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0a61 4801 |H | Short_Literal 0x1 0a62 e004 | | Load 0x0,0x4 0a63 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0a64 e5ff | | Load 0x2,-0x1 0a65 01cc | | Execute Vector,Catenate 0a66 e004 | | Load 0x0,0x4 0a67 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0a68 01cc | | Execute Vector,Catenate 0a69 00ea | | Load_Encached Null_String_Cache 0a6a e5ff | | Load 0x2,-0x1 0a6b e005 | | Load 0x0,0x5 0a6c 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29 0a6d 01cc | | Execute Vector,Catenate 0a6e e005 | | Load 0x0,0x5 0a6f 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0a70 4801 |H | Short_Literal 0x1 0a71 e004 | | Load 0x0,0x4 0a72 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0a73 e5ff | | Load 0x2,-0x1 0a74 01cc | | Execute Vector,Catenate 0a75 e004 | | Load 0x0,0x4 0a76 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0a77 01cc | | Execute Vector,Catenate 0a78 00ea | | Load_Encached Null_String_Cache 0a79 e5ff | | Load 0x2,-0x1 0a7a e005 | | Load 0x0,0x5 0a7b 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0a7c 01cc | | Execute Vector,Catenate 0a7d e005 | | Load 0x0,0x5 0a7e 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0a7f 00db | | Load_Top At_Offset_3 0a80 00da | | Load_Top At_Offset_2 0a81 e012 | | Load 0x0,0x12 0a82 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0a83 00da | | Load_Top At_Offset_2 0a84 e402 | | Load 0x2,0x2 0a85 00db | | Load_Top At_Offset_3 0a86 e013 | | Load 0x0,0x13 0a87 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0a88 005b | [ | Store_Top Discrete,At_Offset_3 0a89 4800 |H | Short_Literal 0x0 0a8a 00db | | Load_Top At_Offset_3 0a8b e011 | | Load 0x0,0x11 0a8c 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0a8d 7000 |p | Jump_Nonzero 0xa8e 0a8e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0a8f 0000 | | .XXX[0x1] 0a90 ; -------------------------------------------------------------------------------------- 0a90 ; SUBPROGRAM 0a90 ; -------------------------------------------------------------------------------------- 0a90 0a93 | | .CONST 0x0a93 ; Address of begin 0a91 0004 | | .CONST 0x0004 ; Address of exception handler 0a92 0001 | | .CONST 0x0001 ; Number of locals 0a93 BODY_0a90: 0a93 INIT_0a90: 0a93 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0a94 0000 0000 | | .BLANK 0000[0x4] 0a98 ; -------------------------------------------------------------------------------------- 0a98 ; SUBPROGRAM 0a98 ; -------------------------------------------------------------------------------------- 0a98 0a9b | | .CONST 0x0a9b ; Address of begin 0a99 0004 | | .CONST 0x0004 ; Address of exception handler 0a9a 0001 | | .CONST 0x0001 ; Number of locals 0a9b BODY_0a98: 0a9b INIT_0a98: 0a9b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0a9c 0000 0000 | | .BLANK 0000[0x4] 0aa0 ; -------------------------------------------------------------------------------------- 0aa0 ; SUBPROGRAM 0aa0 ; -------------------------------------------------------------------------------------- 0aa0 0aa3 | | .CONST 0x0aa3 ; Address of begin 0aa1 0004 | | .CONST 0x0004 ; Address of exception handler 0aa2 0001 | | .CONST 0x0001 ; Number of locals 0aa3 BODY_0aa0: 0aa3 INIT_0aa0: 0aa3 00da | | Load_Top At_Offset_2 0aa4 829e | | Call 0x1,0x9e 0aa5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0aa6 0000 0000 | | .XXX[0x2] 0aa8 ; -------------------------------------------------------------------------------------- 0aa8 ; SUBPROGRAM 0aa8 ; -------------------------------------------------------------------------------------- 0aa8 0aab | | .CONST 0x0aab ; Address of begin 0aa9 0004 | | .CONST 0x0004 ; Address of exception handler 0aaa 0001 | | .CONST 0x0001 ; Number of locals 0aab BODY_0aa8: 0aab INIT_0aa8: 0aab 00da | | Load_Top At_Offset_2 0aac e011 | | Load 0x0,0x11 0aad 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0aae e011 | | Load 0x0,0x11 0aaf 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0ab0 82e2 | | Call 0x1,0xe2 0ab1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ab2 0000 0000 | | .BLANK 0000[0x6] 0ab8 ; -------------------------------------------------------------------------------------- 0ab8 ; SUBPROGRAM 0ab8 ; -------------------------------------------------------------------------------------- 0ab8 0abb | | .CONST 0x0abb ; Address of begin 0ab9 0004 | | .CONST 0x0004 ; Address of exception handler 0aba 0001 | | .CONST 0x0001 ; Number of locals 0abb BODY_0ab8: 0abb INIT_0ab8: 0abb 00da | | Load_Top At_Offset_2 0abc 460b |F | Jump_Case 0xc 0abd 780b |x | Jump 0xac9 ; case 0x0 0abe 780a |x | Jump 0xac9 ; case 0x1 0abf 7809 |x | Jump 0xac9 ; case 0x2 0ac0 7808 |x | Jump 0xac9 ; case 0x3 0ac1 7807 |x | Jump 0xac9 ; case 0x4 0ac2 7808 |x | Jump 0xacb ; case 0x5 0ac3 7809 |x | Jump 0xacd ; case 0x6 0ac4 7806 |x | Jump 0xacb ; case 0x7 0ac5 7805 |x | Jump 0xacb ; case 0x8 0ac6 7802 |x | Jump 0xac9 ; case 0x9 0ac7 7801 |x | Jump 0xac9 ; case 0xa 0ac8 7800 |x | Jump 0xac9 ; case 0xb 0ac9 4800 |H | Short_Literal 0x0 0aca 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0acb 4801 |H | Short_Literal 0x1 0acc 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0acd 4802 |H | Short_Literal 0x2 0ace 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0acf 0000 | | .XXX[0x1] 0ad0 ; -------------------------------------------------------------------------------------- 0ad0 ; SUBPROGRAM 0ad0 ; -------------------------------------------------------------------------------------- 0ad0 0ad3 | | .CONST 0x0ad3 ; Address of begin 0ad1 0004 | | .CONST 0x0004 ; Address of exception handler 0ad2 0001 | | .CONST 0x0001 ; Number of locals 0ad3 BODY_0ad0: 0ad3 INIT_0ad0: 0ad3 00da | | Load_Top At_Offset_2 0ad4 0f00 | | Execute_Immediate Equal,0x0 0ad5 00d8 | | Load_Top At_Offset_0 0ad6 e2c6 | | Load 0x1,0xc6 0ad7 0260 | ` | Execute Discrete,In_Type 0ad8 7001 |p | Jump_Nonzero 0xada 0ad9 0801 | | Execute_Immediate Raise,0x1 0ada 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0adb 0000 0000 | | .BLANK 0000[0x5] 0ae0 ; -------------------------------------------------------------------------------------- 0ae0 ; SUBPROGRAM 0ae0 ; -------------------------------------------------------------------------------------- 0ae0 0ae3 | | .CONST 0x0ae3 ; Address of begin 0ae1 0004 | | .CONST 0x0004 ; Address of exception handler 0ae2 0001 | | .CONST 0x0001 ; Number of locals 0ae3 BODY_0ae0: 0ae3 INIT_0ae0: 0ae3 4801 |H | Short_Literal 0x1 0ae4 0092 0ea9 | | Action Push_String_Extended,0xea9 ; "Assemble" 0ae6 e5ff | | Load 0x2,-0x1 0ae7 e009 | | Load 0x0,0x9 0ae8 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0ae9 6810 |h | Jump_Zero 0xafa 0aea e2c5 | | Load 0x1,0xc5 0aeb 0337 | 7 | Declare_Variable Array 0aec 4801 |H | Short_Literal 0x1 0aed 4800 |H | Short_Literal 0x0 0aee 00da | | Load_Top At_Offset_2 0aef 01d6 | | Execute Vector,Field_Write 0af0 4803 |H | Short_Literal 0x3 0af1 4801 |H | Short_Literal 0x1 0af2 4800 |H | Short_Literal 0x0 0af3 00d9 | | Load_Top At_Offset_1 0af4 e402 | | Load 0x2,0x2 0af5 01d6 | | Execute Vector,Field_Write 0af6 3ffb |? | Loop_Increasing 0xaf2 0af7 e2c5 | | Load 0x1,0xc5 0af8 01c3 | | Execute Vector,Check_In_Type 0af9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0afa 4801 |H | Short_Literal 0x1 0afb 0092 0eaa | | Action Push_String_Extended,0xeaa ; "Promote" 0afd e5ff | | Load 0x2,-0x1 0afe e009 | | Load 0x0,0x9 0aff 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0b00 6815 |h | Jump_Zero 0xb16 0b01 e2c5 | | Load 0x1,0xc5 0b02 0337 | 7 | Declare_Variable Array 0b03 4801 |H | Short_Literal 0x1 0b04 4801 |H | Short_Literal 0x1 0b05 00da | | Load_Top At_Offset_2 0b06 01d6 | | Execute Vector,Field_Write 0b07 4800 |H | Short_Literal 0x0 0b08 4800 |H | Short_Literal 0x0 0b09 00da | | Load_Top At_Offset_2 0b0a 01d6 | | Execute Vector,Field_Write 0b0b 4800 |H | Short_Literal 0x0 0b0c 4802 |H | Short_Literal 0x2 0b0d 00da | | Load_Top At_Offset_2 0b0e 01d6 | | Execute Vector,Field_Write 0b0f 4800 |H | Short_Literal 0x0 0b10 4803 |H | Short_Literal 0x3 0b11 00da | | Load_Top At_Offset_2 0b12 01d6 | | Execute Vector,Field_Write 0b13 e2c5 | | Load 0x1,0xc5 0b14 01c3 | | Execute Vector,Check_In_Type 0b15 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b16 4801 |H | Short_Literal 0x1 0b17 0092 0eab | | Action Push_String_Extended,0xeab ; "Demote" 0b19 e5ff | | Load 0x2,-0x1 0b1a e009 | | Load 0x0,0x9 0b1b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0b1c 6815 |h | Jump_Zero 0xb32 0b1d e2c5 | | Load 0x1,0xc5 0b1e 0337 | 7 | Declare_Variable Array 0b1f 4801 |H | Short_Literal 0x1 0b20 4802 |H | Short_Literal 0x2 0b21 00da | | Load_Top At_Offset_2 0b22 01d6 | | Execute Vector,Field_Write 0b23 4800 |H | Short_Literal 0x0 0b24 4800 |H | Short_Literal 0x0 0b25 00da | | Load_Top At_Offset_2 0b26 01d6 | | Execute Vector,Field_Write 0b27 4800 |H | Short_Literal 0x0 0b28 4801 |H | Short_Literal 0x1 0b29 00da | | Load_Top At_Offset_2 0b2a 01d6 | | Execute Vector,Field_Write 0b2b 4800 |H | Short_Literal 0x0 0b2c 4803 |H | Short_Literal 0x3 0b2d 00da | | Load_Top At_Offset_2 0b2e 01d6 | | Execute Vector,Field_Write 0b2f e2c5 | | Load 0x1,0xc5 0b30 01c3 | | Execute Vector,Check_In_Type 0b31 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b32 4801 |H | Short_Literal 0x1 0b33 0092 0eac | | Action Push_String_Extended,0xeac ; "Link" 0b35 e5ff | | Load 0x2,-0x1 0b36 e009 | | Load 0x0,0x9 0b37 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0b38 6810 |h | Jump_Zero 0xb49 0b39 e2c5 | | Load 0x1,0xc5 0b3a 0337 | 7 | Declare_Variable Array 0b3b 4801 |H | Short_Literal 0x1 0b3c 4803 |H | Short_Literal 0x3 0b3d 00da | | Load_Top At_Offset_2 0b3e 01d6 | | Execute Vector,Field_Write 0b3f 4802 |H | Short_Literal 0x2 0b40 4800 |H | Short_Literal 0x0 0b41 4800 |H | Short_Literal 0x0 0b42 00d9 | | Load_Top At_Offset_1 0b43 e402 | | Load 0x2,0x2 0b44 01d6 | | Execute Vector,Field_Write 0b45 3ffb |? | Loop_Increasing 0xb41 0b46 e2c5 | | Load 0x1,0xc5 0b47 01c3 | | Execute Vector,Check_In_Type 0b48 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b49 0831 | 1 | Execute_Immediate Raise,0x31 0b4a 0000 0000 | | .BLANK 0000[0x6] 0b50 ; -------------------------------------------------------------------------------------- 0b50 ; SUBPROGRAM 0b50 ; -------------------------------------------------------------------------------------- 0b50 0b55 | U | .CONST 0x0b55 ; Address of begin 0b51 0004 | | .CONST 0x0004 ; Address of exception handler 0b52 0002 | | .CONST 0x0002 ; Number of locals 0b53 INIT_0b50: 0b53 029f 0d7b | {| Declare_Subprogram INIT_0d78,For_Call 0b55 BODY_0b50: 0b55 00db | | Load_Top At_Offset_3 0b56 01dd | | Execute Vector,First 0b57 0f01 | | Execute_Immediate Equal,0x1 0b58 6802 |h | Jump_Zero 0xb5b 0b59 00db | | Load_Top At_Offset_3 0b5a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0b5b 8402 | | Call 0x2,0x2 0b5c 0831 | 1 | Execute_Immediate Raise,0x31 0b5d 0000 0000 | | .XXX[0x3] 0b5f 0000 | | 0b60 ; -------------------------------------------------------------------------------------- 0b60 ; SUBPROGRAM 0b60 ; -------------------------------------------------------------------------------------- 0b60 0b63 | c | .CONST 0x0b63 ; Address of begin 0b61 0004 | | .CONST 0x0004 ; Address of exception handler 0b62 0001 | | .CONST 0x0001 ; Number of locals 0b63 BODY_0b60: 0b63 INIT_0b60: 0b63 e5fd | | Load 0x2,-0x3 0b64 8263 | c | Call 0x1,0x63 0b65 e007 | | Load 0x0,0x7 0b66 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0b67 e008 | | Load 0x0,0x8 0b68 1860 | ` | Execute Package,Field_Execute,Field_Number 0x60 0b69 0f04 | | Execute_Immediate Equal,0x4 0b6a 680d |h | Jump_Zero 0xb78 0b6b 0092 0ead | | Action Push_String_Extended,0xead ; "'" 0b6d e5fe | | Load 0x2,-0x2 0b6e 01cc | | Execute Vector,Catenate 0b6f 0092 0eae | | Action Push_String_Extended,0xeae ; "(" 0b71 01cc | | Execute Vector,Catenate 0b72 00db | | Load_Top At_Offset_3 0b73 01cc | | Execute Vector,Catenate 0b74 0092 0eaf | | Action Push_String_Extended,0xeaf ; ")'" 0b76 01cc | | Execute Vector,Catenate 0b77 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0b78 00ea | | Load_Encached Null_String_Cache 0b79 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0b7a 0000 0000 | | .BLANK 0000[0x6] 0b80 ; -------------------------------------------------------------------------------------- 0b80 ; SUBPROGRAM 0b80 ; -------------------------------------------------------------------------------------- 0b80 0b83 | | .CONST 0x0b83 ; Address of begin 0b81 0004 | | .CONST 0x0004 ; Address of exception handler 0b82 0001 | | .CONST 0x0001 ; Number of locals 0b83 BODY_0b80: 0b83 INIT_0b80: 0b83 00da | | Load_Top At_Offset_2 0b84 4603 |F | Jump_Case 0x4 0b85 7805 |x | Jump 0xb8b ; case 0x0 0b86 7811 |x | Jump 0xb98 ; case 0x1 0b87 781d |x | Jump 0xba5 ; case 0x2 0b88 7800 |x | Jump 0xb89 ; case 0x3 0b89 00ea | | Load_Encached Null_String_Cache 0b8a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0b8b 0092 0eb0 | | Action Push_String_Extended,0xeb0 ; "_" 0b8d 4820 |H | Short_Literal 0x20 0b8e 4800 |H | Short_Literal 0x0 0b8f 480a |H | Short_Literal 0xa 0b90 e5fe | | Load 0x2,-0x2 0b91 e009 | | Load 0x0,0x9 0b92 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0b93 01cc | | Execute Vector,Catenate 0b94 0092 0eb1 | | Action Push_String_Extended,0xeb1 ; "_s" 0b96 01cc | | Execute Vector,Catenate 0b97 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0b98 0092 0eb0 | | Action Push_String_Extended,0xeb0 ; "_" 0b9a 4820 |H | Short_Literal 0x20 0b9b 4800 |H | Short_Literal 0x0 0b9c 480a |H | Short_Literal 0xa 0b9d e5fe | | Load 0x2,-0x2 0b9e e009 | | Load 0x0,0x9 0b9f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0ba0 01cc | | Execute Vector,Catenate 0ba1 0092 0eb2 | | Action Push_String_Extended,0xeb2 ; "_b" 0ba3 01cc | | Execute Vector,Catenate 0ba4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0ba5 0092 0eb0 | | Action Push_String_Extended,0xeb0 ; "_" 0ba7 4820 |H | Short_Literal 0x20 0ba8 4800 |H | Short_Literal 0x0 0ba9 480a |H | Short_Literal 0xa 0baa e5fe | | Load 0x2,-0x2 0bab e009 | | Load 0x0,0x9 0bac 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0bad 01cc | | Execute Vector,Catenate 0bae 0092 0eb3 | | Action Push_String_Extended,0xeb3 ; "_t" 0bb0 01cc | | Execute Vector,Catenate 0bb1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0bb2 0000 0000 | | .BLANK 0000[0x6] 0bb8 ; -------------------------------------------------------------------------------------- 0bb8 ; SUBPROGRAM 0bb8 ; -------------------------------------------------------------------------------------- 0bb8 0bdb | | .CONST 0x0bdb ; Address of begin 0bb9 0004 | | .CONST 0x0004 ; Address of exception handler 0bba 0007 | | .CONST 0x0007 ; Number of locals 0bbb INIT_0bb8: 0bbb 00da | | Load_Top At_Offset_2 0bbc e002 | | Load 0x0,0x2 0bbd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0bbe 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0bbf 00d8 | | Load_Top At_Offset_0 0bc0 e002 | | Load 0x0,0x2 0bc1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0bc2 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0bc3 e5fc | | Load 0x2,-0x4 0bc4 82c2 | | Call 0x1,0xc2 0bc5 e5fd | | Load 0x2,-0x3 0bc6 00d8 | | Load_Top At_Offset_0 0bc7 00e4 | | Load_Encached Positive_Cache 0bc8 0260 | ` | Execute Discrete,In_Type 0bc9 7001 |p | Jump_Nonzero 0xbcb 0bca 0801 | | Execute_Immediate Raise,0x1 0bcb e5fe | | Load 0x2,-0x2 0bcc 82e8 | | Call 0x1,0xe8 0bcd e5fc | | Load 0x2,-0x4 0bce 82c2 | | Call 0x1,0xc2 0bcf 00d8 | | Load_Top At_Offset_0 0bd0 e5fc | | Load 0x2,-0x4 0bd1 82d0 | | Call 0x1,0xd0 0bd2 01cc | | Execute Vector,Catenate 0bd3 e5fe | | Load 0x2,-0x2 0bd4 e5fc | | Load 0x2,-0x4 0bd5 8274 | t | Call 0x1,0x74 0bd6 01cc | | Execute Vector,Catenate 0bd7 0007 | | Action Break_Optional 0bd8 00e3 | | Load_Encached Natural_Cache 0bd9 029f 0d93 | | Declare_Subprogram INIT_0d90,For_Call 0bdb BODY_0bb8: 0bdb e5fe | | Load 0x2,-0x2 0bdc 0f02 | | Execute_Immediate Equal,0x2 0bdd 6802 |h | Jump_Zero 0xbe0 0bde 8407 | | Call 0x2,0x7 0bdf 784e |xN | Jump 0xc2e 0be0 e403 | | Load 0x2,0x3 0be1 01dd | | Execute Vector,First 0be2 e5fc | | Load 0x2,-0x4 0be3 8272 | r | Call 0x1,0x72 0be4 0273 | s | Execute Discrete,Plus 0be5 e404 | | Load 0x2,0x4 0be6 01db | | Execute Vector,Length 0be7 0272 | r | Execute Discrete,Minus 0be8 0aff | | Execute_Immediate Plus,-0x1 0be9 005a | Z | Store_Top Discrete,At_Offset_2 0bea 00d9 | | Load_Top At_Offset_1 0beb e403 | | Load 0x2,0x3 0bec 01dc | | Execute Vector,Last 0bed 027b | { | Execute Discrete,Greater_Equal 0bee 6804 |h | Jump_Zero 0xbf3 0bef e403 | | Load 0x2,0x3 0bf0 00db | | Load_Top At_Offset_3 0bf1 01cc | | Execute Vector,Catenate 0bf2 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0bf3 00d9 | | Load_Top At_Offset_1 0bf4 e403 | | Load 0x2,0x3 0bf5 01dd | | Execute Vector,First 0bf6 027c | | | Execute Discrete,Less 0bf7 6820 |h | Jump_Zero 0xc18 0bf8 e010 | | Load 0x0,0x10 0bf9 180e | | Execute Package,Field_Execute,Field_Number 0xe 0bfa 4801 |H | Short_Literal 0x1 0bfb 4802 |H | Short_Literal 0x2 0bfc e014 | | Load 0x0,0x14 0bfd 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0bfe 035b | [ | Declare_Type Array,Constrained 0bff 0337 | 7 | Declare_Variable Array 0c00 e402 | | Load 0x2,0x2 0c01 e014 | | Load 0x0,0x14 0c02 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0c03 e014 | | Load 0x0,0x14 0c04 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0c05 0119 | | Execute Any,Check_In_Formal_Type 0c06 4801 |H | Short_Literal 0x1 0c07 00da | | Load_Top At_Offset_2 0c08 01d6 | | Execute Vector,Field_Write 0c09 e5fc | | Load 0x2,-0x4 0c0a 8272 | r | Call 0x1,0x72 0c0b e014 | | Load 0x0,0x14 0c0c 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0c0d e014 | | Load 0x0,0x14 0c0e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0c0f 0119 | | Execute Any,Check_In_Formal_Type 0c10 4802 |H | Short_Literal 0x2 0c11 00da | | Load_Top At_Offset_2 0c12 01d6 | | Execute Vector,Field_Write 0c13 601c |` | Indirect_Literal Discrete,0xc30,{0x00000000, 0x000081b8} 0c14 e011 | | Load 0x0,0x11 0c15 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0c16 00ea | | Load_Encached Null_String_Cache 0c17 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0c18 00d9 | | Load_Top At_Offset_1 0c19 e403 | | Load 0x2,0x3 0c1a 01d7 | | Execute Vector,Field_Read 0c1b 0f5f | _ | Execute_Immediate Equal,0x5f 0c1c 6809 |h | Jump_Zero 0xc26 0c1d e403 | | Load 0x2,0x3 0c1e 01dd | | Execute Vector,First 0c1f 00da | | Load_Top At_Offset_2 0c20 0aff | | Execute_Immediate Plus,-0x1 0c21 e403 | | Load 0x2,0x3 0c22 01cf | | Execute Vector,Slice_Read 0c23 00db | | Load_Top At_Offset_3 0c24 01cc | | Execute Vector,Catenate 0c25 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0c26 e403 | | Load 0x2,0x3 0c27 01dd | | Execute Vector,First 0c28 00da | | Load_Top At_Offset_2 0c29 e403 | | Load 0x2,0x3 0c2a 01cf | | Execute Vector,Slice_Read 0c2b 00db | | Load_Top At_Offset_3 0c2c 01cc | | Execute Vector,Catenate 0c2d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0c2e 0831 | 1 | Execute_Immediate Raise,0x31 0c2f 0000 | | .XXX[0x1] 0c30 0000 0000 | | .LITERAL {0x00000000, 0x000081b8} 0c34 0000 0000 | | .BLANK 0000[0x4] 0c38 ; -------------------------------------------------------------------------------------- 0c38 ; SUBPROGRAM 0c38 ; -------------------------------------------------------------------------------------- 0c38 0c4f | O | .CONST 0x0c4f ; Address of begin 0c39 0004 | | .CONST 0x0004 ; Address of exception handler 0c3a 0005 | | .CONST 0x0005 ; Number of locals 0c3b INIT_0c38: 0c3b e002 | | Load 0x0,0x2 0c3c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0c3d 02c7 | | Declare_Variable Any 0c3e 00d8 | | Load_Top At_Offset_0 0c3f 1c00 | | Execute_Immediate Run_Utility,0x0 0c40 e002 | | Load 0x0,0x2 0c41 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0c42 02ff | | Declare_Variable Variant_Record 0c43 00d8 | | Load_Top At_Offset_0 0c44 1c00 | | Execute_Immediate Run_Utility,0x0 0c45 e002 | | Load 0x0,0x2 0c46 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0c47 e5ff | | Load 0x2,-0x1 0c48 e002 | | Load 0x0,0x2 0c49 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0c4a 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0c4b 0092 0eb4 | | Action Push_String_Extended,0xeb4 ; ".library_switches" 0c4d 01cc | | Execute Vector,Catenate 0c4e 0007 | | Action Break_Optional 0c4f BODY_0c38: 0c4f e002 | | Load 0x0,0x2 0c50 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0c51 e402 | | Load 0x2,0x2 0c52 0120 | | Execute Any,Is_Value 0c53 6803 |h | Jump_Zero 0xc57 0c54 e002 | | Load 0x0,0x2 0c55 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0c56 7801 |x | Jump 0xc58 0c57 e402 | | Load 0x2,0x2 0c58 609b |` | Indirect_Literal Discrete,0xcf4,{0x00000000, 0x00004000} 0c59 e00e | | Load 0x0,0xe 0c5a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0c5b e5ff | | Load 0x2,-0x1 0c5c e002 | | Load 0x0,0x2 0c5d 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0c5e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0c5f e002 | | Load 0x0,0x2 0c60 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0c61 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0c62 c402 | | Store 0x2,0x2 0c63 005a | Z | Store_Top Discrete,At_Offset_2 0c64 00d9 | | Load_Top At_Offset_1 0c65 7005 |p | Jump_Nonzero 0xc6b 0c66 00db | | Load_Top At_Offset_3 0c67 e002 | | Load 0x0,0x2 0c68 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0c69 012f | / | Execute Any,Equal 0c6a 684c |hL | Jump_Zero 0xcb7 0c6b e5fe | | Load 0x2,-0x2 0c6c 4801 |H | Short_Literal 0x1 0c6d 4802 |H | Short_Literal 0x2 0c6e e014 | | Load 0x0,0x14 0c6f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0c70 035b | [ | Declare_Type Array,Constrained 0c71 0337 | 7 | Declare_Variable Array 0c72 e5ff | | Load 0x2,-0x1 0c73 e002 | | Load 0x0,0x2 0c74 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0c75 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0c76 e014 | | Load 0x0,0x14 0c77 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0c78 e014 | | Load 0x0,0x14 0c79 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0c7a 0119 | | Execute Any,Check_In_Formal_Type 0c7b 4801 |H | Short_Literal 0x1 0c7c 00da | | Load_Top At_Offset_2 0c7d 01d6 | | Execute Vector,Field_Write 0c7e 00db | | Load_Top At_Offset_3 0c7f e002 | | Load 0x0,0x2 0c80 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0c81 011c | | Execute Any,Convert_Unchecked 0c82 1c01 | | Execute_Immediate Run_Utility,0x1 0c83 e014 | | Load 0x0,0x14 0c84 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0c85 e014 | | Load 0x0,0x14 0c86 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0c87 0119 | | Execute Any,Check_In_Formal_Type 0c88 4802 |H | Short_Literal 0x2 0c89 00da | | Load_Top At_Offset_2 0c8a 01d6 | | Execute Vector,Field_Write 0c8b 6064 |`d | Indirect_Literal Discrete,0xcf0,{0x00000000, 0x0000810e} 0c8c e011 | | Load 0x0,0x11 0c8d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0c8e 0092 0eb5 | | Action Push_String_Extended,0xeb5 ; "<PROFILE>" 0c90 484c |HL | Short_Literal 0x4c 0c91 00da | | Load_Top At_Offset_2 0c92 e015 | | Load 0x0,0x15 0c93 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0c94 0092 0eb5 | | Action Push_String_Extended,0xeb5 ; "<PROFILE>" 0c96 e5ff | | Load 0x2,-0x1 0c97 e002 | | Load 0x0,0x2 0c98 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0c99 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0c9a 00da | | Load_Top At_Offset_2 0c9b e015 | | Load 0x0,0x15 0c9c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0c9d e002 | | Load 0x0,0x2 0c9e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0c9f e402 | | Load 0x2,0x2 0ca0 0120 | | Execute Any,Is_Value 0ca1 6803 |h | Jump_Zero 0xca5 0ca2 e002 | | Load 0x0,0x2 0ca3 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0ca4 7801 |x | Jump 0xca6 0ca5 e402 | | Load 0x2,0x2 0ca6 604d |`M | Indirect_Literal Discrete,0xcf4,{0x00000000, 0x00004000} 0ca7 e00e | | Load 0x0,0xe 0ca8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ca9 e5ff | | Load 0x2,-0x1 0caa e002 | | Load 0x0,0x2 0cab 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0cac 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0cad e002 | | Load 0x0,0x2 0cae 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 0caf 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0cb0 c402 | | Store 0x2,0x2 0cb1 005a | Z | Store_Top Discrete,At_Offset_2 0cb2 00d9 | | Load_Top At_Offset_1 0cb3 6803 |h | Jump_Zero 0xcb7 0cb4 e002 | | Load 0x0,0x2 0cb5 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0cb6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0cb7 e002 | | Load 0x0,0x2 0cb8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0cb9 00db | | Load_Top At_Offset_3 0cba 6039 |`9 | Indirect_Literal Discrete,0xcf4,{0x00000000, 0x00004000} 0cbb e00e | | Load 0x0,0xe 0cbc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0cbd 4800 |H | Short_Literal 0x0 0cbe e402 | | Load 0x2,0x2 0cbf e002 | | Load 0x0,0x2 0cc0 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 0cc1 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0cc2 00d1 | | Pop_Control Pop_Count_1 0cc3 005a | Z | Store_Top Discrete,At_Offset_2 0cc4 00d9 | | Load_Top At_Offset_1 0cc5 7002 |p | Jump_Nonzero 0xcc8 0cc6 00da | | Load_Top At_Offset_2 0cc7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0cc8 e5fe | | Load 0x2,-0x2 0cc9 4801 |H | Short_Literal 0x1 0cca 4802 |H | Short_Literal 0x2 0ccb e014 | | Load 0x0,0x14 0ccc 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0ccd 035b | [ | Declare_Type Array,Constrained 0cce 0337 | 7 | Declare_Variable Array 0ccf e5ff | | Load 0x2,-0x1 0cd0 e002 | | Load 0x0,0x2 0cd1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0cd2 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0cd3 e014 | | Load 0x0,0x14 0cd4 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0cd5 e014 | | Load 0x0,0x14 0cd6 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0cd7 0119 | | Execute Any,Check_In_Formal_Type 0cd8 4801 |H | Short_Literal 0x1 0cd9 00da | | Load_Top At_Offset_2 0cda 01d6 | | Execute Vector,Field_Write 0cdb 00db | | Load_Top At_Offset_3 0cdc e002 | | Load 0x0,0x2 0cdd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0cde 011c | | Execute Any,Convert_Unchecked 0cdf 1c01 | | Execute_Immediate Run_Utility,0x1 0ce0 e014 | | Load 0x0,0x14 0ce1 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0ce2 e014 | | Load 0x0,0x14 0ce3 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ce4 0119 | | Execute Any,Check_In_Formal_Type 0ce5 4802 |H | Short_Literal 0x2 0ce6 00da | | Load_Top At_Offset_2 0ce7 01d6 | | Execute Vector,Field_Write 0ce8 6007 |` | Indirect_Literal Discrete,0xcf0,{0x00000000, 0x0000810e} 0ce9 e011 | | Load 0x0,0x11 0cea 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0ceb e002 | | Load 0x0,0x2 0cec 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0ced 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0cee 0000 0000 | | .XXX[0x2] 0cf0 0000 0000 | | .LITERAL {0x00000000, 0x0000810e} 0cf4 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0cf8 ; -------------------------------------------------------------------------------------- 0cf8 ; SUBPROGRAM 0cf8 ; -------------------------------------------------------------------------------------- 0cf8 0cfb | | .CONST 0x0cfb ; Address of begin 0cf9 0004 | | .CONST 0x0004 ; Address of exception handler 0cfa 0001 | | .CONST 0x0001 ; Number of locals 0cfb BODY_0cf8: 0cfb INIT_0cf8: 0cfb 00da | | Load_Top At_Offset_2 0cfc 00d8 | | Load_Top At_Offset_0 0cfd e008 | | Load 0x0,0x8 0cfe 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0cff 0260 | ` | Execute Discrete,In_Type 0d00 7001 |p | Jump_Nonzero 0xd02 0d01 0801 | | Execute_Immediate Raise,0x1 0d02 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0d03 0000 0000 | | .BLANK 0000[0x5] 0d08 ; -------------------------------------------------------------------------------------- 0d08 ; SUBPROGRAM 0d08 ; -------------------------------------------------------------------------------------- 0d08 0d10 | | .CONST 0x0d10 ; Address of begin 0d09 0d19 | | .CONST 0x0d19 ; Address of exception handler 0d0a 0003 | | .CONST 0x0003 ; Number of locals 0d0b INIT_0d08: 0d0b e011 | | Load 0x0,0x11 0d0c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0d0d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0d0e 029f 0e0b | | Declare_Subprogram INIT_0e08,For_Call 0d10 BODY_0d08: 0d10 4800 |H | Short_Literal 0x0 0d11 00da | | Load_Top At_Offset_2 0d12 e011 | | Load 0x0,0x11 0d13 1847 | G | Execute Package,Field_Execute,Field_Number 0x47 0d14 7002 |p | Jump_Nonzero 0xd17 0d15 00ea | | Load_Encached Null_String_Cache 0d16 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6 0d17 8403 | | Call 0x2,0x3 0d18 0831 | 1 | Execute_Immediate Raise,0x31 0d19 TRAP_0d08: 0d19 0007 | | Action Break_Optional 0d1a 00ea | | Load_Encached Null_String_Cache 0d1b 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6 0d1c 0000 0000 | | .BLANK 0000[0x4] 0d20 ; -------------------------------------------------------------------------------------- 0d20 ; SUBPROGRAM 0d20 ; -------------------------------------------------------------------------------------- 0d20 0d23 | # | .CONST 0x0d23 ; Address of begin 0d21 0004 | | .CONST 0x0004 ; Address of exception handler 0d22 0001 | | .CONST 0x0001 ; Number of locals 0d23 BODY_0d20: 0d23 INIT_0d20: 0d23 0092 0eb6 | | Action Push_String_Extended,0xeb6 ; " " 0d25 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0d26 0000 0000 | | .XXX[0x2] 0d28 ; -------------------------------------------------------------------------------------- 0d28 ; SUBPROGRAM 0d28 ; -------------------------------------------------------------------------------------- 0d28 0d33 | 3 | .CONST 0x0d33 ; Address of begin 0d29 0004 | | .CONST 0x0004 ; Address of exception handler 0d2a 0002 | | .CONST 0x0002 ; Number of locals 0d2b INIT_0d28: 0d2b e008 | | Load 0x0,0x8 0d2c 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 0d2d 02c7 | | Declare_Variable Any 0d2e 00db | | Load_Top At_Offset_3 0d2f 8263 | c | Call 0x1,0x63 0d30 e007 | | Load 0x0,0x7 0d31 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0d32 a402 | | Store_Unchecked 0x2,0x2 0d33 BODY_0d28: 0d33 00d8 | | Load_Top At_Offset_0 0d34 e008 | | Load 0x0,0x8 0d35 1860 | ` | Execute Package,Field_Execute,Field_Number 0x60 0d36 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0d37 0000 | | .XXX[0x1] 0d38 ; -------------------------------------------------------------------------------------- 0d38 ; SUBPROGRAM 0d38 ; -------------------------------------------------------------------------------------- 0d38 0d46 | F | .CONST 0x0d46 ; Address of begin 0d39 0004 | | .CONST 0x0004 ; Address of exception handler 0d3a 0004 | | .CONST 0x0004 ; Number of locals 0d3b INIT_0d38: 0d3b e5ff | | Load 0x2,-0x1 0d3c 8263 | c | Call 0x1,0x63 0d3d e5fd | | Load 0x2,-0x3 0d3e e402 | | Load 0x2,0x2 0d3f e5fe | | Load 0x2,-0x2 0d40 e016 | | Load 0x0,0x16 0d41 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0d42 029f 0e1b | | Declare_Subprogram INIT_0e18,For_Call 0d44 029f 0e33 | 3| Declare_Subprogram INIT_0e30,For_Call 0d46 BODY_0d38: 0d46 00da | | Load_Top At_Offset_2 0d47 01db | | Execute Vector,Length 0d48 6802 |h | Jump_Zero 0xd4b 0d49 8603 | | Call 0x3,0x3 0d4a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0d4b 8604 | | Call 0x3,0x4 0d4c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0d4d 0000 0000 | | .XXX[0x3] 0d4f 0000 | | 0d50 ; -------------------------------------------------------------------------------------- 0d50 ; SUBPROGRAM 0d50 ; -------------------------------------------------------------------------------------- 0d50 0d53 | S | .CONST 0x0d53 ; Address of begin 0d51 0d59 | Y | .CONST 0x0d59 ; Address of exception handler 0d52 0001 | | .CONST 0x0001 ; Number of locals 0d53 BODY_0d50: 0d53 INIT_0d50: 0d53 e5ff | | Load 0x2,-0x1 0d54 e003 | | Load 0x0,0x3 0d55 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0d56 e404 | | Load 0x2,0x4 0d57 017d | } | Execute Record,Structure_Write 0d58 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0d59 TRAP_0d50: 0d59 010e | | Execute Exception,Is_Constraint_Error 0d5a 6815 |h | Jump_Zero 0xd70 0d5b e402 | | Load 0x2,0x2 0d5c 4801 |H | Short_Literal 0x1 0d5d 4801 |H | Short_Literal 0x1 0d5e e014 | | Load 0x0,0x14 0d5f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0d60 035b | [ | Declare_Type Array,Constrained 0d61 0337 | 7 | Declare_Variable Array 0d62 e5ff | | Load 0x2,-0x1 0d63 e014 | | Load 0x0,0x14 0d64 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0d65 e014 | | Load 0x0,0x14 0d66 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0d67 0119 | | Execute Any,Check_In_Formal_Type 0d68 4801 |H | Short_Literal 0x1 0d69 00da | | Load_Top At_Offset_2 0d6a 01d6 | | Execute Vector,Field_Write 0d6b 6008 |` | Indirect_Literal Discrete,0xd74,{0x00000000, 0x00008181} 0d6c e011 | | Load 0x0,0x11 0d6d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0d6e 00cc | | Action Pop_Block 0d6f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d70 0100 | | Execute Exception,Raise 0d71 0000 0000 | | .XXX[0x3] 0d73 0000 | | 0d74 0000 0000 | | .LITERAL {0x00000000, 0x00008181} 0d78 ; -------------------------------------------------------------------------------------- 0d78 ; SUBPROGRAM 0d78 ; -------------------------------------------------------------------------------------- 0d78 0d89 | | .CONST 0x0d89 ; Address of begin 0d79 0004 | | .CONST 0x0004 ; Address of exception handler 0d7a 0002 | | .CONST 0x0002 ; Number of locals 0d7b INIT_0d78: 0d7b 4801 |H | Short_Literal 0x1 0d7c e5ff | | Load 0x2,-0x1 0d7d 01db | | Execute Vector,Length 0d7e 00d8 | | Load_Top At_Offset_0 0d7f 00e2 | | Load_Encached Integer_Cache 0d80 0260 | ` | Execute Discrete,In_Type 0d81 7001 |p | Jump_Nonzero 0xd83 0d82 0801 | | Execute_Immediate Raise,0x1 0d83 00e9 | | Load_Encached String_Cache 0d84 035b | [ | Declare_Type Array,Constrained 0d85 0337 | 7 | Declare_Variable Array 0d86 e5ff | | Load 0x2,-0x1 0d87 00d9 | | Load_Top At_Offset_1 0d88 01d4 | | Execute Vector,Structure_Write 0d89 BODY_0d78: 0d89 00d8 | | Load_Top At_Offset_0 0d8a 00e9 | | Load_Encached String_Cache 0d8b 01c6 | | Execute Vector,Convert_To_Formal 0d8c 00cb | | Action Pop_Block_With_Result 0d8d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0d8e 0000 0000 | | .XXX[0x2] 0d90 ; -------------------------------------------------------------------------------------- 0d90 ; SUBPROGRAM 0d90 ; -------------------------------------------------------------------------------------- 0d90 0dad | | .CONST 0x0dad ; Address of begin 0d91 0004 | | .CONST 0x0004 ; Address of exception handler 0d92 0003 | | .CONST 0x0003 ; Number of locals 0d93 INIT_0d90: 0d93 e010 | | Load 0x0,0x10 0d94 180e | | Execute Package,Field_Execute,Field_Number 0xe 0d95 4800 |H | Short_Literal 0x0 0d96 e402 | | Load 0x2,0x2 0d97 01dd | | Execute Vector,First 0d98 e402 | | Load 0x2,0x2 0d99 01dc | | Execute Vector,Last 0d9a 0af4 | | Execute_Immediate Plus,-0xc 0d9b 00d8 | | Load_Top At_Offset_0 0d9c 00e2 | | Load_Encached Integer_Cache 0d9d 0260 | ` | Execute Discrete,In_Type 0d9e 7001 |p | Jump_Nonzero 0xda0 0d9f 0801 | | Execute_Immediate Raise,0x1 0da0 e402 | | Load 0x2,0x2 0da1 01cf | | Execute Vector,Slice_Read 0da2 e00b | | Load 0x0,0xb 0da3 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0da4 e002 | | Load 0x0,0x2 0da5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0da6 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0da7 00d8 | | Load_Top At_Offset_0 0da8 e002 | | Load 0x0,0x2 0da9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0daa 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0dab e5fc | | Load 0x2,-0x4 0dac 82c2 | | Call 0x1,0xc2 0dad BODY_0d90: 0dad 00d8 | | Load_Top At_Offset_0 0dae 01dd | | Execute Vector,First 0daf e5fc | | Load 0x2,-0x4 0db0 8272 | r | Call 0x1,0x72 0db1 0273 | s | Execute Discrete,Plus 0db2 e404 | | Load 0x2,0x4 0db3 01db | | Execute Vector,Length 0db4 0272 | r | Execute Discrete,Minus 0db5 0aff | | Execute_Immediate Plus,-0x1 0db6 c406 | | Store 0x2,0x6 0db7 e406 | | Load 0x2,0x6 0db8 00d9 | | Load_Top At_Offset_1 0db9 01dc | | Execute Vector,Last 0dba 027b | { | Execute Discrete,Greater_Equal 0dbb 6805 |h | Jump_Zero 0xdc1 0dbc 00d8 | | Load_Top At_Offset_0 0dbd e405 | | Load 0x2,0x5 0dbe 01cc | | Execute Vector,Catenate 0dbf 00cb | | Action Pop_Block_With_Result 0dc0 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0dc1 e406 | | Load 0x2,0x6 0dc2 00d9 | | Load_Top At_Offset_1 0dc3 01dd | | Execute Vector,First 0dc4 027c | | | Execute Discrete,Less 0dc5 6821 |h! | Jump_Zero 0xde7 0dc6 e010 | | Load 0x0,0x10 0dc7 180e | | Execute Package,Field_Execute,Field_Number 0xe 0dc8 4801 |H | Short_Literal 0x1 0dc9 4802 |H | Short_Literal 0x2 0dca e014 | | Load 0x0,0x14 0dcb 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0dcc 035b | [ | Declare_Type Array,Constrained 0dcd 0337 | 7 | Declare_Variable Array 0dce e402 | | Load 0x2,0x2 0dcf e014 | | Load 0x0,0x14 0dd0 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0dd1 e014 | | Load 0x0,0x14 0dd2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0dd3 0119 | | Execute Any,Check_In_Formal_Type 0dd4 4801 |H | Short_Literal 0x1 0dd5 00da | | Load_Top At_Offset_2 0dd6 01d6 | | Execute Vector,Field_Write 0dd7 e5fc | | Load 0x2,-0x4 0dd8 8272 | r | Call 0x1,0x72 0dd9 e014 | | Load 0x0,0x14 0dda 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0ddb e014 | | Load 0x0,0x14 0ddc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ddd 0119 | | Execute Any,Check_In_Formal_Type 0dde 4802 |H | Short_Literal 0x2 0ddf 00da | | Load_Top At_Offset_2 0de0 01d6 | | Execute Vector,Field_Write 0de1 601e |` | Indirect_Literal Discrete,0xe00,{0x00000000, 0x000081b8} 0de2 e011 | | Load 0x0,0x11 0de3 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0de4 00ea | | Load_Encached Null_String_Cache 0de5 00cb | | Action Pop_Block_With_Result 0de6 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0de7 e406 | | Load 0x2,0x6 0de8 00d9 | | Load_Top At_Offset_1 0de9 01d7 | | Execute Vector,Field_Read 0dea 0f5f | _ | Execute_Immediate Equal,0x5f 0deb 680a |h | Jump_Zero 0xdf6 0dec 00d8 | | Load_Top At_Offset_0 0ded 01dd | | Execute Vector,First 0dee e406 | | Load 0x2,0x6 0def 0aff | | Execute_Immediate Plus,-0x1 0df0 00da | | Load_Top At_Offset_2 0df1 01cf | | Execute Vector,Slice_Read 0df2 e405 | | Load 0x2,0x5 0df3 01cc | | Execute Vector,Catenate 0df4 00cb | | Action Pop_Block_With_Result 0df5 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0df6 00d8 | | Load_Top At_Offset_0 0df7 01dd | | Execute Vector,First 0df8 e406 | | Load 0x2,0x6 0df9 00da | | Load_Top At_Offset_2 0dfa 01cf | | Execute Vector,Slice_Read 0dfb e405 | | Load 0x2,0x5 0dfc 01cc | | Execute Vector,Catenate 0dfd 00cb | | Action Pop_Block_With_Result 0dfe 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0dff 0000 | | .XXX[0x1] 0e00 0000 0000 | | .LITERAL {0x00000000, 0x000081b8} 0e04 0000 0000 | | .BLANK 0000[0x4] 0e08 ; -------------------------------------------------------------------------------------- 0e08 ; SUBPROGRAM 0e08 ; -------------------------------------------------------------------------------------- 0e08 0e14 | | .CONST 0x0e14 ; Address of begin 0e09 0004 | | .CONST 0x0004 ; Address of exception handler 0e0a 0002 | | .CONST 0x0002 ; Number of locals 0e0b INIT_0e08: 0e0b e5fa | | Load 0x2,-0x6 0e0c e5fb | | Load 0x2,-0x5 0e0d e5fc | | Load 0x2,-0x4 0e0e e5fd | | Load 0x2,-0x3 0e0f e5fe | | Load 0x2,-0x2 0e10 e5ff | | Load 0x2,-0x1 0e11 8263 | c | Call 0x1,0x63 0e12 e012 | | Load 0x0,0x12 0e13 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 0e14 BODY_0e08: 0e14 00d8 | | Load_Top At_Offset_0 0e15 00cb | | Action Pop_Block_With_Result 0e16 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6 0e17 0000 | | .XXX[0x1] 0e18 ; -------------------------------------------------------------------------------------- 0e18 ; SUBPROGRAM 0e18 ; -------------------------------------------------------------------------------------- 0e18 0e1f | | .CONST 0x0e1f ; Address of begin 0e19 0004 | | .CONST 0x0004 ; Address of exception handler 0e1a 0002 | | .CONST 0x0002 ; Number of locals 0e1b INIT_0e18: 0e1b e602 | | Load 0x3,0x2 0e1c 01db | | Execute Vector,Length 0e1d e2e3 | | Load 0x1,0xe3 0e1e 1c08 | | Execute_Immediate Run_Utility,0x8 0e1f BODY_0e18: 0e1f e602 | | Load 0x3,0x2 0e20 4801 |H | Short_Literal 0x1 0e21 00da | | Load_Top At_Offset_2 0e22 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0e23 00db | | Load_Top At_Offset_3 0e24 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0e25 01ce | | Execute Vector,Slice_Write 0e26 4800 |H | Short_Literal 0x0 0e27 00d9 | | Load_Top At_Offset_1 0e28 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0e29 00d8 | | Load_Top At_Offset_0 0e2a 00cb | | Action Pop_Block_With_Result 0e2b 00cb | | Action Pop_Block_With_Result 0e2c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0e2d 0000 0000 | | .XXX[0x3] 0e2f 0000 | | 0e30 ; -------------------------------------------------------------------------------------- 0e30 ; SUBPROGRAM 0e30 ; -------------------------------------------------------------------------------------- 0e30 0e3c | < | .CONST 0x0e3c ; Address of begin 0e31 0004 | | .CONST 0x0004 ; Address of exception handler 0e32 0003 | | .CONST 0x0003 ; Number of locals 0e33 INIT_0e30: 0e33 e5ff | | Load 0x2,-0x1 0e34 e5fd | | Load 0x2,-0x3 0e35 e402 | | Load 0x2,0x2 0e36 e5fe | | Load 0x2,-0x2 0e37 82e9 | | Call 0x1,0xe9 0e38 00d8 | | Load_Top At_Offset_0 0e39 01db | | Execute Vector,Length 0e3a e2e3 | | Load 0x1,0xe3 0e3b 1c08 | | Execute_Immediate Run_Utility,0x8 0e3c BODY_0e30: 0e3c 4801 |H | Short_Literal 0x1 0e3d 00d9 | | Load_Top At_Offset_1 0e3e 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0e3f 00d9 | | Load_Top At_Offset_1 0e40 01db | | Execute Vector,Length 0e41 0c01 | | Execute_Immediate Greater_Equal,0x1 0e42 680b |h | Jump_Zero 0xe4e 0e43 00d9 | | Load_Top At_Offset_1 0e44 4801 |H | Short_Literal 0x1 0e45 00da | | Load_Top At_Offset_2 0e46 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0e47 00db | | Load_Top At_Offset_3 0e48 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0e49 01ce | | Execute Vector,Slice_Write 0e4a 00d8 | | Load_Top At_Offset_0 0e4b 00cb | | Action Pop_Block_With_Result 0e4c 00cb | | Action Pop_Block_With_Result 0e4d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0e4e 00d8 | | Load_Top At_Offset_0 0e4f 00cb | | Action Pop_Block_With_Result 0e50 00cb | | Action Pop_Block_With_Result 0e51 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0e52 0000 0000 | | .BLANK 0000[0x6] 0e58 ; -------------------------------------------------------------------------------------- 0e58 ; SUBPROGRAM 0e58 ; -------------------------------------------------------------------------------------- 0e58 0e5b | [ | .CONST 0x0e5b ; Address of begin 0e59 0004 | | .CONST 0x0004 ; Address of exception handler 0e5a 0001 | | .CONST 0x0001 ; Number of locals 0e5b BODY_0e58: 0e5b INIT_0e58: 0e5b 4608 |F | Jump_Case 0x9 0e5c 7808 |x | Jump 0xe65 ; case 0x0 0e5d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0e5e 780a |x | Jump 0xe69 ; case 0x2 0e5f 7809 |x | Jump 0xe69 ; case 0x3 0e60 7808 |x | Jump 0xe69 ; case 0x4 0e61 7807 |x | Jump 0xe69 ; case 0x5 0e62 7806 |x | Jump 0xe69 ; case 0x6 0e63 7805 |x | Jump 0xe69 ; case 0x7 0e64 7804 |x | Jump 0xe69 ; case 0x8 0e65 00da | | Load_Top At_Offset_2 0e66 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0e67 1c00 | | Execute_Immediate Run_Utility,0x0 0e68 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0e69 0869 | i | Execute_Immediate Raise,0x69 0e6a 0000 0000 | | .BLANK 0000[0x6] 0e70 ; -------------------------------------------------------------------------------------- 0e70 ; SUBPROGRAM 0e70 ; -------------------------------------------------------------------------------------- 0e70 0e73 | s | .CONST 0x0e73 ; Address of begin 0e71 0004 | | .CONST 0x0004 ; Address of exception handler 0e72 0001 | | .CONST 0x0001 ; Number of locals 0e73 BODY_0e70: 0e73 INIT_0e70: 0e73 4608 |F | Jump_Case 0x9 0e74 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0e75 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0e76 7819 |x | Jump 0xe90 ; case 0x2 0e77 7818 |x | Jump 0xe90 ; case 0x3 0e78 7817 |x | Jump 0xe90 ; case 0x4 0e79 7816 |x | Jump 0xe90 ; case 0x5 0e7a 7815 |x | Jump 0xe90 ; case 0x6 0e7b 7801 |x | Jump 0xe7d ; case 0x7 0e7c 7809 |x | Jump 0xe86 ; case 0x8 0e7d 00db | | Load_Top At_Offset_3 0e7e 4801 |H | Short_Literal 0x1 0e7f e5fe | | Load 0x2,-0x2 0e80 00e9 | | Load_Encached String_Cache 0e81 035b | [ | Declare_Type Array,Constrained 0e82 4801 |H | Short_Literal 0x1 0e83 e5ff | | Load 0x2,-0x1 0e84 031b | | Declare_Type Variant_Record,Constrained 0e85 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0e86 00db | | Load_Top At_Offset_3 0e87 00db | | Load_Top At_Offset_3 0e88 02fc | | Declare_Variable Variant_Record,With_Constraint 0e89 4801 |H | Short_Literal 0x1 0e8a e5fe | | Load 0x2,-0x2 0e8b 00e9 | | Load_Encached String_Cache 0e8c 0334 | 4 | Declare_Variable Array,With_Constraint 0e8d 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3 0e8e 016a | j | QQ_execute Variant_Record,XXX 0e8f 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0e90 0869 | i | Execute_Immediate Raise,0x69 0e91 ; -------------------------------------------------------------------------------------- 0e91 ; STRING TABLE 0e91 ; -------------------------------------------------------------------------------------- 0e91 004e | N | .STRTAB 0x004e->0x0eb8 ; "UPPER" 0e92 0051 | Q | .STRTAB 0x0051->0x0eba ; "LOWER" 0e93 0054 | T | .STRTAB 0x0054->0x0ebd ; "CAPITALIZE" 0e94 005c | \ | .STRTAB 0x005c->0x0ec2 ; "DONT_CARE" 0e95 0063 | c | .STRTAB 0x0063->0x0ec6 ; "ASSEMBLE" 0e96 0069 | i | .STRTAB 0x0069->0x0eca ; "PROMOTE" 0e97 006e | n | .STRTAB 0x006e->0x0ece ; "DEMOTE" 0e98 0072 | r | .STRTAB 0x0072->0x0ed1 ; "LINK" 0e99 0074 | t | .STRTAB 0x0074->0x0ed3 ; "ON_NORMAL" 0e9a 007b | { | .STRTAB 0x007b->0x0ed7 ; "ON_ERROR" 0e9b 0081 | | .STRTAB 0x0081->0x0edb ; "ON_WARNING" 0e9c 0089 | | .STRTAB 0x0089->0x0ee0 ; "ALWAYS" 0e9d 008d | | .STRTAB 0x008d->0x0ee3 ; "FTP" 0e9e 008e | | .STRTAB 0x008e->0x0ee5 ; "DTIA" 0e9f 0090 | | .STRTAB 0x0090->0x0ee7 ; "TEXT" 0ea0 0092 | | .STRTAB 0x0092->0x0ee9 ; "BINARY" 0ea1 0096 | | .STRTAB 0x0096->0x0eec ; "ADA_SPEC" 0ea2 009c | | .STRTAB 0x009c->0x0ef0 ; "ADA_BODY" 0ea3 00a2 | | .STRTAB 0x00a2->0x0ef4 ; "SECONDARY" 0ea4 00a9 | | .STRTAB 0x00a9->0x0ef8 ; "UNKNOWN" 0ea5 00ae | | .STRTAB 0x00ae->0x0efc ; "<UNREGISTERED>" 0ea6 00ba | | .STRTAB 0x00ba->0x0f03 ; ".exe" 0ea7 00bc | | .STRTAB 0x00bc->0x0f05 ; "Ftp.Remote_Machine" 0ea8 00cc | | .STRTAB 0x00cc->0x0f0e ; "Ftp.Remote_Directory" 0ea9 00de | | .STRTAB 0x00de->0x0f18 ; "Assemble" 0eaa 00e4 | | .STRTAB 0x00e4->0x0f1c ; "Promote" 0eab 00e9 | | .STRTAB 0x00e9->0x0f1f ; "Demote" 0eac 00ed | | .STRTAB 0x00ed->0x0f22 ; "Link" 0ead 00ef | | .STRTAB 0x00ef->0x0f24 ; "'" 0eae 00ee | | .STRTAB 0x00ee->0x0f25 ; "(" 0eaf 00ed | | .STRTAB 0x00ed->0x0f25 ; ")'" 0eb0 00ed | | .STRTAB 0x00ed->0x0f26 ; "_" 0eb1 00ec | | .STRTAB 0x00ec->0x0f27 ; "_s" 0eb2 00ec | | .STRTAB 0x00ec->0x0f28 ; "_b" 0eb3 00ec | | .STRTAB 0x00ec->0x0f29 ; "_t" 0eb4 00ec | | .STRTAB 0x00ec->0x0f2a ; ".library_switches" 0eb5 00fb | | .STRTAB 0x00fb->0x0f32 ; "<PROFILE>" 0eb6 0102 | | .STRTAB 0x0102->0x0f37 ; " " 0eb7 0101 | | .STREND 0x0101->0x0f37 0eb8 5550 5045 |UPPE| .STRTAB_STRINGS 0f38 ; -------------------------------------------------------------------------------------- 0f38 ; Debug Table 0f38 ; -------------------------------------------------------------------------------------- 0f38 0004 000f | | .DEBUG4 0x0004,0x000f,0x2dd6,0x0000,0x0001,0x0000 0f3e 0000 0000 | | .XXX[0x18] 0f40 4fe2 8760 |O `| 0f42 0000 0000 | | 0f44 0000 0020 | | 0f46 0000 020a | | 0f48 4869 2bea |Hi+ | 0f4a 48a9 88a8 |H | 0f4c 2a68 a64b |*h K| 0f4e e60b e6b0 | | 0f50 1000 0655 | U| 0f52 0000 0000 | | 0f54 0009 8000 | | 0f56 0000 0000 | | .BLANK 0000[0x4] 0f5a 0003 e000 | | .XXX[0x2] 0f5c 0000 0000 | | .BLANK 0000[0x4] 0f60 01ff ffff | | .XXX[0x17] 0f62 fe00 6d9c | m | 0f64 6d00 00ca |m | 0f66 a404 fe2d | -| 0f68 5004 fe30 |P 0| 0f6a 5000 6d98 |P m | 0f6c 8500 00ca | | 0f6e e404 fe2e | .| 0f70 5004 fe2f |P /| 0f72 5000 6d96 |P m | 0f74 dd00 00cd | | 0f76 a000 | | 0f77 0000 0000 | | .BLANK 0000[0x4] 0f7b 6d9a 7d00 |m } | .XXX[0x4] 0f7d 00ca ae00 | | 0f7f 0000 0000 | | .BLANK 0000[0x4] 0f83 6d9f ad00 |m | .XXX[0xc] 0f85 00cb 1404 | | 0f87 fe31 5004 | 1P | 0f89 fe32 5000 | 2P | 0f8b 6d9e 0d00 |m | 0f8d 0169 9200 | i | 0f8f 0000 0000 | | .BLANK 0000[0x4] 0f93 6da1 5d00 |m ] | .XXX[0x1d] 0f95 00cd 9200 | | 0f97 0000 0004 | | 0f99 fe33 5100 | 3Q | 0f9b 6da3 5d00 |m ] | 0f9d 016b f400 | k | 0f9f 0000 0000 | | 0fa1 0000 0002 | | 0fa3 7f14 3b00 | ; | 0fa5 01d9 0400 | | 0fa7 0000 0005 | | 0fa9 04ef 0f80 | | 0fab 8000 32a8 | 2 | 0fad 0000 0000 | | 0faf 004c | L | 0fb0 0000 0000 | | .BLANK 0000[0x5] 0fb5 001f | | .XXX[0x1] 0fb6 0000 0000 | | .BLANK 0000[0x5] 0fbb 0fff ffff | | .XXX[0x45] 0fbd f013 f8e2 | | 0fbf b000 0000 | | 0fc1 0000 0000 | | 0fc3 1000 0000 | | 0fc5 0000 0000 | | 0fc7 0800 32d0 | 2 | 0fc9 1000 0000 | | 0fcb 0000 0000 | | 0fcd 0013 f8ea | | 0fcf b000 0000 | | 0fd1 0000 0000 | | 0fd3 1000 0000 | | 0fd5 0000 0000 | | 0fd7 0800 32d0 | 2 | 0fd9 1000 0000 | | 0fdb 0000 0000 | | 0fdd 0013 f8f0 | | 0fdf c000 1717 | | 0fe1 6502 7f1e |e | 0fe3 5802 7f1f |X | 0fe5 ab00 01d9 | | 0fe7 0600 5002 | P | 0fe9 b200 0000 | | 0feb 0004 fe49 | I| 0fed f400 0000 | | 0fef 0004 fe55 | U| 0ff1 8800 0cb4 | | 0ff3 0805 0001 | | 0ff5 d904 0804 | | 0ff7 8500 0040 | @| 0ff9 4fe4 33e0 |O 3 | 0ffb 003b 20c0 | ; | 0ffd 0a00 5640 | V@| 0fff 0000 | |