|
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: 15360 (0x3c00) Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0694fc
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 1db8 | | .CONST 0x1db8 ; 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 8012 | | .CONST 0x8012 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 019a | | .CONST 0x019a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0063 | c | .CONST 0x0063 ; Number of locals 000b INIT_0008: 000b 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated 000d 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated 000f 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated 0011 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated 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 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 005f c249 | I | Store 0x1,0x49 0060 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated 0062 c212 | | Store 0x1,0x12 0063 029a 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call,Visible,Unelaborated 0065 c213 | | Store 0x1,0x13 0066 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated 0068 c214 | | Store 0x1,0x14 0069 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated 006b c24a | J | Store 0x1,0x4a 006c 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated 006e c216 | | Store 0x1,0x16 006f 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated 0071 c217 | | Store 0x1,0x17 0072 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated 0074 c218 | | Store 0x1,0x18 0075 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated 0077 c219 | | Store 0x1,0x19 0078 029a 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Visible,Unelaborated 007a c21a | | Store 0x1,0x1a 007b 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated 007d c21b | | Store 0x1,0x1b 007e 029a 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call,Visible,Unelaborated 0080 c21c | | Store 0x1,0x1c 0081 029a 031b | | Declare_Subprogram INIT_0318,For_Outer_Call,Visible,Unelaborated 0083 c21d | | Store 0x1,0x1d 0084 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated 0086 c21e | | Store 0x1,0x1e 0087 029a 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call,Visible,Unelaborated 0089 c21f | | Store 0x1,0x1f 008a 029a 035b | [| Declare_Subprogram INIT_0358,For_Outer_Call,Visible,Unelaborated 008c c220 | | Store 0x1,0x20 008d 029a 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call,Visible,Unelaborated 008f c221 | ! | Store 0x1,0x21 0090 029a 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call,Visible,Unelaborated 0092 c222 | " | Store 0x1,0x22 0093 029a 03bb | | Declare_Subprogram INIT_03b8,For_Outer_Call,Visible,Unelaborated 0095 c223 | # | Store 0x1,0x23 0096 029a 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call,Visible,Unelaborated 0098 c224 | $ | Store 0x1,0x24 0099 029a 03e3 | | Declare_Subprogram INIT_03e0,For_Outer_Call,Visible,Unelaborated 009b c225 | % | Store 0x1,0x25 009c 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated 009e c226 | & | Store 0x1,0x26 009f 029a 040b | | Declare_Subprogram INIT_0408,For_Outer_Call,Visible,Unelaborated 00a1 c227 | ' | Store 0x1,0x27 00a2 029a 041b | | Declare_Subprogram INIT_0418,For_Outer_Call,Visible,Unelaborated 00a4 c228 | ( | Store 0x1,0x28 00a5 029a 0433 | 3| Declare_Subprogram INIT_0430,For_Outer_Call,Visible,Unelaborated 00a7 c229 | ) | Store 0x1,0x29 00a8 029a 0443 | C| Declare_Subprogram INIT_0440,For_Outer_Call,Visible,Unelaborated 00aa c22a | * | Store 0x1,0x2a 00ab 029a 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call,Visible,Unelaborated 00ad c22b | + | Store 0x1,0x2b 00ae 029a 0473 | s| Declare_Subprogram INIT_0470,For_Outer_Call,Visible,Unelaborated 00b0 c22e | . | Store 0x1,0x2e 00b1 029a 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call,Visible,Unelaborated 00b3 c22f | / | Store 0x1,0x2f 00b4 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated 00b6 c258 | X | Store 0x1,0x58 00b7 029a 057b | {| Declare_Subprogram INIT_0578,For_Outer_Call,Visible,Unelaborated 00b9 c231 | 1 | Store 0x1,0x31 00ba 029a 069b | | Declare_Subprogram INIT_0698,For_Outer_Call,Visible,Unelaborated 00bc c24c | L | Store 0x1,0x4c 00bd 029a 06ab | | Declare_Subprogram INIT_06a8,For_Outer_Call,Visible,Unelaborated 00bf c24d | M | Store 0x1,0x4d 00c0 029a 06bb | | Declare_Subprogram INIT_06b8,For_Outer_Call,Visible,Unelaborated 00c2 c232 | 2 | Store 0x1,0x32 00c3 029a 0713 | | Declare_Subprogram INIT_0710,For_Outer_Call,Visible,Unelaborated 00c5 c233 | 3 | Store 0x1,0x33 00c6 029a 072b | +| Declare_Subprogram INIT_0728,For_Outer_Call,Visible,Unelaborated 00c8 c234 | 4 | Store 0x1,0x34 00c9 029a 0753 | S| Declare_Subprogram INIT_0750,For_Outer_Call,Visible,Unelaborated 00cb c235 | 5 | Store 0x1,0x35 00cc 029a 0793 | | Declare_Subprogram INIT_0790,For_Outer_Call,Visible,Unelaborated 00ce c236 | 6 | Store 0x1,0x36 00cf 029a 079b | | Declare_Subprogram INIT_0798,For_Outer_Call,Visible,Unelaborated 00d1 c237 | 7 | Store 0x1,0x37 00d2 029a 07a3 | | Declare_Subprogram INIT_07a0,For_Outer_Call,Visible,Unelaborated 00d4 c257 | W | Store 0x1,0x57 00d5 029a 07ab | | Declare_Subprogram INIT_07a8,For_Outer_Call,Visible,Unelaborated 00d7 c259 | Y | Store 0x1,0x59 00d8 029a 083b | ;| Declare_Subprogram INIT_0838,For_Outer_Call,Visible,Unelaborated 00da c239 | 9 | Store 0x1,0x39 00db 029a 0843 | C| Declare_Subprogram INIT_0840,For_Outer_Call,Visible,Unelaborated 00dd c23a | : | Store 0x1,0x3a 00de 029a 0883 | | Declare_Subprogram INIT_0880,For_Outer_Call,Visible,Unelaborated 00e0 c252 | R | Store 0x1,0x52 00e1 029a 088b | | Declare_Subprogram INIT_0888,For_Outer_Call,Visible,Unelaborated 00e3 c251 | Q | Store 0x1,0x51 00e4 029a 08cb | | Declare_Subprogram INIT_08c8,For_Outer_Call,Visible,Unelaborated 00e6 c23e | > | Store 0x1,0x3e 00e7 029a 0933 | 3| Declare_Subprogram INIT_0930,For_Outer_Call,Visible,Unelaborated 00e9 c23f | ? | Store 0x1,0x3f 00ea 029a 0943 | C| Declare_Subprogram INIT_0940,For_Outer_Call,Visible,Unelaborated 00ec c240 | @ | Store 0x1,0x40 00ed 029a 09ab | | Declare_Subprogram INIT_09a8,For_Outer_Call,Visible,Unelaborated 00ef c241 | A | Store 0x1,0x41 00f0 029a 09bb | | Declare_Subprogram INIT_09b8,For_Outer_Call,Visible,Unelaborated 00f2 c242 | B | Store 0x1,0x42 00f3 029a 09eb | | Declare_Subprogram INIT_09e8,For_Outer_Call,Visible,Unelaborated 00f5 c243 | C | Store 0x1,0x43 00f6 029a 0b5b | [| Declare_Subprogram INIT_0b58,For_Outer_Call,Visible,Unelaborated 00f8 c244 | D | Store 0x1,0x44 00f9 029a 0beb | | Declare_Subprogram INIT_0be8,For_Outer_Call,Visible,Unelaborated 00fb c245 | E | Store 0x1,0x45 00fc 029a 0bf3 | | Declare_Subprogram INIT_0bf0,For_Outer_Call,Visible,Unelaborated 00fe c24f | O | Store 0x1,0x4f 00ff 029a 0c1b | | Declare_Subprogram INIT_0c18,For_Outer_Call,Visible,Unelaborated 0101 c247 | G | Store 0x1,0x47 0102 029a 0c3b | ;| Declare_Subprogram INIT_0c38,For_Outer_Call,Visible,Unelaborated 0104 c255 | U | Store 0x1,0x55 0105 029a 0c6b | k| Declare_Subprogram INIT_0c68,For_Outer_Call,Visible,Unelaborated 0107 c253 | S | Store 0x1,0x53 0108 029a 0cf3 | | Declare_Subprogram INIT_0cf0,For_Outer_Call,Visible,Unelaborated 010a c256 | V | Store 0x1,0x56 010b 00bf | | Action Accept_Activation 010c 0092 1995 | | Action Push_String_Extended,0x1995 ; "\x1b]" 010e 0092 1996 | | Action Push_String_Extended,0x1996 ; "\x07" 0110 029d 0d2b | +| Declare_Subprogram INIT_0d28,For_Outer_Call 0112 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0113 00c7 | | Action Elaborate_Subprogram 0114 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0115 00c7 | | Action Elaborate_Subprogram 0116 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0117 00c7 | | Action Elaborate_Subprogram 0118 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0119 00c7 | | Action Elaborate_Subprogram 011a 1d49 | I | Execute_Immediate Reference_Lex_1,0x49 011b 00c7 | | Action Elaborate_Subprogram 011c 1d12 | | Execute_Immediate Reference_Lex_1,0x12 011d 00c7 | | Action Elaborate_Subprogram 011e 1d13 | | Execute_Immediate Reference_Lex_1,0x13 011f 00c7 | | Action Elaborate_Subprogram 0120 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0121 00c7 | | Action Elaborate_Subprogram 0122 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a 0123 00c7 | | Action Elaborate_Subprogram 0124 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0125 00c7 | | Action Elaborate_Subprogram 0126 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0127 00c7 | | Action Elaborate_Subprogram 0128 1d18 | | Execute_Immediate Reference_Lex_1,0x18 0129 00c7 | | Action Elaborate_Subprogram 012a 1d19 | | Execute_Immediate Reference_Lex_1,0x19 012b 00c7 | | Action Elaborate_Subprogram 012c 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 012d 00c7 | | Action Elaborate_Subprogram 012e 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 012f 00c7 | | Action Elaborate_Subprogram 0130 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0131 00c7 | | Action Elaborate_Subprogram 0132 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0133 00c7 | | Action Elaborate_Subprogram 0134 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0135 00c7 | | Action Elaborate_Subprogram 0136 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 0137 00c7 | | Action Elaborate_Subprogram 0138 1d20 | | Execute_Immediate Reference_Lex_1,0x20 0139 00c7 | | Action Elaborate_Subprogram 013a 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 013b 00c7 | | Action Elaborate_Subprogram 013c 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 013d 00c7 | | Action Elaborate_Subprogram 013e 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 013f 00c7 | | Action Elaborate_Subprogram 0140 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 0141 00c7 | | Action Elaborate_Subprogram 0142 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 0143 00c7 | | Action Elaborate_Subprogram 0144 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 0145 00c7 | | Action Elaborate_Subprogram 0146 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0147 00c7 | | Action Elaborate_Subprogram 0148 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 0149 00c7 | | Action Elaborate_Subprogram 014a 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 014b 00c7 | | Action Elaborate_Subprogram 014c 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 014d 00c7 | | Action Elaborate_Subprogram 014e 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 014f 00c7 | | Action Elaborate_Subprogram 0150 029d 0d3b | ;| Declare_Subprogram INIT_0d38,For_Outer_Call 0152 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 0153 00c7 | | Action Elaborate_Subprogram 0154 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c 0155 00c7 | | Action Elaborate_Subprogram 0156 1d4d | M | Execute_Immediate Reference_Lex_1,0x4d 0157 00c7 | | Action Elaborate_Subprogram 0158 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0159 00c7 | | Action Elaborate_Subprogram 015a 029d 0d83 | | Declare_Subprogram INIT_0d80,For_Outer_Call 015c 1d58 | X | Execute_Immediate Reference_Lex_1,0x58 015d 00c7 | | Action Elaborate_Subprogram 015e 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 015f 00c7 | | Action Elaborate_Subprogram 0160 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 0161 00c7 | | Action Elaborate_Subprogram 0162 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 0163 00c7 | | Action Elaborate_Subprogram 0164 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34 0165 00c7 | | Action Elaborate_Subprogram 0166 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 0167 00c7 | | Action Elaborate_Subprogram 0168 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36 0169 00c7 | | Action Elaborate_Subprogram 016a 029d 0dab | | Declare_Subprogram INIT_0da8,For_Outer_Call 016c 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37 016d 00c7 | | Action Elaborate_Subprogram 016e 1d57 | W | Execute_Immediate Reference_Lex_1,0x57 016f 00c7 | | Action Elaborate_Subprogram 0170 1d59 | Y | Execute_Immediate Reference_Lex_1,0x59 0171 00c7 | | Action Elaborate_Subprogram 0172 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39 0173 00c7 | | Action Elaborate_Subprogram 0174 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a 0175 00c7 | | Action Elaborate_Subprogram 0176 1d52 | R | Execute_Immediate Reference_Lex_1,0x52 0177 00c7 | | Action Elaborate_Subprogram 0178 1d51 | Q | Execute_Immediate Reference_Lex_1,0x51 0179 00c7 | | Action Elaborate_Subprogram 017a 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e 017b 00c7 | | Action Elaborate_Subprogram 017c 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f 017d 00c7 | | Action Elaborate_Subprogram 017e 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40 017f 00c7 | | Action Elaborate_Subprogram 0180 1d41 | A | Execute_Immediate Reference_Lex_1,0x41 0181 00c7 | | Action Elaborate_Subprogram 0182 1d42 | B | Execute_Immediate Reference_Lex_1,0x42 0183 00c7 | | Action Elaborate_Subprogram 0184 029d 0df3 | | Declare_Subprogram INIT_0df0,For_Outer_Call 0186 029d 0e03 | | Declare_Subprogram INIT_0e00,For_Outer_Call 0188 029d 0e13 | | Declare_Subprogram INIT_0e10,For_Outer_Call 018a 1d43 | C | Execute_Immediate Reference_Lex_1,0x43 018b 00c7 | | Action Elaborate_Subprogram 018c 1d44 | D | Execute_Immediate Reference_Lex_1,0x44 018d 00c7 | | Action Elaborate_Subprogram 018e 1d45 | E | Execute_Immediate Reference_Lex_1,0x45 018f 00c7 | | Action Elaborate_Subprogram 0190 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f 0191 00c7 | | Action Elaborate_Subprogram 0192 1d47 | G | Execute_Immediate Reference_Lex_1,0x47 0193 00c7 | | Action Elaborate_Subprogram 0194 1d55 | U | Execute_Immediate Reference_Lex_1,0x55 0195 00c7 | | Action Elaborate_Subprogram 0196 1d53 | S | Execute_Immediate Reference_Lex_1,0x53 0197 00c7 | | Action Elaborate_Subprogram 0198 1d56 | V | Execute_Immediate Reference_Lex_1,0x56 0199 00c7 | | Action Elaborate_Subprogram 019a BODY_0008: 019a 00bc | | Action Signal_Activated 019b 00bb | | Action Signal_Completion 019c 0000 0000 | | .BLANK 0000[0x4] 01a0 ; -------------------------------------------------------------------------------------- 01a0 ; SUBPROGRAM 01a0 ; -------------------------------------------------------------------------------------- 01a0 01a3 | | .CONST 0x01a3 ; Address of begin 01a1 0004 | | .CONST 0x0004 ; Address of exception handler 01a2 0001 | | .CONST 0x0001 ; Number of locals 01a3 BODY_01a0: 01a3 INIT_01a0: 01a3 00ea | | Load_Encached Null_String_Cache 01a4 00ea | | Load_Encached Null_String_Cache 01a5 0092 1997 | | Action Push_String_Extended,0x1997 ; "Name:" 01a7 e001 | | Load 0x0,0x1 01a8 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 01a9 0092 1998 | | Action Push_String_Extended,0x1998 ; ".New_File" 01ab 01cc | | Execute Vector,Catenate 01ac 0092 1999 | | Action Push_String_Extended,0x1999 ; "New Text File" 01ae 4abd |J | Short_Literal 0x2bd 01af e002 | | Load 0x0,0x2 01b0 1819 | | Execute Package,Field_Execute,Field_Number 0x19 01b1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01b2 0000 0000 | | .BLANK 0000[0x6] 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01bb | | .CONST 0x01bb ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0001 | | .CONST 0x0001 ; Number of locals 01bb BODY_01b8: 01bb INIT_01b8: 01bb 4800 |H | Short_Literal 0x0 01bc 00db | | Load_Top At_Offset_3 01bd e003 | | Load 0x0,0x3 01be 180e | | Execute Package,Field_Execute,Field_Number 0xe 01bf 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01c3 | | .CONST 0x01c3 ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0001 | | .CONST 0x0001 ; Number of locals 01c3 BODY_01c0: 01c3 INIT_01c0: 01c3 e001 | | Load 0x0,0x1 01c4 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01c5 0f05 | | Execute_Immediate Equal,0x5 01c6 7005 |p | Jump_Nonzero 0x1cc 01c7 0092 199a | | Action Push_String_Extended,0x199a ; "The context must be a library or view to create an Ada unit." 01c9 e004 | | Load 0x0,0x4 01ca 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 01cb 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01cc e005 | | Load 0x0,0x5 01cd 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01ce 180d | | Execute Package,Field_Execute,Field_Number 0xd 01cf 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; SUBPROGRAM 01d0 ; -------------------------------------------------------------------------------------- 01d0 01d3 | | .CONST 0x01d3 ; Address of begin 01d1 0004 | | .CONST 0x0004 ; Address of exception handler 01d2 0001 | | .CONST 0x0001 ; Number of locals 01d3 BODY_01d0: 01d3 INIT_01d0: 01d3 00ea | | Load_Encached Null_String_Cache 01d4 00ea | | Load_Encached Null_String_Cache 01d5 00ea | | Load_Encached Null_String_Cache 01d6 00ea | | Load_Encached Null_String_Cache 01d7 00ea | | Load_Encached Null_String_Cache 01d8 00ea | | Load_Encached Null_String_Cache 01d9 0092 199b | | Action Push_String_Extended,0x199b ; "New World" 01db e001 | | Load 0x0,0x1 01dc 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 01dd 0092 199c | | Action Push_String_Extended,0x199c ; ".New_World" 01df 01cc | | Execute Vector,Catenate 01e0 4abf |J | Short_Literal 0x2bf 01e1 480b |H | Short_Literal 0xb 01e2 e002 | | Load 0x0,0x2 01e3 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01e4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01e5 0000 0000 | | .XXX[0x3] 01e7 0000 | | 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 01ed e5fe | | Load 0x2,-0x2 01ee 4800 |H | Short_Literal 0x0 01ef 4800 |H | Short_Literal 0x0 01f0 e5ff | | Load 0x2,-0x1 01f1 e006 | | Load 0x0,0x6 01f2 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 01f3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01f4 0000 0000 | | .BLANK 0000[0x4] 01f8 ; -------------------------------------------------------------------------------------- 01f8 ; SUBPROGRAM 01f8 ; -------------------------------------------------------------------------------------- 01f8 01fb | | .CONST 0x01fb ; Address of begin 01f9 0004 | | .CONST 0x0004 ; Address of exception handler 01fa 0001 | | .CONST 0x0001 ; Number of locals 01fb BODY_01f8: 01fb INIT_01f8: 01fb 00ea | | Load_Encached Null_String_Cache 01fc 00ea | | Load_Encached Null_String_Cache 01fd 0092 199e | | Action Push_String_Extended,0x199e ; "Directory Name:" 01ff e001 | | Load 0x0,0x1 0200 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0201 0092 199f | | Action Push_String_Extended,0x199f ; ".New_Directory" 0203 01cc | | Execute Vector,Catenate 0204 0092 19a0 | | Action Push_String_Extended,0x19a0 ; "New Directory" 0206 4ac0 |J | Short_Literal 0x2c0 0207 e002 | | Load 0x0,0x2 0208 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0209 4501 |E | Exit_Suprogram New_Top_Offset 0x1 020a 0000 0000 | | .BLANK 0000[0x6] 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0213 | | .CONST 0x0213 ; Address of begin 0211 0004 | | .CONST 0x0004 ; Address of exception handler 0212 0001 | | .CONST 0x0001 ; Number of locals 0213 BODY_0210: 0213 INIT_0210: 0213 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 0215 00ea | | Load_Encached Null_String_Cache 0216 4800 |H | Short_Literal 0x0 0217 4801 |H | Short_Literal 0x1 0218 e5ff | | Load 0x2,-0x1 0219 e006 | | Load 0x0,0x6 021a 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 021b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 021c 0000 0000 | | .BLANK 0000[0x4] 0220 ; -------------------------------------------------------------------------------------- 0220 ; SUBPROGRAM 0220 ; -------------------------------------------------------------------------------------- 0220 0223 | # | .CONST 0x0223 ; Address of begin 0221 0004 | | .CONST 0x0004 ; Address of exception handler 0222 0001 | | .CONST 0x0001 ; Number of locals 0223 BODY_0220: 0223 INIT_0220: 0223 00ea | | Load_Encached Null_String_Cache 0224 00ea | | Load_Encached Null_String_Cache 0225 00ea | | Load_Encached Null_String_Cache 0226 00ea | | Load_Encached Null_String_Cache 0227 00ea | | Load_Encached Null_String_Cache 0228 0092 19a1 | | Action Push_String_Extended,0x19a1 ; "!Model.R1000" 022a e001 | | Load 0x0,0x1 022b 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 022c 0092 19a2 | | Action Push_String_Extended,0x19a2 ; ".New_Subsystem" 022e 01cc | | Execute Vector,Catenate 022f 0092 19a3 | | Action Push_String_Extended,0x19a3 ; "New Subsystem" 0231 4ac1 |J | Short_Literal 0x2c1 0232 480c |H | Short_Literal 0xc 0233 e002 | | Load 0x0,0x2 0234 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0235 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0236 0000 0000 | | .XXX[0x2] 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 023d | = | .CONST 0x023d ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 0002 | | .CONST 0x0002 ; Number of locals 023b INIT_0238: 023b 00e1 | | Load_Encached Boolean_Cache 023c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 023d BODY_0238: 023d e5fe | | Load 0x2,-0x2 023e 6803 |h | Jump_Zero 0x242 023f 4800 |H | Short_Literal 0x0 0240 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0241 7802 |x | Jump 0x244 0242 4801 |H | Short_Literal 0x1 0243 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0244 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 0246 4800 |H | Short_Literal 0x0 0247 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 0249 e5fb | | Load 0x2,-0x5 024a e5fc | | Load 0x2,-0x4 024b e402 | | Load 0x2,0x2 024c 00ea | | Load_Encached Null_String_Cache 024d 4800 |H | Short_Literal 0x0 024e e5fd | | Load 0x2,-0x3 024f e5ff | | Load 0x2,-0x1 0250 e007 | | Load 0x0,0x7 0251 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0252 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0253 0000 0000 | | .BLANK 0000[0x5] 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 0261 | a | .CONST 0x0261 ; Address of begin 0259 0004 | | .CONST 0x0004 ; Address of exception handler 025a 0002 | | .CONST 0x0002 ; Number of locals 025b INIT_0258: 025b 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 025d e001 | | Load 0x0,0x1 025e 180f | | Execute Package,Field_Execute,Field_Number 0xf 025f e008 | | Load 0x0,0x8 0260 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0261 BODY_0258: 0261 00ea | | Load_Encached Null_String_Cache 0262 00ea | | Load_Encached Null_String_Cache 0263 00ea | | Load_Encached Null_String_Cache 0264 00ea | | Load_Encached Null_String_Cache 0265 e402 | | Load 0x2,0x2 0266 e008 | | Load 0x0,0x8 0267 180f | | Execute Package,Field_Execute,Field_Number 0xf 0268 0092 19a6 | | Action Push_String_Extended,0x19a6 ; "New Working View" 026a e402 | | Load 0x2,0x2 026b 00d8 | | Load_Top At_Offset_0 026c e008 | | Load 0x0,0x8 026d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 026e 0092 19a7 | | Action Push_String_Extended,0x19a7 ; "_Working" 0270 01cc | | Execute Vector,Catenate 0271 4ac2 |J | Short_Literal 0x2c2 0272 480d |H | Short_Literal 0xd 0273 e002 | | Load 0x0,0x2 0274 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0275 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0276 0000 0000 | | .XXX[0x2] 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 027d | } | .CONST 0x027d ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0002 | | .CONST 0x0002 ; Number of locals 027b INIT_0278: 027b 029f 0e3b | ;| Declare_Subprogram INIT_0e38,For_Call 027d BODY_0278: 027d 8402 | | Call 0x2,0x2 027e 4508 |E | Exit_Suprogram New_Top_Offset 0x8 027f 0000 | | .XXX[0x1] 0280 ; -------------------------------------------------------------------------------------- 0280 ; SUBPROGRAM 0280 ; -------------------------------------------------------------------------------------- 0280 0289 | | .CONST 0x0289 ; Address of begin 0281 0004 | | .CONST 0x0004 ; Address of exception handler 0282 0002 | | .CONST 0x0002 ; Number of locals 0283 INIT_0280: 0283 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 0285 e001 | | Load 0x0,0x1 0286 180f | | Execute Package,Field_Execute,Field_Number 0xf 0287 e008 | | Load 0x0,0x8 0288 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0289 BODY_0280: 0289 00ea | | Load_Encached Null_String_Cache 028a 00ea | | Load_Encached Null_String_Cache 028b 00ea | | Load_Encached Null_String_Cache 028c 00ea | | Load_Encached Null_String_Cache 028d 0092 19a8 | | Action Push_String_Extended,0x19a8 ; "New Spec View" 028f e402 | | Load 0x2,0x2 0290 e008 | | Load 0x0,0x8 0291 180f | | Execute Package,Field_Execute,Field_Number 0xf 0292 e402 | | Load 0x2,0x2 0293 00d8 | | Load_Top At_Offset_0 0294 e008 | | Load 0x0,0x8 0295 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0296 0092 19a9 | | Action Push_String_Extended,0x19a9 ; "_Spec" 0298 01cc | | Execute Vector,Catenate 0299 4ac3 |J | Short_Literal 0x2c3 029a 480e |H | Short_Literal 0xe 029b e002 | | Load 0x0,0x2 029c 1818 | | Execute Package,Field_Execute,Field_Number 0x18 029d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 029e 0000 0000 | | .XXX[0x2] 02a0 ; -------------------------------------------------------------------------------------- 02a0 ; SUBPROGRAM 02a0 ; -------------------------------------------------------------------------------------- 02a0 02a3 | | .CONST 0x02a3 ; Address of begin 02a1 0004 | | .CONST 0x0004 ; Address of exception handler 02a2 0001 | | .CONST 0x0001 ; Number of locals 02a3 BODY_02a0: 02a3 INIT_02a0: 02a3 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 02a5 4800 |H | Short_Literal 0x0 02a6 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 02a8 e5fa | | Load 0x2,-0x6 02a9 4803 |H | Short_Literal 0x3 02aa 4801 |H | Short_Literal 0x1 02ab e5fb | | Load 0x2,-0x5 02ac 600f |` | Indirect_Literal Discrete,0x2bc,{0x00000000, 0x7fffffff} 02ad 4800 |H | Short_Literal 0x0 02ae 4800 |H | Short_Literal 0x0 02af 4801 |H | Short_Literal 0x1 02b0 4800 |H | Short_Literal 0x0 02b1 0092 19aa | | Action Push_String_Extended,0x19aa ; "<AUTO_GENERATE>" 02b3 e5fd | | Load 0x2,-0x3 02b4 4801 |H | Short_Literal 0x1 02b5 e5fc | | Load 0x2,-0x4 02b6 00ea | | Load_Encached Null_String_Cache 02b7 e5ff | | Load 0x2,-0x1 02b8 e5fe | | Load 0x2,-0x2 02b9 e007 | | Load 0x0,0x7 02ba 181d | | Execute Package,Field_Execute,Field_Number 0x1d 02bb 4507 |E | Exit_Suprogram New_Top_Offset 0x7 02bc 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 02c0 ; -------------------------------------------------------------------------------------- 02c0 ; SUBPROGRAM 02c0 ; -------------------------------------------------------------------------------------- 02c0 02c9 | | .CONST 0x02c9 ; Address of begin 02c1 0004 | | .CONST 0x0004 ; Address of exception handler 02c2 0002 | | .CONST 0x0002 ; Number of locals 02c3 INIT_02c0: 02c3 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 02c5 e001 | | Load 0x0,0x1 02c6 180f | | Execute Package,Field_Execute,Field_Number 0xf 02c7 e008 | | Load 0x0,0x8 02c8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 02c9 BODY_02c0: 02c9 00ea | | Load_Encached Null_String_Cache 02ca 00ea | | Load_Encached Null_String_Cache 02cb 00ea | | Load_Encached Null_String_Cache 02cc 00ea | | Load_Encached Null_String_Cache 02cd 00ea | | Load_Encached Null_String_Cache 02ce e402 | | Load 0x2,0x2 02cf e008 | | Load 0x0,0x8 02d0 180f | | Execute Package,Field_Execute,Field_Number 0xf 02d1 e402 | | Load 0x2,0x2 02d2 00d8 | | Load_Top At_Offset_0 02d3 e008 | | Load 0x0,0x8 02d4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02d5 4ac4 |J | Short_Literal 0x2c4 02d6 480f |H | Short_Literal 0xf 02d7 e002 | | Load 0x0,0x2 02d8 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02d9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02da 0000 0000 | | .BLANK 0000[0x6] 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02e5 | | .CONST 0x02e5 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0002 | | .CONST 0x0002 ; Number of locals 02e3 INIT_02e0: 02e3 029f 0e63 | c| Declare_Subprogram INIT_0e60,For_Call 02e5 BODY_02e0: 02e5 e5f8 | | Load 0x2,-0x8 02e6 7002 |p | Jump_Nonzero 0x2e9 02e7 8402 | | Call 0x2,0x2 02e8 4509 |E | Exit_Suprogram New_Top_Offset 0x9 02e9 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 02eb 4800 |H | Short_Literal 0x0 02ec 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 02ee e5f9 | | Load 0x2,-0x7 02ef 4803 |H | Short_Literal 0x3 02f0 4801 |H | Short_Literal 0x1 02f1 e5f8 | | Load 0x2,-0x8 02f2 e5fc | | Load 0x2,-0x4 02f3 6008 |` | Indirect_Literal Discrete,0x2fc,{0x00000000, 0x7fffffff} 02f4 e5ff | | Load 0x2,-0x1 02f5 e5fe | | Load 0x2,-0x2 02f6 e007 | | Load 0x0,0x7 02f7 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02f8 4509 |E | Exit_Suprogram New_Top_Offset 0x9 02f9 0000 0000 | | .XXX[0x3] 02fb 0000 | | 02fc 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 0300 ; -------------------------------------------------------------------------------------- 0300 ; SUBPROGRAM 0300 ; -------------------------------------------------------------------------------------- 0300 0309 | | .CONST 0x0309 ; Address of begin 0301 0004 | | .CONST 0x0004 ; Address of exception handler 0302 0002 | | .CONST 0x0002 ; Number of locals 0303 INIT_0300: 0303 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 0305 e001 | | Load 0x0,0x1 0306 180f | | Execute Package,Field_Execute,Field_Number 0xf 0307 e008 | | Load 0x0,0x8 0308 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0309 BODY_0300: 0309 00ea | | Load_Encached Null_String_Cache 030a 00ea | | Load_Encached Null_String_Cache 030b 00ea | | Load_Encached Null_String_Cache 030c 00ea | | Load_Encached Null_String_Cache 030d 00ea | | Load_Encached Null_String_Cache 030e 00ea | | Load_Encached Null_String_Cache 030f e402 | | Load 0x2,0x2 0310 00d8 | | Load_Top At_Offset_0 0311 e008 | | Load 0x0,0x8 0312 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0313 4ac5 |J | Short_Literal 0x2c5 0314 4810 |H | Short_Literal 0x10 0315 e002 | | Load 0x0,0x2 0316 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0317 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0318 ; -------------------------------------------------------------------------------------- 0318 ; SUBPROGRAM 0318 ; -------------------------------------------------------------------------------------- 0318 031b | | .CONST 0x031b ; Address of begin 0319 0004 | | .CONST 0x0004 ; Address of exception handler 031a 0001 | | .CONST 0x0001 ; Number of locals 031b BODY_0318: 031b INIT_0318: 031b 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 031d 4800 |H | Short_Literal 0x0 031e 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 0320 e5fd | | Load 0x2,-0x3 0321 e5ff | | Load 0x2,-0x1 0322 e5fe | | Load 0x2,-0x2 0323 e007 | | Load 0x0,0x7 0324 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0325 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0326 0000 0000 | | .XXX[0x2] 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 00ea | | Load_Encached Null_String_Cache 032c 0092 19ab | | Action Push_String_Extended,0x19ab ; "Enter library switch file name" 032e 00ea | | Load_Encached Null_String_Cache 032f e001 | | Load 0x0,0x1 0330 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0331 0092 19ac | | Action Push_String_Extended,0x19ac ; ".Compiler_Switches" 0333 01cc | | Execute Vector,Catenate 0334 0092 19ad | | Action Push_String_Extended,0x19ad ; "New Switch File" 0336 4ac6 |J | Short_Literal 0x2c6 0337 e002 | | Load 0x0,0x2 0338 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0339 4501 |E | Exit_Suprogram New_Top_Offset 0x1 033a 0000 0000 | | .BLANK 0000[0x6] 0340 ; -------------------------------------------------------------------------------------- 0340 ; SUBPROGRAM 0340 ; -------------------------------------------------------------------------------------- 0340 0343 | C | .CONST 0x0343 ; Address of begin 0341 0004 | | .CONST 0x0004 ; Address of exception handler 0342 0001 | | .CONST 0x0001 ; Number of locals 0343 BODY_0340: 0343 INIT_0340: 0343 00db | | Load_Top At_Offset_3 0344 6807 |h | Jump_Zero 0x34c 0345 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 0347 4853 |HS | Short_Literal 0x53 0348 e5ff | | Load 0x2,-0x1 0349 e009 | | Load 0x0,0x9 034a 181c | | Execute Package,Field_Execute,Field_Number 0x1c 034b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 034c 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 034e 484c |HL | Short_Literal 0x4c 034f e5ff | | Load 0x2,-0x1 0350 e009 | | Load 0x0,0x9 0351 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0352 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0353 0000 0000 | | .BLANK 0000[0x5] 0358 ; -------------------------------------------------------------------------------------- 0358 ; SUBPROGRAM 0358 ; -------------------------------------------------------------------------------------- 0358 035b | [ | .CONST 0x035b ; Address of begin 0359 0004 | | .CONST 0x0004 ; Address of exception handler 035a 0001 | | .CONST 0x0001 ; Number of locals 035b BODY_0358: 035b INIT_0358: 035b 00ea | | Load_Encached Null_String_Cache 035c 00ea | | Load_Encached Null_String_Cache 035d 00ea | | Load_Encached Null_String_Cache 035e 00ea | | Load_Encached Null_String_Cache 035f 00ea | | Load_Encached Null_String_Cache 0360 00ea | | Load_Encached Null_String_Cache 0361 e00a | | Load 0x0,0xa 0362 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0363 e001 | | Load 0x0,0x1 0364 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0365 0092 19ae | | Action Push_String_Extended,0x19ae ; ".New_Activity" 0367 01cc | | Execute Vector,Catenate 0368 4ac7 |J | Short_Literal 0x2c7 0369 4835 |H5 | Short_Literal 0x35 036a e002 | | Load 0x0,0x2 036b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 036c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 036d 0000 0000 | | .XXX[0x3] 036f 0000 | | 0370 ; -------------------------------------------------------------------------------------- 0370 ; SUBPROGRAM 0370 ; -------------------------------------------------------------------------------------- 0370 0375 | u | .CONST 0x0375 ; Address of begin 0371 0004 | | .CONST 0x0004 ; Address of exception handler 0372 0002 | | .CONST 0x0002 ; Number of locals 0373 INIT_0370: 0373 e00a | | Load 0x0,0xa 0374 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0375 BODY_0370: 0375 e5fd | | Load 0x2,-0x3 0376 4602 |F | Jump_Case 0x3 0377 7805 |x | Jump 0x37d ; case 0x0 0378 7807 |x | Jump 0x380 ; case 0x1 0379 7800 |x | Jump 0x37a ; case 0x2 037a 4800 |H | Short_Literal 0x0 037b 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 037c 7805 |x | Jump 0x382 037d 4801 |H | Short_Literal 0x1 037e 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 037f 7802 |x | Jump 0x382 0380 4802 |H | Short_Literal 0x2 0381 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0382 e5fe | | Load 0x2,-0x2 0383 01db | | Execute Vector,Length 0384 680c |h | Jump_Zero 0x391 0385 e5fe | | Load 0x2,-0x2 0386 0092 19af | | Action Push_String_Extended,0x19af ; "<>" 0388 01df | | Execute Vector,Equal 0389 7007 |p | Jump_Nonzero 0x391 038a 4801 |H | Short_Literal 0x1 038b 0092 19b0 | | Action Push_String_Extended,0x19b0 ; "nil" 038d e5fe | | Load 0x2,-0x2 038e e00b | | Load 0x0,0xb 038f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0390 6809 |h | Jump_Zero 0x39a 0391 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 0393 00d9 | | Load_Top At_Offset_1 0394 e00a | | Load 0x0,0xa 0395 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0396 e5ff | | Load 0x2,-0x1 0397 e00a | | Load 0x0,0xa 0398 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0399 4504 |E | Exit_Suprogram New_Top_Offset 0x4 039a 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 039c 00d9 | | Load_Top At_Offset_1 039d e5fe | | Load 0x2,-0x2 039e e5ff | | Load 0x2,-0x1 039f e00a | | Load 0x0,0xa 03a0 181d | | Execute Package,Field_Execute,Field_Number 0x1d 03a1 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03a2 0000 0000 | | .BLANK 0000[0x6] 03a8 ; -------------------------------------------------------------------------------------- 03a8 ; SUBPROGRAM 03a8 ; -------------------------------------------------------------------------------------- 03a8 03ab | | .CONST 0x03ab ; Address of begin 03a9 0004 | | .CONST 0x0004 ; Address of exception handler 03aa 0001 | | .CONST 0x0001 ; Number of locals 03ab BODY_03a8: 03ab INIT_03a8: 03ab 00ea | | Load_Encached Null_String_Cache 03ac 00ea | | Load_Encached Null_String_Cache 03ad 0092 19b1 | | Action Push_String_Extended,0x19b1 ; "Mailbox simple name:" 03af 00ea | | Load_Encached Null_String_Cache 03b0 0092 19b2 | | Action Push_String_Extended,0x19b2 ; "New Mailbox" 03b2 4ac8 |J | Short_Literal 0x2c8 03b3 e002 | | Load 0x0,0x2 03b4 1819 | | Execute Package,Field_Execute,Field_Number 0x19 03b5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03b6 0000 0000 | | .XXX[0x2] 03b8 ; -------------------------------------------------------------------------------------- 03b8 ; SUBPROGRAM 03b8 ; -------------------------------------------------------------------------------------- 03b8 03bb | | .CONST 0x03bb ; Address of begin 03b9 0004 | | .CONST 0x0004 ; Address of exception handler 03ba 0001 | | .CONST 0x0001 ; Number of locals 03bb BODY_03b8: 03bb INIT_03b8: 03bb e00c | | Load 0x0,0xc 03bc 1819 | | Execute Package,Field_Execute,Field_Number 0x19 03bd e00c | | Load 0x0,0xc 03be 181c | | Execute Package,Field_Execute,Field_Number 0x1c 03bf 00db | | Load_Top At_Offset_3 03c0 e00d | | Load 0x0,0xd 03c1 180d | | Execute Package,Field_Execute,Field_Number 0xd 03c2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 03c3 0000 0000 | | .BLANK 0000[0x5] 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 00ea | | Load_Encached Null_String_Cache 03cc 00ea | | Load_Encached Null_String_Cache 03cd 00ea | | Load_Encached Null_String_Cache 03ce 00ea | | Load_Encached Null_String_Cache 03cf 00ea | | Load_Encached Null_String_Cache 03d0 00ea | | Load_Encached Null_String_Cache 03d1 00ea | | Load_Encached Null_String_Cache 03d2 e001 | | Load 0x0,0x1 03d3 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 03d4 0092 19b3 | | Action Push_String_Extended,0x19b3 ; ".New_Venture" 03d6 01cc | | Execute Vector,Catenate 03d7 4ac9 |J | Short_Literal 0x2c9 03d8 4811 |H | Short_Literal 0x11 03d9 e002 | | Load 0x0,0x2 03da 1818 | | Execute Package,Field_Execute,Field_Number 0x18 03db 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03dc 0000 0000 | | .BLANK 0000[0x4] 03e0 ; -------------------------------------------------------------------------------------- 03e0 ; SUBPROGRAM 03e0 ; -------------------------------------------------------------------------------------- 03e0 03e3 | | .CONST 0x03e3 ; Address of begin 03e1 0004 | | .CONST 0x0004 ; Address of exception handler 03e2 0001 | | .CONST 0x0001 ; Number of locals 03e3 BODY_03e0: 03e3 INIT_03e0: 03e3 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 03e5 e5fd | | Load 0x2,-0x3 03e6 e5fe | | Load 0x2,-0x2 03e7 e5ff | | Load 0x2,-0x1 03e8 e00e | | Load 0x0,0xe 03e9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03ea 4504 |E | Exit_Suprogram New_Top_Offset 0x4 03eb 0000 0000 | | .BLANK 0000[0x5] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 03f3 | | .CONST 0x03f3 ; Address of begin 03f1 0004 | | .CONST 0x0004 ; Address of exception handler 03f2 0001 | | .CONST 0x0001 ; Number of locals 03f3 BODY_03f0: 03f3 INIT_03f0: 03f3 00ea | | Load_Encached Null_String_Cache 03f4 00ea | | Load_Encached Null_String_Cache 03f5 00ea | | Load_Encached Null_String_Cache 03f6 00ea | | Load_Encached Null_String_Cache 03f7 00ea | | Load_Encached Null_String_Cache 03f8 00ea | | Load_Encached Null_String_Cache 03f9 00ea | | Load_Encached Null_String_Cache 03fa e001 | | Load 0x0,0x1 03fb 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 03fc 0092 19b4 | | Action Push_String_Extended,0x19b4 ; ".New_Work_Order" 03fe 01cc | | Execute Vector,Catenate 03ff 4aca |J | Short_Literal 0x2ca 0400 4812 |H | Short_Literal 0x12 0401 e002 | | Load 0x0,0x2 0402 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0403 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0404 0000 0000 | | .BLANK 0000[0x4] 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 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 040d 4801 |H | Short_Literal 0x1 040e e5fd | | Load 0x2,-0x3 040f e5fc | | Load 0x2,-0x4 0410 e5fe | | Load 0x2,-0x2 0411 e5ff | | Load 0x2,-0x1 0412 e00e | | Load 0x0,0xe 0413 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0414 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0415 0000 0000 | | .XXX[0x3] 0417 0000 | | 0418 ; -------------------------------------------------------------------------------------- 0418 ; SUBPROGRAM 0418 ; -------------------------------------------------------------------------------------- 0418 041b | | .CONST 0x041b ; Address of begin 0419 0004 | | .CONST 0x0004 ; Address of exception handler 041a 0001 | | .CONST 0x0001 ; Number of locals 041b BODY_0418: 041b INIT_0418: 041b 00ea | | Load_Encached Null_String_Cache 041c 00ea | | Load_Encached Null_String_Cache 041d 00ea | | Load_Encached Null_String_Cache 041e 00ea | | Load_Encached Null_String_Cache 041f 00ea | | Load_Encached Null_String_Cache 0420 00ea | | Load_Encached Null_String_Cache 0421 00ea | | Load_Encached Null_String_Cache 0422 e001 | | Load 0x0,0x1 0423 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0424 0092 19b5 | | Action Push_String_Extended,0x19b5 ; ".New_Work_Order_List" 0426 01cc | | Execute Vector,Catenate 0427 4acb |J | Short_Literal 0x2cb 0428 4813 |H | Short_Literal 0x13 0429 e002 | | Load 0x0,0x2 042a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 042b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 042c 0000 0000 | | .BLANK 0000[0x4] 0430 ; -------------------------------------------------------------------------------------- 0430 ; SUBPROGRAM 0430 ; -------------------------------------------------------------------------------------- 0430 0433 | 3 | .CONST 0x0433 ; Address of begin 0431 0004 | | .CONST 0x0004 ; Address of exception handler 0432 0001 | | .CONST 0x0001 ; Number of locals 0433 BODY_0430: 0433 INIT_0430: 0433 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 0435 e5fd | | Load 0x2,-0x3 0436 e5fe | | Load 0x2,-0x2 0437 00ea | | Load_Encached Null_String_Cache 0438 e5ff | | Load 0x2,-0x1 0439 e00e | | Load 0x0,0xe 043a 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 043b 4504 |E | Exit_Suprogram New_Top_Offset 0x4 043c 0000 0000 | | .BLANK 0000[0x4] 0440 ; -------------------------------------------------------------------------------------- 0440 ; SUBPROGRAM 0440 ; -------------------------------------------------------------------------------------- 0440 0443 | C | .CONST 0x0443 ; Address of begin 0441 0004 | | .CONST 0x0004 ; Address of exception handler 0442 0001 | | .CONST 0x0001 ; Number of locals 0443 BODY_0440: 0443 INIT_0440: 0443 00ea | | Load_Encached Null_String_Cache 0444 00ea | | Load_Encached Null_String_Cache 0445 00ea | | Load_Encached Null_String_Cache 0446 00ea | | Load_Encached Null_String_Cache 0447 00ea | | Load_Encached Null_String_Cache 0448 00ea | | Load_Encached Null_String_Cache 0449 00ea | | Load_Encached Null_String_Cache 044a e001 | | Load 0x0,0x1 044b 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 044c 0092 19b6 | | Action Push_String_Extended,0x19b6 ; ".New_System" 044e 01cc | | Execute Vector,Catenate 044f 4acc |J | Short_Literal 0x2cc 0450 4814 |H | Short_Literal 0x14 0451 e002 | | Load 0x0,0x2 0452 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0453 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0454 0000 0000 | | .BLANK 0000[0x4] 0458 ; -------------------------------------------------------------------------------------- 0458 ; SUBPROGRAM 0458 ; -------------------------------------------------------------------------------------- 0458 045b | [ | .CONST 0x045b ; Address of begin 0459 0004 | | .CONST 0x0004 ; Address of exception handler 045a 0001 | | .CONST 0x0001 ; Number of locals 045b BODY_0458: 045b INIT_0458: 045b 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 045d 4800 |H | Short_Literal 0x0 045e 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 0460 00ea | | Load_Encached Null_String_Cache 0461 0092 19b7 | | Action Push_String_Extended,0x19b7 ; "R1000" 0463 4801 |H | Short_Literal 0x1 0464 00ea | | Load_Encached Null_String_Cache 0465 4802 |H | Short_Literal 0x2 0466 e5fe | | Load 0x2,-0x2 0467 e5ff | | Load 0x2,-0x1 0468 e007 | | Load 0x0,0x7 0469 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 046a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 046b 0000 0000 | | .BLANK 0000[0x5] 0470 ; -------------------------------------------------------------------------------------- 0470 ; SUBPROGRAM 0470 ; -------------------------------------------------------------------------------------- 0470 0477 | w | .CONST 0x0477 ; Address of begin 0471 0004 | | .CONST 0x0004 ; Address of exception handler 0472 0003 | | .CONST 0x0003 ; Number of locals 0473 INIT_0470: 0473 029f 0e9b | | Declare_Subprogram INIT_0e98,For_Call 0475 029f 0ecb | | Declare_Subprogram INIT_0ec8,For_Call 0477 BODY_0470: 0477 e001 | | Load 0x0,0x1 0478 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0479 4610 |F | Jump_Case 0x11 047a 7810 |x | Jump 0x48b ; case 0x0 047b 782f |x/ | Jump 0x4ab ; case 0x1 047c 782e |x. | Jump 0x4ab ; case 0x2 047d 7814 |x | Jump 0x492 ; case 0x3 047e 781c |x | Jump 0x49b ; case 0x4 047f 7829 |x) | Jump 0x4a9 ; case 0x5 0480 781a |x | Jump 0x49b ; case 0x6 0481 7812 |x | Jump 0x494 ; case 0x7 0482 7811 |x | Jump 0x494 ; case 0x8 0483 7817 |x | Jump 0x49b ; case 0x9 0484 7816 |x | Jump 0x49b ; case 0xa 0485 7815 |x | Jump 0x49b ; case 0xb 0486 7814 |x | Jump 0x49b ; case 0xc 0487 780c |x | Jump 0x494 ; case 0xd 0488 7802 |x | Jump 0x48b ; case 0xe 0489 7801 |x | Jump 0x48b ; case 0xf 048a 7800 |x | Jump 0x48b ; case 0x10 048b 4801 |H | Short_Literal 0x1 048c 4800 |H | Short_Literal 0x0 048d 0092 19b8 | | Action Push_String_Extended,0x19b8 ; "<IMAGE>" 048f e005 | | Load 0x0,0x5 0490 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0491 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0492 8402 | | Call 0x2,0x2 0493 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0494 4801 |H | Short_Literal 0x1 0495 4800 |H | Short_Literal 0x0 0496 0092 19b8 | | Action Push_String_Extended,0x19b8 ; "<IMAGE>" 0498 e005 | | Load 0x0,0x5 0499 1813 | | Execute Package,Field_Execute,Field_Number 0x13 049a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 049b 00ea | | Load_Encached Null_String_Cache 049c 00ea | | Load_Encached Null_String_Cache 049d 0092 1997 | | Action Push_String_Extended,0x1997 ; "Name:" 049f 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 04a1 e001 | | Load 0x0,0x1 04a2 180f | | Execute Package,Field_Execute,Field_Number 0xf 04a3 0092 19b9 | | Action Push_String_Extended,0x19b9 ; "Open" 04a5 4ace |J | Short_Literal 0x2ce 04a6 e002 | | Load 0x0,0x2 04a7 1819 | | Execute Package,Field_Execute,Field_Number 0x19 04a8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04a9 8403 | | Call 0x2,0x3 04aa 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04ab 4801 |H | Short_Literal 0x1 04ac 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 04ae e001 | | Load 0x0,0x1 04af 180f | | Execute Package,Field_Execute,Field_Number 0xf 04b0 822f | / | Call 0x1,0x2f 04b1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04b2 0000 0000 | | .BLANK 0000[0x6] 04b8 ; -------------------------------------------------------------------------------------- 04b8 ; SUBPROGRAM 04b8 ; -------------------------------------------------------------------------------------- 04b8 04c5 | | .CONST 0x04c5 ; Address of begin 04b9 0004 | | .CONST 0x0004 ; Address of exception handler 04ba 0004 | | .CONST 0x0004 ; Number of locals 04bb INIT_04b8: 04bb e00f | | Load 0x0,0xf 04bc 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04bd 02c7 | | Declare_Variable Any 04be 00d8 | | Load_Top At_Offset_0 04bf 1c00 | | Execute_Immediate Run_Utility,0x0 04c0 e001 | | Load 0x0,0x1 04c1 1b14 | | Execute Package,Field_Read,Field_Number 0x14 04c2 e00f | | Load 0x0,0xf 04c3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04c4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04c5 BODY_04b8: 04c5 e00f | | Load 0x0,0xf 04c6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04c7 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04c8 00db | | Load_Top At_Offset_3 04c9 0120 | | Execute Any,Is_Value 04ca 6803 |h | Jump_Zero 0x4ce 04cb e00f | | Load 0x0,0xf 04cc 1b0f | | Execute Package,Field_Read,Field_Number 0xf 04cd 7801 |x | Jump 0x4cf 04ce 00db | | Load_Top At_Offset_3 04cf 6078 |`x | Indirect_Literal Discrete,0x548,{0x00000000, 0x00004000} 04d0 e010 | | Load 0x0,0x10 04d1 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04d2 e011 | | Load 0x0,0x11 04d3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04d4 e00f | | Load 0x0,0xf 04d5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04d6 1816 | | Execute Package,Field_Execute,Field_Number 0x16 04d7 e5ff | | Load 0x2,-0x1 04d8 e00f | | Load 0x0,0xf 04d9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04da 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 04db c402 | | Store 0x2,0x2 04dc 0059 | Y | Store_Top Discrete,At_Offset_1 04dd 00d8 | | Load_Top At_Offset_0 04de 6816 |h | Jump_Zero 0x4f5 04df 6068 |`h | Indirect_Literal Discrete,0x548,{0x00000000, 0x00004000} 04e0 e010 | | Load 0x0,0x10 04e1 1b0e | | Execute Package,Field_Read,Field_Number 0xe 04e2 e011 | | Load 0x0,0x11 04e3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04e4 e012 | | Load 0x0,0x12 04e5 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04e6 4801 |H | Short_Literal 0x1 04e7 4800 |H | Short_Literal 0x0 04e8 e011 | | Load 0x0,0x11 04e9 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04ea e00f | | Load 0x0,0xf 04eb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04ec 1816 | | Execute Package,Field_Execute,Field_Number 0x16 04ed e5ff | | Load 0x2,-0x1 04ee e404 | | Load 0x2,0x4 04ef e00f | | Load 0x0,0xf 04f0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 04f1 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 04f2 e004 | | Load 0x0,0x4 04f3 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 04f4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04f5 00da | | Load_Top At_Offset_2 04f6 e001 | | Load 0x0,0x1 04f7 1816 | | Execute Package,Field_Execute,Field_Number 0x16 04f8 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 04f9 00d9 | | Load_Top At_Offset_1 04fa 460f |F | Jump_Case 0x10 04fb 780f |x | Jump 0x50b ; case 0x0 04fc 7832 |x2 | Jump 0x52f ; case 0x1 04fd 7813 |x | Jump 0x511 ; case 0x2 04fe 7818 |x | Jump 0x517 ; case 0x3 04ff 780b |x | Jump 0x50b ; case 0x4 0500 780a |x | Jump 0x50b ; case 0x5 0501 7809 |x | Jump 0x50b ; case 0x6 0502 7808 |x | Jump 0x50b ; case 0x7 0503 7807 |x | Jump 0x50b ; case 0x8 0504 7806 |x | Jump 0x50b ; case 0x9 0505 7805 |x | Jump 0x50b ; case 0xa 0506 7804 |x | Jump 0x50b ; case 0xb 0507 7803 |x | Jump 0x50b ; case 0xc 0508 7802 |x | Jump 0x50b ; case 0xd 0509 7801 |x | Jump 0x50b ; case 0xe 050a 7800 |x | Jump 0x50b ; case 0xf 050b 4801 |H | Short_Literal 0x1 050c 4800 |H | Short_Literal 0x0 050d e5ff | | Load 0x2,-0x1 050e e005 | | Load 0x0,0x5 050f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0510 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0511 4801 |H | Short_Literal 0x1 0512 4800 |H | Short_Literal 0x0 0513 e5ff | | Load 0x2,-0x1 0514 e005 | | Load 0x0,0x5 0515 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0516 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0517 e5ff | | Load 0x2,-0x1 0518 e008 | | Load 0x0,0x8 0519 180e | | Execute Package,Field_Execute,Field_Number 0xe 051a 6806 |h | Jump_Zero 0x521 051b 4801 |H | Short_Literal 0x1 051c 4800 |H | Short_Literal 0x0 051d e5ff | | Load 0x2,-0x1 051e e005 | | Load 0x0,0x5 051f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0520 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0521 00ea | | Load_Encached Null_String_Cache 0522 00ea | | Load_Encached Null_String_Cache 0523 00ea | | Load_Encached Null_String_Cache 0524 00ea | | Load_Encached Null_String_Cache 0525 00ea | | Load_Encached Null_String_Cache 0526 00ea | | Load_Encached Null_String_Cache 0527 0092 19ba | | Action Push_String_Extended,0x19ba ; "Open Check Out" 0529 e5ff | | Load 0x2,-0x1 052a 4aee |J | Short_Literal 0x2ee 052b 4820 |H | Short_Literal 0x20 052c e002 | | Load 0x0,0x2 052d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 052e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 052f e5ff | | Load 0x2,-0x1 0530 e008 | | Load 0x0,0x8 0531 180e | | Execute Package,Field_Execute,Field_Number 0xe 0532 6804 |h | Jump_Zero 0x537 0533 00ea | | Load_Encached Null_String_Cache 0534 e5ff | | Load 0x2,-0x1 0535 8231 | 1 | Call 0x1,0x31 0536 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0537 00ea | | Load_Encached Null_String_Cache 0538 00ea | | Load_Encached Null_String_Cache 0539 00ea | | Load_Encached Null_String_Cache 053a 00ea | | Load_Encached Null_String_Cache 053b 00ea | | Load_Encached Null_String_Cache 053c 00ea | | Load_Encached Null_String_Cache 053d 0092 19ba | | Action Push_String_Extended,0x19ba ; "Open Check Out" 053f e5ff | | Load 0x2,-0x1 0540 4aee |J | Short_Literal 0x2ee 0541 4820 |H | Short_Literal 0x20 0542 e002 | | Load 0x0,0x2 0543 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0544 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0545 0000 0000 | | .XXX[0x3] 0547 0000 | | 0548 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 054c 0000 0000 | | .BLANK 0000[0x4] 0550 ; -------------------------------------------------------------------------------------- 0550 ; SUBPROGRAM 0550 ; -------------------------------------------------------------------------------------- 0550 0553 | S | .CONST 0x0553 ; Address of begin 0551 0004 | | .CONST 0x0004 ; Address of exception handler 0552 0001 | | .CONST 0x0001 ; Number of locals 0553 BODY_0550: 0553 INIT_0550: 0553 00da | | Load_Top At_Offset_2 0554 e008 | | Load 0x0,0x8 0555 180e | | Execute Package,Field_Execute,Field_Number 0xe 0556 700f |p | Jump_Nonzero 0x566 0557 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 0559 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 055b 0092 19bb | | Action Push_String_Extended,0x19bb ; "<TOMORROW>" 055d 4803 |H | Short_Literal 0x3 055e 4800 |H | Short_Literal 0x0 055f 4801 |H | Short_Literal 0x1 0560 4801 |H | Short_Literal 0x1 0561 e5fe | | Load 0x2,-0x2 0562 825f | _ | Call 0x1,0x5f 0563 e5ff | | Load 0x2,-0x1 0564 e007 | | Load 0x0,0x7 0565 180d | | Execute Package,Field_Execute,Field_Number 0xd 0566 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 0568 4800 |H | Short_Literal 0x0 0569 0092 19bc | | Action Push_String_Extended,0x19bc ; "<ALL_WORLDS>" 056b 4801 |H | Short_Literal 0x1 056c e5ff | | Load 0x2,-0x1 056d e013 | | Load 0x0,0x13 056e 1816 | | Execute Package,Field_Execute,Field_Number 0x16 056f 00da | | Load_Top At_Offset_2 0570 825e | ^ | Call 0x1,0x5e 0571 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0572 0000 0000 | | .BLANK 0000[0x6] 0578 ; -------------------------------------------------------------------------------------- 0578 ; SUBPROGRAM 0578 ; -------------------------------------------------------------------------------------- 0578 0596 | | .CONST 0x0596 ; Address of begin 0579 0004 | | .CONST 0x0004 ; Address of exception handler 057a 000b | | .CONST 0x000b ; Number of locals 057b INIT_0578: 057b e00f | | Load 0x0,0xf 057c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 057d 02c7 | | Declare_Variable Any 057e 00d8 | | Load_Top At_Offset_0 057f 1c00 | | Execute_Immediate Run_Utility,0x0 0580 e001 | | Load 0x0,0x1 0581 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0582 e00f | | Load 0x0,0xf 0583 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0584 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0585 00e3 | | Load_Encached Natural_Cache 0586 03e9 | | Declare_Variable Discrete,Duplicate 0587 03e9 | | Declare_Variable Discrete,Duplicate 0588 e00f | | Load 0x0,0xf 0589 1b0d | | Execute Package,Field_Read,Field_Number 0xd 058a e00f | | Load 0x0,0xf 058b 1b14 | | Execute Package,Field_Read,Field_Number 0x14 058c 02ff | | Declare_Variable Variant_Record 058d 00d8 | | Load_Top At_Offset_0 058e 1c00 | | Execute_Immediate Run_Utility,0x0 058f 00e1 | | Load_Encached Boolean_Cache 0590 4a00 |J | Short_Literal 0x200 0591 e014 | | Load 0x0,0x14 0592 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0593 1c08 | | Execute_Immediate Run_Utility,0x8 0594 00d8 | | Load_Top At_Offset_0 0595 1c00 | | Execute_Immediate Run_Utility,0x0 0596 BODY_0578: 0596 e00f | | Load 0x0,0xf 0597 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0598 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0599 e402 | | Load 0x2,0x2 059a 0120 | | Execute Any,Is_Value 059b 6803 |h | Jump_Zero 0x59f 059c e00f | | Load 0x0,0xf 059d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 059e 7801 |x | Jump 0x5a0 059f e402 | | Load 0x2,0x2 05a0 60f3 |` | Indirect_Literal Discrete,0x694,{0x00000000, 0x00004000} 05a1 e010 | | Load 0x0,0x10 05a2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05a3 e011 | | Load 0x0,0x11 05a4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 05a5 e00f | | Load 0x0,0xf 05a6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 05a7 1816 | | Execute Package,Field_Execute,Field_Number 0x16 05a8 e5ff | | Load 0x2,-0x1 05a9 e00f | | Load 0x0,0xf 05aa 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 05ab 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 05ac c402 | | Store 0x2,0x2 05ad c404 | | Store 0x2,0x4 05ae e404 | | Load 0x2,0x4 05af 6816 |h | Jump_Zero 0x5c6 05b0 60e3 |` | Indirect_Literal Discrete,0x694,{0x00000000, 0x00004000} 05b1 e010 | | Load 0x0,0x10 05b2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05b3 e011 | | Load 0x0,0x11 05b4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 05b5 e012 | | Load 0x0,0x12 05b6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 05b7 4801 |H | Short_Literal 0x1 05b8 4800 |H | Short_Literal 0x0 05b9 e011 | | Load 0x0,0x11 05ba 1811 | | Execute Package,Field_Execute,Field_Number 0x11 05bb e00f | | Load 0x0,0xf 05bc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 05bd 1816 | | Execute Package,Field_Execute,Field_Number 0x16 05be e5ff | | Load 0x2,-0x1 05bf e404 | | Load 0x2,0x4 05c0 e00f | | Load 0x0,0xf 05c1 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 05c2 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 05c3 e004 | | Load 0x0,0x4 05c4 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 05c5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 05c6 e402 | | Load 0x2,0x2 05c7 e001 | | Load 0x0,0x1 05c8 1816 | | Execute Package,Field_Execute,Field_Number 0x16 05c9 a403 | | Store_Unchecked 0x2,0x3 05ca e403 | | Load 0x2,0x3 05cb 460f |F | Jump_Case 0x10 05cc 780f |x | Jump 0x5dc ; case 0x0 05cd 782d |x- | Jump 0x5fb ; case 0x1 05ce 780d |x | Jump 0x5dc ; case 0x2 05cf 7812 |x | Jump 0x5e2 ; case 0x3 05d0 780b |x | Jump 0x5dc ; case 0x4 05d1 780a |x | Jump 0x5dc ; case 0x5 05d2 7809 |x | Jump 0x5dc ; case 0x6 05d3 7808 |x | Jump 0x5dc ; case 0x7 05d4 7807 |x | Jump 0x5dc ; case 0x8 05d5 7806 |x | Jump 0x5dc ; case 0x9 05d6 7805 |x | Jump 0x5dc ; case 0xa 05d7 7804 |x | Jump 0x5dc ; case 0xb 05d8 7803 |x | Jump 0x5dc ; case 0xc 05d9 7802 |x | Jump 0x5dc ; case 0xd 05da 7801 |x | Jump 0x5dc ; case 0xe 05db 7800 |x | Jump 0x5dc ; case 0xf 05dc 4801 |H | Short_Literal 0x1 05dd 4800 |H | Short_Literal 0x0 05de e5ff | | Load 0x2,-0x1 05df e005 | | Load 0x0,0x5 05e0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 05e1 4503 |E | Exit_Suprogram New_Top_Offset 0x3 05e2 e5ff | | Load 0x2,-0x1 05e3 e008 | | Load 0x0,0x8 05e4 180e | | Execute Package,Field_Execute,Field_Number 0xe 05e5 700f |p | Jump_Nonzero 0x5f5 05e6 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 05e8 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 05ea 0092 19bb | | Action Push_String_Extended,0x19bb ; "<TOMORROW>" 05ec 4803 |H | Short_Literal 0x3 05ed 4800 |H | Short_Literal 0x0 05ee 4801 |H | Short_Literal 0x1 05ef 4801 |H | Short_Literal 0x1 05f0 e5fe | | Load 0x2,-0x2 05f1 825f | _ | Call 0x1,0x5f 05f2 e5ff | | Load 0x2,-0x1 05f3 e007 | | Load 0x0,0x7 05f4 180d | | Execute Package,Field_Execute,Field_Number 0xd 05f5 4801 |H | Short_Literal 0x1 05f6 4800 |H | Short_Literal 0x0 05f7 e5ff | | Load 0x2,-0x1 05f8 e005 | | Load 0x0,0x5 05f9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05fa 4503 |E | Exit_Suprogram New_Top_Offset 0x3 05fb e00f | | Load 0x0,0xf 05fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 05fd 00db | | Load_Top At_Offset_3 05fe 6095 |` | Indirect_Literal Discrete,0x694,{0x00000000, 0x00004000} 05ff e010 | | Load 0x0,0x10 0600 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0601 4800 |H | Short_Literal 0x0 0602 e402 | | Load 0x2,0x2 0603 e00f | | Load 0x0,0xf 0604 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 0605 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0606 00d1 | | Pop_Control Pop_Count_1 0607 c408 | | Store 0x2,0x8 0608 00da | | Load_Top At_Offset_2 0609 e00f | | Load 0x0,0xf 060a 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 060b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 060c 6803 |h | Jump_Zero 0x610 060d 4800 |H | Short_Literal 0x0 060e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 060f 7812 |x | Jump 0x622 0610 00e3 | | Load_Encached Natural_Cache 0611 00e3 | | Load_Encached Natural_Cache 0612 00e3 | | Load_Encached Natural_Cache 0613 4800 |H | Short_Literal 0x0 0614 e5ff | | Load 0x2,-0x1 0615 e015 | | Load 0x0,0x15 0616 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0617 c405 | | Store 0x2,0x5 0618 c406 | | Store 0x2,0x6 0619 c407 | | Store 0x2,0x7 061a e405 | | Load 0x2,0x5 061b 0c01 | | Execute_Immediate Greater_Equal,0x1 061c 6803 |h | Jump_Zero 0x620 061d 4801 |H | Short_Literal 0x1 061e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 061f 7802 |x | Jump 0x622 0620 4800 |H | Short_Literal 0x0 0621 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0622 00d9 | | Load_Top At_Offset_1 0623 6858 |hX | Jump_Zero 0x67c 0624 00d8 | | Load_Top At_Offset_0 0625 0092 19bd | | Action Push_String_Extended,0x19bd ; "Editing " 0627 e5ff | | Load 0x2,-0x1 0628 01cc | | Execute Vector,Catenate 0629 0092 19be | | Action Push_String_Extended,0x19be ; "\x5c will result in demotion of " 062b 01cc | | Execute Vector,Catenate 062c e014 | | Load 0x0,0x14 062d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 062e 00d1 | | Pop_Control Pop_Count_1 062f e405 | | Load 0x2,0x5 0630 0c01 | | Execute_Immediate Greater_Equal,0x1 0631 680d |h | Jump_Zero 0x63f 0632 00d8 | | Load_Top At_Offset_0 0633 4820 |H | Short_Literal 0x20 0634 4800 |H | Short_Literal 0x0 0635 480a |H | Short_Literal 0xa 0636 e405 | | Load 0x2,0x5 0637 e00b | | Load 0x0,0xb 0638 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0639 0092 19bf | | Action Push_String_Extended,0x19bf ; " units\x5c" 063b 01cc | | Execute Vector,Catenate 063c e014 | | Load 0x0,0x14 063d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 063e 00d1 | | Pop_Control Pop_Count_1 063f e406 | | Load 0x2,0x6 0640 0f01 | | Execute_Immediate Equal,0x1 0641 6807 |h | Jump_Zero 0x649 0642 00d8 | | Load_Top At_Offset_0 0643 0092 19c0 | | Action Push_String_Extended,0x19c0 ; "in 1 library, \x5c " 0645 e014 | | Load 0x0,0x14 0646 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0647 00d1 | | Pop_Control Pop_Count_1 0648 7813 |x | Jump 0x65c 0649 e406 | | Load 0x2,0x6 064a 0c02 | | Execute_Immediate Greater_Equal,0x2 064b 6810 |h | Jump_Zero 0x65c 064c 00d8 | | Load_Top At_Offset_0 064d 0092 19c1 | | Action Push_String_Extended,0x19c1 ; "in " 064f 4820 |H | Short_Literal 0x20 0650 4800 |H | Short_Literal 0x0 0651 480a |H | Short_Literal 0xa 0652 e406 | | Load 0x2,0x6 0653 e00b | | Load 0x0,0xb 0654 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0655 01cc | | Execute Vector,Catenate 0656 0092 19c2 | | Action Push_String_Extended,0x19c2 ; " libraries, \x5c " 0658 01cc | | Execute Vector,Catenate 0659 e014 | | Load 0x0,0x14 065a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 065b 00d1 | | Pop_Control Pop_Count_1 065c 00d8 | | Load_Top At_Offset_0 065d 0092 19c3 | | Action Push_String_Extended,0x19c3 ; " demoting " 065f 4820 |H | Short_Literal 0x20 0660 4800 |H | Short_Literal 0x0 0661 480a |H | Short_Literal 0xa 0662 e407 | | Load 0x2,0x7 0663 e00b | | Load 0x0,0xb 0664 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0665 01cc | | Execute Vector,Catenate 0666 0092 19c4 | | Action Push_String_Extended,0x19c4 ; " lines in total. Ok?" 0668 01cc | | Execute Vector,Catenate 0669 e014 | | Load 0x0,0x14 066a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 066b 00d1 | | Pop_Control Pop_Count_1 066c 00ea | | Load_Encached Null_String_Cache 066d 00ea | | Load_Encached Null_String_Cache 066e 00ea | | Load_Encached Null_String_Cache 066f 00ea | | Load_Encached Null_String_Cache 0670 e5fe | | Load 0x2,-0x2 0671 e5ff | | Load 0x2,-0x1 0672 e40b | | Load 0x2,0xb 0673 e014 | | Load 0x0,0x14 0674 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0675 0092 19c5 | | Action Push_String_Extended,0x19c5 ; "Open Demote" 0677 4af0 |J | Short_Literal 0x2f0 0678 4815 |H | Short_Literal 0x15 0679 e002 | | Load 0x0,0x2 067a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 067b 4503 |E | Exit_Suprogram New_Top_Offset 0x3 067c e5ff | | Load 0x2,-0x1 067d e008 | | Load 0x0,0x8 067e 180e | | Execute Package,Field_Execute,Field_Number 0xe 067f 700f |p | Jump_Nonzero 0x68f 0680 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 0682 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 0684 0092 19bb | | Action Push_String_Extended,0x19bb ; "<TOMORROW>" 0686 4803 |H | Short_Literal 0x3 0687 4800 |H | Short_Literal 0x0 0688 4801 |H | Short_Literal 0x1 0689 4801 |H | Short_Literal 0x1 068a e5fe | | Load 0x2,-0x2 068b 825f | _ | Call 0x1,0x5f 068c e5ff | | Load 0x2,-0x1 068d e007 | | Load 0x0,0x7 068e 180d | | Execute Package,Field_Execute,Field_Number 0xd 068f e5ff | | Load 0x2,-0x1 0690 825e | ^ | Call 0x1,0x5e 0691 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0692 0000 0000 | | .XXX[0x2] 0694 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0698 ; -------------------------------------------------------------------------------------- 0698 ; SUBPROGRAM 0698 ; -------------------------------------------------------------------------------------- 0698 069b | | .CONST 0x069b ; Address of begin 0699 0004 | | .CONST 0x0004 ; Address of exception handler 069a 0001 | | .CONST 0x0001 ; Number of locals 069b BODY_0698: 069b INIT_0698: 069b 00ea | | Load_Encached Null_String_Cache 069c 00ea | | Load_Encached Null_String_Cache 069d 00ea | | Load_Encached Null_String_Cache 069e 00ea | | Load_Encached Null_String_Cache 069f 00ea | | Load_Encached Null_String_Cache 06a0 00ea | | Load_Encached Null_String_Cache 06a1 00ea | | Load_Encached Null_String_Cache 06a2 00ea | | Load_Encached Null_String_Cache 06a3 4b02 |K | Short_Literal 0x302 06a4 4852 |HR | Short_Literal 0x52 06a5 e002 | | Load 0x0,0x2 06a6 1818 | | Execute Package,Field_Execute,Field_Number 0x18 06a7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 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 4801 |H | Short_Literal 0x1 06ac 4800 |H | Short_Literal 0x0 06ad e5ff | | Load 0x2,-0x1 06ae e005 | | Load 0x0,0x5 06af 1812 | | Execute Package,Field_Execute,Field_Number 0x12 06b0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 06b1 0000 0000 | | .BLANK 0000[0x7] 06b8 ; -------------------------------------------------------------------------------------- 06b8 ; SUBPROGRAM 06b8 ; -------------------------------------------------------------------------------------- 06b8 06bb | | .CONST 0x06bb ; Address of begin 06b9 0004 | | .CONST 0x0004 ; Address of exception handler 06ba 0001 | | .CONST 0x0001 ; Number of locals 06bb BODY_06b8: 06bb INIT_06b8: 06bb e001 | | Load 0x0,0x1 06bc 181c | | Execute Package,Field_Execute,Field_Number 0x1c 06bd 4610 |F | Jump_Case 0x11 06be 7810 |x | Jump 0x6cf ; case 0x0 06bf 780f |x | Jump 0x6cf ; case 0x1 06c0 780e |x | Jump 0x6cf ; case 0x2 06c1 782c |x, | Jump 0x6ee ; case 0x3 06c2 780c |x | Jump 0x6cf ; case 0x4 06c3 7847 |xG | Jump 0x70b ; case 0x5 06c4 780a |x | Jump 0x6cf ; case 0x6 06c5 7809 |x | Jump 0x6cf ; case 0x7 06c6 7808 |x | Jump 0x6cf ; case 0x8 06c7 7807 |x | Jump 0x6cf ; case 0x9 06c8 7806 |x | Jump 0x6cf ; case 0xa 06c9 7805 |x | Jump 0x6cf ; case 0xb 06ca 781e |x | Jump 0x6e9 ; case 0xc 06cb 7803 |x | Jump 0x6cf ; case 0xd 06cc 7802 |x | Jump 0x6cf ; case 0xe 06cd 783d |x= | Jump 0x70b ; case 0xf 06ce 7800 |x | Jump 0x6cf ; case 0x10 06cf e001 | | Load 0x0,0x1 06d0 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 06d1 6812 |h | Jump_Zero 0x6e4 06d2 00ea | | Load_Encached Null_String_Cache 06d3 00ea | | Load_Encached Null_String_Cache 06d4 00ea | | Load_Encached Null_String_Cache 06d5 00ea | | Load_Encached Null_String_Cache 06d6 00ea | | Load_Encached Null_String_Cache 06d7 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 06d9 e001 | | Load 0x0,0x1 06da 180f | | Execute Package,Field_Execute,Field_Number 0xf 06db 0092 19c6 | | Action Push_String_Extended,0x19c6 ; "Save Changes?" 06dd 0092 19c7 | | Action Push_String_Extended,0x19c7 ; "File Close" 06df 4acf |J | Short_Literal 0x2cf 06e0 4837 |H7 | Short_Literal 0x37 06e1 e002 | | Load 0x0,0x2 06e2 1818 | | Execute Package,Field_Execute,Field_Number 0x18 06e3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06e4 0092 19c8 | | Action Push_String_Extended,0x19c8 ; "<image>" 06e6 e005 | | Load 0x0,0x5 06e7 180d | | Execute Package,Field_Execute,Field_Number 0xd 06e8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06e9 0092 19b8 | | Action Push_String_Extended,0x19b8 ; "<IMAGE>" 06eb e005 | | Load 0x0,0x5 06ec 180d | | Execute Package,Field_Execute,Field_Number 0xd 06ed 4501 |E | Exit_Suprogram New_Top_Offset 0x1 06ee e001 | | Load 0x0,0x1 06ef 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 06f0 6812 |h | Jump_Zero 0x703 06f1 00ea | | Load_Encached Null_String_Cache 06f2 00ea | | Load_Encached Null_String_Cache 06f3 00ea | | Load_Encached Null_String_Cache 06f4 00ea | | Load_Encached Null_String_Cache 06f5 00ea | | Load_Encached Null_String_Cache 06f6 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 06f8 e001 | | Load 0x0,0x1 06f9 180f | | Execute Package,Field_Execute,Field_Number 0xf 06fa 0092 19c9 | | Action Push_String_Extended,0x19c9 ; "Send Message?" 06fc 0092 19c7 | | Action Push_String_Extended,0x19c7 ; "File Close" 06fe 4acf |J | Short_Literal 0x2cf 06ff 4837 |H7 | Short_Literal 0x37 0700 e002 | | Load 0x0,0x2 0701 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0702 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0703 e016 | | Load 0x0,0x16 0704 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0705 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0706 0092 19b8 | | Action Push_String_Extended,0x19b8 ; "<IMAGE>" 0708 e005 | | Load 0x0,0x5 0709 180d | | Execute Package,Field_Execute,Field_Number 0xd 070a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 070b e001 | | Load 0x0,0x1 070c 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 070d e005 | | Load 0x0,0x5 070e 180d | | Execute Package,Field_Execute,Field_Number 0xd 070f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0710 ; -------------------------------------------------------------------------------------- 0710 ; SUBPROGRAM 0710 ; -------------------------------------------------------------------------------------- 0710 0713 | | .CONST 0x0713 ; Address of begin 0711 0004 | | .CONST 0x0004 ; Address of exception handler 0712 0001 | | .CONST 0x0001 ; Number of locals 0713 BODY_0710: 0713 INIT_0710: 0713 00da | | Load_Top At_Offset_2 0714 6808 |h | Jump_Zero 0x71d 0715 e016 | | Load 0x0,0x16 0716 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0717 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0718 0092 19b8 | | Action Push_String_Extended,0x19b8 ; "<IMAGE>" 071a e005 | | Load 0x0,0x5 071b 181a | | Execute Package,Field_Execute,Field_Number 0x1a 071c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 071d 0092 19b8 | | Action Push_String_Extended,0x19b8 ; "<IMAGE>" 071f e005 | | Load 0x0,0x5 0720 180d | | Execute Package,Field_Execute,Field_Number 0xd 0721 4502 |E | Exit_Suprogram New_Top_Offset 0x2 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 e001 | | Load 0x0,0x1 072c 181c | | Execute Package,Field_Execute,Field_Number 0x1c 072d 4610 |F | Jump_Case 0x11 072e 7810 |x | Jump 0x73f ; case 0x0 072f 780f |x | Jump 0x73f ; case 0x1 0730 780e |x | Jump 0x73f ; case 0x2 0731 7815 |x | Jump 0x747 ; case 0x3 0732 780c |x | Jump 0x73f ; case 0x4 0733 780b |x | Jump 0x73f ; case 0x5 0734 780a |x | Jump 0x73f ; case 0x6 0735 7809 |x | Jump 0x73f ; case 0x7 0736 7808 |x | Jump 0x73f ; case 0x8 0737 7807 |x | Jump 0x73f ; case 0x9 0738 7806 |x | Jump 0x73f ; case 0xa 0739 7805 |x | Jump 0x73f ; case 0xb 073a 7807 |x | Jump 0x742 ; case 0xc 073b 7803 |x | Jump 0x73f ; case 0xd 073c 7802 |x | Jump 0x73f ; case 0xe 073d 7801 |x | Jump 0x73f ; case 0xf 073e 7800 |x | Jump 0x73f ; case 0x10 073f e005 | | Load 0x0,0x5 0740 180f | | Execute Package,Field_Execute,Field_Number 0xf 0741 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0742 0092 19ca | | Action Push_String_Extended,0x19ca ; "Command windows cannot be saved." 0744 e004 | | Load 0x0,0x4 0745 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 0746 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0747 0092 19cb | | Action Push_String_Extended,0x19cb ; "Mail windows cannot be saved. Use Send_Message to send." 0749 e004 | | Load 0x0,0x4 074a 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 074b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 074c 0000 0000 | | .BLANK 0000[0x4] 0750 ; -------------------------------------------------------------------------------------- 0750 ; SUBPROGRAM 0750 ; -------------------------------------------------------------------------------------- 0750 0753 | S | .CONST 0x0753 ; Address of begin 0751 0004 | | .CONST 0x0004 ; Address of exception handler 0752 0001 | | .CONST 0x0001 ; Number of locals 0753 BODY_0750: 0753 INIT_0750: 0753 e001 | | Load 0x0,0x1 0754 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0755 4610 |F | Jump_Case 0x11 0756 7810 |x | Jump 0x767 ; case 0x0 0757 781f |x | Jump 0x777 ; case 0x1 0758 781e |x | Jump 0x777 ; case 0x2 0759 7817 |x | Jump 0x771 ; case 0x3 075a 7819 |x | Jump 0x774 ; case 0x4 075b 7815 |x | Jump 0x771 ; case 0x5 075c 7817 |x | Jump 0x774 ; case 0x6 075d 7816 |x | Jump 0x774 ; case 0x7 075e 7815 |x | Jump 0x774 ; case 0x8 075f 7807 |x | Jump 0x767 ; case 0x9 0760 7806 |x | Jump 0x767 ; case 0xa 0761 7805 |x | Jump 0x767 ; case 0xb 0762 7807 |x | Jump 0x76a ; case 0xc 0763 7803 |x | Jump 0x767 ; case 0xd 0764 7802 |x | Jump 0x767 ; case 0xe 0765 7801 |x | Jump 0x767 ; case 0xf 0766 7800 |x | Jump 0x767 ; case 0x10 0767 e005 | | Load 0x0,0x5 0768 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0769 4501 |E | Exit_Suprogram New_Top_Offset 0x1 076a 4801 |H | Short_Literal 0x1 076b 4800 |H | Short_Literal 0x0 076c 0092 19b8 | | Action Push_String_Extended,0x19b8 ; "<IMAGE>" 076e e005 | | Load 0x0,0x5 076f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0770 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0771 e005 | | Load 0x0,0x5 0772 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0773 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0774 e005 | | Load 0x0,0x5 0775 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0776 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0777 e001 | | Load 0x0,0x1 0778 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0779 680c |h | Jump_Zero 0x786 077a 00ea | | Load_Encached Null_String_Cache 077b e001 | | Load 0x0,0x1 077c 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 077d 0092 19cc | | Action Push_String_Extended,0x19cc ; " is modified.\x5cLose changes?" 077f 01cc | | Execute Vector,Catenate 0780 0092 19cd | | Action Push_String_Extended,0x19cd ; "File Revert" 0782 4ad1 |J | Short_Literal 0x2d1 0783 e002 | | Load 0x0,0x2 0784 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0785 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0786 e005 | | Load 0x0,0x5 0787 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0788 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0789 0000 0000 | | .BLANK 0000[0x7] 0790 ; -------------------------------------------------------------------------------------- 0790 ; SUBPROGRAM 0790 ; -------------------------------------------------------------------------------------- 0790 0793 | | .CONST 0x0793 ; Address of begin 0791 0004 | | .CONST 0x0004 ; Address of exception handler 0792 0001 | | .CONST 0x0001 ; Number of locals 0793 BODY_0790: 0793 INIT_0790: 0793 e005 | | Load 0x0,0x5 0794 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0795 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0796 0000 0000 | | .XXX[0x2] 0798 ; -------------------------------------------------------------------------------------- 0798 ; SUBPROGRAM 0798 ; -------------------------------------------------------------------------------------- 0798 079b | | .CONST 0x079b ; Address of begin 0799 0004 | | .CONST 0x0004 ; Address of exception handler 079a 0001 | | .CONST 0x0001 ; Number of locals 079b BODY_0798: 079b INIT_0798: 079b 0092 19ce | | Action Push_String_Extended,0x19ce ; "F" 079d 8260 | ` | Call 0x1,0x60 079e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 079f 0000 | | .XXX[0x1] 07a0 ; -------------------------------------------------------------------------------------- 07a0 ; SUBPROGRAM 07a0 ; -------------------------------------------------------------------------------------- 07a0 07a3 | | .CONST 0x07a3 ; Address of begin 07a1 0004 | | .CONST 0x0004 ; Address of exception handler 07a2 0001 | | .CONST 0x0001 ; Number of locals 07a3 BODY_07a0: 07a3 INIT_07a0: 07a3 0092 19cf | | Action Push_String_Extended,0x19cf ; "T" 07a5 8260 | ` | Call 0x1,0x60 07a6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07a7 0000 | | .XXX[0x1] 07a8 ; -------------------------------------------------------------------------------------- 07a8 ; SUBPROGRAM 07a8 ; -------------------------------------------------------------------------------------- 07a8 07b8 | | .CONST 0x07b8 ; Address of begin 07a9 0004 | | .CONST 0x0004 ; Address of exception handler 07aa 0004 | | .CONST 0x0004 ; Number of locals 07ab INIT_07a8: 07ab 00da | | Load_Top At_Offset_2 07ac 01db | | Execute Vector,Length 07ad e014 | | Load 0x0,0x14 07ae 1b0e | | Execute Package,Field_Read,Field_Number 0xe 07af 1c08 | | Execute_Immediate Run_Utility,0x8 07b0 00d8 | | Load_Top At_Offset_0 07b1 1c00 | | Execute_Immediate Run_Utility,0x0 07b2 e5f7 | | Load 0x2,-0x9 07b3 00e3 | | Load_Encached Natural_Cache 07b4 03f1 | | Declare_Variable Discrete,With_Value 07b5 e5f6 | | Load 0x2,-0xa 07b6 00e3 | | Load_Encached Natural_Cache 07b7 03f1 | | Declare_Variable Discrete,With_Value 07b8 BODY_07a8: 07b8 4801 |H | Short_Literal 0x1 07b9 0092 19d0 | | Action Push_String_Extended,0x19d0 ; "<CURRENT_WINDOW_CONTENTS>" 07bb 4820 |H | Short_Literal 0x20 07bc e5ff | | Load 0x2,-0x1 07bd e00b | | Load 0x0,0xb 07be 181c | | Execute Package,Field_Execute,Field_Number 0x1c 07bf e00b | | Load 0x0,0xb 07c0 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 07c1 6807 |h | Jump_Zero 0x7c9 07c2 00da | | Load_Top At_Offset_2 07c3 0092 19d1 | | Action Push_String_Extended,0x19d1 ; "<CURSOR>" 07c5 e014 | | Load 0x0,0x14 07c6 1810 | | Execute Package,Field_Execute,Field_Number 0x10 07c7 00d1 | | Pop_Control Pop_Count_1 07c8 7805 |x | Jump 0x7ce 07c9 00da | | Load_Top At_Offset_2 07ca e5ff | | Load 0x2,-0x1 07cb e014 | | Load 0x0,0x14 07cc 1810 | | Execute Package,Field_Execute,Field_Number 0x10 07cd 00d1 | | Pop_Control Pop_Count_1 07ce e5f8 | | Load 0x2,-0x8 07cf 6804 |h | Jump_Zero 0x7d4 07d0 4801 |H | Short_Literal 0x1 07d1 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 07d2 4be7 |K | Short_Literal 0x3e7 07d3 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 07d4 e5fd | | Load 0x2,-0x3 07d5 0b31 | 1 | Execute_Immediate Case_Compare,0x31 07d6 703f |p? | Jump_Nonzero 0x816 07d7 0b32 | 2 | Execute_Immediate Case_Compare,0x32 07d8 7003 |p | Jump_Nonzero 0x7dc 07d9 0f33 | 3 | Execute_Immediate Equal,0x33 07da 701d |p | Jump_Nonzero 0x7f8 07db 450c |E | Exit_Suprogram New_Top_Offset 0xc 07dc 00d1 | | Pop_Control Pop_Count_1 07dd 4800 |H | Short_Literal 0x0 07de e5fe | | Load 0x2,-0x2 07df 4801 |H | Short_Literal 0x1 07e0 e5f5 | | Load 0x2,-0xb 07e1 e5f9 | | Load 0x2,-0x7 07e2 4800 |H | Short_Literal 0x0 07e3 e5fb | | Load 0x2,-0x5 07e4 e5fa | | Load 0x2,-0x6 07e5 e5fc | | Load 0x2,-0x4 07e6 4800 |H | Short_Literal 0x0 07e7 e404 | | Load 0x2,0x4 07e8 00d8 | | Load_Top At_Offset_0 07e9 00e4 | | Load_Encached Positive_Cache 07ea 0260 | ` | Execute Discrete,In_Type 07eb 7001 |p | Jump_Nonzero 0x7ed 07ec 0801 | | Execute_Immediate Raise,0x1 07ed e403 | | Load 0x2,0x3 07ee 00d8 | | Load_Top At_Offset_0 07ef 00e4 | | Load_Encached Positive_Cache 07f0 0260 | ` | Execute Discrete,In_Type 07f1 7001 |p | Jump_Nonzero 0x7f3 07f2 0801 | | Execute_Immediate Raise,0x1 07f3 e402 | | Load 0x2,0x2 07f4 e014 | | Load 0x0,0x14 07f5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07f6 8017 | | Call 0x0,0x17 07f7 450c |E | Exit_Suprogram New_Top_Offset 0xc 07f8 4800 |H | Short_Literal 0x0 07f9 e5fe | | Load 0x2,-0x2 07fa 4801 |H | Short_Literal 0x1 07fb 0092 19d2 | | Action Push_String_Extended,0x19d2 ; "Postscript=>(Wide,Spacing=10,Size=10)" 07fd e5f5 | | Load 0x2,-0xb 07fe 01cc | | Execute Vector,Catenate 07ff e5f9 | | Load 0x2,-0x7 0800 4800 |H | Short_Literal 0x0 0801 e5fb | | Load 0x2,-0x5 0802 e5fa | | Load 0x2,-0x6 0803 e5fc | | Load 0x2,-0x4 0804 4800 |H | Short_Literal 0x0 0805 e404 | | Load 0x2,0x4 0806 00d8 | | Load_Top At_Offset_0 0807 00e4 | | Load_Encached Positive_Cache 0808 0260 | ` | Execute Discrete,In_Type 0809 7001 |p | Jump_Nonzero 0x80b 080a 0801 | | Execute_Immediate Raise,0x1 080b e403 | | Load 0x2,0x3 080c 00d8 | | Load_Top At_Offset_0 080d 00e4 | | Load_Encached Positive_Cache 080e 0260 | ` | Execute Discrete,In_Type 080f 7001 |p | Jump_Nonzero 0x811 0810 0801 | | Execute_Immediate Raise,0x1 0811 e402 | | Load 0x2,0x2 0812 e014 | | Load 0x0,0x14 0813 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0814 8017 | | Call 0x0,0x17 0815 450c |E | Exit_Suprogram New_Top_Offset 0xc 0816 00d1 | | Pop_Control Pop_Count_1 0817 4800 |H | Short_Literal 0x0 0818 e5fe | | Load 0x2,-0x2 0819 4801 |H | Short_Literal 0x1 081a e5f5 | | Load 0x2,-0xb 081b e5f9 | | Load 0x2,-0x7 081c 4800 |H | Short_Literal 0x0 081d e5fb | | Load 0x2,-0x5 081e e5fa | | Load 0x2,-0x6 081f e5fc | | Load 0x2,-0x4 0820 4801 |H | Short_Literal 0x1 0821 e404 | | Load 0x2,0x4 0822 00d8 | | Load_Top At_Offset_0 0823 00e4 | | Load_Encached Positive_Cache 0824 0260 | ` | Execute Discrete,In_Type 0825 7001 |p | Jump_Nonzero 0x827 0826 0801 | | Execute_Immediate Raise,0x1 0827 e403 | | Load 0x2,0x3 0828 00d8 | | Load_Top At_Offset_0 0829 00e4 | | Load_Encached Positive_Cache 082a 0260 | ` | Execute Discrete,In_Type 082b 7001 |p | Jump_Nonzero 0x82d 082c 0801 | | Execute_Immediate Raise,0x1 082d e402 | | Load 0x2,0x2 082e e014 | | Load 0x0,0x14 082f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0830 8017 | | Call 0x0,0x17 0831 450c |E | Exit_Suprogram New_Top_Offset 0xc 0832 0000 0000 | | .BLANK 0000[0x6] 0838 ; -------------------------------------------------------------------------------------- 0838 ; SUBPROGRAM 0838 ; -------------------------------------------------------------------------------------- 0838 083d | = | .CONST 0x083d ; Address of begin 0839 0004 | | .CONST 0x0004 ; Address of exception handler 083a 0002 | | .CONST 0x0002 ; Number of locals 083b INIT_0838: 083b 029f 0eeb | | Declare_Subprogram INIT_0ee8,For_Call 083d BODY_0838: 083d 8402 | | Call 0x2,0x2 083e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 083f 0000 | | .XXX[0x1] 0840 ; -------------------------------------------------------------------------------------- 0840 ; SUBPROGRAM 0840 ; -------------------------------------------------------------------------------------- 0840 084e | N | .CONST 0x084e ; Address of begin 0841 0004 | | .CONST 0x0004 ; Address of exception handler 0842 0004 | | .CONST 0x0004 ; Number of locals 0843 INIT_0840: 0843 e00f | | Load 0x0,0xf 0844 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0845 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0846 02c7 | | Declare_Variable Any 0847 00d8 | | Load_Top At_Offset_0 0848 1c00 | | Execute_Immediate Run_Utility,0x0 0849 e00f | | Load 0x0,0xf 084a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 084b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 084c 029f 0feb | | Declare_Subprogram INIT_0fe8,For_Call 084e BODY_0840: 084e e00f | | Load 0x0,0xf 084f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0850 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0851 00db | | Load_Top At_Offset_3 0852 6025 |`% | Indirect_Literal Discrete,0x878,{0x00000000, 0x00004000} 0853 e010 | | Load 0x0,0x10 0854 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0855 e011 | | Load 0x0,0x11 0856 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0857 e012 | | Load 0x0,0x12 0858 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0859 4801 |H | Short_Literal 0x1 085a 4800 |H | Short_Literal 0x0 085b e011 | | Load 0x0,0x11 085c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 085d e00f | | Load 0x0,0xf 085e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 085f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0860 e5ff | | Load 0x2,-0x1 0861 e00f | | Load 0x0,0xf 0862 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0863 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0864 c402 | | Store 0x2,0x2 0865 005a | Z | Store_Top Discrete,At_Offset_2 0866 00cf | | Action Mark_Auxiliary 0867 7807 |x | Jump 0x86f 0868 8404 | | Call 0x2,0x4 0869 00db | | Load_Top At_Offset_3 086a e00f | | Load 0x0,0xf 086b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 086c 181d | | Execute Package,Field_Execute,Field_Number 0x1d 086d c402 | | Store 0x2,0x2 086e 00c9 | | Action Pop_Auxiliary_Loop 086f 00db | | Load_Top At_Offset_3 0870 e00f | | Load 0x0,0xf 0871 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0872 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0873 6ff4 |o | Jump_Zero 0x868 0874 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0875 0000 0000 | | .XXX[0x3] 0877 0000 | | 0878 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 087c 0000 0000 | | .BLANK 0000[0x4] 0880 ; -------------------------------------------------------------------------------------- 0880 ; SUBPROGRAM 0880 ; -------------------------------------------------------------------------------------- 0880 0885 | | .CONST 0x0885 ; Address of begin 0881 0004 | | .CONST 0x0004 ; Address of exception handler 0882 0002 | | .CONST 0x0002 ; Number of locals 0883 INIT_0880: 0883 029f 10d3 | | Declare_Subprogram INIT_10d0,For_Call 0885 BODY_0880: 0885 8402 | | Call 0x2,0x2 0886 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0887 0000 | | .XXX[0x1] 0888 ; -------------------------------------------------------------------------------------- 0888 ; SUBPROGRAM 0888 ; -------------------------------------------------------------------------------------- 0888 0896 | | .CONST 0x0896 ; Address of begin 0889 0004 | | .CONST 0x0004 ; Address of exception handler 088a 0004 | | .CONST 0x0004 ; Number of locals 088b INIT_0888: 088b e00f | | Load 0x0,0xf 088c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 088d 1b18 | | Execute Package,Field_Read,Field_Number 0x18 088e 02c7 | | Declare_Variable Any 088f 00d8 | | Load_Top At_Offset_0 0890 1c00 | | Execute_Immediate Run_Utility,0x0 0891 e00f | | Load 0x0,0xf 0892 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0893 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0894 029f 1113 | | Declare_Subprogram INIT_1110,For_Call 0896 BODY_0888: 0896 e00f | | Load 0x0,0xf 0897 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0898 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0899 00db | | Load_Top At_Offset_3 089a 6025 |`% | Indirect_Literal Discrete,0x8c0,{0x00000000, 0x00004000} 089b e010 | | Load 0x0,0x10 089c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 089d e011 | | Load 0x0,0x11 089e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 089f e012 | | Load 0x0,0x12 08a0 1811 | | Execute Package,Field_Execute,Field_Number 0x11 08a1 4801 |H | Short_Literal 0x1 08a2 4800 |H | Short_Literal 0x0 08a3 e011 | | Load 0x0,0x11 08a4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 08a5 e00f | | Load 0x0,0xf 08a6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08a7 1816 | | Execute Package,Field_Execute,Field_Number 0x16 08a8 e5ff | | Load 0x2,-0x1 08a9 e00f | | Load 0x0,0xf 08aa 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08ab 181b | | Execute Package,Field_Execute,Field_Number 0x1b 08ac c402 | | Store 0x2,0x2 08ad 005a | Z | Store_Top Discrete,At_Offset_2 08ae 00cf | | Action Mark_Auxiliary 08af 7807 |x | Jump 0x8b7 08b0 8404 | | Call 0x2,0x4 08b1 00db | | Load_Top At_Offset_3 08b2 e00f | | Load 0x0,0xf 08b3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08b4 181d | | Execute Package,Field_Execute,Field_Number 0x1d 08b5 c402 | | Store 0x2,0x2 08b6 00c9 | | Action Pop_Auxiliary_Loop 08b7 00db | | Load_Top At_Offset_3 08b8 e00f | | Load 0x0,0xf 08b9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 08ba 181e | | Execute Package,Field_Execute,Field_Number 0x1e 08bb 6ff4 |o | Jump_Zero 0x8b0 08bc 4504 |E | Exit_Suprogram New_Top_Offset 0x4 08bd 0000 0000 | | .XXX[0x3] 08bf 0000 | | 08c0 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 08c4 0000 0000 | | .BLANK 0000[0x4] 08c8 ; -------------------------------------------------------------------------------------- 08c8 ; SUBPROGRAM 08c8 ; -------------------------------------------------------------------------------------- 08c8 08e0 | | .CONST 0x08e0 ; Address of begin 08c9 0004 | | .CONST 0x0004 ; Address of exception handler 08ca 0004 | | .CONST 0x0004 ; Number of locals 08cb INIT_08c8: 08cb e00f | | Load 0x0,0xf 08cc 1b0f | | Execute Package,Field_Read,Field_Number 0xf 08cd 02c7 | | Declare_Variable Any 08ce 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 08d0 e001 | | Load 0x0,0x1 08d1 1810 | | Execute Package,Field_Execute,Field_Number 0x10 08d2 a402 | | Store_Unchecked 0x2,0x2 08d3 e00f | | Load 0x0,0xf 08d4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 08d5 02c7 | | Declare_Variable Any 08d6 0092 19d3 | | Action Push_String_Extended,0x19d3 ; "<REGION>" 08d8 e001 | | Load 0x0,0x1 08d9 1810 | | Execute Package,Field_Execute,Field_Number 0x10 08da a403 | | Store_Unchecked 0x2,0x3 08db e001 | | Load 0x0,0x1 08dc 181c | | Execute Package,Field_Execute,Field_Number 0x1c 08dd e001 | | Load 0x0,0x1 08de 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c 08df 03f1 | | Declare_Variable Discrete,With_Value 08e0 BODY_08c8: 08e0 e001 | | Load 0x0,0x1 08e1 181c | | Execute Package,Field_Execute,Field_Number 0x1c 08e2 0f03 | | Execute_Immediate Equal,0x3 08e3 6804 |h | Jump_Zero 0x8e8 08e4 e005 | | Load 0x0,0x5 08e5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 08e6 180e | | Execute Package,Field_Execute,Field_Number 0xe 08e7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 08e8 00da | | Load_Top At_Offset_2 08e9 e00f | | Load 0x0,0xf 08ea 1811 | | Execute Package,Field_Execute,Field_Number 0x11 08eb 7031 |p1 | Jump_Nonzero 0x91d 08ec 00d9 | | Load_Top At_Offset_1 08ed e00f | | Load 0x0,0xf 08ee 1811 | | Execute Package,Field_Execute,Field_Number 0x11 08ef 7018 |p | Jump_Nonzero 0x908 08f0 00d9 | | Load_Top At_Offset_1 08f1 00db | | Load_Top At_Offset_3 08f2 012e | . | Execute Any,Not_Equal 08f3 6814 |h | Jump_Zero 0x908 08f4 00ea | | Load_Encached Null_String_Cache 08f5 00ea | | Load_Encached Null_String_Cache 08f6 00ea | | Load_Encached Null_String_Cache 08f7 00ea | | Load_Encached Null_String_Cache 08f8 00ea | | Load_Encached Null_String_Cache 08f9 0092 19b8 | | Action Push_String_Extended,0x19b8 ; "<IMAGE>" 08fb e001 | | Load 0x0,0x1 08fc 180f | | Execute Package,Field_Execute,Field_Number 0xf 08fd 0092 19d3 | | Action Push_String_Extended,0x19d3 ; "<REGION>" 08ff e001 | | Load 0x0,0x1 0900 180f | | Execute Package,Field_Execute,Field_Number 0xf 0901 0092 19d4 | | Action Push_String_Extended,0x19d4 ; "Copy File" 0903 4ad4 |J | Short_Literal 0x2d4 0904 4819 |H | Short_Literal 0x19 0905 e002 | | Load 0x0,0x2 0906 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0907 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0908 00ea | | Load_Encached Null_String_Cache 0909 00ea | | Load_Encached Null_String_Cache 090a 00ea | | Load_Encached Null_String_Cache 090b 00ea | | Load_Encached Null_String_Cache 090c 00ea | | Load_Encached Null_String_Cache 090d e001 | | Load 0x0,0x1 090e 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 090f 0092 19d5 | | Action Push_String_Extended,0x19d5 ; ".NewFile" 0911 01cc | | Execute Vector,Catenate 0912 e402 | | Load 0x2,0x2 0913 e00f | | Load 0x0,0xf 0914 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0915 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0916 0092 19d4 | | Action Push_String_Extended,0x19d4 ; "Copy File" 0918 4ad4 |J | Short_Literal 0x2d4 0919 4819 |H | Short_Literal 0x19 091a e002 | | Load 0x0,0x2 091b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 091c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 091d 00ea | | Load_Encached Null_String_Cache 091e 00ea | | Load_Encached Null_String_Cache 091f 00ea | | Load_Encached Null_String_Cache 0920 00ea | | Load_Encached Null_String_Cache 0921 00ea | | Load_Encached Null_String_Cache 0922 e001 | | Load 0x0,0x1 0923 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0924 0092 19d5 | | Action Push_String_Extended,0x19d5 ; ".NewFile" 0926 01cc | | Execute Vector,Catenate 0927 00ea | | Load_Encached Null_String_Cache 0928 0092 19d4 | | Action Push_String_Extended,0x19d4 ; "Copy File" 092a 4ad4 |J | Short_Literal 0x2d4 092b 4819 |H | Short_Literal 0x19 092c e002 | | Load 0x0,0x2 092d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 092e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 092f 0000 | | .XXX[0x1] 0930 ; -------------------------------------------------------------------------------------- 0930 ; SUBPROGRAM 0930 ; -------------------------------------------------------------------------------------- 0930 0933 | 3 | .CONST 0x0933 ; Address of begin 0931 0004 | | .CONST 0x0004 ; Address of exception handler 0932 0001 | | .CONST 0x0001 ; Number of locals 0933 BODY_0930: 0933 INIT_0930: 0933 00ea | | Load_Encached Null_String_Cache 0934 4801 |H | Short_Literal 0x1 0935 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 0937 4801 |H | Short_Literal 0x1 0938 e5fe | | Load 0x2,-0x2 0939 e5ff | | Load 0x2,-0x1 093a e006 | | Load 0x0,0x6 093b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 093c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 093d 0000 0000 | | .XXX[0x3] 093f 0000 | | 0940 ; -------------------------------------------------------------------------------------- 0940 ; SUBPROGRAM 0940 ; -------------------------------------------------------------------------------------- 0940 0958 | X | .CONST 0x0958 ; Address of begin 0941 0004 | | .CONST 0x0004 ; Address of exception handler 0942 0004 | | .CONST 0x0004 ; Number of locals 0943 INIT_0940: 0943 e00f | | Load 0x0,0xf 0944 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0945 02c7 | | Declare_Variable Any 0946 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 0948 e001 | | Load 0x0,0x1 0949 1810 | | Execute Package,Field_Execute,Field_Number 0x10 094a a402 | | Store_Unchecked 0x2,0x2 094b e00f | | Load 0x0,0xf 094c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 094d 02c7 | | Declare_Variable Any 094e 0092 19d3 | | Action Push_String_Extended,0x19d3 ; "<REGION>" 0950 e001 | | Load 0x0,0x1 0951 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0952 a403 | | Store_Unchecked 0x2,0x3 0953 e001 | | Load 0x0,0x1 0954 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0955 e001 | | Load 0x0,0x1 0956 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c 0957 03f1 | | Declare_Variable Discrete,With_Value 0958 BODY_0940: 0958 e001 | | Load 0x0,0x1 0959 181c | | Execute Package,Field_Execute,Field_Number 0x1c 095a 0f03 | | Execute_Immediate Equal,0x3 095b 6804 |h | Jump_Zero 0x960 095c e005 | | Load 0x0,0x5 095d 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 095e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 095f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0960 00da | | Load_Top At_Offset_2 0961 e00f | | Load 0x0,0xf 0962 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0963 7031 |p1 | Jump_Nonzero 0x995 0964 00d9 | | Load_Top At_Offset_1 0965 e00f | | Load 0x0,0xf 0966 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0967 7018 |p | Jump_Nonzero 0x980 0968 00d9 | | Load_Top At_Offset_1 0969 00db | | Load_Top At_Offset_3 096a 012e | . | Execute Any,Not_Equal 096b 6814 |h | Jump_Zero 0x980 096c 00ea | | Load_Encached Null_String_Cache 096d 00ea | | Load_Encached Null_String_Cache 096e 00ea | | Load_Encached Null_String_Cache 096f 00ea | | Load_Encached Null_String_Cache 0970 00ea | | Load_Encached Null_String_Cache 0971 0092 19b8 | | Action Push_String_Extended,0x19b8 ; "<IMAGE>" 0973 e001 | | Load 0x0,0x1 0974 180f | | Execute Package,Field_Execute,Field_Number 0xf 0975 0092 19d3 | | Action Push_String_Extended,0x19d3 ; "<REGION>" 0977 e001 | | Load 0x0,0x1 0978 180f | | Execute Package,Field_Execute,Field_Number 0xf 0979 0092 19d6 | | Action Push_String_Extended,0x19d6 ; "Move File" 097b 4ad5 |J | Short_Literal 0x2d5 097c 4819 |H | Short_Literal 0x19 097d e002 | | Load 0x0,0x2 097e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 097f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0980 00ea | | Load_Encached Null_String_Cache 0981 00ea | | Load_Encached Null_String_Cache 0982 00ea | | Load_Encached Null_String_Cache 0983 00ea | | Load_Encached Null_String_Cache 0984 00ea | | Load_Encached Null_String_Cache 0985 e001 | | Load 0x0,0x1 0986 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0987 0092 19d5 | | Action Push_String_Extended,0x19d5 ; ".NewFile" 0989 01cc | | Execute Vector,Catenate 098a e402 | | Load 0x2,0x2 098b e00f | | Load 0x0,0xf 098c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 098d 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 098e 0092 19d6 | | Action Push_String_Extended,0x19d6 ; "Move File" 0990 4ad5 |J | Short_Literal 0x2d5 0991 4819 |H | Short_Literal 0x19 0992 e002 | | Load 0x0,0x2 0993 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0994 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0995 00ea | | Load_Encached Null_String_Cache 0996 00ea | | Load_Encached Null_String_Cache 0997 00ea | | Load_Encached Null_String_Cache 0998 00ea | | Load_Encached Null_String_Cache 0999 00ea | | Load_Encached Null_String_Cache 099a e001 | | Load 0x0,0x1 099b 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 099c 0092 19d5 | | Action Push_String_Extended,0x19d5 ; ".NewFile" 099e 01cc | | Execute Vector,Catenate 099f 00ea | | Load_Encached Null_String_Cache 09a0 0092 19d6 | | Action Push_String_Extended,0x19d6 ; "Move File" 09a2 4ad5 |J | Short_Literal 0x2d5 09a3 4819 |H | Short_Literal 0x19 09a4 e002 | | Load 0x0,0x2 09a5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 09a6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09a7 0000 | | .XXX[0x1] 09a8 ; -------------------------------------------------------------------------------------- 09a8 ; SUBPROGRAM 09a8 ; -------------------------------------------------------------------------------------- 09a8 09ab | | .CONST 0x09ab ; Address of begin 09a9 0004 | | .CONST 0x0004 ; Address of exception handler 09aa 0001 | | .CONST 0x0001 ; Number of locals 09ab BODY_09a8: 09ab INIT_09a8: 09ab 00ea | | Load_Encached Null_String_Cache 09ac 4801 |H | Short_Literal 0x1 09ad 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 09af 4801 |H | Short_Literal 0x1 09b0 e5fe | | Load 0x2,-0x2 09b1 e5ff | | Load 0x2,-0x1 09b2 e006 | | Load 0x0,0x6 09b3 1814 | | Execute Package,Field_Execute,Field_Number 0x14 09b4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 09b5 0000 0000 | | .XXX[0x3] 09b7 0000 | | 09b8 ; -------------------------------------------------------------------------------------- 09b8 ; SUBPROGRAM 09b8 ; -------------------------------------------------------------------------------------- 09b8 09bb | | .CONST 0x09bb ; Address of begin 09b9 0004 | | .CONST 0x0004 ; Address of exception handler 09ba 0001 | | .CONST 0x0001 ; Number of locals 09bb BODY_09b8: 09bb INIT_09b8: 09bb e001 | | Load 0x0,0x1 09bc 181c | | Execute Package,Field_Execute,Field_Number 0x1c 09bd 4610 |F | Jump_Case 0x11 09be 7810 |x | Jump 0x9cf ; case 0x0 09bf 780f |x | Jump 0x9cf ; case 0x1 09c0 780e |x | Jump 0x9cf ; case 0x2 09c1 781b |x | Jump 0x9dd ; case 0x3 09c2 781a |x | Jump 0x9dd ; case 0x4 09c3 780b |x | Jump 0x9cf ; case 0x5 09c4 780a |x | Jump 0x9cf ; case 0x6 09c5 7817 |x | Jump 0x9dd ; case 0x7 09c6 7816 |x | Jump 0x9dd ; case 0x8 09c7 7815 |x | Jump 0x9dd ; case 0x9 09c8 7806 |x | Jump 0x9cf ; case 0xa 09c9 7805 |x | Jump 0x9cf ; case 0xb 09ca 7816 |x | Jump 0x9e1 ; case 0xc 09cb 7811 |x | Jump 0x9dd ; case 0xd 09cc 7802 |x | Jump 0x9cf ; case 0xe 09cd 7801 |x | Jump 0x9cf ; case 0xf 09ce 7800 |x | Jump 0x9cf ; case 0x10 09cf 00ea | | Load_Encached Null_String_Cache 09d0 0092 19d7 | | Action Push_String_Extended,0x19d7 ; "Enter names of objects to delete." 09d2 00ea | | Load_Encached Null_String_Cache 09d3 0092 19d8 | | Action Push_String_Extended,0x19d8 ; "{<Cursor>}" 09d5 e001 | | Load 0x0,0x1 09d6 180f | | Execute Package,Field_Execute,Field_Number 0xf 09d7 0092 19d9 | | Action Push_String_Extended,0x19d9 ; "Delete File" 09d9 4ad6 |J | Short_Literal 0x2d6 09da e002 | | Load 0x0,0x2 09db 1819 | | Execute Package,Field_Execute,Field_Number 0x19 09dc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09dd e005 | | Load 0x0,0x5 09de 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 09df 180f | | Execute Package,Field_Execute,Field_Number 0xf 09e0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09e1 4801 |H | Short_Literal 0x1 09e2 4800 |H | Short_Literal 0x0 09e3 0092 19b8 | | Action Push_String_Extended,0x19b8 ; "<IMAGE>" 09e5 e005 | | Load 0x0,0x5 09e6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 09e7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 09e8 ; -------------------------------------------------------------------------------------- 09e8 ; SUBPROGRAM 09e8 ; -------------------------------------------------------------------------------------- 09e8 0a1d | | .CONST 0x0a1d ; Address of begin 09e9 0004 | | .CONST 0x0004 ; Address of exception handler 09ea 0014 | | .CONST 0x0014 ; Number of locals 09eb INIT_09e8: 09eb e00f | | Load 0x0,0xf 09ec 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 09ed 1b18 | | Execute Package,Field_Read,Field_Number 0x18 09ee 02c7 | | Declare_Variable Any 09ef 00d8 | | Load_Top At_Offset_0 09f0 1c00 | | Execute_Immediate Run_Utility,0x0 09f1 e00f | | Load 0x0,0xf 09f2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 09f3 1b0f | | Execute Package,Field_Read,Field_Number 0xf 09f4 e00f | | Load 0x0,0xf 09f5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 09f6 e00f | | Load 0x0,0xf 09f7 1b0f | | Execute Package,Field_Read,Field_Number 0xf 09f8 02c7 | | Declare_Variable Any 09f9 00d8 | | Load_Top At_Offset_0 09fa 1c00 | | Execute_Immediate Run_Utility,0x0 09fb e001 | | Load 0x0,0x1 09fc 1b14 | | Execute Package,Field_Read,Field_Number 0x14 09fd e001 | | Load 0x0,0x1 09fe 1b15 | | Execute Package,Field_Read,Field_Number 0x15 09ff 00e3 | | Load_Encached Natural_Cache 0a00 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a01 00e3 | | Load_Encached Natural_Cache 0a02 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a03 00e3 | | Load_Encached Natural_Cache 0a04 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a05 00e3 | | Load_Encached Natural_Cache 0a06 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a07 00e3 | | Load_Encached Natural_Cache 0a08 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a09 00e3 | | Load_Encached Natural_Cache 0a0a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a0b 00e3 | | Load_Encached Natural_Cache 0a0c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a0d 00e3 | | Load_Encached Natural_Cache 0a0e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a0f 00e3 | | Load_Encached Natural_Cache 0a10 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0a11 4900 |I | Short_Literal 0x100 0a12 e014 | | Load 0x0,0x14 0a13 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0a14 1c08 | | Execute_Immediate Run_Utility,0x8 0a15 00d8 | | Load_Top At_Offset_0 0a16 1c00 | | Execute_Immediate Run_Utility,0x0 0a17 029f 116b | k| Declare_Subprogram INIT_1168,For_Call 0a19 029f 123b | ;| Declare_Subprogram INIT_1238,For_Call 0a1b 029f 1263 | c| Declare_Subprogram INIT_1260,For_Call 0a1d BODY_09e8: 0a1d e5ff | | Load 0x2,-0x1 0a1e 01db | | Execute Vector,Length 0a1f 701b |p | Jump_Nonzero 0xa3b 0a20 e00f | | Load 0x0,0xf 0a21 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0a22 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0a23 e402 | | Load 0x2,0x2 0a24 612f |a/ | Indirect_Literal Discrete,0xb54,{0x00000000, 0x00004000} 0a25 e010 | | Load 0x0,0x10 0a26 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0a27 e011 | | Load 0x0,0x11 0a28 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0a29 e012 | | Load 0x0,0x12 0a2a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0a2b 4801 |H | Short_Literal 0x1 0a2c 4800 |H | Short_Literal 0x0 0a2d e011 | | Load 0x0,0x11 0a2e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0a2f e00f | | Load 0x0,0xf 0a30 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0a31 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0a32 e5ff | | Load 0x2,-0x1 0a33 e001 | | Load 0x0,0x1 0a34 180f | | Execute Package,Field_Execute,Field_Number 0xf 0a35 e00f | | Load 0x0,0xf 0a36 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0a37 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0a38 c402 | | Store 0x2,0x2 0a39 c403 | | Store 0x2,0x3 0a3a 7818 |x | Jump 0xa53 0a3b e00f | | Load 0x0,0xf 0a3c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0a3d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0a3e e402 | | Load 0x2,0x2 0a3f 6114 |a | Indirect_Literal Discrete,0xb54,{0x00000000, 0x00004000} 0a40 e010 | | Load 0x0,0x10 0a41 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0a42 e011 | | Load 0x0,0x11 0a43 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0a44 e012 | | Load 0x0,0x12 0a45 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0a46 4801 |H | Short_Literal 0x1 0a47 4800 |H | Short_Literal 0x0 0a48 e011 | | Load 0x0,0x11 0a49 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0a4a e00f | | Load 0x0,0xf 0a4b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0a4c 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0a4d e5ff | | Load 0x2,-0x1 0a4e e00f | | Load 0x0,0xf 0a4f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0a50 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0a51 c402 | | Store 0x2,0x2 0a52 c403 | | Store 0x2,0x3 0a53 e403 | | Load 0x2,0x3 0a54 680c |h | Jump_Zero 0xa61 0a55 0092 19da | | Action Push_String_Extended,0x19da ; "Error resolving name: " 0a57 e403 | | Load 0x2,0x3 0a58 e00f | | Load 0x0,0xf 0a59 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0a5a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0a5b 011c | | Execute Any,Convert_Unchecked 0a5c 1c01 | | Execute_Immediate Run_Utility,0x1 0a5d 01cc | | Execute Vector,Catenate 0a5e e004 | | Load 0x0,0x4 0a5f 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 0a60 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0a61 00cf | | Action Mark_Auxiliary 0a62 7878 |xx | Jump 0xadb 0a63 e00f | | Load 0x0,0xf 0a64 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0a65 e405 | | Load 0x2,0x5 0a66 0120 | | Execute Any,Is_Value 0a67 6803 |h | Jump_Zero 0xa6b 0a68 e00f | | Load 0x0,0xf 0a69 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0a6a 7801 |x | Jump 0xa6c 0a6b e405 | | Load 0x2,0x5 0a6c e402 | | Load 0x2,0x2 0a6d e00f | | Load 0x0,0xf 0a6e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0a6f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0a70 c405 | | Store 0x2,0x5 0a71 c404 | | Store 0x2,0x4 0a72 e404 | | Load 0x2,0x4 0a73 6801 |h | Jump_Zero 0xa75 0a74 786b |xk | Jump 0xae0 0a75 e405 | | Load 0x2,0x5 0a76 8261 | a | Call 0x1,0x61 0a77 a406 | | Store_Unchecked 0x2,0x6 0a78 e405 | | Load 0x2,0x5 0a79 8262 | b | Call 0x1,0x62 0a7a a407 | | Store_Unchecked 0x2,0x7 0a7b e410 | | Load 0x2,0x10 0a7c 0a01 | | Execute_Immediate Plus,0x1 0a7d c410 | | Store 0x2,0x10 0a7e e406 | | Load 0x2,0x6 0a7f 460f |F | Jump_Case 0x10 0a80 780f |x | Jump 0xa90 ; case 0x0 0a81 7819 |x | Jump 0xa9b ; case 0x1 0a82 781c |x | Jump 0xa9f ; case 0x2 0a83 780c |x | Jump 0xa90 ; case 0x3 0a84 780b |x | Jump 0xa90 ; case 0x4 0a85 780a |x | Jump 0xa90 ; case 0x5 0a86 7809 |x | Jump 0xa90 ; case 0x6 0a87 7808 |x | Jump 0xa90 ; case 0x7 0a88 7807 |x | Jump 0xa90 ; case 0x8 0a89 7806 |x | Jump 0xa90 ; case 0x9 0a8a 7805 |x | Jump 0xa90 ; case 0xa 0a8b 7804 |x | Jump 0xa90 ; case 0xb 0a8c 7803 |x | Jump 0xa90 ; case 0xc 0a8d 7802 |x | Jump 0xa90 ; case 0xd 0a8e 7801 |x | Jump 0xa90 ; case 0xe 0a8f 7800 |x | Jump 0xa90 ; case 0xf 0a90 e407 | | Load 0x2,0x7 0a91 0f2a | * | Execute_Immediate Equal,0x2a 0a92 7004 |p | Jump_Nonzero 0xa97 0a93 e40f | | Load 0x2,0xf 0a94 0a01 | | Execute_Immediate Plus,0x1 0a95 c40f | | Store 0x2,0xf 0a96 782a |x* | Jump 0xac1 0a97 e408 | | Load 0x2,0x8 0a98 0a01 | | Execute_Immediate Plus,0x1 0a99 c408 | | Store 0x2,0x8 0a9a 7826 |x& | Jump 0xac1 0a9b e409 | | Load 0x2,0x9 0a9c 0a01 | | Execute_Immediate Plus,0x1 0a9d c409 | | Store 0x2,0x9 0a9e 7822 |x" | Jump 0xac1 0a9f e407 | | Load 0x2,0x7 0aa0 00d8 | | Load_Top At_Offset_0 0aa1 0d03 | | Execute_Immediate Less,0x3 0aa2 700d |p | Jump_Nonzero 0xab0 0aa3 00d8 | | Load_Top At_Offset_0 0aa4 0c07 | | Execute_Immediate Greater_Equal,0x7 0aa5 7007 |p | Jump_Nonzero 0xaad 0aa6 0b04 | | Execute_Immediate Case_Compare,0x4 0aa7 700d |p | Jump_Nonzero 0xab5 0aa8 4805 |H | Short_Literal 0x5 0aa9 4806 |H | Short_Literal 0x6 0aaa 0262 | b | Execute Discrete,In_Range 0aab 700e |p | Jump_Nonzero 0xaba 0aac 7811 |x | Jump 0xabe 0aad 0f42 | B | Execute_Immediate Equal,0x42 0aae 700b |p | Jump_Nonzero 0xaba 0aaf 7801 |x | Jump 0xab1 0ab0 00d1 | | Pop_Control Pop_Count_1 0ab1 e40e | | Load 0x2,0xe 0ab2 0a01 | | Execute_Immediate Plus,0x1 0ab3 c40e | | Store 0x2,0xe 0ab4 780c |x | Jump 0xac1 0ab5 00d1 | | Pop_Control Pop_Count_1 0ab6 e40d | | Load 0x2,0xd 0ab7 0a01 | | Execute_Immediate Plus,0x1 0ab8 c40d | | Store 0x2,0xd 0ab9 7807 |x | Jump 0xac1 0aba e40c | | Load 0x2,0xc 0abb 0a01 | | Execute_Immediate Plus,0x1 0abc c40c | | Store 0x2,0xc 0abd 7803 |x | Jump 0xac1 0abe e40b | | Load 0x2,0xb 0abf 0a01 | | Execute_Immediate Plus,0x1 0ac0 c40b | | Store 0x2,0xb 0ac1 e410 | | Load 0x2,0x10 0ac2 e40f | | Load 0x2,0xf 0ac3 e40e | | Load 0x2,0xe 0ac4 e40d | | Load 0x2,0xd 0ac5 e40c | | Load 0x2,0xc 0ac6 e40b | | Load 0x2,0xb 0ac7 e409 | | Load 0x2,0x9 0ac8 e40a | | Load 0x2,0xa 0ac9 e408 | | Load 0x2,0x8 0aca e405 | | Load 0x2,0x5 0acb 8412 | | Call 0x2,0x12 0acc c408 | | Store 0x2,0x8 0acd c40a | | Store 0x2,0xa 0ace c409 | | Store 0x2,0x9 0acf c40b | | Store 0x2,0xb 0ad0 c40c | | Store 0x2,0xc 0ad1 c40d | | Store 0x2,0xd 0ad2 c40e | | Store 0x2,0xe 0ad3 c40f | | Store 0x2,0xf 0ad4 c410 | | Store 0x2,0x10 0ad5 e402 | | Load 0x2,0x2 0ad6 e00f | | Load 0x0,0xf 0ad7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0ad8 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0ad9 c402 | | Store 0x2,0x2 0ada 00c9 | | Action Pop_Auxiliary_Loop 0adb e402 | | Load 0x2,0x2 0adc e00f | | Load 0x0,0xf 0add 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0ade 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0adf 6f83 |o | Jump_Zero 0xa63 0ae0 00ce | | Action Pop_Auxiliary 0ae1 e402 | | Load 0x2,0x2 0ae2 e00f | | Load 0x0,0xf 0ae3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0ae4 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0ae5 c402 | | Store 0x2,0x2 0ae6 e410 | | Load 0x2,0x10 0ae7 0c02 | | Execute_Immediate Greater_Equal,0x2 0ae8 6864 |hd | Jump_Zero 0xb4d 0ae9 00db | | Load_Top At_Offset_3 0aea 0092 19db | | Action Push_String_Extended,0x19db ; " will delete\x5c" 0aec e014 | | Load 0x0,0x14 0aed 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0aee 00d1 | | Pop_Control Pop_Count_1 0aef 00db | | Load_Top At_Offset_3 0af0 0092 19dc | | Action Push_String_Extended,0x19dc ; " Dependent objects\x5c" 0af2 0092 19dd | | Action Push_String_Extended,0x19dd ; " Dependent object\x5c" 0af4 00ea | | Load_Encached Null_String_Cache 0af5 e40a | | Load 0x2,0xa 0af6 8413 | | Call 0x2,0x13 0af7 00d1 | | Pop_Control Pop_Count_1 0af8 00db | | Load_Top At_Offset_3 0af9 0092 19de | | Action Push_String_Extended,0x19de ; " Text objects\x5c" 0afb 0092 19df | | Action Push_String_Extended,0x19df ; " Text object\x5c" 0afd 00ea | | Load_Encached Null_String_Cache 0afe e408 | | Load 0x2,0x8 0aff 8413 | | Call 0x2,0x13 0b00 00d1 | | Pop_Control Pop_Count_1 0b01 00db | | Load_Top At_Offset_3 0b02 0092 19e0 | | Action Push_String_Extended,0x19e0 ; " Ada objects\x5c" 0b04 0092 19e1 | | Action Push_String_Extended,0x19e1 ; " Ada object\x5c" 0b06 00ea | | Load_Encached Null_String_Cache 0b07 e409 | | Load 0x2,0x9 0b08 8413 | | Call 0x2,0x13 0b09 00d1 | | Pop_Control Pop_Count_1 0b0a 00db | | Load_Top At_Offset_3 0b0b 0092 19e2 | | Action Push_String_Extended,0x19e2 ; " Directories\x5c" 0b0d 0092 19e3 | | Action Push_String_Extended,0x19e3 ; " Directory\x5c" 0b0f 00ea | | Load_Encached Null_String_Cache 0b10 e40b | | Load 0x2,0xb 0b11 8413 | | Call 0x2,0x13 0b12 00d1 | | Pop_Control Pop_Count_1 0b13 00db | | Load_Top At_Offset_3 0b14 0092 19e4 | | Action Push_String_Extended,0x19e4 ; " Libraries\x5c" 0b16 0092 19e5 | | Action Push_String_Extended,0x19e5 ; " Library\x5c" 0b18 00ea | | Load_Encached Null_String_Cache 0b19 e40e | | Load 0x2,0xe 0b1a 8413 | | Call 0x2,0x13 0b1b 00d1 | | Pop_Control Pop_Count_1 0b1c 00db | | Load_Top At_Offset_3 0b1d 0092 19e6 | | Action Push_String_Extended,0x19e6 ; " Views\x5c" 0b1f 0092 19e7 | | Action Push_String_Extended,0x19e7 ; " View\x5c" 0b21 00ea | | Load_Encached Null_String_Cache 0b22 e40c | | Load 0x2,0xc 0b23 8413 | | Call 0x2,0x13 0b24 00d1 | | Pop_Control Pop_Count_1 0b25 00db | | Load_Top At_Offset_3 0b26 0092 19e8 | | Action Push_String_Extended,0x19e8 ; " Subsystems\x5c" 0b28 0092 19e9 | | Action Push_String_Extended,0x19e9 ; " Subsystem\x5c" 0b2a 00ea | | Load_Encached Null_String_Cache 0b2b e40d | | Load 0x2,0xd 0b2c 8413 | | Call 0x2,0x13 0b2d 00d1 | | Pop_Control Pop_Count_1 0b2e 00db | | Load_Top At_Offset_3 0b2f 0092 19ea | | Action Push_String_Extended,0x19ea ; " miscellaneous objects\x5c" 0b31 0092 19eb | | Action Push_String_Extended,0x19eb ; " miscellaneous object\x5c" 0b33 00ea | | Load_Encached Null_String_Cache 0b34 e40f | | Load 0x2,0xf 0b35 8413 | | Call 0x2,0x13 0b36 00d1 | | Pop_Control Pop_Count_1 0b37 00db | | Load_Top At_Offset_3 0b38 0092 19ec | | Action Push_String_Extended,0x19ec ; "\x5c Delete?" 0b3a e014 | | Load 0x0,0x14 0b3b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0b3c 00d1 | | Pop_Control Pop_Count_1 0b3d e5ff | | Load 0x2,-0x1 0b3e 0092 19ed | | Action Push_String_Extended,0x19ed ; "Deleting \x5c" 0b40 e5ff | | Load 0x2,-0x1 0b41 8414 | | Call 0x2,0x14 0b42 01cc | | Execute Vector,Catenate 0b43 e411 | | Load 0x2,0x11 0b44 e014 | | Load 0x0,0x14 0b45 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0b46 01cc | | Execute Vector,Catenate 0b47 0092 19ee | | Action Push_String_Extended,0x19ee ; "Delete File Confirmation" 0b49 6006 |` | Indirect_Literal Discrete,0xb50,{0x00000000, 0x00001c5d} 0b4a e002 | | Load 0x0,0x2 0b4b 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0b4c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0b4d e5ff | | Load 0x2,-0x1 0b4e 8244 | D | Call 0x1,0x44 0b4f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0b50 0000 0000 | | .LITERAL {0x00000000, 0x00001c5d} 0b54 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0b58 ; -------------------------------------------------------------------------------------- 0b58 ; SUBPROGRAM 0b58 ; -------------------------------------------------------------------------------------- 0b58 0b7b | { | .CONST 0x0b7b ; Address of begin 0b59 0004 | | .CONST 0x0004 ; Address of exception handler 0b5a 000d | | .CONST 0x000d ; Number of locals 0b5b INIT_0b58: 0b5b e00f | | Load 0x0,0xf 0b5c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b5d 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0b5e 02c7 | | Declare_Variable Any 0b5f 00d8 | | Load_Top At_Offset_0 0b60 1c00 | | Execute_Immediate Run_Utility,0x0 0b61 e00f | | Load 0x0,0xf 0b62 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b63 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b64 e00f | | Load 0x0,0xf 0b65 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0b66 e00f | | Load 0x0,0xf 0b67 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b68 02c7 | | Declare_Variable Any 0b69 00d8 | | Load_Top At_Offset_0 0b6a 1c00 | | Execute_Immediate Run_Utility,0x0 0b6b e001 | | Load 0x0,0x1 0b6c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0b6d e001 | | Load 0x0,0x1 0b6e 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0b6f 029f 12d3 | | Declare_Subprogram INIT_12d0,For_Call 0b71 029f 12f3 | | Declare_Subprogram INIT_12f0,For_Call 0b73 029f 1353 | S| Declare_Subprogram INIT_1350,For_Call 0b75 029f 13b3 | | Declare_Subprogram INIT_13b0,For_Call 0b77 029f 142b | +| Declare_Subprogram INIT_1428,For_Call 0b79 029f 1493 | | Declare_Subprogram INIT_1490,For_Call 0b7b BODY_0b58: 0b7b e5ff | | Load 0x2,-0x1 0b7c 01db | | Execute Vector,Length 0b7d 701b |p | Jump_Nonzero 0xb99 0b7e e00f | | Load 0x0,0xf 0b7f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b80 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b81 e402 | | Load 0x2,0x2 0b82 67d1 |g | Indirect_Literal Discrete,0xb54,{0x00000000, 0x00004000} 0b83 e010 | | Load 0x0,0x10 0b84 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0b85 e011 | | Load 0x0,0x11 0b86 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0b87 e012 | | Load 0x0,0x12 0b88 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0b89 4801 |H | Short_Literal 0x1 0b8a 4800 |H | Short_Literal 0x0 0b8b e011 | | Load 0x0,0x11 0b8c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0b8d e00f | | Load 0x0,0xf 0b8e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b8f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0b90 e5ff | | Load 0x2,-0x1 0b91 e001 | | Load 0x0,0x1 0b92 180f | | Execute Package,Field_Execute,Field_Number 0xf 0b93 e00f | | Load 0x0,0xf 0b94 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b95 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0b96 c402 | | Store 0x2,0x2 0b97 c403 | | Store 0x2,0x3 0b98 7818 |x | Jump 0xbb1 0b99 e00f | | Load 0x0,0xf 0b9a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0b9b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0b9c e402 | | Load 0x2,0x2 0b9d 67b6 |g | Indirect_Literal Discrete,0xb54,{0x00000000, 0x00004000} 0b9e e010 | | Load 0x0,0x10 0b9f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0ba0 e011 | | Load 0x0,0x11 0ba1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0ba2 e012 | | Load 0x0,0x12 0ba3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0ba4 4801 |H | Short_Literal 0x1 0ba5 4800 |H | Short_Literal 0x0 0ba6 e011 | | Load 0x0,0x11 0ba7 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0ba8 e00f | | Load 0x0,0xf 0ba9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0baa 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0bab e5ff | | Load 0x2,-0x1 0bac e00f | | Load 0x0,0xf 0bad 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0bae 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0baf c402 | | Store 0x2,0x2 0bb0 c403 | | Store 0x2,0x3 0bb1 e403 | | Load 0x2,0x3 0bb2 680c |h | Jump_Zero 0xbbf 0bb3 0092 19da | | Action Push_String_Extended,0x19da ; "Error resolving name: " 0bb5 e403 | | Load 0x2,0x3 0bb6 e00f | | Load 0x0,0xf 0bb7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0bb8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0bb9 011c | | Execute Any,Convert_Unchecked 0bba 1c01 | | Execute_Immediate Run_Utility,0x1 0bbb 01cc | | Execute Vector,Catenate 0bbc e004 | | Load 0x0,0x4 0bbd 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 0bbe 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0bbf 00cf | | Action Mark_Auxiliary 0bc0 781a |x | Jump 0xbdb 0bc1 e00f | | Load 0x0,0xf 0bc2 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0bc3 e405 | | Load 0x2,0x5 0bc4 0120 | | Execute Any,Is_Value 0bc5 6803 |h | Jump_Zero 0xbc9 0bc6 e00f | | Load 0x0,0xf 0bc7 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0bc8 7801 |x | Jump 0xbca 0bc9 e405 | | Load 0x2,0x5 0bca e402 | | Load 0x2,0x2 0bcb e00f | | Load 0x0,0xf 0bcc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0bcd 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0bce c405 | | Store 0x2,0x5 0bcf c404 | | Store 0x2,0x4 0bd0 e404 | | Load 0x2,0x4 0bd1 6801 |h | Jump_Zero 0xbd3 0bd2 780d |x | Jump 0xbe0 0bd3 e405 | | Load 0x2,0x5 0bd4 8261 | a | Call 0x1,0x61 0bd5 a406 | | Store_Unchecked 0x2,0x6 0bd6 e406 | | Load 0x2,0x6 0bd7 7001 |p | Jump_Nonzero 0xbd9 0bd8 7807 |x | Jump 0xbe0 0bd9 840d | | Call 0x2,0xd 0bda 00c9 | | Action Pop_Auxiliary_Loop 0bdb e402 | | Load 0x2,0x2 0bdc e00f | | Load 0x0,0xf 0bdd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0bde 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0bdf 6fe1 |o | Jump_Zero 0xbc1 0be0 00ce | | Action Pop_Auxiliary 0be1 e402 | | Load 0x2,0x2 0be2 e00f | | Load 0x0,0xf 0be3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0be4 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 0be5 c402 | | Store 0x2,0x2 0be6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0be7 0000 | | .XXX[0x1] 0be8 ; -------------------------------------------------------------------------------------- 0be8 ; SUBPROGRAM 0be8 ; -------------------------------------------------------------------------------------- 0be8 0bed | | .CONST 0x0bed ; Address of begin 0be9 0004 | | .CONST 0x0004 ; Address of exception handler 0bea 0002 | | .CONST 0x0002 ; Number of locals 0beb INIT_0be8: 0beb 029f 153b | ;| Declare_Subprogram INIT_1538,For_Call 0bed BODY_0be8: 0bed 8402 | | Call 0x2,0x2 0bee 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0bef 0000 | | .XXX[0x1] 0bf0 ; -------------------------------------------------------------------------------------- 0bf0 ; SUBPROGRAM 0bf0 ; -------------------------------------------------------------------------------------- 0bf0 0bf5 | | .CONST 0x0bf5 ; Address of begin 0bf1 0004 | | .CONST 0x0004 ; Address of exception handler 0bf2 0002 | | .CONST 0x0002 ; Number of locals 0bf3 INIT_0bf0: 0bf3 029f 158b | | Declare_Subprogram INIT_1588,For_Call 0bf5 BODY_0bf0: 0bf5 e5fd | | Load 0x2,-0x3 0bf6 01db | | Execute Vector,Length 0bf7 700c |p | Jump_Nonzero 0xc04 0bf8 e5fe | | Load 0x2,-0x2 0bf9 6802 |h | Jump_Zero 0xbfc 0bfa 8402 | | Call 0x2,0x2 0bfb 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0bfc 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 0bfe 0092 19ef | | Action Push_String_Extended,0x19ef ; "$" 0c00 e5ff | | Load 0x2,-0x1 0c01 e018 | | Load 0x0,0x18 0c02 180f | | Execute Package,Field_Execute,Field_Number 0xf 0c03 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0c04 e5fe | | Load 0x2,-0x2 0c05 6804 |h | Jump_Zero 0xc0a 0c06 0092 19f0 | | Action Push_String_Extended,0x19f0 ; "Cannot debug on another machine; will run without debug." 0c08 e004 | | Load 0x0,0x4 0c09 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 0c0a 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 0c0c 00ea | | Load_Encached Null_String_Cache 0c0d 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 0c0f 0092 19ef | | Action Push_String_Extended,0x19ef ; "$" 0c11 e5ff | | Load 0x2,-0x1 0c12 e5fd | | Load 0x2,-0x3 0c13 e019 | | Load 0x0,0x19 0c14 180d | | Execute Package,Field_Execute,Field_Number 0xd 0c15 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0c16 0000 0000 | | .XXX[0x2] 0c18 ; -------------------------------------------------------------------------------------- 0c18 ; SUBPROGRAM 0c18 ; -------------------------------------------------------------------------------------- 0c18 0c2d | - | .CONST 0x0c2d ; Address of begin 0c19 0004 | | .CONST 0x0004 ; Address of exception handler 0c1a 0006 | | .CONST 0x0006 ; Number of locals 0c1b INIT_0c18: 0c1b e01a | | Load 0x0,0x1a 0c1c 1b7e | ~ | Execute Package,Field_Read,Field_Number 0x7e 0c1d 02c7 | | Declare_Variable Any 0c1e 00d8 | | Load_Top At_Offset_0 0c1f 1c00 | | Execute_Immediate Run_Utility,0x0 0c20 e01a | | Load 0x0,0x1a 0c21 1b36 | 6 | Execute Package,Field_Read,Field_Number 0x36 0c22 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0c23 00e3 | | Load_Encached Natural_Cache 0c24 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0c25 600a |` | Indirect_Literal Discrete,0xc30,{0x00000000, 0x00000800} 0c26 e014 | | Load 0x0,0x14 0c27 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0c28 1c08 | | Execute_Immediate Run_Utility,0x8 0c29 00d8 | | Load_Top At_Offset_0 0c2a 1c00 | | Execute_Immediate Run_Utility,0x0 0c2b e01b | | Load 0x0,0x1b 0c2c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0c2d BODY_0c18: 0c2d 00be | | Action Activate_Tasks 0c2e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0c2f 0000 | | .XXX[0x1] 0c30 0000 0000 | | .LITERAL {0x00000000, 0x00000800} 0c34 0000 0000 | | .BLANK 0000[0x4] 0c38 ; -------------------------------------------------------------------------------------- 0c38 ; SUBPROGRAM 0c38 ; -------------------------------------------------------------------------------------- 0c38 0c41 | A | .CONST 0x0c41 ; Address of begin 0c39 0004 | | .CONST 0x0004 ; Address of exception handler 0c3a 0003 | | .CONST 0x0003 ; Number of locals 0c3b INIT_0c38: 0c3b e01c | | Load 0x0,0x1c 0c3c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0c3d 02ff | | Declare_Variable Variant_Record 0c3e 00d8 | | Load_Top At_Offset_0 0c3f 1c00 | | Execute_Immediate Run_Utility,0x0 0c40 00e1 | | Load_Encached Boolean_Cache 0c41 BODY_0c38: 0c41 4801 |H | Short_Literal 0x1 0c42 e5ff | | Load 0x2,-0x1 0c43 0092 19f1 | | Action Push_String_Extended,0x19f1 ; "true" 0c45 e00b | | Load 0x0,0xb 0c46 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0c47 6819 |h | Jump_Zero 0xc61 0c48 e011 | | Load 0x0,0x11 0c49 180e | | Execute Package,Field_Execute,Field_Number 0xe 0c4a e01a | | Load 0x0,0x1a 0c4b 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 0c4c e01a | | Load 0x0,0x1a 0c4d 1874 | t | Execute Package,Field_Execute,Field_Number 0x74 0c4e e01c | | Load 0x0,0x1c 0c4f 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0c50 00da | | Load_Top At_Offset_2 0c51 016d | m | Execute Variant_Record,Structure_Write 0c52 00e1 | | Load_Encached Boolean_Cache 0c53 00da | | Load_Top At_Offset_2 0c54 801d | | Call 0x0,0x1d 0c55 0059 | Y | Store_Top Discrete,At_Offset_1 0c56 00d8 | | Load_Top At_Offset_0 0c57 6804 |h | Jump_Zero 0xc5c 0c58 4801 |H | Short_Literal 0x1 0c59 e016 | | Load 0x0,0x16 0c5a 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0c5b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0c5c 0092 19f2 | | Action Push_String_Extended,0x19f2 ; "Unable to commit buffers. Session not logged off" 0c5e e004 | | Load 0x0,0x4 0c5f 1860 | ` | Execute Package,Field_Execute,Field_Number 0x60 0c60 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0c61 4801 |H | Short_Literal 0x1 0c62 e016 | | Load 0x0,0x16 0c63 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0c64 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0c65 0000 0000 | | .XXX[0x3] 0c67 0000 | | 0c68 ; -------------------------------------------------------------------------------------- 0c68 ; SUBPROGRAM 0c68 ; -------------------------------------------------------------------------------------- 0c68 0c7d | } | .CONST 0x0c7d ; Address of begin 0c69 0004 | | .CONST 0x0004 ; Address of exception handler 0c6a 0006 | | .CONST 0x0006 ; Number of locals 0c6b INIT_0c68: 0c6b e01a | | Load 0x0,0x1a 0c6c 1b7e | ~ | Execute Package,Field_Read,Field_Number 0x7e 0c6d 02c7 | | Declare_Variable Any 0c6e 00d8 | | Load_Top At_Offset_0 0c6f 1c00 | | Execute_Immediate Run_Utility,0x0 0c70 e01a | | Load 0x0,0x1a 0c71 1b36 | 6 | Execute Package,Field_Read,Field_Number 0x36 0c72 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0c73 00e3 | | Load_Encached Natural_Cache 0c74 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0c75 6076 |`v | Indirect_Literal Discrete,0xcec,{0x00000000, 0x00000800} 0c76 e014 | | Load 0x0,0x14 0c77 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0c78 1c08 | | Execute_Immediate Run_Utility,0x8 0c79 00d8 | | Load_Top At_Offset_0 0c7a 1c00 | | Execute_Immediate Run_Utility,0x0 0c7b e01b | | Load 0x0,0x1b 0c7c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0c7d BODY_0c68: 0c7d 00be | | Action Activate_Tasks 0c7e e402 | | Load 0x2,0x2 0c7f e011 | | Load 0x0,0x11 0c80 180e | | Execute Package,Field_Execute,Field_Number 0xe 0c81 e01a | | Load 0x0,0x1a 0c82 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 0c83 e01a | | Load 0x0,0x1a 0c84 187f | | Execute Package,Field_Execute,Field_Number 0x7f 0c85 c402 | | Store 0x2,0x2 0c86 00cf | | Action Mark_Auxiliary 0c87 783b |x; | Jump 0xcc3 0c88 e402 | | Load 0x2,0x2 0c89 e01a | | Load 0x0,0x1a 0c8a 1881 | | Execute Package,Field_Execute,Field_Number 0x81 0c8b e01a | | Load 0x0,0x1a 0c8c 1b36 | 6 | Execute Package,Field_Read,Field_Number 0x36 0c8d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0c8e a403 | | Store_Unchecked 0x2,0x3 0c8f e403 | | Load 0x2,0x3 0c90 4801 |H | Short_Literal 0x1 0c91 4802 |H | Short_Literal 0x2 0c92 0262 | b | Execute Discrete,In_Range 0c93 7001 |p | Jump_Nonzero 0xc95 0c94 7829 |x) | Jump 0xcbe 0c95 00db | | Load_Top At_Offset_3 0c96 0a01 | | Execute_Immediate Plus,0x1 0c97 c404 | | Store 0x2,0x4 0c98 00da | | Load_Top At_Offset_2 0c99 e402 | | Load 0x2,0x2 0c9a e01a | | Load 0x0,0x1a 0c9b 1881 | | Execute Package,Field_Execute,Field_Number 0x81 0c9c e01a | | Load 0x0,0x1a 0c9d 1b36 | 6 | Execute Package,Field_Read,Field_Number 0x36 0c9e 180d | | Execute Package,Field_Execute,Field_Number 0xd 0c9f 0092 19f3 | | Action Push_String_Extended,0x19f3 ; " \x5c" 0ca1 01cc | | Execute Vector,Catenate 0ca2 e014 | | Load 0x0,0x14 0ca3 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0ca4 00d1 | | Pop_Control Pop_Count_1 0ca5 00db | | Load_Top At_Offset_3 0ca6 0d04 | | Execute_Immediate Less,0x4 0ca7 6816 |h | Jump_Zero 0xcbe 0ca8 e01b | | Load 0x0,0x1b 0ca9 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0caa e011 | | Load 0x0,0x11 0cab 180e | | Execute Package,Field_Execute,Field_Number 0xe 0cac 4800 |H | Short_Literal 0x0 0cad 4800 |H | Short_Literal 0x0 0cae 4801 |H | Short_Literal 0x1 0caf e01e | | Load 0x0,0x1e 0cb0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0cb1 e011 | | Load 0x0,0x11 0cb2 180e | | Execute Package,Field_Execute,Field_Number 0xe 0cb3 e01b | | Load 0x0,0x1b 0cb4 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0cb5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0cb6 e402 | | Load 0x2,0x2 0cb7 e01a | | Load 0x0,0x1a 0cb8 1881 | | Execute Package,Field_Execute,Field_Number 0x81 0cb9 e01b | | Load 0x0,0x1b 0cba 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0cbb e01b | | Load 0x0,0x1b 0cbc 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0cbd 005a | Z | Store_Top Discrete,At_Offset_2 0cbe e402 | | Load 0x2,0x2 0cbf e01a | | Load 0x0,0x1a 0cc0 1880 | | Execute Package,Field_Execute,Field_Number 0x80 0cc1 c402 | | Store 0x2,0x2 0cc2 00c9 | | Action Pop_Auxiliary_Loop 0cc3 e402 | | Load 0x2,0x2 0cc4 e01a | | Load 0x0,0x1a 0cc5 1882 | | Execute Package,Field_Execute,Field_Number 0x82 0cc6 6fc1 |o | Jump_Zero 0xc88 0cc7 00ce | | Action Pop_Auxiliary 0cc8 00da | | Load_Top At_Offset_2 0cc9 7008 |p | Jump_Nonzero 0xcd2 0cca 0092 19f4 | | Action Push_String_Extended,0x19f4 ; "\x1b]63;\x07" 0ccc e01f | | Load 0x0,0x1f 0ccd 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0cce 4800 |H | Short_Literal 0x0 0ccf e016 | | Load 0x0,0x16 0cd0 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0cd1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0cd2 00ea | | Load_Encached Null_String_Cache 0cd3 00ea | | Load_Encached Null_String_Cache 0cd4 00ea | | Load_Encached Null_String_Cache 0cd5 00ea | | Load_Encached Null_String_Cache 0cd6 00ea | | Load_Encached Null_String_Cache 0cd7 00ea | | Load_Encached Null_String_Cache 0cd8 00ea | | Load_Encached Null_String_Cache 0cd9 0092 19f5 | | Action Push_String_Extended,0x19f5 ; "The following buffer(s) are modified:\x5c" 0cdb e405 | | Load 0x2,0x5 0cdc e014 | | Load 0x0,0x14 0cdd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0cde 01cc | | Execute Vector,Catenate 0cdf 0092 19f6 | | Action Push_String_Extended,0x19f6 ; "Quit anyway?" 0ce1 01cc | | Execute Vector,Catenate 0ce2 6005 |` | Indirect_Literal Discrete,0xce8,{0x00000000, 0x00001c71} 0ce3 4842 |HB | Short_Literal 0x42 0ce4 e002 | | Load 0x0,0x2 0ce5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0ce6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ce7 0000 | | .XXX[0x1] 0ce8 0000 0000 | | .LITERAL {0x00000000, 0x00001c71} 0cec 0000 0000 | | .LITERAL {0x00000000, 0x00000800} 0cf0 ; -------------------------------------------------------------------------------------- 0cf0 ; SUBPROGRAM 0cf0 ; -------------------------------------------------------------------------------------- 0cf0 0cf9 | | .CONST 0x0cf9 ; Address of begin 0cf1 0004 | | .CONST 0x0004 ; Address of exception handler 0cf2 0003 | | .CONST 0x0003 ; Number of locals 0cf3 INIT_0cf0: 0cf3 e01c | | Load 0x0,0x1c 0cf4 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0cf5 02ff | | Declare_Variable Variant_Record 0cf6 00d8 | | Load_Top At_Offset_0 0cf7 1c00 | | Execute_Immediate Run_Utility,0x0 0cf8 00e1 | | Load_Encached Boolean_Cache 0cf9 BODY_0cf0: 0cf9 4801 |H | Short_Literal 0x1 0cfa e5ff | | Load 0x2,-0x1 0cfb 0092 19f1 | | Action Push_String_Extended,0x19f1 ; "true" 0cfd e00b | | Load 0x0,0xb 0cfe 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0cff 681d |h | Jump_Zero 0xd1d 0d00 e011 | | Load 0x0,0x11 0d01 180e | | Execute Package,Field_Execute,Field_Number 0xe 0d02 e01a | | Load 0x0,0x1a 0d03 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37 0d04 e01a | | Load 0x0,0x1a 0d05 1874 | t | Execute Package,Field_Execute,Field_Number 0x74 0d06 e01c | | Load 0x0,0x1c 0d07 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0d08 00da | | Load_Top At_Offset_2 0d09 016d | m | Execute Variant_Record,Structure_Write 0d0a 00e1 | | Load_Encached Boolean_Cache 0d0b 00da | | Load_Top At_Offset_2 0d0c 801d | | Call 0x0,0x1d 0d0d 0059 | Y | Store_Top Discrete,At_Offset_1 0d0e 00d8 | | Load_Top At_Offset_0 0d0f 6808 |h | Jump_Zero 0xd18 0d10 0092 19f4 | | Action Push_String_Extended,0x19f4 ; "\x1b]63;\x07" 0d12 e01f | | Load 0x0,0x1f 0d13 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0d14 4801 |H | Short_Literal 0x1 0d15 e016 | | Load 0x0,0x16 0d16 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0d17 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d18 0092 19f2 | | Action Push_String_Extended,0x19f2 ; "Unable to commit buffers. Session not logged off" 0d1a e004 | | Load 0x0,0x4 0d1b 1860 | ` | Execute Package,Field_Execute,Field_Number 0x60 0d1c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d1d 0092 19f4 | | Action Push_String_Extended,0x19f4 ; "\x1b]63;\x07" 0d1f e01f | | Load 0x0,0x1f 0d20 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0d21 4801 |H | Short_Literal 0x1 0d22 e016 | | Load 0x0,0x16 0d23 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0d24 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d25 0000 0000 | | .XXX[0x3] 0d27 0000 | | 0d28 ; -------------------------------------------------------------------------------------- 0d28 ; SUBPROGRAM 0d28 ; -------------------------------------------------------------------------------------- 0d28 0d2b | + | .CONST 0x0d2b ; Address of begin 0d29 0004 | | .CONST 0x0004 ; Address of exception handler 0d2a 0001 | | .CONST 0x0001 ; Number of locals 0d2b BODY_0d28: 0d2b INIT_0d28: 0d2b 00da | | Load_Top At_Offset_2 0d2c e004 | | Load 0x0,0x4 0d2d 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0d2e e004 | | Load 0x0,0x4 0d2f 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 0d30 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d31 0000 0000 | | .BLANK 0000[0x7] 0d38 ; -------------------------------------------------------------------------------------- 0d38 ; SUBPROGRAM 0d38 ; -------------------------------------------------------------------------------------- 0d38 0d43 | C | .CONST 0x0d43 ; Address of begin 0d39 0004 | | .CONST 0x0004 ; Address of exception handler 0d3a 0003 | | .CONST 0x0003 ; Number of locals 0d3b INIT_0d38: 0d3b e00f | | Load 0x0,0xf 0d3c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0d3d 02ff | | Declare_Variable Variant_Record 0d3e 00d8 | | Load_Top At_Offset_0 0d3f 1c00 | | Execute_Immediate Run_Utility,0x0 0d40 e00f | | Load 0x0,0xf 0d41 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0d42 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0d43 BODY_0d38: 0d43 e00f | | Load 0x0,0xf 0d44 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0d45 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0d46 00da | | Load_Top At_Offset_2 0d47 6030 |`0 | Indirect_Literal Discrete,0xd78,{0x00000000, 0x00004000} 0d48 e010 | | Load 0x0,0x10 0d49 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0d4a 4800 |H | Short_Literal 0x0 0d4b e011 | | Load 0x0,0x11 0d4c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0d4d e00f | | Load 0x0,0xf 0d4e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0d4f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0d50 e5ff | | Load 0x2,-0x1 0d51 e00f | | Load 0x0,0xf 0d52 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0d53 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0d54 00d1 | | Pop_Control Pop_Count_1 0d55 0059 | Y | Store_Top Discrete,At_Offset_1 0d56 00d8 | | Load_Top At_Offset_0 0d57 6816 |h | Jump_Zero 0xd6e 0d58 601f |` | Indirect_Literal Discrete,0xd78,{0x00000000, 0x00004000} 0d59 e010 | | Load 0x0,0x10 0d5a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0d5b e011 | | Load 0x0,0x11 0d5c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0d5d e012 | | Load 0x0,0x12 0d5e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0d5f 4801 |H | Short_Literal 0x1 0d60 4800 |H | Short_Literal 0x0 0d61 e011 | | Load 0x0,0x11 0d62 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0d63 e00f | | Load 0x0,0xf 0d64 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0d65 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0d66 e5ff | | Load 0x2,-0x1 0d67 e403 | | Load 0x2,0x3 0d68 e00f | | Load 0x0,0xf 0d69 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0d6a 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 0d6b e004 | | Load 0x0,0x4 0d6c 1865 | e | Execute Package,Field_Execute,Field_Number 0x65 0d6d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d6e 00d9 | | Load_Top At_Offset_1 0d6f e011 | | Load 0x0,0x11 0d70 180e | | Execute Package,Field_Execute,Field_Number 0xe 0d71 4800 |H | Short_Literal 0x0 0d72 4800 |H | Short_Literal 0x0 0d73 e020 | | Load 0x0,0x20 0d74 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0d75 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0d76 0000 0000 | | .XXX[0x2] 0d78 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0d7c 0000 0000 | | .BLANK 0000[0x4] 0d80 ; -------------------------------------------------------------------------------------- 0d80 ; SUBPROGRAM 0d80 ; -------------------------------------------------------------------------------------- 0d80 0d91 | | .CONST 0x0d91 ; Address of begin 0d81 0004 | | .CONST 0x0004 ; Address of exception handler 0d82 0002 | | .CONST 0x0002 ; Number of locals 0d83 INIT_0d80: 0d83 4801 |H | Short_Literal 0x1 0d84 00db | | Load_Top At_Offset_3 0d85 01db | | Execute Vector,Length 0d86 00d8 | | Load_Top At_Offset_0 0d87 00e2 | | Load_Encached Integer_Cache 0d88 0260 | ` | Execute Discrete,In_Type 0d89 7001 |p | Jump_Nonzero 0xd8b 0d8a 0801 | | Execute_Immediate Raise,0x1 0d8b 00e9 | | Load_Encached String_Cache 0d8c 035b | [ | Declare_Type Array,Constrained 0d8d 0337 | 7 | Declare_Variable Array 0d8e 00db | | Load_Top At_Offset_3 0d8f 00d9 | | Load_Top At_Offset_1 0d90 01d4 | | Execute Vector,Structure_Write 0d91 BODY_0d80: 0d91 00cf | | Action Mark_Auxiliary 0d92 e5ff | | Load 0x2,-0x1 0d93 01dc | | Execute Vector,Last 0d94 e5ff | | Load 0x2,-0x1 0d95 01dd | | Execute Vector,First 0d96 0263 | c | Execute Discrete,Above_Bound 0d97 700b |p | Jump_Nonzero 0xda3 0d98 00d8 | | Load_Top At_Offset_0 0d99 e402 | | Load 0x2,0x2 0d9a 01d7 | | Execute Vector,Field_Read 0d9b 0f5c | \ | Execute_Immediate Equal,0x5c 0d9c 6804 |h | Jump_Zero 0xda1 0d9d 480a |H | Short_Literal 0xa 0d9e 00d9 | | Load_Top At_Offset_1 0d9f e402 | | Load 0x2,0x2 0da0 01d6 | | Execute Vector,Field_Write 0da1 00c8 | | Action Pop_Auxiliary_Range 0da2 3ff5 |? | Loop_Increasing 0xd98 0da3 00ce | | Action Pop_Auxiliary 0da4 00d8 | | Load_Top At_Offset_0 0da5 00e9 | | Load_Encached String_Cache 0da6 01c6 | | Execute Vector,Convert_To_Formal 0da7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0da8 ; -------------------------------------------------------------------------------------- 0da8 ; SUBPROGRAM 0da8 ; -------------------------------------------------------------------------------------- 0da8 0dc3 | | .CONST 0x0dc3 ; Address of begin 0da9 0004 | | .CONST 0x0004 ; Address of exception handler 0daa 0007 | | .CONST 0x0007 ; Number of locals 0dab INIT_0da8: 0dab 4be8 |K | Short_Literal 0x3e8 0dac e014 | | Load 0x0,0x14 0dad 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0dae 1c08 | | Execute_Immediate Run_Utility,0x8 0daf 00d8 | | Load_Top At_Offset_0 0db0 1c00 | | Execute_Immediate Run_Utility,0x0 0db1 4be8 |K | Short_Literal 0x3e8 0db2 e014 | | Load 0x0,0x14 0db3 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0db4 1c08 | | Execute_Immediate Run_Utility,0x8 0db5 00d8 | | Load_Top At_Offset_0 0db6 1c00 | | Execute_Immediate Run_Utility,0x0 0db7 48c8 |H | Short_Literal 0xc8 0db8 e014 | | Load 0x0,0x14 0db9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0dba 1c08 | | Execute_Immediate Run_Utility,0x8 0dbb 00d8 | | Load_Top At_Offset_0 0dbc 1c00 | | Execute_Immediate Run_Utility,0x0 0dbd 00e3 | | Load_Encached Natural_Cache 0dbe 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0dbf 029f 15ab | | Declare_Subprogram INIT_15a8,For_Call 0dc1 029f 15d3 | | Declare_Subprogram INIT_15d0,For_Call 0dc3 BODY_0da8: 0dc3 8406 | | Call 0x2,0x6 0dc4 e402 | | Load 0x2,0x2 0dc5 e014 | | Load 0x0,0x14 0dc6 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0dc7 0c02 | | Execute_Immediate Greater_Equal,0x2 0dc8 6811 |h | Jump_Zero 0xdda 0dc9 e403 | | Load 0x2,0x3 0dca e402 | | Load 0x2,0x2 0dcb e014 | | Load 0x0,0x14 0dcc 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0dcd 0aff | | Execute_Immediate Plus,-0x1 0dce 00d8 | | Load_Top At_Offset_0 0dcf 00e3 | | Load_Encached Natural_Cache 0dd0 0260 | ` | Execute Discrete,In_Type 0dd1 7001 |p | Jump_Nonzero 0xdd3 0dd2 0801 | | Execute_Immediate Raise,0x1 0dd3 4801 |H | Short_Literal 0x1 0dd4 e402 | | Load 0x2,0x2 0dd5 e014 | | Load 0x0,0x14 0dd6 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0dd7 e014 | | Load 0x0,0x14 0dd8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0dd9 00d1 | | Pop_Control Pop_Count_1 0dda 00ea | | Load_Encached Null_String_Cache 0ddb 00ea | | Load_Encached Null_String_Cache 0ddc 00ea | | Load_Encached Null_String_Cache 0ddd e5ff | | Load 0x2,-0x1 0dde e404 | | Load 0x2,0x4 0ddf e014 | | Load 0x0,0x14 0de0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0de1 4820 |H | Short_Literal 0x20 0de2 4800 |H | Short_Literal 0x0 0de3 480a |H | Short_Literal 0xa 0de4 e405 | | Load 0x2,0x5 0de5 e00b | | Load 0x0,0xb 0de6 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0de7 e403 | | Load 0x2,0x3 0de8 e014 | | Load 0x0,0x14 0de9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0dea 8407 | | Call 0x2,0x7 0deb 4ad2 |J | Short_Literal 0x2d2 0dec 4817 |H | Short_Literal 0x17 0ded e002 | | Load 0x0,0x2 0dee 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0def 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0df0 ; -------------------------------------------------------------------------------------- 0df0 ; SUBPROGRAM 0df0 ; -------------------------------------------------------------------------------------- 0df0 0df3 | | .CONST 0x0df3 ; Address of begin 0df1 0df7 | | .CONST 0x0df7 ; Address of exception handler 0df2 0001 | | .CONST 0x0001 ; Number of locals 0df3 BODY_0df0: 0df3 INIT_0df0: 0df3 00da | | Load_Top At_Offset_2 0df4 e001 | | Load 0x0,0x1 0df5 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0df6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0df7 TRAP_0df0: 0df7 0007 | | Action Break_Optional 0df8 4800 |H | Short_Literal 0x0 0df9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0dfa 0000 0000 | | .BLANK 0000[0x6] 0e00 ; -------------------------------------------------------------------------------------- 0e00 ; SUBPROGRAM 0e00 ; -------------------------------------------------------------------------------------- 0e00 0e03 | | .CONST 0x0e03 ; Address of begin 0e01 0e07 | | .CONST 0x0e07 ; Address of exception handler 0e02 0001 | | .CONST 0x0001 ; Number of locals 0e03 BODY_0e00: 0e03 INIT_0e00: 0e03 00da | | Load_Top At_Offset_2 0e04 e001 | | Load 0x0,0x1 0e05 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0e06 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0e07 TRAP_0e00: 0e07 0007 | | Action Break_Optional 0e08 4800 |H | Short_Literal 0x0 0e09 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0e0a 0000 0000 | | .BLANK 0000[0x6] 0e10 ; -------------------------------------------------------------------------------------- 0e10 ; SUBPROGRAM 0e10 ; -------------------------------------------------------------------------------------- 0e10 0e1b | | .CONST 0x0e1b ; Address of begin 0e11 0004 | | .CONST 0x0004 ; Address of exception handler 0e12 0003 | | .CONST 0x0003 ; Number of locals 0e13 INIT_0e10: 0e13 e00f | | Load 0x0,0xf 0e14 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0e15 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0e16 02c7 | | Declare_Variable Any 0e17 00d8 | | Load_Top At_Offset_0 0e18 1c00 | | Execute_Immediate Run_Utility,0x0 0e19 e00f | | Load 0x0,0xf 0e1a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0e1b BODY_0e10: 0e1b e00f | | Load 0x0,0xf 0e1c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0e1d 00da | | Load_Top At_Offset_2 0e1e 0120 | | Execute Any,Is_Value 0e1f 6804 |h | Jump_Zero 0xe24 0e20 e00f | | Load 0x0,0xf 0e21 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0e22 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0e23 7801 |x | Jump 0xe25 0e24 00da | | Load_Top At_Offset_2 0e25 600e |` | Indirect_Literal Discrete,0xe34,{0x00000000, 0x00004000} 0e26 e010 | | Load 0x0,0x10 0e27 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0e28 4800 |H | Short_Literal 0x0 0e29 e5ff | | Load 0x2,-0x1 0e2a e00f | | Load 0x0,0xf 0e2b 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0e2c 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0e2d c402 | | Store 0x2,0x2 0e2e 0059 | Y | Store_Top Discrete,At_Offset_1 0e2f 00d9 | | Load_Top At_Offset_1 0e30 e00f | | Load 0x0,0xf 0e31 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0e32 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0e33 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0e34 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0e38 ; -------------------------------------------------------------------------------------- 0e38 ; SUBPROGRAM 0e38 ; -------------------------------------------------------------------------------------- 0e38 0e3d | = | .CONST 0x0e3d ; Address of begin 0e39 0004 | | .CONST 0x0004 ; Address of exception handler 0e3a 0002 | | .CONST 0x0002 ; Number of locals 0e3b INIT_0e38: 0e3b 00e1 | | Load_Encached Boolean_Cache 0e3c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0e3d BODY_0e38: 0e3d e5fd | | Load 0x2,-0x3 0e3e 6803 |h | Jump_Zero 0xe42 0e3f 4801 |H | Short_Literal 0x1 0e40 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0e41 7803 |x | Jump 0xe45 0e42 4800 |H | Short_Literal 0x0 0e43 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0e44 7800 |x | Jump 0xe45 0e45 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 0e47 4800 |H | Short_Literal 0x0 0e48 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 0e4a e5f9 | | Load 0x2,-0x7 0e4b 4803 |H | Short_Literal 0x3 0e4c 4800 |H | Short_Literal 0x0 0e4d e5fc | | Load 0x2,-0x4 0e4e e5fa | | Load 0x2,-0x6 0e4f e602 | | Load 0x3,0x2 0e50 4800 |H | Short_Literal 0x0 0e51 4801 |H | Short_Literal 0x1 0e52 e5fb | | Load 0x2,-0x5 0e53 00ea | | Load_Encached Null_String_Cache 0e54 e5ff | | Load 0x2,-0x1 0e55 e5fe | | Load 0x2,-0x2 0e56 e007 | | Load 0x0,0x7 0e57 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0e58 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0e59 0000 0000 | | .BLANK 0000[0x7] 0e60 ; -------------------------------------------------------------------------------------- 0e60 ; SUBPROGRAM 0e60 ; -------------------------------------------------------------------------------------- 0e60 0e69 | i | .CONST 0x0e69 ; Address of begin 0e61 0004 | | .CONST 0x0004 ; Address of exception handler 0e62 0004 | | .CONST 0x0004 ; Number of locals 0e63 INIT_0e60: 0e63 00e1 | | Load_Encached Boolean_Cache 0e64 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0e65 00e1 | | Load_Encached Boolean_Cache 0e66 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0e67 00e1 | | Load_Encached Boolean_Cache 0e68 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0e69 BODY_0e60: 0e69 e5fb | | Load 0x2,-0x5 0e6a 6807 |h | Jump_Zero 0xe72 0e6b 4800 |H | Short_Literal 0x0 0e6c 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0e6d 4800 |H | Short_Literal 0x0 0e6e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0e6f 4801 |H | Short_Literal 0x1 0e70 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0e71 7806 |x | Jump 0xe78 0e72 4800 |H | Short_Literal 0x0 0e73 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0e74 4801 |H | Short_Literal 0x1 0e75 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0e76 4800 |H | Short_Literal 0x0 0e77 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0e78 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 0e7a 4800 |H | Short_Literal 0x0 0e7b 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 0e7d e5f9 | | Load 0x2,-0x7 0e7e 4803 |H | Short_Literal 0x3 0e7f 4801 |H | Short_Literal 0x1 0e80 e5fa | | Load 0x2,-0x6 0e81 6012 |` | Indirect_Literal Discrete,0xe94,{0x00000000, 0x7fffffff} 0e82 e604 | | Load 0x3,0x4 0e83 e603 | | Load 0x3,0x3 0e84 e602 | | Load 0x3,0x2 0e85 4800 |H | Short_Literal 0x0 0e86 0092 19aa | | Action Push_String_Extended,0x19aa ; "<AUTO_GENERATE>" 0e88 e5fd | | Load 0x2,-0x3 0e89 4801 |H | Short_Literal 0x1 0e8a e5fc | | Load 0x2,-0x4 0e8b 00ea | | Load_Encached Null_String_Cache 0e8c e5ff | | Load 0x2,-0x1 0e8d e5fe | | Load 0x2,-0x2 0e8e e007 | | Load 0x0,0x7 0e8f 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0e90 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0e91 0000 0000 | | .XXX[0x3] 0e93 0000 | | 0e94 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 0e98 ; -------------------------------------------------------------------------------------- 0e98 ; SUBPROGRAM 0e98 ; -------------------------------------------------------------------------------------- 0e98 0ea5 | | .CONST 0x0ea5 ; Address of begin 0e99 0004 | | .CONST 0x0004 ; Address of exception handler 0e9a 0003 | | .CONST 0x0003 ; Number of locals 0e9b INIT_0e98: 0e9b e001 | | Load 0x0,0x1 0e9c 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0e9d 4800 |H | Short_Literal 0x0 0e9e 00d9 | | Load_Top At_Offset_1 0e9f 0092 19f7 | | Action Push_String_Extended,0x19f7 ; " " 0ea1 e00b | | Load 0x0,0xb 0ea2 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0ea3 00e3 | | Load_Encached Natural_Cache 0ea4 03f1 | | Declare_Variable Discrete,With_Value 0ea5 BODY_0e98: 0ea5 00d8 | | Load_Top At_Offset_0 0ea6 0c01 | | Execute_Immediate Greater_Equal,0x1 0ea7 6818 |h | Jump_Zero 0xec0 0ea8 4801 |H | Short_Literal 0x1 0ea9 00d9 | | Load_Top At_Offset_1 0eaa 00db | | Load_Top At_Offset_3 0eab 01db | | Execute Vector,Length 0eac 00d8 | | Load_Top At_Offset_0 0ead 00e2 | | Load_Encached Integer_Cache 0eae 0260 | ` | Execute Discrete,In_Type 0eaf 7001 |p | Jump_Nonzero 0xeb1 0eb0 0801 | | Execute_Immediate Raise,0x1 0eb1 e602 | | Load 0x3,0x2 0eb2 01cf | | Execute Vector,Slice_Read 0eb3 0092 19f8 | | Action Push_String_Extended,0x19f8 ; "Mailbox" 0eb5 e00b | | Load 0x0,0xb 0eb6 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0eb7 0c01 | | Execute_Immediate Greater_Equal,0x1 0eb8 6807 |h | Jump_Zero 0xec0 0eb9 4801 |H | Short_Literal 0x1 0eba 4800 |H | Short_Literal 0x0 0ebb 0092 19d1 | | Action Push_String_Extended,0x19d1 ; "<CURSOR>" 0ebd e005 | | Load 0x0,0x5 0ebe 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0ebf 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ec0 4801 |H | Short_Literal 0x1 0ec1 4800 |H | Short_Literal 0x0 0ec2 0092 19b8 | | Action Push_String_Extended,0x19b8 ; "<IMAGE>" 0ec4 e005 | | Load 0x0,0x5 0ec5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0ec6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ec7 0000 | | .XXX[0x1] 0ec8 ; -------------------------------------------------------------------------------------- 0ec8 ; SUBPROGRAM 0ec8 ; -------------------------------------------------------------------------------------- 0ec8 0ecf | | .CONST 0x0ecf ; Address of begin 0ec9 0004 | | .CONST 0x0004 ; Address of exception handler 0eca 0002 | | .CONST 0x0002 ; Number of locals 0ecb INIT_0ec8: 0ecb 0092 19f9 | | Action Push_String_Extended,0x19f9 ; "<Selection>" 0ecd e001 | | Load 0x0,0x1 0ece 180f | | Execute Package,Field_Execute,Field_Number 0xf 0ecf BODY_0ec8: 0ecf 00d8 | | Load_Top At_Offset_0 0ed0 0092 19af | | Action Push_String_Extended,0x19af ; "<>" 0ed2 01df | | Execute Vector,Equal 0ed3 680e |h | Jump_Zero 0xee2 0ed4 00ea | | Load_Encached Null_String_Cache 0ed5 00ea | | Load_Encached Null_String_Cache 0ed6 0092 1997 | | Action Push_String_Extended,0x1997 ; "Name:" 0ed8 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 0eda e001 | | Load 0x0,0x1 0edb 180f | | Execute Package,Field_Execute,Field_Number 0xf 0edc 0092 19b9 | | Action Push_String_Extended,0x19b9 ; "Open" 0ede 4ace |J | Short_Literal 0x2ce 0edf e002 | | Load 0x0,0x2 0ee0 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0ee1 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ee2 4801 |H | Short_Literal 0x1 0ee3 00d9 | | Load_Top At_Offset_1 0ee4 822f | / | Call 0x1,0x2f 0ee5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0ee6 0000 0000 | | .XXX[0x2] 0ee8 ; -------------------------------------------------------------------------------------- 0ee8 ; SUBPROGRAM 0ee8 ; -------------------------------------------------------------------------------------- 0ee8 0f98 | | .CONST 0x0f98 ; Address of begin 0ee9 0fd8 | | .CONST 0x0fd8 ; Address of exception handler 0eea 0019 | | .CONST 0x0019 ; Number of locals 0eeb INIT_0ee8: 0eeb e00f | | Load 0x0,0xf 0eec 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0eed 02c7 | | Declare_Variable Any 0eee 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 0ef0 e001 | | Load 0x0,0x1 0ef1 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0ef2 a602 | | Store_Unchecked 0x3,0x2 0ef3 00d8 | | Load_Top At_Offset_0 0ef4 e00f | | Load 0x0,0xf 0ef5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0ef6 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0ef7 e00f | | Load 0x0,0xf 0ef8 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0ef9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0efa 02c7 | | Declare_Variable Any 0efb 00da | | Load_Top At_Offset_2 0efc e001 | | Load 0x0,0x1 0efd 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0efe a604 | | Store_Unchecked 0x3,0x4 0eff e00f | | Load 0x0,0xf 0f00 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0f01 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0f02 02c7 | | Declare_Variable Any 0f03 00db | | Load_Top At_Offset_3 0f04 e001 | | Load 0x0,0x1 0f05 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0f06 a605 | | Store_Unchecked 0x3,0x5 0f07 00db | | Load_Top At_Offset_3 0f08 e001 | | Load 0x0,0x1 0f09 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0f0a e001 | | Load 0x0,0x1 0f0b 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0f0c 03f1 | | Declare_Variable Discrete,With_Value 0f0d 00d8 | | Load_Top At_Offset_0 0f0e e001 | | Load 0x0,0x1 0f0f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0f10 011c | | Execute Any,Convert_Unchecked 0f11 1c01 | | Execute_Immediate Run_Utility,0x1 0f12 e602 | | Load 0x3,0x2 0f13 e001 | | Load 0x0,0x1 0f14 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0f15 e001 | | Load 0x0,0x1 0f16 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0f17 03f1 | | Declare_Variable Discrete,With_Value 0f18 00d8 | | Load_Top At_Offset_0 0f19 e001 | | Load 0x0,0x1 0f1a 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0f1b 011c | | Execute Any,Convert_Unchecked 0f1c 1c01 | | Execute_Immediate Run_Utility,0x1 0f1d e602 | | Load 0x3,0x2 0f1e e00f | | Load 0x0,0xf 0f1f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0f20 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0f21 e021 | ! | Load 0x0,0x21 0f22 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0f23 e605 | | Load 0x3,0x5 0f24 e00f | | Load 0x0,0xf 0f25 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0f26 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0f27 00e1 | | Load_Encached Boolean_Cache 0f28 011c | | Execute Any,Convert_Unchecked 0f29 1c01 | | Execute_Immediate Run_Utility,0x1 0f2a 0092 19fa | | Action Push_String_Extended,0x19fa ; "Creator => " 0f2c e604 | | Load 0x3,0x4 0f2d e00f | | Load 0x0,0xf 0f2e 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0f2f 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0f30 e00f | | Load 0x0,0xf 0f31 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0f32 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 0f33 01cc | | Execute Vector,Catenate 0f34 0007 | | Action Break_Optional 0f35 e022 | " | Load 0x0,0x22 0f36 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0f37 0322 | " | Declare_Variable Record 0f38 e604 | | Load 0x3,0x4 0f39 e00f | | Load 0x0,0xf 0f3a 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0f3b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0f3c e022 | " | Load 0x0,0x22 0f3d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0f3e 00d9 | | Load_Top At_Offset_1 0f3f 017d | } | Execute Record,Structure_Write 0f40 0092 19fb | | Action Push_String_Extended,0x19fb ; "Create Date => " 0f42 4802 |H | Short_Literal 0x2 0f43 4800 |H | Short_Literal 0x0 0f44 4800 |H | Short_Literal 0x0 0f45 e60d | | Load 0x3,0xd 0f46 e022 | " | Load 0x0,0x22 0f47 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0f48 01cc | | Execute Vector,Catenate 0f49 0007 | | Action Break_Optional 0f4a 0092 19fc | | Action Push_String_Extended,0x19fc ; "Subclass => " 0f4c e609 | | Load 0x3,0x9 0f4d 01cc | | Execute Vector,Catenate 0f4e 0007 | | Action Break_Optional 0f4f 0092 19fd | | Action Push_String_Extended,0x19fd ; "Total Size => " 0f51 4820 |H | Short_Literal 0x20 0f52 4800 |H | Short_Literal 0x0 0f53 480a |H | Short_Literal 0xa 0f54 e604 | | Load 0x3,0x4 0f55 e00f | | Load 0x0,0xf 0f56 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0f57 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0f58 e00b | | Load 0x0,0xb 0f59 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0f5a 01cc | | Execute Vector,Catenate 0f5b 0007 | | Action Break_Optional 0f5c e605 | | Load 0x3,0x5 0f5d e00f | | Load 0x0,0xf 0f5e 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0f5f 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0f60 00e1 | | Load_Encached Boolean_Cache 0f61 03f1 | | Declare_Variable Discrete,With_Value 0f62 00d8 | | Load_Top At_Offset_0 0f63 00e1 | | Load_Encached Boolean_Cache 0f64 011c | | Execute Any,Convert_Unchecked 0f65 1c01 | | Execute_Immediate Run_Utility,0x1 0f66 e605 | | Load 0x3,0x5 0f67 e00f | | Load 0x0,0xf 0f68 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0f69 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 0f6a 00e1 | | Load_Encached Boolean_Cache 0f6b 011c | | Execute Any,Convert_Unchecked 0f6c 1c01 | | Execute_Immediate Run_Utility,0x1 0f6d e605 | | Load 0x3,0x5 0f6e e00f | | Load 0x0,0xf 0f6f 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0f70 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 0f71 0f00 | | Execute_Immediate Equal,0x0 0f72 00e1 | | Load_Encached Boolean_Cache 0f73 011c | | Execute Any,Convert_Unchecked 0f74 1c01 | | Execute_Immediate Run_Utility,0x1 0f75 0092 19fe | | Action Push_String_Extended,0x19fe ; "Updater => " 0f77 e604 | | Load 0x3,0x4 0f78 e00f | | Load 0x0,0xf 0f79 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0f7a 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0f7b e00f | | Load 0x0,0xf 0f7c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0f7d 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 0f7e 01cc | | Execute Vector,Catenate 0f7f 0007 | | Action Break_Optional 0f80 e022 | " | Load 0x0,0x22 0f81 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0f82 0322 | " | Declare_Variable Record 0f83 e604 | | Load 0x3,0x4 0f84 e00f | | Load 0x0,0xf 0f85 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0f86 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0f87 e022 | " | Load 0x0,0x22 0f88 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0f89 00d9 | | Load_Top At_Offset_1 0f8a 017d | } | Execute Record,Structure_Write 0f8b 0092 19ff | | Action Push_String_Extended,0x19ff ; "Update Date => " 0f8d 4802 |H | Short_Literal 0x2 0f8e 4800 |H | Short_Literal 0x0 0f8f 4800 |H | Short_Literal 0x0 0f90 e616 | | Load 0x3,0x16 0f91 e022 | " | Load 0x0,0x22 0f92 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0f93 01cc | | Execute Vector,Catenate 0f94 029f 15eb | | Declare_Subprogram INIT_15e8,For_Call 0f96 029f 173b | ;| Declare_Subprogram INIT_1738,For_Call 0f98 BODY_0ee8: 0f98 e602 | | Load 0x3,0x2 0f99 e00f | | Load 0x0,0xf 0f9a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0f9b 6805 |h | Jump_Zero 0xfa1 0f9c 0092 1a00 | | Action Push_String_Extended,0x1a00 ; "No object selected" 0f9e 825d | ] | Call 0x1,0x5d 0f9f 00cc | | Action Pop_Block 0fa0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0fa1 e606 | | Load 0x3,0x6 0fa2 460f |F | Jump_Case 0x10 0fa3 780f |x | Jump 0xfb3 ; case 0x0 0fa4 782c |x, | Jump 0xfd1 ; case 0x1 0fa5 7829 |x) | Jump 0xfcf ; case 0x2 0fa6 782a |x* | Jump 0xfd1 ; case 0x3 0fa7 780b |x | Jump 0xfb3 ; case 0x4 0fa8 780a |x | Jump 0xfb3 ; case 0x5 0fa9 7809 |x | Jump 0xfb3 ; case 0x6 0faa 7808 |x | Jump 0xfb3 ; case 0x7 0fab 7827 |x' | Jump 0xfd3 ; case 0x8 0fac 7806 |x | Jump 0xfb3 ; case 0x9 0fad 7805 |x | Jump 0xfb3 ; case 0xa 0fae 7804 |x | Jump 0xfb3 ; case 0xb 0faf 7803 |x | Jump 0xfb3 ; case 0xc 0fb0 7802 |x | Jump 0xfb3 ; case 0xd 0fb1 7801 |x | Jump 0xfb3 ; case 0xe 0fb2 7800 |x | Jump 0xfb3 ; case 0xf 0fb3 00ea | | Load_Encached Null_String_Cache 0fb4 00ea | | Load_Encached Null_String_Cache 0fb5 e60c | | Load 0x3,0xc 0fb6 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 0fb8 01cc | | Execute Vector,Catenate 0fb9 e60e | | Load 0x3,0xe 0fba 01cc | | Execute Vector,Catenate 0fbb 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 0fbd 01cc | | Execute Vector,Catenate 0fbe e609 | | Load 0x3,0x9 0fbf 01cc | | Execute Vector,Catenate 0fc0 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 0fc2 01cc | | Execute Vector,Catenate 0fc3 e610 | | Load 0x3,0x10 0fc4 01cc | | Execute Vector,Catenate 0fc5 e614 | | Load 0x3,0x14 0fc6 e612 | | Load 0x3,0x12 0fc7 e60b | | Load 0x3,0xb 0fc8 e60a | | Load 0x3,0xa 0fc9 e603 | | Load 0x3,0x3 0fca 4af1 |J | Short_Literal 0x2f1 0fcb 4818 |H | Short_Literal 0x18 0fcc e002 | | Load 0x0,0x2 0fcd 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0fce 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0fcf 8618 | | Call 0x3,0x18 0fd0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0fd1 8619 | | Call 0x3,0x19 0fd2 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0fd3 0092 1a02 | | Action Push_String_Extended,0x1a02 ; "<SESSION>" 0fd5 e009 | | Load 0x0,0x9 0fd6 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0fd7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0fd8 TRAP_0ee8: 0fd8 e021 | ! | Load 0x0,0x21 0fd9 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0fda 010f | | Execute Exception,Equal 0fdb 6804 |h | Jump_Zero 0xfe0 0fdc 0092 1a03 | | Action Push_String_Extended,0x1a03 ; "Error getting access list" 0fde 825d | ] | Call 0x1,0x5d 0fdf 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0fe0 0100 | | Execute Exception,Raise 0fe1 0000 0000 | | .BLANK 0000[0x7] 0fe8 ; -------------------------------------------------------------------------------------- 0fe8 ; SUBPROGRAM 0fe8 ; -------------------------------------------------------------------------------------- 0fe8 1007 | | .CONST 0x1007 ; Address of begin 0fe9 0004 | | .CONST 0x0004 ; Address of exception handler 0fea 0006 | | .CONST 0x0006 ; Number of locals 0feb INIT_0fe8: 0feb e402 | | Load 0x2,0x2 0fec e00f | | Load 0x0,0xf 0fed 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0fee 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0fef e00f | | Load 0x0,0xf 0ff0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0ff1 02c7 | | Declare_Variable Any 0ff2 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 0ff4 e001 | | Load 0x0,0x1 0ff5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0ff6 a603 | | Store_Unchecked 0x3,0x3 0ff7 e00f | | Load 0x0,0xf 0ff8 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 0ff9 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0ffa 02c7 | | Declare_Variable Any 0ffb 00d9 | | Load_Top At_Offset_1 0ffc e001 | | Load 0x0,0x1 0ffd 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0ffe a604 | | Store_Unchecked 0x3,0x4 0fff e00f | | Load 0x0,0xf 1000 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 1001 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1002 02c7 | | Declare_Variable Any 1003 00d8 | | Load_Top At_Offset_0 1004 1c00 | | Execute_Immediate Run_Utility,0x0 1005 e00f | | Load 0x0,0xf 1006 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1007 BODY_0fe8: 1007 e00f | | Load 0x0,0xf 1008 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1009 00da | | Load_Top At_Offset_2 100a 0120 | | Execute Any,Is_Value 100b 6804 |h | Jump_Zero 0x1010 100c e00f | | Load 0x0,0xf 100d 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 100e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 100f 7801 |x | Jump 0x1011 1010 00da | | Load_Top At_Offset_2 1011 e603 | | Load 0x3,0x3 1012 e00f | | Load 0x0,0xf 1013 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 1014 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1015 c605 | | Store 0x3,0x5 1016 0059 | Y | Store_Top Discrete,At_Offset_1 1017 4801 |H | Short_Literal 0x1 1018 e5fe | | Load 0x2,-0x2 1019 e602 | | Load 0x3,0x2 101a e021 | ! | Load 0x0,0x21 101b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 101c e00b | | Load 0x0,0xb 101d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 101e 7006 |p | Jump_Nonzero 0x1025 101f 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 1021 e602 | | Load 0x3,0x2 1022 e5fe | | Load 0x2,-0x2 1023 e023 | # | Load 0x0,0x23 1024 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1025 e5fd | | Load 0x2,-0x3 1026 0f01 | | Execute_Immediate Equal,0x1 1027 700c |p | Jump_Nonzero 0x1034 1028 00da | | Load_Top At_Offset_2 1029 e00f | | Load 0x0,0xf 102a 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 102b 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 102c 6812 |h | Jump_Zero 0x103f 102d 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 102f 4801 |H | Short_Literal 0x1 1030 e602 | | Load 0x3,0x2 1031 e006 | | Load 0x0,0x6 1032 181f | | Execute Package,Field_Execute,Field_Number 0x1f 1033 780b |x | Jump 0x103f 1034 00da | | Load_Top At_Offset_2 1035 e00f | | Load 0x0,0xf 1036 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 1037 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 1038 7006 |p | Jump_Nonzero 0x103f 1039 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 103b 4801 |H | Short_Literal 0x1 103c e602 | | Load 0x3,0x2 103d e006 | | Load 0x0,0x6 103e 181e | | Execute Package,Field_Execute,Field_Number 0x1e 103f e5fc | | Load 0x2,-0x4 1040 0f01 | | Execute_Immediate Equal,0x1 1041 7023 |p# | Jump_Nonzero 0x1065 1042 00d9 | | Load_Top At_Offset_1 1043 e00f | | Load 0x0,0xf 1044 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 1045 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1046 e001 | | Load 0x0,0x1 1047 1819 | | Execute Package,Field_Execute,Field_Number 0x19 1048 e001 | | Load 0x0,0x1 1049 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 104a 6839 |h9 | Jump_Zero 0x1084 104b e602 | | Load 0x3,0x2 104c e008 | | Load 0x0,0x8 104d 180d | | Execute Package,Field_Execute,Field_Number 0xd 104e 6835 |h5 | Jump_Zero 0x1084 104f 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 1051 e008 | | Load 0x0,0x8 1052 180e | | Execute Package,Field_Execute,Field_Number 0xe 1053 6808 |h | Jump_Zero 0x105c 1054 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 1056 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 1058 00ea | | Load_Encached Null_String_Cache 1059 e602 | | Load 0x3,0x2 105a e007 | | Load 0x0,0x7 105b 180e | | Execute Package,Field_Execute,Field_Number 0xe 105c 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 105e 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 1060 00ea | | Load_Encached Null_String_Cache 1061 e602 | | Load 0x3,0x2 1062 e007 | | Load 0x0,0x7 1063 1817 | | Execute Package,Field_Execute,Field_Number 0x17 1064 781f |x | Jump 0x1084 1065 00d9 | | Load_Top At_Offset_1 1066 e00f | | Load 0x0,0xf 1067 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 1068 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1069 e001 | | Load 0x0,0x1 106a 1819 | | Execute Package,Field_Execute,Field_Number 0x19 106b e001 | | Load 0x0,0x1 106c 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 106d 6812 |h | Jump_Zero 0x1080 106e e602 | | Load 0x3,0x2 106f e008 | | Load 0x0,0x8 1070 180d | | Execute Package,Field_Execute,Field_Number 0xd 1071 7012 |p | Jump_Nonzero 0x1084 1072 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 1074 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 1076 00ea | | Load_Encached Null_String_Cache 1077 4801 |H | Short_Literal 0x1 1078 0092 1a04 | | Action Push_String_Extended,0x1a04 ; "<NONE>" 107a 0092 19aa | | Action Push_String_Extended,0x19aa ; "<AUTO_GENERATE>" 107c e602 | | Load 0x3,0x2 107d e007 | | Load 0x0,0x7 107e 1816 | | Execute Package,Field_Execute,Field_Number 0x16 107f 7804 |x | Jump 0x1084 1080 0092 1a05 | | Action Push_String_Extended,0x1a05 ; "Object is not in a subsystem view" 1082 e024 | $ | Load 0x0,0x24 1083 180d | | Execute Package,Field_Execute,Field_Number 0xd 1084 e5fb | | Load 0x2,-0x5 1085 0f01 | | Execute_Immediate Equal,0x1 1086 701a |p | Jump_Nonzero 0x10a1 1087 00d9 | | Load_Top At_Offset_1 1088 e00f | | Load 0x0,0xf 1089 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 108a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 108b e001 | | Load 0x0,0x1 108c 1819 | | Execute Package,Field_Execute,Field_Number 0x19 108d e001 | | Load 0x0,0x1 108e 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 108f 6810 |h | Jump_Zero 0x10a0 1090 e602 | | Load 0x3,0x2 1091 e008 | | Load 0x0,0x8 1092 180d | | Execute Package,Field_Execute,Field_Number 0xd 1093 680c |h | Jump_Zero 0x10a0 1094 e602 | | Load 0x3,0x2 1095 e008 | | Load 0x0,0x8 1096 180e | | Execute Package,Field_Execute,Field_Number 0xe 1097 6808 |h | Jump_Zero 0x10a0 1098 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 109a 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 109c 00ea | | Load_Encached Null_String_Cache 109d e602 | | Load 0x3,0x2 109e e007 | | Load 0x0,0x7 109f 180e | | Execute Package,Field_Execute,Field_Number 0xe 10a0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 10a1 00d9 | | Load_Top At_Offset_1 10a2 e00f | | Load 0x0,0xf 10a3 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 10a4 1812 | | Execute Package,Field_Execute,Field_Number 0x12 10a5 e001 | | Load 0x0,0x1 10a6 1819 | | Execute Package,Field_Execute,Field_Number 0x19 10a7 e001 | | Load 0x0,0x1 10a8 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 10a9 681c |h | Jump_Zero 0x10c6 10aa e602 | | Load 0x3,0x2 10ab e008 | | Load 0x0,0x8 10ac 180d | | Execute Package,Field_Execute,Field_Number 0xd 10ad 6813 |h | Jump_Zero 0x10c1 10ae e602 | | Load 0x3,0x2 10af e008 | | Load 0x0,0x8 10b0 180e | | Execute Package,Field_Execute,Field_Number 0xe 10b1 700e |p | Jump_Nonzero 0x10c0 10b2 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 10b4 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 10b6 0092 19bb | | Action Push_String_Extended,0x19bb ; "<TOMORROW>" 10b8 4803 |H | Short_Literal 0x3 10b9 4801 |H | Short_Literal 0x1 10ba 4800 |H | Short_Literal 0x0 10bb 4801 |H | Short_Literal 0x1 10bc 00ea | | Load_Encached Null_String_Cache 10bd e602 | | Load 0x3,0x2 10be e007 | | Load 0x0,0x7 10bf 180d | | Execute Package,Field_Execute,Field_Number 0xd 10c0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 10c1 0092 1a06 | | Action Push_String_Extended,0x1a06 ; "Object is not controlled" 10c3 e024 | $ | Load 0x0,0x24 10c4 180d | | Execute Package,Field_Execute,Field_Number 0xd 10c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 10c6 0092 1a05 | | Action Push_String_Extended,0x1a05 ; "Object is not in a subsystem view" 10c8 e024 | $ | Load 0x0,0x24 10c9 180d | | Execute Package,Field_Execute,Field_Number 0xd 10ca 4501 |E | Exit_Suprogram New_Top_Offset 0x1 10cb 0000 0000 | | .BLANK 0000[0x5] 10d0 ; -------------------------------------------------------------------------------------- 10d0 ; SUBPROGRAM 10d0 ; -------------------------------------------------------------------------------------- 10d0 10de | | .CONST 0x10de ; Address of begin 10d1 0004 | | .CONST 0x0004 ; Address of exception handler 10d2 0004 | | .CONST 0x0004 ; Number of locals 10d3 INIT_10d0: 10d3 e00f | | Load 0x0,0xf 10d4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 10d5 1b18 | | Execute Package,Field_Read,Field_Number 0x18 10d6 02c7 | | Declare_Variable Any 10d7 00d8 | | Load_Top At_Offset_0 10d8 1c00 | | Execute_Immediate Run_Utility,0x0 10d9 e00f | | Load 0x0,0xf 10da 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 10db 1b0f | | Execute Package,Field_Read,Field_Number 0xf 10dc 029f 17a3 | | Declare_Subprogram INIT_17a0,For_Call 10de BODY_10d0: 10de e00f | | Load 0x0,0xf 10df 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 10e0 1b0f | | Execute Package,Field_Read,Field_Number 0xf 10e1 00db | | Load_Top At_Offset_3 10e2 6025 |`% | Indirect_Literal Discrete,0x1108,{0x00000000, 0x00004000} 10e3 e010 | | Load 0x0,0x10 10e4 1b0e | | Execute Package,Field_Read,Field_Number 0xe 10e5 e011 | | Load 0x0,0x11 10e6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 10e7 e012 | | Load 0x0,0x12 10e8 1811 | | Execute Package,Field_Execute,Field_Number 0x11 10e9 4801 |H | Short_Literal 0x1 10ea 4800 |H | Short_Literal 0x0 10eb e011 | | Load 0x0,0x11 10ec 1811 | | Execute Package,Field_Execute,Field_Number 0x11 10ed e00f | | Load 0x0,0xf 10ee 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 10ef 1816 | | Execute Package,Field_Execute,Field_Number 0x16 10f0 e5ff | | Load 0x2,-0x1 10f1 e00f | | Load 0x0,0xf 10f2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 10f3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 10f4 c602 | | Store 0x3,0x2 10f5 005a | Z | Store_Top Discrete,At_Offset_2 10f6 00cf | | Action Mark_Auxiliary 10f7 7807 |x | Jump 0x10ff 10f8 8604 | | Call 0x3,0x4 10f9 00db | | Load_Top At_Offset_3 10fa e00f | | Load 0x0,0xf 10fb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 10fc 181d | | Execute Package,Field_Execute,Field_Number 0x1d 10fd c602 | | Store 0x3,0x2 10fe 00c9 | | Action Pop_Auxiliary_Loop 10ff 00db | | Load_Top At_Offset_3 1100 e00f | | Load 0x0,0xf 1101 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1102 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1103 6ff4 |o | Jump_Zero 0x10f8 1104 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1105 0000 0000 | | .XXX[0x3] 1107 0000 | | 1108 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 110c 0000 0000 | | .BLANK 0000[0x4] 1110 ; -------------------------------------------------------------------------------------- 1110 ; SUBPROGRAM 1110 ; -------------------------------------------------------------------------------------- 1110 1127 | ' | .CONST 0x1127 ; Address of begin 1111 0004 | | .CONST 0x0004 ; Address of exception handler 1112 0004 | | .CONST 0x0004 ; Number of locals 1113 INIT_1110: 1113 e402 | | Load 0x2,0x2 1114 e00f | | Load 0x0,0xf 1115 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1116 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 1117 e00f | | Load 0x0,0xf 1118 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1119 02c7 | | Declare_Variable Any 111a 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 111c e001 | | Load 0x0,0x1 111d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 111e a603 | | Store_Unchecked 0x3,0x3 111f e00f | | Load 0x0,0xf 1120 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 1121 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 1122 02c7 | | Declare_Variable Any 1123 00d9 | | Load_Top At_Offset_1 1124 e001 | | Load 0x0,0x1 1125 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1126 a604 | | Store_Unchecked 0x3,0x4 1127 BODY_1110: 1127 00da | | Load_Top At_Offset_2 1128 e001 | | Load 0x0,0x1 1129 1813 | | Execute Package,Field_Execute,Field_Number 0x13 112a 6835 |h5 | Jump_Zero 0x1160 112b e5fe | | Load 0x2,-0x2 112c 0f01 | | Execute_Immediate Equal,0x1 112d 700c |p | Jump_Nonzero 0x113a 112e 00d8 | | Load_Top At_Offset_0 112f e00f | | Load 0x0,0xf 1130 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 1131 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 1132 6812 |h | Jump_Zero 0x1145 1133 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 1135 4801 |H | Short_Literal 0x1 1136 e602 | | Load 0x3,0x2 1137 e006 | | Load 0x0,0x6 1138 181f | | Execute Package,Field_Execute,Field_Number 0x1f 1139 780b |x | Jump 0x1145 113a 00d8 | | Load_Top At_Offset_0 113b e00f | | Load 0x0,0xf 113c 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 113d 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 113e 7006 |p | Jump_Nonzero 0x1145 113f 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 1141 4801 |H | Short_Literal 0x1 1142 e602 | | Load 0x3,0x2 1143 e006 | | Load 0x0,0x6 1144 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1145 4800 |H | Short_Literal 0x0 1146 00ea | | Load_Encached Null_String_Cache 1147 4820 |H | Short_Literal 0x20 1148 4820 |H | Short_Literal 0x20 1149 e5fd | | Load 0x2,-0x3 114a e00b | | Load 0x0,0xb 114b 181a | | Execute Package,Field_Execute,Field_Number 0x1a 114c e00b | | Load 0x0,0xb 114d 181b | | Execute Package,Field_Execute,Field_Number 0x1b 114e e00b | | Load 0x0,0xb 114f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 1150 700f |p | Jump_Nonzero 0x1160 1151 e5fd | | Load 0x2,-0x3 1152 e001 | | Load 0x0,0x1 1153 1813 | | Execute Package,Field_Execute,Field_Number 0x13 1154 6807 |h | Jump_Zero 0x115c 1155 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 1157 00db | | Load_Top At_Offset_3 1158 e5fd | | Load 0x2,-0x3 1159 e009 | | Load 0x0,0x9 115a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 115b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 115c 0092 1a07 | | Action Push_String_Extended,0x1a07 ; "Switch file does not exist" 115e e024 | $ | Load 0x0,0x24 115f 180d | | Execute Package,Field_Execute,Field_Number 0xd 1160 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1161 0000 0000 | | .BLANK 0000[0x7] 1168 ; -------------------------------------------------------------------------------------- 1168 ; SUBPROGRAM 1168 ; -------------------------------------------------------------------------------------- 1168 1181 | | .CONST 0x1181 ; Address of begin 1169 0004 | | .CONST 0x0004 ; Address of exception handler 116a 0007 | | .CONST 0x0007 ; Number of locals 116b INIT_1168: 116b e00f | | Load 0x0,0xf 116c 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 116d 02c7 | | Declare_Variable Any 116e 00d8 | | Load_Top At_Offset_0 116f 1c00 | | Execute_Immediate Run_Utility,0x0 1170 00e1 | | Load_Encached Boolean_Cache 1171 e00f | | Load 0x0,0xf 1172 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1173 02c7 | | Declare_Variable Any 1174 00d8 | | Load_Top At_Offset_0 1175 1c00 | | Execute_Immediate Run_Utility,0x0 1176 e00f | | Load 0x0,0xf 1177 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1178 1b18 | | Execute Package,Field_Read,Field_Number 0x18 1179 02c7 | | Declare_Variable Any 117a 00d8 | | Load_Top At_Offset_0 117b 1c00 | | Execute_Immediate Run_Utility,0x0 117c e00f | | Load 0x0,0xf 117d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 117e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 117f e00f | | Load 0x0,0xf 1180 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1181 BODY_1168: 1181 e7ff | | Load 0x3,-0x1 1182 e00f | | Load 0x0,0xf 1183 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 1184 c602 | | Store 0x3,0x2 1185 e602 | | Load 0x3,0x2 1186 e00f | | Load 0x0,0xf 1187 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 1188 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1189 012f | / | Execute Any,Equal 118a a603 | | Store_Unchecked 0x3,0x3 118b e603 | | Load 0x3,0x3 118c 68a1 |h | Jump_Zero 0x122e 118d e00f | | Load 0x0,0xf 118e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 118f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1190 00db | | Load_Top At_Offset_3 1191 60a2 |` | Indirect_Literal Discrete,0x1234,{0x00000000, 0x00004000} 1192 e010 | | Load 0x0,0x10 1193 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1194 e011 | | Load 0x0,0x11 1195 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1196 e012 | | Load 0x0,0x12 1197 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1198 4801 |H | Short_Literal 0x1 1199 4800 |H | Short_Literal 0x0 119a e011 | | Load 0x0,0x11 119b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 119c e00f | | Load 0x0,0xf 119d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 119e 1816 | | Execute Package,Field_Execute,Field_Number 0x16 119f 0092 1a08 | | Action Push_String_Extended,0x1a08 ; "{" 11a1 e7ff | | Load 0x3,-0x1 11a2 e00f | | Load 0x0,0xf 11a3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 11a4 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 11a5 01cc | | Execute Vector,Catenate 11a6 0092 1a09 | | Action Push_String_Extended,0x1a09 ; ".@['c(~library)?,'c(library)]}" 11a8 01cc | | Execute Vector,Catenate 11a9 e00f | | Load 0x0,0xf 11aa 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 11ab 181b | | Execute Package,Field_Execute,Field_Number 0x1b 11ac c605 | | Store 0x3,0x5 11ad 005a | Z | Store_Top Discrete,At_Offset_2 11ae 00cf | | Action Mark_Auxiliary 11af 7878 |xx | Jump 0x1228 11b0 e00f | | Load 0x0,0xf 11b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 11b2 e604 | | Load 0x3,0x4 11b3 0120 | | Execute Any,Is_Value 11b4 6803 |h | Jump_Zero 0x11b8 11b5 e00f | | Load 0x0,0xf 11b6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 11b7 7801 |x | Jump 0x11b9 11b8 e604 | | Load 0x3,0x4 11b9 e605 | | Load 0x3,0x5 11ba e00f | | Load 0x0,0xf 11bb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 11bc 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 11bd c604 | | Store 0x3,0x4 11be 005a | Z | Store_Top Discrete,At_Offset_2 11bf 00d9 | | Load_Top At_Offset_1 11c0 6801 |h | Jump_Zero 0x11c2 11c1 786b |xk | Jump 0x122d 11c2 e604 | | Load 0x3,0x4 11c3 8261 | a | Call 0x1,0x61 11c4 a406 | | Store_Unchecked 0x2,0x6 11c5 e604 | | Load 0x3,0x4 11c6 8262 | b | Call 0x1,0x62 11c7 a407 | | Store_Unchecked 0x2,0x7 11c8 e7f6 | | Load 0x3,-0xa 11c9 e7f7 | | Load 0x3,-0x9 11ca e7f8 | | Load 0x3,-0x8 11cb e7f9 | | Load 0x3,-0x7 11cc e7fa | | Load 0x3,-0x6 11cd e7fb | | Load 0x3,-0x5 11ce e7fc | | Load 0x3,-0x4 11cf e7fd | | Load 0x3,-0x3 11d0 e7fe | | Load 0x3,-0x2 11d1 e604 | | Load 0x3,0x4 11d2 8412 | | Call 0x2,0x12 11d3 c7fe | | Store 0x3,-0x2 11d4 c7fd | | Store 0x3,-0x3 11d5 c7fc | | Store 0x3,-0x4 11d6 c7fb | | Store 0x3,-0x5 11d7 c7fa | | Store 0x3,-0x6 11d8 c7f9 | | Store 0x3,-0x7 11d9 c7f8 | | Store 0x3,-0x8 11da c7f7 | | Store 0x3,-0x9 11db c7f6 | | Store 0x3,-0xa 11dc e7f6 | | Load 0x3,-0xa 11dd 0a01 | | Execute_Immediate Plus,0x1 11de c7f6 | | Store 0x3,-0xa 11df e406 | | Load 0x2,0x6 11e0 460f |F | Jump_Case 0x10 11e1 780f |x | Jump 0x11f1 ; case 0x0 11e2 7819 |x | Jump 0x11fc ; case 0x1 11e3 781c |x | Jump 0x1200 ; case 0x2 11e4 780c |x | Jump 0x11f1 ; case 0x3 11e5 780b |x | Jump 0x11f1 ; case 0x4 11e6 780a |x | Jump 0x11f1 ; case 0x5 11e7 7809 |x | Jump 0x11f1 ; case 0x6 11e8 7808 |x | Jump 0x11f1 ; case 0x7 11e9 7807 |x | Jump 0x11f1 ; case 0x8 11ea 7806 |x | Jump 0x11f1 ; case 0x9 11eb 7805 |x | Jump 0x11f1 ; case 0xa 11ec 7804 |x | Jump 0x11f1 ; case 0xb 11ed 7803 |x | Jump 0x11f1 ; case 0xc 11ee 7802 |x | Jump 0x11f1 ; case 0xd 11ef 7801 |x | Jump 0x11f1 ; case 0xe 11f0 7800 |x | Jump 0x11f1 ; case 0xf 11f1 e407 | | Load 0x2,0x7 11f2 0f2a | * | Execute_Immediate Equal,0x2a 11f3 7004 |p | Jump_Nonzero 0x11f8 11f4 e7f7 | | Load 0x3,-0x9 11f5 0a01 | | Execute_Immediate Plus,0x1 11f6 c7f7 | | Store 0x3,-0x9 11f7 782a |x* | Jump 0x1222 11f8 e7fe | | Load 0x3,-0x2 11f9 0a01 | | Execute_Immediate Plus,0x1 11fa c7fe | | Store 0x3,-0x2 11fb 7826 |x& | Jump 0x1222 11fc e7fc | | Load 0x3,-0x4 11fd 0a01 | | Execute_Immediate Plus,0x1 11fe c7fc | | Store 0x3,-0x4 11ff 7822 |x" | Jump 0x1222 1200 e407 | | Load 0x2,0x7 1201 00d8 | | Load_Top At_Offset_0 1202 0d03 | | Execute_Immediate Less,0x3 1203 700d |p | Jump_Nonzero 0x1211 1204 00d8 | | Load_Top At_Offset_0 1205 0c07 | | Execute_Immediate Greater_Equal,0x7 1206 7007 |p | Jump_Nonzero 0x120e 1207 0b04 | | Execute_Immediate Case_Compare,0x4 1208 700d |p | Jump_Nonzero 0x1216 1209 4805 |H | Short_Literal 0x5 120a 4806 |H | Short_Literal 0x6 120b 0262 | b | Execute Discrete,In_Range 120c 700e |p | Jump_Nonzero 0x121b 120d 7811 |x | Jump 0x121f 120e 0f42 | B | Execute_Immediate Equal,0x42 120f 700b |p | Jump_Nonzero 0x121b 1210 7801 |x | Jump 0x1212 1211 00d1 | | Pop_Control Pop_Count_1 1212 e7f8 | | Load 0x3,-0x8 1213 0a01 | | Execute_Immediate Plus,0x1 1214 c7f8 | | Store 0x3,-0x8 1215 780c |x | Jump 0x1222 1216 00d1 | | Pop_Control Pop_Count_1 1217 e7f9 | | Load 0x3,-0x7 1218 0a01 | | Execute_Immediate Plus,0x1 1219 c7f9 | | Store 0x3,-0x7 121a 7807 |x | Jump 0x1222 121b e7fa | | Load 0x3,-0x6 121c 0a01 | | Execute_Immediate Plus,0x1 121d c7fa | | Store 0x3,-0x6 121e 7803 |x | Jump 0x1222 121f e7fb | | Load 0x3,-0x5 1220 0a01 | | Execute_Immediate Plus,0x1 1221 c7fb | | Store 0x3,-0x5 1222 00db | | Load_Top At_Offset_3 1223 e00f | | Load 0x0,0xf 1224 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1225 181d | | Execute Package,Field_Execute,Field_Number 0x1d 1226 c605 | | Store 0x3,0x5 1227 00c9 | | Action Pop_Auxiliary_Loop 1228 00db | | Load_Top At_Offset_3 1229 e00f | | Load 0x0,0xf 122a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 122b 181e | | Execute Package,Field_Execute,Field_Number 0x1e 122c 6f83 |o | Jump_Zero 0x11b0 122d 00ce | | Action Pop_Auxiliary 122e 00da | | Load_Top At_Offset_2 122f e00f | | Load 0x0,0xf 1230 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1231 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 1232 c605 | | Store 0x3,0x5 1233 4502 |E | Exit_Suprogram New_Top_Offset 0x2 1234 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 1238 ; -------------------------------------------------------------------------------------- 1238 ; SUBPROGRAM 1238 ; -------------------------------------------------------------------------------------- 1238 123b | ; | .CONST 0x123b ; Address of begin 1239 0004 | | .CONST 0x0004 ; Address of exception handler 123a 0001 | | .CONST 0x0001 ; Number of locals 123b BODY_1238: 123b INIT_1238: 123b 00da | | Load_Top At_Offset_2 123c 7006 |p | Jump_Nonzero 0x1243 123d e7fb | | Load 0x3,-0x5 123e e7fe | | Load 0x3,-0x2 123f e014 | | Load 0x0,0x14 1240 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1241 00d1 | | Pop_Control Pop_Count_1 1242 4505 |E | Exit_Suprogram New_Top_Offset 0x5 1243 00da | | Load_Top At_Offset_2 1244 0f01 | | Execute_Immediate Equal,0x1 1245 680a |h | Jump_Zero 0x1250 1246 e7fb | | Load 0x3,-0x5 1247 00db | | Load_Top At_Offset_3 1248 00e0 | | Load_Encached Standard_Cache 1249 1818 | | Execute Package,Field_Execute,Field_Number 0x18 124a e7fd | | Load 0x3,-0x3 124b 01cc | | Execute Vector,Catenate 124c e014 | | Load 0x0,0x14 124d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 124e 00d1 | | Pop_Control Pop_Count_1 124f 4505 |E | Exit_Suprogram New_Top_Offset 0x5 1250 00da | | Load_Top At_Offset_2 1251 0c02 | | Execute_Immediate Greater_Equal,0x2 1252 6809 |h | Jump_Zero 0x125c 1253 e7fb | | Load 0x3,-0x5 1254 00db | | Load_Top At_Offset_3 1255 00e0 | | Load_Encached Standard_Cache 1256 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1257 e7fc | | Load 0x3,-0x4 1258 01cc | | Execute Vector,Catenate 1259 e014 | | Load 0x0,0x14 125a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 125b 00d1 | | Pop_Control Pop_Count_1 125c 4505 |E | Exit_Suprogram New_Top_Offset 0x5 125d 0000 0000 | | .XXX[0x3] 125f 0000 | | 1260 ; -------------------------------------------------------------------------------------- 1260 ; SUBPROGRAM 1260 ; -------------------------------------------------------------------------------------- 1260 127b | { | .CONST 0x127b ; Address of begin 1261 0004 | | .CONST 0x0004 ; Address of exception handler 1262 0005 | | .CONST 0x0005 ; Number of locals 1263 INIT_1260: 1263 00da | | Load_Top At_Offset_2 1264 01db | | Execute Vector,Length 1265 4846 |HF | Short_Literal 0x46 1266 0270 | p | Execute Discrete,Divide 1267 00e2 | | Load_Encached Integer_Cache 1268 03ec | | Declare_Variable Discrete,With_Value,With_Constraint 1269 4801 |H | Short_Literal 0x1 126a e7ff | | Load 0x3,-0x1 126b 01db | | Execute Vector,Length 126c 0a01 | | Execute_Immediate Plus,0x1 126d 00da | | Load_Top At_Offset_2 126e 0273 | s | Execute Discrete,Plus 126f 00d8 | | Load_Top At_Offset_0 1270 00e2 | | Load_Encached Integer_Cache 1271 0260 | ` | Execute Discrete,In_Type 1272 7001 |p | Jump_Nonzero 0x1274 1273 0801 | | Execute_Immediate Raise,0x1 1274 00e9 | | Load_Encached String_Cache 1275 035b | [ | Declare_Type Array,Constrained 1276 0337 | 7 | Declare_Variable Array 1277 00e2 | | Load_Encached Integer_Cache 1278 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 1279 00e2 | | Load_Encached Integer_Cache 127a 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 127b BODY_1260: 127b e7ff | | Load 0x3,-0x1 127c 01db | | Execute Vector,Length 127d 0c46 | F | Execute_Immediate Greater_Equal,0x46 127e 682b |h+ | Jump_Zero 0x12aa 127f 00cf | | Action Mark_Auxiliary 1280 e602 | | Load 0x3,0x2 1281 4801 |H | Short_Literal 0x1 1282 0263 | c | Execute Discrete,Above_Bound 1283 7022 |p" | Jump_Nonzero 0x12a6 1284 00d8 | | Load_Top At_Offset_0 1285 0aff | | Execute_Immediate Plus,-0x1 1286 4846 |HF | Short_Literal 0x46 1287 0271 | q | Execute Discrete,Times 1288 0a01 | | Execute_Immediate Plus,0x1 1289 c605 | | Store 0x3,0x5 128a 00db | | Load_Top At_Offset_3 128b e605 | | Load 0x3,0x5 128c 0a45 | E | Execute_Immediate Plus,0x45 128d 00d8 | | Load_Top At_Offset_0 128e 00e2 | | Load_Encached Integer_Cache 128f 0260 | ` | Execute Discrete,In_Type 1290 7001 |p | Jump_Nonzero 0x1292 1291 0801 | | Execute_Immediate Raise,0x1 1292 e7ff | | Load 0x3,-0x1 1293 01cf | | Execute Vector,Slice_Read 1294 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1296 01cc | | Execute Vector,Catenate 1297 e604 | | Load 0x3,0x4 1298 00d8 | | Load_Top At_Offset_0 1299 0a46 | F | Execute_Immediate Plus,0x46 129a 00d8 | | Load_Top At_Offset_0 129b 00e2 | | Load_Encached Integer_Cache 129c 0260 | ` | Execute Discrete,In_Type 129d 7001 |p | Jump_Nonzero 0x129f 129e 0801 | | Execute_Immediate Raise,0x1 129f e603 | | Load 0x3,0x3 12a0 01ce | | Execute Vector,Slice_Write 12a1 e604 | | Load 0x3,0x4 12a2 0a47 | G | Execute_Immediate Plus,0x47 12a3 c604 | | Store 0x3,0x4 12a4 00c8 | | Action Pop_Auxiliary_Range 12a5 3fde |? | Loop_Increasing 0x1284 12a6 00ce | | Action Pop_Auxiliary 12a7 00d8 | | Load_Top At_Offset_0 12a8 0a46 | F | Execute_Immediate Plus,0x46 12a9 0059 | Y | Store_Top Discrete,At_Offset_1 12aa 00db | | Load_Top At_Offset_3 12ab 4846 |HF | Short_Literal 0x46 12ac 0271 | q | Execute Discrete,Times 12ad e7ff | | Load 0x3,-0x1 12ae 01db | | Execute Vector,Length 12af 027e | ~ | Execute Discrete,Not_Equal 12b0 6817 |h | Jump_Zero 0x12c8 12b1 00d8 | | Load_Top At_Offset_0 12b2 e7ff | | Load 0x3,-0x1 12b3 01db | | Execute Vector,Length 12b4 00d8 | | Load_Top At_Offset_0 12b5 00e2 | | Load_Encached Integer_Cache 12b6 0260 | ` | Execute Discrete,In_Type 12b7 7001 |p | Jump_Nonzero 0x12b9 12b8 0801 | | Execute_Immediate Raise,0x1 12b9 e7ff | | Load 0x3,-0x1 12ba 01cf | | Execute Vector,Slice_Read 12bb 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 12bd 01cc | | Execute Vector,Catenate 12be 00da | | Load_Top At_Offset_2 12bf e603 | | Load 0x3,0x3 12c0 01db | | Execute Vector,Length 12c1 00d8 | | Load_Top At_Offset_0 12c2 00e2 | | Load_Encached Integer_Cache 12c3 0260 | ` | Execute Discrete,In_Type 12c4 7001 |p | Jump_Nonzero 0x12c6 12c5 0801 | | Execute_Immediate Raise,0x1 12c6 e603 | | Load 0x3,0x3 12c7 01ce | | Execute Vector,Slice_Write 12c8 00da | | Load_Top At_Offset_2 12c9 00e9 | | Load_Encached String_Cache 12ca 01c6 | | Execute Vector,Convert_To_Formal 12cb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 12cc 0000 0000 | | .BLANK 0000[0x4] 12d0 ; -------------------------------------------------------------------------------------- 12d0 ; SUBPROGRAM 12d0 ; -------------------------------------------------------------------------------------- 12d0 12dc | | .CONST 0x12dc ; Address of begin 12d1 0004 | | .CONST 0x0004 ; Address of exception handler 12d2 0004 | | .CONST 0x0004 ; Number of locals 12d3 INIT_12d0: 12d3 e00f | | Load 0x0,0xf 12d4 1b14 | | Execute Package,Field_Read,Field_Number 0x14 12d5 02ff | | Declare_Variable Variant_Record 12d6 00d8 | | Load_Top At_Offset_0 12d7 1c00 | | Execute_Immediate Run_Utility,0x0 12d8 e00f | | Load 0x0,0xf 12d9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 12da 029f 1813 | | Declare_Subprogram INIT_1810,For_Call 12dc BODY_12d0: 12dc e00f | | Load 0x0,0xf 12dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 12de 00db | | Load_Top At_Offset_3 12df 600c |` | Indirect_Literal Discrete,0x12ec,{0x00000000, 0x00004000} 12e0 e010 | | Load 0x0,0x10 12e1 1b0e | | Execute Package,Field_Read,Field_Number 0xe 12e2 e7ff | | Load 0x3,-0x1 12e3 e00f | | Load 0x0,0xf 12e4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 12e5 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 12e6 00d1 | | Pop_Control Pop_Count_1 12e7 005a | Z | Store_Top Discrete,At_Offset_2 12e8 8604 | | Call 0x3,0x4 12e9 0831 | 1 | Execute_Immediate Raise,0x31 12ea 0000 0000 | | .XXX[0x2] 12ec 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 12f0 ; -------------------------------------------------------------------------------------- 12f0 ; SUBPROGRAM 12f0 ; -------------------------------------------------------------------------------------- 12f0 1305 | | .CONST 0x1305 ; Address of begin 12f1 0004 | | .CONST 0x0004 ; Address of exception handler 12f2 0006 | | .CONST 0x0006 ; Number of locals 12f3 INIT_12f0: 12f3 e00f | | Load 0x0,0xf 12f4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 12f5 1b0f | | Execute Package,Field_Read,Field_Number 0xf 12f6 e00f | | Load 0x0,0xf 12f7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 12f8 e00f | | Load 0x0,0xf 12f9 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 12fa 1b18 | | Execute Package,Field_Read,Field_Number 0x18 12fb 02c7 | | Declare_Variable Any 12fc 00d8 | | Load_Top At_Offset_0 12fd 1c00 | | Execute_Immediate Run_Utility,0x0 12fe e00f | | Load 0x0,0xf 12ff 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1300 02c7 | | Declare_Variable Any 1301 00d8 | | Load_Top At_Offset_0 1302 1c00 | | Execute_Immediate Run_Utility,0x0 1303 029f 1833 | 3| Declare_Subprogram INIT_1830,For_Call 1305 BODY_12f0: 1305 e00f | | Load 0x0,0xf 1306 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1307 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1308 00db | | Load_Top At_Offset_3 1309 67e2 |g | Indirect_Literal Discrete,0x12ec,{0x00000000, 0x00004000} 130a e010 | | Load 0x0,0x10 130b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 130c e011 | | Load 0x0,0x11 130d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 130e e012 | | Load 0x0,0x12 130f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1310 4801 |H | Short_Literal 0x1 1311 4800 |H | Short_Literal 0x0 1312 e011 | | Load 0x0,0x11 1313 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1314 e00f | | Load 0x0,0xf 1315 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1316 1816 | | Execute Package,Field_Execute,Field_Number 0x16 1317 0092 1a08 | | Action Push_String_Extended,0x1a08 ; "{" 1319 e7ff | | Load 0x3,-0x1 131a 01cc | | Execute Vector,Catenate 131b 0092 1a0a | | Action Push_String_Extended,0x1a0a ; ".??@}" 131d 01cc | | Execute Vector,Catenate 131e e00f | | Load 0x0,0xf 131f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1320 181b | | Execute Package,Field_Execute,Field_Number 0x1b 1321 c604 | | Store 0x3,0x4 1322 c602 | | Store 0x3,0x2 1323 00cf | | Action Mark_Auxiliary 1324 7819 |x | Jump 0x133e 1325 e00f | | Load 0x0,0xf 1326 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1327 00db | | Load_Top At_Offset_3 1328 0120 | | Execute Any,Is_Value 1329 6803 |h | Jump_Zero 0x132d 132a e00f | | Load 0x0,0xf 132b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 132c 7801 |x | Jump 0x132e 132d 00db | | Load_Top At_Offset_3 132e e604 | | Load 0x3,0x4 132f e00f | | Load 0x0,0xf 1330 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1331 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1332 c605 | | Store 0x3,0x5 1333 c603 | | Store 0x3,0x3 1334 e603 | | Load 0x3,0x3 1335 6801 |h | Jump_Zero 0x1337 1336 780c |x | Jump 0x1343 1337 8606 | | Call 0x3,0x6 1338 00db | | Load_Top At_Offset_3 1339 e00f | | Load 0x0,0xf 133a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 133b 181d | | Execute Package,Field_Execute,Field_Number 0x1d 133c c604 | | Store 0x3,0x4 133d 00c9 | | Action Pop_Auxiliary_Loop 133e 00db | | Load_Top At_Offset_3 133f e00f | | Load 0x0,0xf 1340 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1341 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1342 6fe2 |o | Jump_Zero 0x1325 1343 00ce | | Action Pop_Auxiliary 1344 00da | | Load_Top At_Offset_2 1345 e00f | | Load 0x0,0xf 1346 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1347 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 1348 c604 | | Store 0x3,0x4 1349 4502 |E | Exit_Suprogram New_Top_Offset 0x2 134a 0000 0000 | | .BLANK 0000[0x6] 1350 ; -------------------------------------------------------------------------------------- 1350 ; SUBPROGRAM 1350 ; -------------------------------------------------------------------------------------- 1350 1367 | g | .CONST 0x1367 ; Address of begin 1351 0004 | | .CONST 0x0004 ; Address of exception handler 1352 0007 | | .CONST 0x0007 ; Number of locals 1353 INIT_1350: 1353 e00f | | Load 0x0,0xf 1354 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1355 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1356 e00f | | Load 0x0,0xf 1357 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1358 e00f | | Load 0x0,0xf 1359 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 135a 1b18 | | Execute Package,Field_Read,Field_Number 0x18 135b 02c7 | | Declare_Variable Any 135c 00d8 | | Load_Top At_Offset_0 135d 1c00 | | Execute_Immediate Run_Utility,0x0 135e e001 | | Load 0x0,0x1 135f 1b15 | | Execute Package,Field_Read,Field_Number 0x15 1360 e00f | | Load 0x0,0xf 1361 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1362 02c7 | | Declare_Variable Any 1363 00d8 | | Load_Top At_Offset_0 1364 1c00 | | Execute_Immediate Run_Utility,0x0 1365 029f 184b | K| Declare_Subprogram INIT_1848,For_Call 1367 BODY_1350: 1367 e00f | | Load 0x0,0xf 1368 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1369 1b0f | | Execute Package,Field_Read,Field_Number 0xf 136a e604 | | Load 0x3,0x4 136b 6040 |`@ | Indirect_Literal Discrete,0x13ac,{0x00000000, 0x00004000} 136c e010 | | Load 0x0,0x10 136d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 136e e011 | | Load 0x0,0x11 136f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1370 e012 | | Load 0x0,0x12 1371 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1372 4801 |H | Short_Literal 0x1 1373 4800 |H | Short_Literal 0x0 1374 e011 | | Load 0x0,0x11 1375 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1376 e00f | | Load 0x0,0xf 1377 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1378 1816 | | Execute Package,Field_Execute,Field_Number 0x16 1379 0092 1a08 | | Action Push_String_Extended,0x1a08 ; "{" 137b e7ff | | Load 0x3,-0x1 137c 01cc | | Execute Vector,Catenate 137d 0092 1a0b | | Action Push_String_Extended,0x1a0b ; ".@'c(library)}" 137f 01cc | | Execute Vector,Catenate 1380 e00f | | Load 0x0,0xf 1381 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1382 181b | | Execute Package,Field_Execute,Field_Number 0x1b 1383 c604 | | Store 0x3,0x4 1384 c602 | | Store 0x3,0x2 1385 00cf | | Action Mark_Auxiliary 1386 7819 |x | Jump 0x13a0 1387 e00f | | Load 0x0,0xf 1388 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1389 00db | | Load_Top At_Offset_3 138a 0120 | | Execute Any,Is_Value 138b 6803 |h | Jump_Zero 0x138f 138c e00f | | Load 0x0,0xf 138d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 138e 7801 |x | Jump 0x1390 138f 00db | | Load_Top At_Offset_3 1390 e604 | | Load 0x3,0x4 1391 e00f | | Load 0x0,0xf 1392 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1393 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1394 c606 | | Store 0x3,0x6 1395 c603 | | Store 0x3,0x3 1396 e603 | | Load 0x3,0x3 1397 6801 |h | Jump_Zero 0x1399 1398 780c |x | Jump 0x13a5 1399 8607 | | Call 0x3,0x7 139a e604 | | Load 0x3,0x4 139b e00f | | Load 0x0,0xf 139c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 139d 181d | | Execute Package,Field_Execute,Field_Number 0x1d 139e c604 | | Store 0x3,0x4 139f 00c9 | | Action Pop_Auxiliary_Loop 13a0 e604 | | Load 0x3,0x4 13a1 e00f | | Load 0x0,0xf 13a2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 13a3 181e | | Execute Package,Field_Execute,Field_Number 0x1e 13a4 6fe2 |o | Jump_Zero 0x1387 13a5 00ce | | Action Pop_Auxiliary 13a6 00db | | Load_Top At_Offset_3 13a7 e00f | | Load 0x0,0xf 13a8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 13a9 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 13aa c604 | | Store 0x3,0x4 13ab 4502 |E | Exit_Suprogram New_Top_Offset 0x2 13ac 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 13b0 ; -------------------------------------------------------------------------------------- 13b0 ; SUBPROGRAM 13b0 ; -------------------------------------------------------------------------------------- 13b0 13cb | | .CONST 0x13cb ; Address of begin 13b1 0004 | | .CONST 0x0004 ; Address of exception handler 13b2 0008 | | .CONST 0x0008 ; Number of locals 13b3 INIT_13b0: 13b3 e00f | | Load 0x0,0xf 13b4 1b1d | | Execute Package,Field_Read,Field_Number 0x1d 13b5 02c7 | | Declare_Variable Any 13b6 00d8 | | Load_Top At_Offset_0 13b7 1c00 | | Execute_Immediate Run_Utility,0x0 13b8 00e1 | | Load_Encached Boolean_Cache 13b9 e00f | | Load 0x0,0xf 13ba 1b0f | | Execute Package,Field_Read,Field_Number 0xf 13bb 02c7 | | Declare_Variable Any 13bc 00d8 | | Load_Top At_Offset_0 13bd 1c00 | | Execute_Immediate Run_Utility,0x0 13be e00f | | Load 0x0,0xf 13bf 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 13c0 1b18 | | Execute Package,Field_Read,Field_Number 0x18 13c1 02c7 | | Declare_Variable Any 13c2 00d8 | | Load_Top At_Offset_0 13c3 1c00 | | Execute_Immediate Run_Utility,0x0 13c4 e00f | | Load 0x0,0xf 13c5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 13c6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 13c7 e00f | | Load 0x0,0xf 13c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 13c9 029f 1873 | s| Declare_Subprogram INIT_1870,For_Call 13cb BODY_13b0: 13cb e7ff | | Load 0x3,-0x1 13cc e00f | | Load 0x0,0xf 13cd 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 13ce c602 | | Store 0x3,0x2 13cf e602 | | Load 0x3,0x2 13d0 e00f | | Load 0x0,0xf 13d1 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 13d2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 13d3 012f | / | Execute Any,Equal 13d4 a603 | | Store_Unchecked 0x3,0x3 13d5 e603 | | Load 0x3,0x3 13d6 684b |hK | Jump_Zero 0x1422 13d7 e00f | | Load 0x0,0xf 13d8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 13d9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 13da e605 | | Load 0x3,0x5 13db 67d0 |g | Indirect_Literal Discrete,0x13ac,{0x00000000, 0x00004000} 13dc e010 | | Load 0x0,0x10 13dd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 13de e011 | | Load 0x0,0x11 13df 1811 | | Execute Package,Field_Execute,Field_Number 0x11 13e0 e012 | | Load 0x0,0x12 13e1 1811 | | Execute Package,Field_Execute,Field_Number 0x11 13e2 4801 |H | Short_Literal 0x1 13e3 4800 |H | Short_Literal 0x0 13e4 e011 | | Load 0x0,0x11 13e5 1811 | | Execute Package,Field_Execute,Field_Number 0x11 13e6 e00f | | Load 0x0,0xf 13e7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 13e8 1816 | | Execute Package,Field_Execute,Field_Number 0x16 13e9 0092 1a08 | | Action Push_String_Extended,0x1a08 ; "{" 13eb e7ff | | Load 0x3,-0x1 13ec e00f | | Load 0x0,0xf 13ed 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 13ee 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 13ef 01cc | | Execute Vector,Catenate 13f0 0092 1a0c | | Action Push_String_Extended,0x1a0c ; ".@['c(library),'c(~library)?]}" 13f2 01cc | | Execute Vector,Catenate 13f3 e00f | | Load 0x0,0xf 13f4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 13f5 181b | | Execute Package,Field_Execute,Field_Number 0x1b 13f6 c605 | | Store 0x3,0x5 13f7 005b | [ | Store_Top Discrete,At_Offset_3 13f8 00cf | | Action Mark_Auxiliary 13f9 7822 |x" | Jump 0x141c 13fa e00f | | Load 0x0,0xf 13fb 1b0d | | Execute Package,Field_Read,Field_Number 0xd 13fc e604 | | Load 0x3,0x4 13fd 0120 | | Execute Any,Is_Value 13fe 6803 |h | Jump_Zero 0x1402 13ff e00f | | Load 0x0,0xf 1400 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1401 7801 |x | Jump 0x1403 1402 e604 | | Load 0x3,0x4 1403 e605 | | Load 0x3,0x5 1404 e00f | | Load 0x0,0xf 1405 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1406 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1407 c604 | | Store 0x3,0x4 1408 005b | [ | Store_Top Discrete,At_Offset_3 1409 00da | | Load_Top At_Offset_2 140a 6801 |h | Jump_Zero 0x140c 140b 7815 |x | Jump 0x1421 140c e604 | | Load 0x3,0x4 140d 8261 | a | Call 0x1,0x61 140e a406 | | Store_Unchecked 0x2,0x6 140f e406 | | Load 0x2,0x6 1410 7001 |p | Jump_Nonzero 0x1412 1411 780f |x | Jump 0x1421 1412 e604 | | Load 0x3,0x4 1413 8262 | b | Call 0x1,0x62 1414 a407 | | Store_Unchecked 0x2,0x7 1415 8608 | | Call 0x3,0x8 1416 e605 | | Load 0x3,0x5 1417 e00f | | Load 0x0,0xf 1418 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1419 181d | | Execute Package,Field_Execute,Field_Number 0x1d 141a c605 | | Store 0x3,0x5 141b 00c9 | | Action Pop_Auxiliary_Loop 141c e605 | | Load 0x3,0x5 141d e00f | | Load 0x0,0xf 141e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 141f 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1420 6fd9 |o | Jump_Zero 0x13fa 1421 00ce | | Action Pop_Auxiliary 1422 00db | | Load_Top At_Offset_3 1423 e00f | | Load 0x0,0xf 1424 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1425 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 1426 c605 | | Store 0x3,0x5 1427 4502 |E | Exit_Suprogram New_Top_Offset 0x2 1428 ; -------------------------------------------------------------------------------------- 1428 ; SUBPROGRAM 1428 ; -------------------------------------------------------------------------------------- 1428 143d | = | .CONST 0x143d ; Address of begin 1429 0004 | | .CONST 0x0004 ; Address of exception handler 142a 0006 | | .CONST 0x0006 ; Number of locals 142b INIT_1428: 142b e00f | | Load 0x0,0xf 142c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 142d 1b18 | | Execute Package,Field_Read,Field_Number 0x18 142e 02c7 | | Declare_Variable Any 142f 00d8 | | Load_Top At_Offset_0 1430 1c00 | | Execute_Immediate Run_Utility,0x0 1431 e00f | | Load 0x0,0xf 1432 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1433 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1434 e00f | | Load 0x0,0xf 1435 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1436 e00f | | Load 0x0,0xf 1437 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1438 02c7 | | Declare_Variable Any 1439 00d8 | | Load_Top At_Offset_0 143a 1c00 | | Execute_Immediate Run_Utility,0x0 143b 029f 18bb | | Declare_Subprogram INIT_18b8,For_Call 143d BODY_1428: 143d e00f | | Load 0x0,0xf 143e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 143f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1440 e602 | | Load 0x3,0x2 1441 604a |`J | Indirect_Literal Discrete,0x148c,{0x00000000, 0x00004000} 1442 e010 | | Load 0x0,0x10 1443 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1444 e011 | | Load 0x0,0x11 1445 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1446 e012 | | Load 0x0,0x12 1447 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1448 4801 |H | Short_Literal 0x1 1449 4800 |H | Short_Literal 0x0 144a e011 | | Load 0x0,0x11 144b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 144c e00f | | Load 0x0,0xf 144d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 144e 1816 | | Execute Package,Field_Execute,Field_Number 0x16 144f 0092 1a08 | | Action Push_String_Extended,0x1a08 ; "{" 1451 e7ff | | Load 0x3,-0x1 1452 e00f | | Load 0x0,0xf 1453 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1454 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 1455 01cc | | Execute Vector,Catenate 1456 0092 1a0a | | Action Push_String_Extended,0x1a0a ; ".??@}" 1458 01cc | | Execute Vector,Catenate 1459 e00f | | Load 0x0,0xf 145a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 145b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 145c c602 | | Store 0x3,0x2 145d c603 | | Store 0x3,0x3 145e 00db | | Load_Top At_Offset_3 145f 6801 |h | Jump_Zero 0x1461 1460 4502 |E | Exit_Suprogram New_Top_Offset 0x2 1461 00cf | | Action Mark_Auxiliary 1462 781c |x | Jump 0x147f 1463 e00f | | Load 0x0,0xf 1464 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1465 00db | | Load_Top At_Offset_3 1466 0120 | | Execute Any,Is_Value 1467 6803 |h | Jump_Zero 0x146b 1468 e00f | | Load 0x0,0xf 1469 1b0f | | Execute Package,Field_Read,Field_Number 0xf 146a 7801 |x | Jump 0x146c 146b 00db | | Load_Top At_Offset_3 146c e602 | | Load 0x3,0x2 146d e00f | | Load 0x0,0xf 146e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 146f 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 1470 c605 | | Store 0x3,0x5 1471 c604 | | Store 0x3,0x4 1472 00db | | Load_Top At_Offset_3 1473 6801 |h | Jump_Zero 0x1475 1474 780f |x | Jump 0x1484 1475 00da | | Load_Top At_Offset_2 1476 8263 | c | Call 0x1,0x63 1477 6801 |h | Jump_Zero 0x1479 1478 8606 | | Call 0x3,0x6 1479 e602 | | Load 0x3,0x2 147a e00f | | Load 0x0,0xf 147b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 147c 181d | | Execute Package,Field_Execute,Field_Number 0x1d 147d c602 | | Store 0x3,0x2 147e 00c9 | | Action Pop_Auxiliary_Loop 147f e602 | | Load 0x3,0x2 1480 e00f | | Load 0x0,0xf 1481 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1482 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1483 6fdf |o | Jump_Zero 0x1463 1484 00ce | | Action Pop_Auxiliary 1485 e602 | | Load 0x3,0x2 1486 e00f | | Load 0x0,0xf 1487 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1488 1852 | R | Execute Package,Field_Execute,Field_Number 0x52 1489 c602 | | Store 0x3,0x2 148a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 148b 0000 | | .XXX[0x1] 148c 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 1490 ; -------------------------------------------------------------------------------------- 1490 ; SUBPROGRAM 1490 ; -------------------------------------------------------------------------------------- 1490 1499 | | .CONST 0x1499 ; Address of begin 1491 0004 | | .CONST 0x0004 ; Address of exception handler 1492 0003 | | .CONST 0x0003 ; Number of locals 1493 INIT_1490: 1493 e405 | | Load 0x2,0x5 1494 e00f | | Load 0x0,0xf 1495 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1496 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 1497 029f 18db | | Declare_Subprogram INIT_18d8,For_Call 1499 BODY_1490: 1499 e406 | | Load 0x2,0x6 149a 0f02 | | Execute_Immediate Equal,0x2 149b 6802 |h | Jump_Zero 0x149e 149c e405 | | Load 0x2,0x5 149d 840b | | Call 0x2,0xb 149e e405 | | Load 0x2,0x5 149f 8263 | c | Call 0x1,0x63 14a0 6874 |ht | Jump_Zero 0x1515 14a1 e405 | | Load 0x2,0x5 14a2 8262 | b | Call 0x1,0x62 14a3 4658 |FX | Jump_Case 0x59 14a4 785c |x\ | Jump 0x1501 ; case 0x0 14a5 785b |x[ | Jump 0x1501 ; case 0x1 14a6 7856 |xV | Jump 0x14fd ; case 0x2 14a7 7855 |xU | Jump 0x14fd ; case 0x3 14a8 7858 |xX | Jump 0x1501 ; case 0x4 14a9 7857 |xW | Jump 0x1501 ; case 0x5 14aa 7856 |xV | Jump 0x1501 ; case 0x6 14ab 7855 |xU | Jump 0x1501 ; case 0x7 14ac 7854 |xT | Jump 0x1501 ; case 0x8 14ad 7853 |xS | Jump 0x1501 ; case 0x9 14ae 7852 |xR | Jump 0x1501 ; case 0xa 14af 7851 |xQ | Jump 0x1501 ; case 0xb 14b0 7850 |xP | Jump 0x1501 ; case 0xc 14b1 784e |xN | Jump 0x1500 ; case 0xd 14b2 784e |xN | Jump 0x1501 ; case 0xe 14b3 784c |xL | Jump 0x1500 ; case 0xf 14b4 784c |xL | Jump 0x1501 ; case 0x10 14b5 784a |xJ | Jump 0x1500 ; case 0x11 14b6 784a |xJ | Jump 0x1501 ; case 0x12 14b7 7848 |xH | Jump 0x1500 ; case 0x13 14b8 7848 |xH | Jump 0x1501 ; case 0x14 14b9 7846 |xF | Jump 0x1500 ; case 0x15 14ba 7846 |xF | Jump 0x1501 ; case 0x16 14bb 7844 |xD | Jump 0x1500 ; case 0x17 14bc 7844 |xD | Jump 0x1501 ; case 0x18 14bd 7842 |xB | Jump 0x1500 ; case 0x19 14be 7842 |xB | Jump 0x1501 ; case 0x1a 14bf 7840 |x@ | Jump 0x1500 ; case 0x1b 14c0 7840 |x@ | Jump 0x1501 ; case 0x1c 14c1 783f |x? | Jump 0x1501 ; case 0x1d 14c2 783e |x> | Jump 0x1501 ; case 0x1e 14c3 783d |x= | Jump 0x1501 ; case 0x1f 14c4 783c |x< | Jump 0x1501 ; case 0x20 14c5 783b |x; | Jump 0x1501 ; case 0x21 14c6 783a |x: | Jump 0x1501 ; case 0x22 14c7 7839 |x9 | Jump 0x1501 ; case 0x23 14c8 7838 |x8 | Jump 0x1501 ; case 0x24 14c9 7837 |x7 | Jump 0x1501 ; case 0x25 14ca 7836 |x6 | Jump 0x1501 ; case 0x26 14cb 7835 |x5 | Jump 0x1501 ; case 0x27 14cc 7834 |x4 | Jump 0x1501 ; case 0x28 14cd 7833 |x3 | Jump 0x1501 ; case 0x29 14ce 7832 |x2 | Jump 0x1501 ; case 0x2a 14cf 7831 |x1 | Jump 0x1501 ; case 0x2b 14d0 7830 |x0 | Jump 0x1501 ; case 0x2c 14d1 782f |x/ | Jump 0x1501 ; case 0x2d 14d2 782e |x. | Jump 0x1501 ; case 0x2e 14d3 782d |x- | Jump 0x1501 ; case 0x2f 14d4 782c |x, | Jump 0x1501 ; case 0x30 14d5 782b |x+ | Jump 0x1501 ; case 0x31 14d6 782a |x* | Jump 0x1501 ; case 0x32 14d7 7829 |x) | Jump 0x1501 ; case 0x33 14d8 7828 |x( | Jump 0x1501 ; case 0x34 14d9 7827 |x' | Jump 0x1501 ; case 0x35 14da 7826 |x& | Jump 0x1501 ; case 0x36 14db 7825 |x% | Jump 0x1501 ; case 0x37 14dc 7824 |x$ | Jump 0x1501 ; case 0x38 14dd 7823 |x# | Jump 0x1501 ; case 0x39 14de 7822 |x" | Jump 0x1501 ; case 0x3a 14df 7821 |x! | Jump 0x1501 ; case 0x3b 14e0 7820 |x | Jump 0x1501 ; case 0x3c 14e1 781f |x | Jump 0x1501 ; case 0x3d 14e2 781e |x | Jump 0x1501 ; case 0x3e 14e3 781d |x | Jump 0x1501 ; case 0x3f 14e4 781c |x | Jump 0x1501 ; case 0x40 14e5 781b |x | Jump 0x1501 ; case 0x41 14e6 781a |x | Jump 0x1501 ; case 0x42 14e7 7819 |x | Jump 0x1501 ; case 0x43 14e8 7818 |x | Jump 0x1501 ; case 0x44 14e9 7817 |x | Jump 0x1501 ; case 0x45 14ea 7816 |x | Jump 0x1501 ; case 0x46 14eb 7815 |x | Jump 0x1501 ; case 0x47 14ec 7814 |x | Jump 0x1501 ; case 0x48 14ed 7813 |x | Jump 0x1501 ; case 0x49 14ee 7812 |x | Jump 0x1501 ; case 0x4a 14ef 7811 |x | Jump 0x1501 ; case 0x4b 14f0 7810 |x | Jump 0x1501 ; case 0x4c 14f1 780f |x | Jump 0x1501 ; case 0x4d 14f2 780e |x | Jump 0x1501 ; case 0x4e 14f3 780d |x | Jump 0x1501 ; case 0x4f 14f4 780c |x | Jump 0x1501 ; case 0x50 14f5 780b |x | Jump 0x1501 ; case 0x51 14f6 780a |x | Jump 0x1501 ; case 0x52 14f7 7809 |x | Jump 0x1501 ; case 0x53 14f8 7808 |x | Jump 0x1501 ; case 0x54 14f9 7807 |x | Jump 0x1501 ; case 0x55 14fa 7806 |x | Jump 0x1501 ; case 0x56 14fb 7805 |x | Jump 0x1501 ; case 0x57 14fc 7804 |x | Jump 0x1501 ; case 0x58 14fd e405 | | Load 0x2,0x5 14fe 840c | | Call 0x2,0xc 14ff 7801 |x | Jump 0x1501 1500 8603 | | Call 0x3,0x3 1501 00d9 | | Load_Top At_Offset_1 1502 e008 | | Load 0x0,0x8 1503 180e | | Execute Package,Field_Execute,Field_Number 0xe 1504 6808 |h | Jump_Zero 0x150d 1505 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 1507 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 1509 00ea | | Load_Encached Null_String_Cache 150a e602 | | Load 0x3,0x2 150b e007 | | Load 0x0,0x7 150c 180e | | Execute Package,Field_Execute,Field_Number 0xe 150d 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 150f 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 1511 00ea | | Load_Encached Null_String_Cache 1512 e602 | | Load 0x3,0x2 1513 e007 | | Load 0x0,0x7 1514 1817 | | Execute Package,Field_Execute,Field_Number 0x17 1515 e405 | | Load 0x2,0x5 1516 8261 | a | Call 0x1,0x61 1517 a406 | | Store_Unchecked 0x2,0x6 1518 e406 | | Load 0x2,0x6 1519 6814 |h | Jump_Zero 0x152e 151a e406 | | Load 0x2,0x6 151b 0f01 | | Execute_Immediate Equal,0x1 151c 7003 |p | Jump_Nonzero 0x1520 151d e402 | | Load 0x2,0x2 151e 8408 | | Call 0x2,0x8 151f 6809 |h | Jump_Zero 0x1529 1520 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 1522 0092 1a0d | | Action Push_String_Extended,0x1a0d ; "<DIRECTORIES>" 1524 4be7 |K | Short_Literal 0x3e7 1525 e602 | | Load 0x3,0x2 1526 e006 | | Load 0x0,0x6 1527 181a | | Execute Package,Field_Execute,Field_Number 0x1a 1528 7805 |x | Jump 0x152e 1529 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 152b 4800 |H | Short_Literal 0x0 152c 00db | | Load_Top At_Offset_3 152d 8025 | % | Call 0x0,0x25 152e e402 | | Load 0x2,0x2 152f e00f | | Load 0x0,0xf 1530 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1531 181d | | Execute Package,Field_Execute,Field_Number 0x1d 1532 c402 | | Store 0x2,0x2 1533 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1534 0000 0000 | | .BLANK 0000[0x4] 1538 ; -------------------------------------------------------------------------------------- 1538 ; SUBPROGRAM 1538 ; -------------------------------------------------------------------------------------- 1538 154d | M | .CONST 0x154d ; Address of begin 1539 0004 | | .CONST 0x0004 ; Address of exception handler 153a 0004 | | .CONST 0x0004 ; Number of locals 153b INIT_1538: 153b e00f | | Load 0x0,0xf 153c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 153d 02c7 | | Declare_Variable Any 153e 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 1540 e001 | | Load 0x0,0x1 1541 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1542 a602 | | Store_Unchecked 0x3,0x2 1543 e00f | | Load 0x0,0xf 1544 1b0f | | Execute Package,Field_Read,Field_Number 0xf 1545 02c7 | | Declare_Variable Any 1546 0092 1a0e | | Action Push_String_Extended,0x1a0e ; "<SELECTION>" 1548 e001 | | Load 0x0,0x1 1549 1810 | | Execute Package,Field_Execute,Field_Number 0x10 154a a603 | | Store_Unchecked 0x3,0x3 154b e001 | | Load 0x0,0x1 154c 1b15 | | Execute Package,Field_Read,Field_Number 0x15 154d BODY_1538: 154d 00d9 | | Load_Top At_Offset_1 154e e00f | | Load 0x0,0xf 154f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 1550 7005 |p | Jump_Nonzero 0x1556 1551 00d9 | | Load_Top At_Offset_1 1552 e001 | | Load 0x0,0x1 1553 1819 | | Execute Package,Field_Execute,Field_Number 0x19 1554 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 1555 7804 |x | Jump 0x155a 1556 00da | | Load_Top At_Offset_2 1557 e001 | | Load 0x0,0x1 1558 1819 | | Execute Package,Field_Execute,Field_Number 0x19 1559 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 155a 00d8 | | Load_Top At_Offset_0 155b 00d8 | | Load_Top At_Offset_0 155c 0d1d | | Execute_Immediate Less,0x1d 155d 701a |p | Jump_Nonzero 0x1578 155e 00d8 | | Load_Top At_Offset_0 155f 0c38 | 8 | Execute_Immediate Greater_Equal,0x38 1560 7011 |p | Jump_Nonzero 0x1572 1561 00d1 | | Pop_Control Pop_Count_1 1562 00ea | | Load_Encached Null_String_Cache 1563 00ea | | Load_Encached Null_String_Cache 1564 00ea | | Load_Encached Null_String_Cache 1565 00ea | | Load_Encached Null_String_Cache 1566 00ea | | Load_Encached Null_String_Cache 1567 00ea | | Load_Encached Null_String_Cache 1568 00ea | | Load_Encached Null_String_Cache 1569 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 156b e001 | | Load 0x0,0x1 156c 180f | | Execute Package,Field_Execute,Field_Number 0xf 156d 4ad7 |J | Short_Literal 0x2d7 156e 481a |H | Short_Literal 0x1a 156f e002 | | Load 0x0,0x2 1570 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1571 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1572 00d8 | | Load_Top At_Offset_0 1573 0c3a | : | Execute_Immediate Greater_Equal,0x3a 1574 6808 |h | Jump_Zero 0x157d 1575 0f3e | > | Execute_Immediate Equal,0x3e 1576 7007 |p | Jump_Nonzero 0x157e 1577 7fea | | Jump 0x1562 1578 0b11 | | Execute_Immediate Case_Compare,0x11 1579 7003 |p | Jump_Nonzero 0x157d 157a 0f1c | | Execute_Immediate Equal,0x1c 157b 7002 |p | Jump_Nonzero 0x157e 157c 7fe5 | | Jump 0x1562 157d 00d1 | | Pop_Control Pop_Count_1 157e e005 | | Load 0x0,0x5 157f 181e | | Execute Package,Field_Execute,Field_Number 0x1e 1580 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1581 0000 0000 | | .BLANK 0000[0x7] 1588 ; -------------------------------------------------------------------------------------- 1588 ; SUBPROGRAM 1588 ; -------------------------------------------------------------------------------------- 1588 1592 | | .CONST 0x1592 ; Address of begin 1589 0004 | | .CONST 0x0004 ; Address of exception handler 158a 0003 | | .CONST 0x0003 ; Number of locals 158b INIT_1588: 158b e026 | & | Load 0x0,0x26 158c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 158d 02c7 | | Declare_Variable Any 158e 00d8 | | Load_Top At_Offset_0 158f 1c00 | | Execute_Immediate Run_Utility,0x0 1590 e018 | | Load 0x0,0x18 1591 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1592 BODY_1588: 1592 00d9 | | Load_Top At_Offset_1 1593 e018 | | Load 0x0,0x18 1594 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1595 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 1597 00ea | | Load_Encached Null_String_Cache 1598 4800 |H | Short_Literal 0x0 1599 0092 19ef | | Action Push_String_Extended,0x19ef ; "$" 159b 4801 |H | Short_Literal 0x1 159c e5ff | | Load 0x2,-0x1 159d e018 | | Load 0x0,0x18 159e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 159f 005a | Z | Store_Top Discrete,At_Offset_2 15a0 c602 | | Store 0x3,0x2 15a1 00d8 | | Load_Top At_Offset_0 15a2 e027 | ' | Load 0x0,0x27 15a3 1812 | | Execute Package,Field_Execute,Field_Number 0x12 15a4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 15a5 0000 0000 | | .XXX[0x3] 15a7 0000 | | 15a8 ; -------------------------------------------------------------------------------------- 15a8 ; SUBPROGRAM 15a8 ; -------------------------------------------------------------------------------------- 15a8 15b8 | | .CONST 0x15b8 ; Address of begin 15a9 15cd | | .CONST 0x15cd ; Address of exception handler 15aa 0006 | | .CONST 0x0006 ; Number of locals 15ab INIT_15a8: 15ab e001 | | Load 0x0,0x1 15ac 180d | | Execute Package,Field_Execute,Field_Number 0xd 15ad 0092 1a0f | | Action Push_String_Extended,0x1a0f ; "!Machine.Queues.User_To_Printer_Map" 15af e004 | | Load 0x0,0x4 15b0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 15b1 02c7 | | Declare_Variable Any 15b2 00d8 | | Load_Top At_Offset_0 15b3 1c00 | | Execute_Immediate Run_Utility,0x0 15b4 029f 18fb | | Declare_Subprogram INIT_18f8,For_Call 15b6 029f 192b | +| Declare_Subprogram INIT_1928,For_Call 15b8 BODY_15a8: 15b8 00da | | Load_Top At_Offset_2 15b9 00ea | | Load_Encached Null_String_Cache 15ba e603 | | Load 0x3,0x3 15bb 4800 |H | Short_Literal 0x0 15bc e004 | | Load 0x0,0x4 15bd 1815 | | Execute Package,Field_Execute,Field_Number 0x15 15be c604 | | Store 0x3,0x4 15bf 00cf | | Action Mark_Auxiliary 15c0 7802 |x | Jump 0x15c3 15c1 8606 | | Call 0x3,0x6 15c2 00c9 | | Action Pop_Auxiliary_Loop 15c3 00db | | Load_Top At_Offset_3 15c4 e004 | | Load 0x0,0x4 15c5 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 15c6 6ffa |o | Jump_Zero 0x15c1 15c7 00ce | | Action Pop_Auxiliary 15c8 00da | | Load_Top At_Offset_2 15c9 e004 | | Load 0x0,0x4 15ca 181b | | Execute Package,Field_Execute,Field_Number 0x1b 15cb c604 | | Store 0x3,0x4 15cc 4501 |E | Exit_Suprogram New_Top_Offset 0x1 15cd TRAP_15a8: 15cd 0007 | | Action Break_Optional 15ce 4501 |E | Exit_Suprogram New_Top_Offset 0x1 15cf 0000 | | .XXX[0x1] 15d0 ; -------------------------------------------------------------------------------------- 15d0 ; SUBPROGRAM 15d0 ; -------------------------------------------------------------------------------------- 15d0 15d7 | | .CONST 0x15d7 ; Address of begin 15d1 0004 | | .CONST 0x0004 ; Address of exception handler 15d2 0002 | | .CONST 0x0002 ; Number of locals 15d3 INIT_15d0: 15d3 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 15d5 e001 | | Load 0x0,0x1 15d6 180f | | Execute Package,Field_Execute,Field_Number 0xf 15d7 BODY_15d0: 15d7 00d8 | | Load_Top At_Offset_0 15d8 0092 19af | | Action Push_String_Extended,0x19af ; "<>" 15da 01df | | Execute Vector,Equal 15db 6803 |h | Jump_Zero 0x15df 15dc 0092 19d0 | | Action Push_String_Extended,0x19d0 ; "<CURRENT_WINDOW_CONTENTS>" 15de 00ca | | Action Exit_Nullary_Function 15df 00d8 | | Load_Top At_Offset_0 15e0 00ca | | Action Exit_Nullary_Function 15e1 0000 0000 | | .BLANK 0000[0x7] 15e8 ; -------------------------------------------------------------------------------------- 15e8 ; SUBPROGRAM 15e8 ; -------------------------------------------------------------------------------------- 15e8 160f | | .CONST 0x160f ; Address of begin 15e9 0004 | | .CONST 0x0004 ; Address of exception handler 15ea 0008 | | .CONST 0x0008 ; Number of locals 15eb INIT_15e8: 15eb 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 15ed e001 | | Load 0x0,0x1 15ee 180f | | Execute Package,Field_Execute,Field_Number 0xf 15ef e021 | ! | Load 0x0,0x21 15f0 181b | | Execute Package,Field_Execute,Field_Number 0x1b 15f1 e00f | | Load 0x0,0xf 15f2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 15f3 02c7 | | Declare_Variable Any 15f4 e605 | | Load 0x3,0x5 15f5 e00f | | Load 0x0,0xf 15f6 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 15f7 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 15f8 a803 | | Store_Unchecked 0x4,0x3 15f9 0092 1a10 | | Action Push_String_Extended,0x1a10 ; "Volume => " 15fb e605 | | Load 0x3,0x5 15fc e00f | | Load 0x0,0xf 15fd 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 15fe 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 15ff 00e0 | | Load_Encached Standard_Cache 1600 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1601 01cc | | Execute Vector,Catenate 1602 0007 | | Action Break_Optional 1603 e00f | | Load 0x0,0xf 1604 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 1605 0322 | " | Declare_Variable Record 1606 00d8 | | Load_Top At_Offset_0 1607 1c00 | | Execute_Immediate Run_Utility,0x0 1608 e00f | | Load 0x0,0xf 1609 1b0d | | Execute Package,Field_Read,Field_Number 0xd 160a e00f | | Load 0x0,0xf 160b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 160c e00f | | Load 0x0,0xf 160d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 160e 1b11 | | Execute Package,Field_Read,Field_Number 0x11 160f BODY_15e8: 160f e00f | | Load 0x0,0xf 1610 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1611 e00f | | Load 0x0,0xf 1612 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1613 1b11 | | Execute Package,Field_Read,Field_Number 0x11 1614 611b |a | Indirect_Literal Discrete,0x1730,{0x00000000, 0x00004000} 1615 e010 | | Load 0x0,0x10 1616 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1617 4800 |H | Short_Literal 0x0 1618 e803 | | Load 0x4,0x3 1619 e00f | | Load 0x0,0xf 161a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 161b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 161c 0032 | 2 | Store_Top Heap_Access,At_Offset_2 161d 005a | Z | Store_Top Discrete,At_Offset_2 161e e608 | | Load 0x3,0x8 161f 00d8 | | Load_Top At_Offset_0 1620 0c08 | | Execute_Immediate Greater_Equal,0x8 1621 7008 |p | Jump_Nonzero 0x162a 1622 00d8 | | Load_Top At_Offset_0 1623 0c02 | | Execute_Immediate Greater_Equal,0x2 1624 68fd |h | Jump_Zero 0x1722 1625 0b03 | | Execute_Immediate Case_Compare,0x3 1626 700d |p | Jump_Nonzero 0x1634 1627 0f07 | | Execute_Immediate Equal,0x7 1628 70d3 |p | Jump_Nonzero 0x16fc 1629 7862 |xb | Jump 0x168c 162a 00d8 | | Load_Top At_Offset_0 162b 4841 |HA | Short_Literal 0x41 162c 4842 |HB | Short_Literal 0x42 162d 0262 | b | Execute Discrete,In_Range 162e 705c |p\ | Jump_Nonzero 0x168b 162f 484c |HL | Short_Literal 0x4c 1630 484d |HM | Short_Literal 0x4d 1631 0262 | b | Execute Discrete,In_Range 1632 7059 |pY | Jump_Nonzero 0x168c 1633 78ef |x | Jump 0x1723 1634 00d1 | | Pop_Control Pop_Count_1 1635 00d9 | | Load_Top At_Offset_1 1636 0e00 | | Execute_Immediate Not_Equal,0x0 1637 e803 | | Load 0x4,0x3 1638 e00f | | Load 0x0,0xf 1639 1811 | | Execute Package,Field_Execute,Field_Number 0x11 163a 0278 | x | Execute Discrete,Or 163b 6826 |h& | Jump_Zero 0x1662 163c 00ea | | Load_Encached Null_String_Cache 163d 00ea | | Load_Encached Null_String_Cache 163e 00ea | | Load_Encached Null_String_Cache 163f 00ea | | Load_Encached Null_String_Cache 1640 e60c | | Load 0x3,0xc 1641 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1643 01cc | | Execute Vector,Catenate 1644 e60e | | Load 0x3,0xe 1645 01cc | | Execute Vector,Catenate 1646 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1648 01cc | | Execute Vector,Catenate 1649 e609 | | Load 0x3,0x9 164a 01cc | | Execute Vector,Catenate 164b 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 164d 01cc | | Execute Vector,Catenate 164e e615 | | Load 0x3,0x15 164f 01cc | | Execute Vector,Catenate 1650 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1652 01cc | | Execute Vector,Catenate 1653 e617 | | Load 0x3,0x17 1654 01cc | | Execute Vector,Catenate 1655 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1657 01cc | | Execute Vector,Catenate 1658 e804 | | Load 0x4,0x4 1659 01cc | | Execute Vector,Catenate 165a 00ea | | Load_Encached Null_String_Cache 165b e60b | | Load 0x3,0xb 165c e603 | | Load 0x3,0x3 165d 60ce |` | Indirect_Literal Discrete,0x172c,{0x00000000, 0x00001d6b} 165e 483a |H: | Short_Literal 0x3a 165f e002 | | Load 0x0,0x2 1660 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1661 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1662 00ea | | Load_Encached Null_String_Cache 1663 00ea | | Load_Encached Null_String_Cache 1664 00ea | | Load_Encached Null_String_Cache 1665 00ea | | Load_Encached Null_String_Cache 1666 e60c | | Load 0x3,0xc 1667 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1669 01cc | | Execute Vector,Catenate 166a e60e | | Load 0x3,0xe 166b 01cc | | Execute Vector,Catenate 166c 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 166e 01cc | | Execute Vector,Catenate 166f e609 | | Load 0x3,0x9 1670 01cc | | Execute Vector,Catenate 1671 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1673 01cc | | Execute Vector,Catenate 1674 e615 | | Load 0x3,0x15 1675 01cc | | Execute Vector,Catenate 1676 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1678 01cc | | Execute Vector,Catenate 1679 e617 | | Load 0x3,0x17 167a 01cc | | Execute Vector,Catenate 167b 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 167d 01cc | | Execute Vector,Catenate 167e e804 | | Load 0x4,0x4 167f 01cc | | Execute Vector,Catenate 1680 e803 | | Load 0x4,0x3 1681 e00f | | Load 0x0,0xf 1682 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1683 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 1684 e60b | | Load 0x3,0xb 1685 e603 | | Load 0x3,0x3 1686 60a5 |` | Indirect_Literal Discrete,0x172c,{0x00000000, 0x00001d6b} 1687 483a |H: | Short_Literal 0x3a 1688 e002 | | Load 0x0,0x2 1689 1818 | | Execute Package,Field_Execute,Field_Number 0x18 168a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 168b 00d1 | | Pop_Control Pop_Count_1 168c e00f | | Load 0x0,0xf 168d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 168e e805 | | Load 0x4,0x5 168f 60a0 |` | Indirect_Literal Discrete,0x1730,{0x00000000, 0x00004000} 1690 e010 | | Load 0x0,0x10 1691 1b0e | | Execute Package,Field_Read,Field_Number 0xe 1692 e602 | | Load 0x3,0x2 1693 e00f | | Load 0x0,0xf 1694 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 1695 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 1696 00d1 | | Pop_Control Pop_Count_1 1697 005b | [ | Store_Top Discrete,At_Offset_3 1698 00d9 | | Load_Top At_Offset_1 1699 0e00 | | Execute_Immediate Not_Equal,0x0 169a e803 | | Load 0x4,0x3 169b e00f | | Load 0x0,0xf 169c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 169d 0278 | x | Execute Discrete,Or 169e 682d |h- | Jump_Zero 0x16cc 169f 00ea | | Load_Encached Null_String_Cache 16a0 00ea | | Load_Encached Null_String_Cache 16a1 e60c | | Load 0x3,0xc 16a2 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 16a4 01cc | | Execute Vector,Catenate 16a5 e60e | | Load 0x3,0xe 16a6 01cc | | Execute Vector,Catenate 16a7 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 16a9 01cc | | Execute Vector,Catenate 16aa e609 | | Load 0x3,0x9 16ab 01cc | | Execute Vector,Catenate 16ac 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 16ae 01cc | | Execute Vector,Catenate 16af e615 | | Load 0x3,0x15 16b0 01cc | | Execute Vector,Catenate 16b1 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 16b3 01cc | | Execute Vector,Catenate 16b4 e617 | | Load 0x3,0x17 16b5 01cc | | Execute Vector,Catenate 16b6 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 16b8 01cc | | Execute Vector,Catenate 16b9 e804 | | Load 0x4,0x4 16ba 01cc | | Execute Vector,Catenate 16bb 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 16bd 01cc | | Execute Vector,Catenate 16be e805 | | Load 0x4,0x5 16bf e028 | ( | Load 0x0,0x28 16c0 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 16c1 01cc | | Execute Vector,Catenate 16c2 e802 | | Load 0x4,0x2 16c3 e60a | | Load 0x3,0xa 16c4 00ea | | Load_Encached Null_String_Cache 16c5 e60b | | Load 0x3,0xb 16c6 e603 | | Load 0x3,0x3 16c7 6060 |`` | Indirect_Literal Discrete,0x1728,{0x00000000, 0x00001d6c} 16c8 483b |H; | Short_Literal 0x3b 16c9 e002 | | Load 0x0,0x2 16ca 1818 | | Execute Package,Field_Execute,Field_Number 0x18 16cb 4501 |E | Exit_Suprogram New_Top_Offset 0x1 16cc 00ea | | Load_Encached Null_String_Cache 16cd 00ea | | Load_Encached Null_String_Cache 16ce e60c | | Load 0x3,0xc 16cf 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 16d1 01cc | | Execute Vector,Catenate 16d2 e60e | | Load 0x3,0xe 16d3 01cc | | Execute Vector,Catenate 16d4 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 16d6 01cc | | Execute Vector,Catenate 16d7 e609 | | Load 0x3,0x9 16d8 01cc | | Execute Vector,Catenate 16d9 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 16db 01cc | | Execute Vector,Catenate 16dc e615 | | Load 0x3,0x15 16dd 01cc | | Execute Vector,Catenate 16de 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 16e0 01cc | | Execute Vector,Catenate 16e1 e617 | | Load 0x3,0x17 16e2 01cc | | Execute Vector,Catenate 16e3 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 16e5 01cc | | Execute Vector,Catenate 16e6 e804 | | Load 0x4,0x4 16e7 01cc | | Execute Vector,Catenate 16e8 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 16ea 01cc | | Execute Vector,Catenate 16eb e805 | | Load 0x4,0x5 16ec e028 | ( | Load 0x0,0x28 16ed 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 16ee 01cc | | Execute Vector,Catenate 16ef e802 | | Load 0x4,0x2 16f0 e60a | | Load 0x3,0xa 16f1 e803 | | Load 0x4,0x3 16f2 e00f | | Load 0x0,0xf 16f3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 16f4 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 16f5 e60b | | Load 0x3,0xb 16f6 e603 | | Load 0x3,0x3 16f7 6030 |`0 | Indirect_Literal Discrete,0x1728,{0x00000000, 0x00001d6c} 16f8 483b |H; | Short_Literal 0x3b 16f9 e002 | | Load 0x0,0x2 16fa 1818 | | Execute Package,Field_Execute,Field_Number 0x18 16fb 4501 |E | Exit_Suprogram New_Top_Offset 0x1 16fc 00ea | | Load_Encached Null_String_Cache 16fd 00ea | | Load_Encached Null_String_Cache 16fe e60c | | Load 0x3,0xc 16ff 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1701 01cc | | Execute Vector,Catenate 1702 e60e | | Load 0x3,0xe 1703 01cc | | Execute Vector,Catenate 1704 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1706 01cc | | Execute Vector,Catenate 1707 e609 | | Load 0x3,0x9 1708 01cc | | Execute Vector,Catenate 1709 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 170b 01cc | | Execute Vector,Catenate 170c e610 | | Load 0x3,0x10 170d 01cc | | Execute Vector,Catenate 170e 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1710 01cc | | Execute Vector,Catenate 1711 e615 | | Load 0x3,0x15 1712 01cc | | Execute Vector,Catenate 1713 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1715 01cc | | Execute Vector,Catenate 1716 e617 | | Load 0x3,0x17 1717 01cc | | Execute Vector,Catenate 1718 e614 | | Load 0x3,0x14 1719 e612 | | Load 0x3,0x12 171a e60b | | Load 0x3,0xb 171b e60a | | Load 0x3,0xa 171c e603 | | Load 0x3,0x3 171d 4af1 |J | Short_Literal 0x2f1 171e 4818 |H | Short_Literal 0x18 171f e002 | | Load 0x0,0x2 1720 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1721 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1722 00d1 | | Pop_Control Pop_Count_1 1723 0092 1a11 | | Action Push_String_Extended,0x1a11 ; "Cannot edit that type of object" 1725 825d | ] | Call 0x1,0x5d 1726 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1727 0000 | | .XXX[0x1] 1728 0000 0000 | | .LITERAL {0x00000000, 0x00001d6c} 172c 0000 0000 | | .LITERAL {0x00000000, 0x00001d6b} 1730 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 1734 0000 0000 | | .BLANK 0000[0x4] 1738 ; -------------------------------------------------------------------------------------- 1738 ; SUBPROGRAM 1738 ; -------------------------------------------------------------------------------------- 1738 1748 | H | .CONST 0x1748 ; Address of begin 1739 0004 | | .CONST 0x0004 ; Address of exception handler 173a 0002 | | .CONST 0x0002 ; Number of locals 173b INIT_1738: 173b 0092 1a12 | | Action Push_String_Extended,0x1a12 ; "State => " 173d e605 | | Load 0x3,0x5 173e e00f | | Load 0x0,0xf 173f 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 1740 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 1741 e00f | | Load 0x0,0xf 1742 1b3a | : | Execute Package,Field_Read,Field_Number 0x3a 1743 1b0d | | Execute Package,Field_Read,Field_Number 0xd 1744 011c | | Execute Any,Convert_Unchecked 1745 1c01 | | Execute_Immediate Run_Utility,0x1 1746 01cc | | Execute Vector,Catenate 1747 0007 | | Action Break_Optional 1748 BODY_1738: 1748 e606 | | Load 0x3,0x6 1749 0f03 | | Execute_Immediate Equal,0x3 174a 702b |p+ | Jump_Nonzero 0x1776 174b 00ea | | Load_Encached Null_String_Cache 174c 00ea | | Load_Encached Null_String_Cache 174d 00da | | Load_Top At_Offset_2 174e 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1750 01cc | | Execute Vector,Catenate 1751 e60c | | Load 0x3,0xc 1752 01cc | | Execute Vector,Catenate 1753 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1755 01cc | | Execute Vector,Catenate 1756 e60e | | Load 0x3,0xe 1757 01cc | | Execute Vector,Catenate 1758 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 175a 01cc | | Execute Vector,Catenate 175b e609 | | Load 0x3,0x9 175c 01cc | | Execute Vector,Catenate 175d 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 175f 01cc | | Execute Vector,Catenate 1760 e610 | | Load 0x3,0x10 1761 01cc | | Execute Vector,Catenate 1762 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1764 01cc | | Execute Vector,Catenate 1765 e615 | | Load 0x3,0x15 1766 01cc | | Execute Vector,Catenate 1767 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1769 01cc | | Execute Vector,Catenate 176a e617 | | Load 0x3,0x17 176b 01cc | | Execute Vector,Catenate 176c e614 | | Load 0x3,0x14 176d e612 | | Load 0x3,0x12 176e e60b | | Load 0x3,0xb 176f e60a | | Load 0x3,0xa 1770 e603 | | Load 0x3,0x3 1771 4af1 |J | Short_Literal 0x2f1 1772 4818 |H | Short_Literal 0x18 1773 e002 | | Load 0x0,0x2 1774 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1775 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1776 00ea | | Load_Encached Null_String_Cache 1777 00ea | | Load_Encached Null_String_Cache 1778 e60c | | Load 0x3,0xc 1779 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 177b 01cc | | Execute Vector,Catenate 177c e60e | | Load 0x3,0xe 177d 01cc | | Execute Vector,Catenate 177e 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1780 01cc | | Execute Vector,Catenate 1781 e609 | | Load 0x3,0x9 1782 01cc | | Execute Vector,Catenate 1783 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 1785 01cc | | Execute Vector,Catenate 1786 e610 | | Load 0x3,0x10 1787 01cc | | Execute Vector,Catenate 1788 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 178a 01cc | | Execute Vector,Catenate 178b e615 | | Load 0x3,0x15 178c 01cc | | Execute Vector,Catenate 178d 0092 1a01 | | Action Push_String_Extended,0x1a01 ; "\x5c" 178f 01cc | | Execute Vector,Catenate 1790 e617 | | Load 0x3,0x17 1791 01cc | | Execute Vector,Catenate 1792 e614 | | Load 0x3,0x14 1793 e612 | | Load 0x3,0x12 1794 e60b | | Load 0x3,0xb 1795 e60a | | Load 0x3,0xa 1796 e603 | | Load 0x3,0x3 1797 4af1 |J | Short_Literal 0x2f1 1798 4818 |H | Short_Literal 0x18 1799 e002 | | Load 0x0,0x2 179a 1818 | | Execute Package,Field_Execute,Field_Number 0x18 179b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 179c 0000 0000 | | .BLANK 0000[0x4] 17a0 ; -------------------------------------------------------------------------------------- 17a0 ; SUBPROGRAM 17a0 ; -------------------------------------------------------------------------------------- 17a0 17b7 | | .CONST 0x17b7 ; Address of begin 17a1 0004 | | .CONST 0x0004 ; Address of exception handler 17a2 0004 | | .CONST 0x0004 ; Number of locals 17a3 INIT_17a0: 17a3 e602 | | Load 0x3,0x2 17a4 e00f | | Load 0x0,0xf 17a5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 17a6 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 17a7 e00f | | Load 0x0,0xf 17a8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 17a9 02c7 | | Declare_Variable Any 17aa 0092 19a5 | | Action Push_String_Extended,0x19a5 ; "<Cursor>" 17ac e001 | | Load 0x0,0x1 17ad 1810 | | Execute Package,Field_Execute,Field_Number 0x10 17ae a803 | | Store_Unchecked 0x4,0x3 17af e00f | | Load 0x0,0xf 17b0 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 17b1 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 17b2 02c7 | | Declare_Variable Any 17b3 00d9 | | Load_Top At_Offset_1 17b4 e001 | | Load 0x0,0x1 17b5 1812 | | Execute Package,Field_Execute,Field_Number 0x12 17b6 a804 | | Store_Unchecked 0x4,0x4 17b7 BODY_17a0: 17b7 e5fe | | Load 0x2,-0x2 17b8 0f01 | | Execute_Immediate Equal,0x1 17b9 700c |p | Jump_Nonzero 0x17c6 17ba 00d8 | | Load_Top At_Offset_0 17bb e00f | | Load 0x0,0xf 17bc 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 17bd 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 17be 6812 |h | Jump_Zero 0x17d1 17bf 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 17c1 4801 |H | Short_Literal 0x1 17c2 e802 | | Load 0x4,0x2 17c3 e006 | | Load 0x0,0x6 17c4 181f | | Execute Package,Field_Execute,Field_Number 0x1f 17c5 780b |x | Jump 0x17d1 17c6 00d8 | | Load_Top At_Offset_0 17c7 e00f | | Load 0x0,0xf 17c8 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f 17c9 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 17ca 7006 |p | Jump_Nonzero 0x17d1 17cb 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 17cd 4801 |H | Short_Literal 0x1 17ce e802 | | Load 0x4,0x2 17cf e006 | | Load 0x0,0x6 17d0 181e | | Execute Package,Field_Execute,Field_Number 0x1e 17d1 4800 |H | Short_Literal 0x0 17d2 00ea | | Load_Encached Null_String_Cache 17d3 4820 |H | Short_Literal 0x20 17d4 4820 |H | Short_Literal 0x20 17d5 e5fd | | Load 0x2,-0x3 17d6 e00b | | Load 0x0,0xb 17d7 181a | | Execute Package,Field_Execute,Field_Number 0x1a 17d8 e00b | | Load 0x0,0xb 17d9 181b | | Execute Package,Field_Execute,Field_Number 0x1b 17da e00b | | Load 0x0,0xb 17db 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 17dc 700f |p | Jump_Nonzero 0x17ec 17dd e5fd | | Load 0x2,-0x3 17de e001 | | Load 0x0,0x1 17df 1813 | | Execute Package,Field_Execute,Field_Number 0x13 17e0 6807 |h | Jump_Zero 0x17e8 17e1 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 17e3 00db | | Load_Top At_Offset_3 17e4 e5fd | | Load 0x2,-0x3 17e5 e009 | | Load 0x0,0x9 17e6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 17e7 7804 |x | Jump 0x17ec 17e8 0092 1a07 | | Action Push_String_Extended,0x1a07 ; "Switch file does not exist" 17ea e024 | $ | Load 0x0,0x24 17eb 180d | | Execute Package,Field_Execute,Field_Number 0xd 17ec 4801 |H | Short_Literal 0x1 17ed e5fc | | Load 0x2,-0x4 17ee e802 | | Load 0x4,0x2 17ef e021 | ! | Load 0x0,0x21 17f0 1811 | | Execute Package,Field_Execute,Field_Number 0x11 17f1 e00b | | Load 0x0,0xb 17f2 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 17f3 7006 |p | Jump_Nonzero 0x17fa 17f4 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 17f6 00db | | Load_Top At_Offset_3 17f7 e5fc | | Load 0x2,-0x4 17f8 e023 | # | Load 0x0,0x23 17f9 1810 | | Execute Package,Field_Execute,Field_Number 0x10 17fa 4801 |H | Short_Literal 0x1 17fb e5fb | | Load 0x2,-0x5 17fc e802 | | Load 0x4,0x2 17fd e021 | ! | Load 0x0,0x21 17fe 181b | | Execute Package,Field_Execute,Field_Number 0x1b 17ff e00b | | Load 0x0,0xb 1800 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 1801 7006 |p | Jump_Nonzero 0x1808 1802 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 1804 00db | | Load_Top At_Offset_3 1805 e5fb | | Load 0x2,-0x5 1806 e023 | # | Load 0x0,0x23 1807 1812 | | Execute Package,Field_Execute,Field_Number 0x12 1808 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1809 0000 0000 | | .BLANK 0000[0x7] 1810 ; -------------------------------------------------------------------------------------- 1810 ; SUBPROGRAM 1810 ; -------------------------------------------------------------------------------------- 1810 1817 | | .CONST 0x1817 ; Address of begin 1811 0004 | | .CONST 0x0004 ; Address of exception handler 1812 0002 | | .CONST 0x0002 ; Number of locals 1813 INIT_1810: 1813 e602 | | Load 0x3,0x2 1814 e029 | ) | Load 0x0,0x29 1815 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 1816 1816 | | Execute Package,Field_Execute,Field_Number 0x16 1817 BODY_1810: 1817 00d8 | | Load_Top At_Offset_0 1818 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 1819 700c |p | Jump_Nonzero 0x1826 181a 00d8 | | Load_Top At_Offset_0 181b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 181c 7009 |p | Jump_Nonzero 0x1826 181d 00d8 | | Load_Top At_Offset_0 181e 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 181f 7006 |p | Jump_Nonzero 0x1826 1820 00d8 | | Load_Top At_Offset_0 1821 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 1822 7003 |p | Jump_Nonzero 0x1826 1823 4800 |H | Short_Literal 0x0 1824 00cb | | Action Pop_Block_With_Result 1825 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1826 4801 |H | Short_Literal 0x1 1827 00cb | | Action Pop_Block_With_Result 1828 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 1829 0000 0000 | | .BLANK 0000[0x7] 1830 ; -------------------------------------------------------------------------------------- 1830 ; SUBPROGRAM 1830 ; -------------------------------------------------------------------------------------- 1830 1837 | 7 | .CONST 0x1837 ; Address of begin 1831 0004 | | .CONST 0x0004 ; Address of exception handler 1832 0002 | | .CONST 0x0002 ; Number of locals 1833 INIT_1830: 1833 e605 | | Load 0x3,0x5 1834 e00f | | Load 0x0,0xf 1835 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1836 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 1837 BODY_1830: 1837 e605 | | Load 0x3,0x5 1838 8263 | c | Call 0x1,0x63 1839 680c |h | Jump_Zero 0x1846 183a 00d8 | | Load_Top At_Offset_0 183b e008 | | Load 0x0,0x8 183c 180e | | Execute Package,Field_Execute,Field_Number 0xe 183d 6808 |h | Jump_Zero 0x1846 183e 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 1840 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 1842 00ea | | Load_Encached Null_String_Cache 1843 00db | | Load_Top At_Offset_3 1844 e007 | | Load 0x0,0x7 1845 180e | | Execute Package,Field_Execute,Field_Number 0xe 1846 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1847 0000 | | .XXX[0x1] 1848 ; -------------------------------------------------------------------------------------- 1848 ; SUBPROGRAM 1848 ; -------------------------------------------------------------------------------------- 1848 184f | O | .CONST 0x184f ; Address of begin 1849 0004 | | .CONST 0x0004 ; Address of exception handler 184a 0002 | | .CONST 0x0002 ; Number of locals 184b INIT_1848: 184b e606 | | Load 0x3,0x6 184c e00f | | Load 0x0,0xf 184d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 184e 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 184f BODY_1848: 184f e606 | | Load 0x3,0x6 1850 8262 | b | Call 0x1,0x62 1851 a605 | | Store_Unchecked 0x3,0x5 1852 e605 | | Load 0x3,0x5 1853 00d8 | | Load_Top At_Offset_0 1854 4805 |H | Short_Literal 0x5 1855 4806 |H | Short_Literal 0x6 1856 0262 | b | Execute Discrete,In_Range 1857 7003 |p | Jump_Nonzero 0x185b 1858 0f42 | B | Execute_Immediate Equal,0x42 1859 7002 |p | Jump_Nonzero 0x185c 185a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 185b 00d1 | | Pop_Control Pop_Count_1 185c 00d8 | | Load_Top At_Offset_0 185d 8409 | | Call 0x2,0x9 185e 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 1860 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 1862 00ea | | Load_Encached Null_String_Cache 1863 4800 |H | Short_Literal 0x0 1864 4800 |H | Short_Literal 0x0 1865 e802 | | Load 0x4,0x2 1866 e007 | | Load 0x0,0x7 1867 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 1868 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1869 0000 0000 | | .BLANK 0000[0x7] 1870 ; -------------------------------------------------------------------------------------- 1870 ; SUBPROGRAM 1870 ; -------------------------------------------------------------------------------------- 1870 1877 | w | .CONST 0x1877 ; Address of begin 1871 0004 | | .CONST 0x0004 ; Address of exception handler 1872 0002 | | .CONST 0x0002 ; Number of locals 1873 INIT_1870: 1873 e604 | | Load 0x3,0x4 1874 e00f | | Load 0x0,0xf 1875 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 1876 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 1877 BODY_1870: 1877 e406 | | Load 0x2,0x6 1878 0f02 | | Execute_Immediate Equal,0x2 1879 683b |h; | Jump_Zero 0x18b5 187a e407 | | Load 0x2,0x7 187b 00d8 | | Load_Top At_Offset_0 187c 0d07 | | Execute_Immediate Less,0x7 187d 700c |p | Jump_Nonzero 0x188a 187e 00d8 | | Load_Top At_Offset_0 187f 0c42 | B | Execute_Immediate Greater_Equal,0x42 1880 7004 |p | Jump_Nonzero 0x1885 1881 00d1 | | Pop_Control Pop_Count_1 1882 e604 | | Load 0x3,0x4 1883 840b | | Call 0x2,0xb 1884 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1885 0b42 | B | Execute_Immediate Case_Compare,0x42 1886 7021 |p! | Jump_Nonzero 0x18a8 1887 0f4d | M | Execute_Immediate Equal,0x4d 1888 7008 |p | Jump_Nonzero 0x1891 1889 7ff8 | | Jump 0x1882 188a 0b04 | | Execute_Immediate Case_Compare,0x4 188b 7010 |p | Jump_Nonzero 0x189c 188c 4805 |H | Short_Literal 0x5 188d 4806 |H | Short_Literal 0x6 188e 0262 | b | Execute Discrete,In_Range 188f 7019 |p | Jump_Nonzero 0x18a9 1890 7ff1 | | Jump 0x1882 1891 00d8 | | Load_Top At_Offset_0 1892 840a | | Call 0x2,0xa 1893 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 1895 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 1897 00ea | | Load_Encached Null_String_Cache 1898 00db | | Load_Top At_Offset_3 1899 e007 | | Load 0x0,0x7 189a 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 189b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 189c 00d1 | | Pop_Control Pop_Count_1 189d 00d8 | | Load_Top At_Offset_0 189e 840a | | Call 0x2,0xa 189f 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 18a1 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 18a3 00ea | | Load_Encached Null_String_Cache 18a4 00db | | Load_Top At_Offset_3 18a5 e007 | | Load 0x0,0x7 18a6 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 18a7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 18a8 00d1 | | Pop_Control Pop_Count_1 18a9 00d8 | | Load_Top At_Offset_0 18aa 8409 | | Call 0x2,0x9 18ab 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 18ad 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 18af 00ea | | Load_Encached Null_String_Cache 18b0 4800 |H | Short_Literal 0x0 18b1 4800 |H | Short_Literal 0x0 18b2 e802 | | Load 0x4,0x2 18b3 e007 | | Load 0x0,0x7 18b4 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 18b5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 18b6 0000 0000 | | .XXX[0x2] 18b8 ; -------------------------------------------------------------------------------------- 18b8 ; SUBPROGRAM 18b8 ; -------------------------------------------------------------------------------------- 18b8 18bf | | .CONST 0x18bf ; Address of begin 18b9 0004 | | .CONST 0x0004 ; Address of exception handler 18ba 0002 | | .CONST 0x0002 ; Number of locals 18bb INIT_18b8: 18bb e605 | | Load 0x3,0x5 18bc e00f | | Load 0x0,0xf 18bd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 18be 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 18bf BODY_18b8: 18bf e605 | | Load 0x3,0x5 18c0 840c | | Call 0x2,0xc 18c1 00d8 | | Load_Top At_Offset_0 18c2 e008 | | Load 0x0,0x8 18c3 180e | | Execute Package,Field_Execute,Field_Number 0xe 18c4 6808 |h | Jump_Zero 0x18cd 18c5 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 18c7 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 18c9 00ea | | Load_Encached Null_String_Cache 18ca 00db | | Load_Top At_Offset_3 18cb e007 | | Load 0x0,0x7 18cc 180e | | Execute Package,Field_Execute,Field_Number 0xe 18cd 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 18cf 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 18d1 00ea | | Load_Encached Null_String_Cache 18d2 00db | | Load_Top At_Offset_3 18d3 e007 | | Load 0x0,0x7 18d4 1817 | | Execute Package,Field_Execute,Field_Number 0x17 18d5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 18d6 0000 0000 | | .XXX[0x2] 18d8 ; -------------------------------------------------------------------------------------- 18d8 ; SUBPROGRAM 18d8 ; -------------------------------------------------------------------------------------- 18d8 18e3 | | .CONST 0x18e3 ; Address of begin 18d9 0004 | | .CONST 0x0004 ; Address of exception handler 18da 0002 | | .CONST 0x0002 ; Number of locals 18db INIT_18d8: 18db e405 | | Load 0x2,0x5 18dc e00f | | Load 0x0,0xf 18dd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 18de 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 18df 0092 1a13 | | Action Push_String_Extended,0x1a13 ; "'body" 18e1 01cc | | Execute Vector,Catenate 18e2 0007 | | Action Break_Optional 18e3 BODY_18d8: 18e3 00d8 | | Load_Top At_Offset_0 18e4 e008 | | Load 0x0,0x8 18e5 180e | | Execute Package,Field_Execute,Field_Number 0xe 18e6 6808 |h | Jump_Zero 0x18ef 18e7 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 18e9 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 18eb 00ea | | Load_Encached Null_String_Cache 18ec 00db | | Load_Top At_Offset_3 18ed e007 | | Load 0x0,0x7 18ee 180e | | Execute Package,Field_Execute,Field_Number 0xe 18ef 0092 199d | | Action Push_String_Extended,0x199d ; "<PROFILE>" 18f1 0092 19a4 | | Action Push_String_Extended,0x19a4 ; "<DEFAULT>" 18f3 00ea | | Load_Encached Null_String_Cache 18f4 00db | | Load_Top At_Offset_3 18f5 e007 | | Load 0x0,0x7 18f6 1817 | | Execute Package,Field_Execute,Field_Number 0x17 18f7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 18f8 ; -------------------------------------------------------------------------------------- 18f8 ; SUBPROGRAM 18f8 ; -------------------------------------------------------------------------------------- 18f8 190b | | .CONST 0x190b ; Address of begin 18f9 0004 | | .CONST 0x0004 ; Address of exception handler 18fa 0003 | | .CONST 0x0003 ; Number of locals 18fb INIT_18f8: 18fb 4800 |H | Short_Literal 0x0 18fc 00db | | Load_Top At_Offset_3 18fd 0092 1a14 | | Action Push_String_Extended,0x1a14 ; "!!" 18ff e00b | | Load 0x0,0xb 1900 181d | | Execute Package,Field_Execute,Field_Number 0x1d 1901 00e3 | | Load_Encached Natural_Cache 1902 03f1 | | Declare_Variable Discrete,With_Value 1903 4800 |H | Short_Literal 0x0 1904 e9ff | | Load 0x4,-0x1 1905 0092 1a15 | | Action Push_String_Extended,0x1a15 ; "." 1907 e00b | | Load 0x0,0xb 1908 181f | | Execute Package,Field_Execute,Field_Number 0x1f 1909 00e3 | | Load_Encached Natural_Cache 190a 03f1 | | Declare_Variable Discrete,With_Value 190b BODY_18f8: 190b 00d9 | | Load_Top At_Offset_1 190c 0c01 | | Execute_Immediate Greater_Equal,0x1 190d 6810 |h | Jump_Zero 0x191e 190e e9fe | | Load 0x4,-0x2 190f 00d9 | | Load_Top At_Offset_1 1910 0a01 | | Execute_Immediate Plus,0x1 1911 00d8 | | Load_Top At_Offset_0 1912 00e2 | | Load_Encached Integer_Cache 1913 0260 | ` | Execute Discrete,In_Type 1914 7001 |p | Jump_Nonzero 0x1916 1915 0801 | | Execute_Immediate Raise,0x1 1916 e9ff | | Load 0x4,-0x1 1917 01dc | | Execute Vector,Last 1918 e9ff | | Load 0x4,-0x1 1919 01cf | | Execute Vector,Slice_Read 191a e014 | | Load 0x0,0x14 191b 1810 | | Execute Package,Field_Execute,Field_Number 0x10 191c 00d1 | | Pop_Control Pop_Count_1 191d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 191e e9fe | | Load 0x4,-0x2 191f e9ff | | Load 0x4,-0x1 1920 e014 | | Load 0x0,0x14 1921 1810 | | Execute Package,Field_Execute,Field_Number 0x10 1922 00d1 | | Pop_Control Pop_Count_1 1923 4502 |E | Exit_Suprogram New_Top_Offset 0x2 1924 0000 0000 | | .BLANK 0000[0x4] 1928 ; -------------------------------------------------------------------------------------- 1928 ; SUBPROGRAM 1928 ; -------------------------------------------------------------------------------------- 1928 195e | ^ | .CONST 0x195e ; Address of begin 1929 0004 | | .CONST 0x0004 ; Address of exception handler 192a 0006 | | .CONST 0x0006 ; Number of locals 192b INIT_1928: 192b 4820 |H | Short_Literal 0x20 192c e604 | | Load 0x3,0x4 192d e004 | | Load 0x0,0x4 192e 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 192f e00b | | Load 0x0,0xb 1930 181c | | Execute Package,Field_Execute,Field_Number 0x1c 1931 4801 |H | Short_Literal 0x1 1932 00d9 | | Load_Top At_Offset_1 1933 e602 | | Load 0x3,0x2 1934 e00b | | Load 0x0,0xb 1935 181d | | Execute Package,Field_Execute,Field_Number 0x1d 1936 00d9 | | Load_Top At_Offset_1 1937 01dd | | Execute Vector,First 1938 027f | | Execute Discrete,Equal 1939 00e1 | | Load_Encached Boolean_Cache 193a 03f1 | | Declare_Variable Discrete,With_Value 193b 4801 |H | Short_Literal 0x1 193c 00da | | Load_Top At_Offset_2 193d 0092 1a16 | | Action Push_String_Extended,0x1a16 ; "others" 193f e00b | | Load 0x0,0xb 1940 181d | | Execute Package,Field_Execute,Field_Number 0x1d 1941 00da | | Load_Top At_Offset_2 1942 01dd | | Execute Vector,First 1943 027f | | Execute Discrete,Equal 1944 00e1 | | Load_Encached Boolean_Cache 1945 03f1 | | Declare_Variable Discrete,With_Value 1946 4801 |H | Short_Literal 0x1 1947 00db | | Load_Top At_Offset_3 1948 4820 |H | Short_Literal 0x20 1949 e00b | | Load 0x0,0xb 194a 181e | | Execute Package,Field_Execute,Field_Number 0x1e 194b 00e3 | | Load_Encached Natural_Cache 194c 03f1 | | Declare_Variable Discrete,With_Value 194d 4801 |H | Short_Literal 0x1 194e 00d9 | | Load_Top At_Offset_1 194f 0a01 | | Execute_Immediate Plus,0x1 1950 00d8 | | Load_Top At_Offset_0 1951 00e2 | | Load_Encached Integer_Cache 1952 0260 | ` | Execute Discrete,In_Type 1953 7001 |p | Jump_Nonzero 0x1955 1954 0801 | | Execute_Immediate Raise,0x1 1955 e802 | | Load 0x4,0x2 1956 01dc | | Execute Vector,Last 1957 e802 | | Load 0x4,0x2 1958 01cf | | Execute Vector,Slice_Read 1959 4820 |H | Short_Literal 0x20 195a e00b | | Load 0x0,0xb 195b 181e | | Execute Package,Field_Execute,Field_Number 0x1e 195c 00e3 | | Load_Encached Natural_Cache 195d 03f1 | | Declare_Variable Discrete,With_Value 195e BODY_1928: 195e 00db | | Load_Top At_Offset_3 195f 7006 |p | Jump_Nonzero 0x1966 1960 00da | | Load_Top At_Offset_2 1961 6813 |h | Jump_Zero 0x1975 1962 e404 | | Load 0x2,0x4 1963 e014 | | Load 0x0,0x14 1964 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 1965 700f |p | Jump_Nonzero 0x1975 1966 e404 | | Load 0x2,0x4 1967 00da | | Load_Top At_Offset_2 1968 0a01 | | Execute_Immediate Plus,0x1 1969 00d8 | | Load_Top At_Offset_0 196a 00e2 | | Load_Encached Integer_Cache 196b 0260 | ` | Execute Discrete,In_Type 196c 7001 |p | Jump_Nonzero 0x196e 196d 0801 | | Execute_Immediate Raise,0x1 196e 00da | | Load_Top At_Offset_2 196f 0aff | | Execute_Immediate Plus,-0x1 1970 e802 | | Load 0x4,0x2 1971 01cf | | Execute Vector,Slice_Read 1972 8605 | | Call 0x3,0x5 1973 00d1 | | Pop_Control Pop_Count_1 1974 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1975 e802 | | Load 0x4,0x2 1976 01db | | Execute Vector,Length 1977 0c01 | | Execute_Immediate Greater_Equal,0x1 1978 681b |h | Jump_Zero 0x1994 1979 e802 | | Load 0x4,0x2 197a 01dd | | Execute Vector,First 197b e802 | | Load 0x4,0x2 197c 01d7 | | Execute Vector,Field_Read 197d 0f2a | * | Execute_Immediate Equal,0x2a 197e 6815 |h | Jump_Zero 0x1994 197f e402 | | Load 0x2,0x2 1980 482c |H, | Short_Literal 0x2c 1981 e802 | | Load 0x4,0x2 1982 01dd | | Execute Vector,First 1983 0a01 | | Execute_Immediate Plus,0x1 1984 00d8 | | Load_Top At_Offset_0 1985 00e2 | | Load_Encached Integer_Cache 1986 0260 | ` | Execute Discrete,In_Type 1987 7001 |p | Jump_Nonzero 0x1989 1988 0801 | | Execute_Immediate Raise,0x1 1989 e805 | | Load 0x4,0x5 198a 0aff | | Execute_Immediate Plus,-0x1 198b e802 | | Load 0x4,0x2 198c 01cf | | Execute Vector,Slice_Read 198d 01cb | | Execute Vector,Append 198e e014 | | Load 0x0,0x14 198f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 1990 00d1 | | Pop_Control Pop_Count_1 1991 e405 | | Load 0x2,0x5 1992 0a01 | | Execute_Immediate Plus,0x1 1993 c405 | | Store 0x2,0x5 1994 4501 |E | Exit_Suprogram New_Top_Offset 0x1 1995 ; -------------------------------------------------------------------------------------- 1995 ; STRING TABLE 1995 ; -------------------------------------------------------------------------------------- 1995 0106 | | .STRTAB 0x0106->0x1a18 ; "\x1b]" 1996 0106 | | .STRTAB 0x0106->0x1a19 ; "\x07" 1997 0105 | | .STRTAB 0x0105->0x1a19 ; "Name:" 1998 0108 | | .STRTAB 0x0108->0x1a1c ; ".New_File" 1999 010f | | .STRTAB 0x010f->0x1a20 ; "New Text File" 199a 011a | | .STRTAB 0x011a->0x1a27 ; "The context must be a library or view to create an Ada unit." 199b 0154 | T | .STRTAB 0x0154->0x1a45 ; "New World" 199c 015b | [ | .STRTAB 0x015b->0x1a49 ; ".New_World" 199d 0163 | c | .STRTAB 0x0163->0x1a4e ; "<PROFILE>" 199e 016a | j | .STRTAB 0x016a->0x1a53 ; "Directory Name:" 199f 0177 | w | .STRTAB 0x0177->0x1a5a ; ".New_Directory" 19a0 0183 | | .STRTAB 0x0183->0x1a61 ; "New Directory" 19a1 018e | | .STRTAB 0x018e->0x1a68 ; "!Model.R1000" 19a2 0198 | | .STRTAB 0x0198->0x1a6e ; ".New_Subsystem" 19a3 01a4 | | .STRTAB 0x01a4->0x1a75 ; "New Subsystem" 19a4 01af | | .STRTAB 0x01af->0x1a7b ; "<DEFAULT>" 19a5 01b6 | | .STRTAB 0x01b6->0x1a80 ; "<Cursor>" 19a6 01bc | | .STRTAB 0x01bc->0x1a84 ; "New Working View" 19a7 01ca | | .STRTAB 0x01ca->0x1a8c ; "_Working" 19a8 01d0 | | .STRTAB 0x01d0->0x1a90 ; "New Spec View" 19a9 01db | | .STRTAB 0x01db->0x1a96 ; "_Spec" 19aa 01de | | .STRTAB 0x01de->0x1a99 ; "<AUTO_GENERATE>" 19ab 01eb | | .STRTAB 0x01eb->0x1aa0 ; "Enter library switch file name" 19ac 0207 | | .STRTAB 0x0207->0x1aaf ; ".Compiler_Switches" 19ad 0217 | | .STRTAB 0x0217->0x1ab8 ; "New Switch File" 19ae 0224 | $ | .STRTAB 0x0224->0x1ac0 ; ".New_Activity" 19af 022f | / | .STRTAB 0x022f->0x1ac6 ; "<>" 19b0 022f | / | .STRTAB 0x022f->0x1ac7 ; "nil" 19b1 0230 | 0 | .STRTAB 0x0230->0x1ac9 ; "Mailbox simple name:" 19b2 0242 | B | .STRTAB 0x0242->0x1ad3 ; "New Mailbox" 19b3 024b | K | .STRTAB 0x024b->0x1ad8 ; ".New_Venture" 19b4 0255 | U | .STRTAB 0x0255->0x1ade ; ".New_Work_Order" 19b5 0262 | b | .STRTAB 0x0262->0x1ae6 ; ".New_Work_Order_List" 19b6 0274 | t | .STRTAB 0x0274->0x1af0 ; ".New_System" 19b7 027d | } | .STRTAB 0x027d->0x1af5 ; "R1000" 19b8 0280 | | .STRTAB 0x0280->0x1af8 ; "<IMAGE>" 19b9 0285 | | .STRTAB 0x0285->0x1afb ; "Open" 19ba 0287 | | .STRTAB 0x0287->0x1afd ; "Open Check Out" 19bb 0293 | | .STRTAB 0x0293->0x1b04 ; "<TOMORROW>" 19bc 029b | | .STRTAB 0x029b->0x1b09 ; "<ALL_WORLDS>" 19bd 02a5 | | .STRTAB 0x02a5->0x1b0f ; "Editing " 19be 02ab | | .STRTAB 0x02ab->0x1b13 ; "\x5c will result in demotion of " 19bf 02c7 | | .STRTAB 0x02c7->0x1b22 ; " units\x5c" 19c0 02cc | | .STRTAB 0x02cc->0x1b26 ; "in 1 library, \x5c " 19c1 02da | | .STRTAB 0x02da->0x1b2e ; "in " 19c2 02db | | .STRTAB 0x02db->0x1b2f ; " libraries, \x5c " 19c3 02e7 | | .STRTAB 0x02e7->0x1b36 ; " demoting " 19c4 02ef | | .STRTAB 0x02ef->0x1b3b ; " lines in total. Ok?" 19c5 0302 | | .STRTAB 0x0302->0x1b46 ; "Open Demote" 19c6 030b | | .STRTAB 0x030b->0x1b4b ; "Save Changes?" 19c7 0316 | | .STRTAB 0x0316->0x1b52 ; "File Close" 19c8 031e | | .STRTAB 0x031e->0x1b57 ; "<image>" 19c9 0323 | # | .STRTAB 0x0323->0x1b5a ; "Send Message?" 19ca 032e | . | .STRTAB 0x032e->0x1b61 ; "Command windows cannot be saved." 19cb 034c | L | .STRTAB 0x034c->0x1b71 ; "Mail windows cannot be saved. Use Send_Message to send." 19cc 0382 | | .STRTAB 0x0382->0x1b8d ; " is modified.\x5cLose changes?" 19cd 039b | | .STRTAB 0x039b->0x1b9a ; "File Revert" 19ce 03a4 | | .STRTAB 0x03a4->0x1ba0 ; "F" 19cf 03a3 | | .STRTAB 0x03a3->0x1ba0 ; "T" 19d0 03a2 | | .STRTAB 0x03a2->0x1ba1 ; "<CURRENT_WINDOW_CONTENTS>" 19d1 03b9 | | .STRTAB 0x03b9->0x1bad ; "<CURSOR>" 19d2 03bf | | .STRTAB 0x03bf->0x1bb1 ; "Postscript=>(Wide,Spacing=10,Size=10)" 19d3 03e2 | | .STRTAB 0x03e2->0x1bc4 ; "<REGION>" 19d4 03e8 | | .STRTAB 0x03e8->0x1bc8 ; "Copy File" 19d5 03ef | | .STRTAB 0x03ef->0x1bcc ; ".NewFile" 19d6 03f5 | | .STRTAB 0x03f5->0x1bd0 ; "Move File" 19d7 03fc | | .STRTAB 0x03fc->0x1bd5 ; "Enter names of objects to delete." 19d8 041b | | .STRTAB 0x041b->0x1be5 ; "{<Cursor>}" 19d9 0423 | # | .STRTAB 0x0423->0x1bea ; "Delete File" 19da 042c | , | .STRTAB 0x042c->0x1bf0 ; "Error resolving name: " 19db 0440 | @ | .STRTAB 0x0440->0x1bfb ; " will delete\x5c" 19dc 044b | K | .STRTAB 0x044b->0x1c01 ; " Dependent objects\x5c" 19dd 045c | \ | .STRTAB 0x045c->0x1c0b ; " Dependent object\x5c" 19de 046c | l | .STRTAB 0x046c->0x1c14 ; " Text objects\x5c" 19df 0478 | x | .STRTAB 0x0478->0x1c1b ; " Text object\x5c" 19e0 0483 | | .STRTAB 0x0483->0x1c21 ; " Ada objects\x5c" 19e1 048e | | .STRTAB 0x048e->0x1c28 ; " Ada object\x5c" 19e2 0498 | | .STRTAB 0x0498->0x1c2e ; " Directories\x5c" 19e3 04a3 | | .STRTAB 0x04a3->0x1c34 ; " Directory\x5c" 19e4 04ac | | .STRTAB 0x04ac->0x1c3a ; " Libraries\x5c" 19e5 04b5 | | .STRTAB 0x04b5->0x1c3f ; " Library\x5c" 19e6 04bc | | .STRTAB 0x04bc->0x1c44 ; " Views\x5c" 19e7 04c1 | | .STRTAB 0x04c1->0x1c47 ; " View\x5c" 19e8 04c5 | | .STRTAB 0x04c5->0x1c4a ; " Subsystems\x5c" 19e9 04cf | | .STRTAB 0x04cf->0x1c50 ; " Subsystem\x5c" 19ea 04d8 | | .STRTAB 0x04d8->0x1c56 ; " miscellaneous objects\x5c" 19eb 04ed | | .STRTAB 0x04ed->0x1c61 ; " miscellaneous object\x5c" 19ec 0501 | | .STRTAB 0x0501->0x1c6c ; "\x5c Delete?" 19ed 0508 | | .STRTAB 0x0508->0x1c71 ; "Deleting \x5c" 19ee 0510 | | .STRTAB 0x0510->0x1c76 ; "Delete File Confirmation" 19ef 0526 | & | .STRTAB 0x0526->0x1c82 ; "$" 19f0 0525 | % | .STRTAB 0x0525->0x1c82 ; "Cannot debug on another machine; will run without debug." 19f1 055b | [ | .STRTAB 0x055b->0x1c9e ; "true" 19f2 055d | ] | .STRTAB 0x055d->0x1ca0 ; "Unable to commit buffers. Session not logged off" 19f3 058c | | .STRTAB 0x058c->0x1cb9 ; " \x5c" 19f4 058c | | .STRTAB 0x058c->0x1cba ; "\x1b]63;\x07" 19f5 0590 | | .STRTAB 0x0590->0x1cbd ; "The following buffer(s) are modified:\x5c" 19f6 05b4 | | .STRTAB 0x05b4->0x1cd0 ; "Quit anyway?" 19f7 05be | | .STRTAB 0x05be->0x1cd6 ; " " 19f8 05bd | | .STRTAB 0x05bd->0x1cd6 ; "Mailbox" 19f9 05c2 | | .STRTAB 0x05c2->0x1cda ; "<Selection>" 19fa 05cb | | .STRTAB 0x05cb->0x1cdf ; "Creator => " 19fb 05d4 | | .STRTAB 0x05d4->0x1ce5 ; "Create Date => " 19fc 05e1 | | .STRTAB 0x05e1->0x1cec ; "Subclass => " 19fd 05eb | | .STRTAB 0x05eb->0x1cf2 ; "Total Size => " 19fe 05f7 | | .STRTAB 0x05f7->0x1cf9 ; "Updater => " 19ff 0600 | | .STRTAB 0x0600->0x1cff ; "Update Date => " 1a00 060d | | .STRTAB 0x060d->0x1d06 ; "No object selected" 1a01 061d | | .STRTAB 0x061d->0x1d0f ; "\x5c" 1a02 061c | | .STRTAB 0x061c->0x1d10 ; "<SESSION>" 1a03 0623 | # | .STRTAB 0x0623->0x1d14 ; "Error getting access list" 1a04 063a | : | .STRTAB 0x063a->0x1d21 ; "<NONE>" 1a05 063e | > | .STRTAB 0x063e->0x1d24 ; "Object is not in a subsystem view" 1a06 065d | ] | .STRTAB 0x065d->0x1d34 ; "Object is not controlled" 1a07 0673 | s | .STRTAB 0x0673->0x1d40 ; "Switch file does not exist" 1a08 068b | | .STRTAB 0x068b->0x1d4d ; "{" 1a09 068a | | .STRTAB 0x068a->0x1d4e ; ".@['c(~library)?,'c(library)]}" 1a0a 06a6 | | .STRTAB 0x06a6->0x1d5d ; ".??@}" 1a0b 06a9 | | .STRTAB 0x06a9->0x1d5f ; ".@'c(library)}" 1a0c 06b5 | | .STRTAB 0x06b5->0x1d66 ; ".@['c(library),'c(~library)?]}" 1a0d 06d1 | | .STRTAB 0x06d1->0x1d75 ; "<DIRECTORIES>" 1a0e 06dc | | .STRTAB 0x06dc->0x1d7c ; "<SELECTION>" 1a0f 06e5 | | .STRTAB 0x06e5->0x1d81 ; "!Machine.Queues.User_To_Printer_Map" 1a10 0706 | | .STRTAB 0x0706->0x1d93 ; "Volume => " 1a11 070e | | .STRTAB 0x070e->0x1d98 ; "Cannot edit that type of object" 1a12 072b | + | .STRTAB 0x072b->0x1da7 ; "State => " 1a13 0732 | 2 | .STRTAB 0x0732->0x1dac ; "'body" 1a14 0735 | 5 | .STRTAB 0x0735->0x1dae ; "!!" 1a15 0735 | 5 | .STRTAB 0x0735->0x1daf ; "." 1a16 0734 | 4 | .STRTAB 0x0734->0x1db0 ; "others" 1a17 0738 | 8 | .STREND 0x0738->0x1db3 1a18 1b5d 074e | ] N| .STRTAB_STRINGS 1db3 0000 0000 | | .BLANK 0000[0x5] 1db8 ; -------------------------------------------------------------------------------------- 1db8 ; Debug Table 1db8 ; -------------------------------------------------------------------------------------- 1db8 0004 0012 | | .DEBUG4 0x0004,0x0012,0x7ba3,0x0000,0x0001,0x0000 1dbe 0000 0009 | | .XXX[0xf] 1dc0 5c00 0069 |\ i| 1dc2 4fc0 0000 |O | 1dc4 0000 0038 | 8| 1dc6 d390 0000 | | 1dc8 0000 0001 | | 1dca 2b90 000d |+ | 1dcc 29f8 |) | 1dcd 0000 0000 | | .BLANK 0000[0x7] 1dd4 2574 0001 |%t | .XXX[0x2c] 1dd6 a53f 0000 | ? | 1dd8 0000 0000 | | 1dda e34e 4000 | N@ | 1ddc 0000 0000 | | 1dde 04ae c000 | | 1de0 34a7 e000 |4 | 1de2 0000 0000 | | 1de4 1c69 c800 | i | 1de6 0000 0000 | | 1de8 0095 e000 | | 1dea 0694 fc00 | | 1dec 0451 2b00 | Q+ | 1dee 038a 5800 | X | 1df0 0000 0000 | | 1df2 0012 bd00 | | 1df4 00d2 9f80 | | 1df6 008a 2560 | %`| 1df8 0071 4b00 | qK | 1dfa 0000 0000 | | 1dfc 0002 57c0 | W | 1dfe 001a 53f0 | S |