|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 7168 (0x1c00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5850da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0d18 | | .CONST 0x0d18 ; 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 8008 | | .CONST 0x8008 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 01b8 | | .CONST 0x01b8 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 005b | [ | .CONST 0x005b ; Number of locals 000b INIT_0008: 000b e001 | | Load 0x0,0x1 000c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 000d 0129 | ) | Execute Any,Make_Visible 000e 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible 000f 00c4 | | Action Make_Default 0010 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated 0012 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated 0014 00e7 | | Load_Encached Duration_Cache 0015 0129 | ) | Execute Any,Make_Visible 0016 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated 0018 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated 001a 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated 001c 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated 001e 029a 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated 0020 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated 0022 029a 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call,Visible,Unelaborated 0024 029a 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Visible,Unelaborated 0026 029a 02d3 | | Declare_Subprogram INIT_02d0,For_Outer_Call,Visible,Unelaborated 0028 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated 002a 00e9 | | Load_Encached String_Cache 002b 0129 | ) | Execute Any,Make_Visible 002c 00e9 | | Load_Encached String_Cache 002d 0129 | ) | Execute Any,Make_Visible 002e 0092 0b45 | E| Action Push_String_Extended,0xb45 ; "!MACHINE.DEVICES.NIL" 0030 0129 | ) | Execute Any,Make_Visible 0031 00e9 | | Load_Encached String_Cache 0032 0129 | ) | Execute Any,Make_Visible 0033 029a 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call,Visible,Unelaborated 0035 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated 0037 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated 0039 029a 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call,Visible,Unelaborated 003b 029a 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call,Visible,Unelaborated 003d 029a 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Visible,Unelaborated 003f 029a 0463 | c| Declare_Subprogram INIT_0460,For_Outer_Call,Visible,Unelaborated 0041 029a 04a3 | | Declare_Subprogram INIT_04a0,For_Outer_Call,Visible,Unelaborated 0043 029a 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call,Visible,Unelaborated 0045 029a 0523 | #| Declare_Subprogram INIT_0520,For_Outer_Call,Visible,Unelaborated 0047 029a 0563 | c| Declare_Subprogram INIT_0560,For_Outer_Call,Visible,Unelaborated 0049 029a 059b | | Declare_Subprogram INIT_0598,For_Outer_Call,Visible,Unelaborated 004b 029a 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call,Visible,Unelaborated 004d 029a 0613 | | Declare_Subprogram INIT_0610,For_Outer_Call,Visible,Unelaborated 004f 00e9 | | Load_Encached String_Cache 0050 0129 | ) | Execute Any,Make_Visible 0051 00e7 | | Load_Encached Duration_Cache 0052 0129 | ) | Execute Any,Make_Visible 0053 029a 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call,Visible,Unelaborated 0055 029a 068b | | Declare_Subprogram INIT_0688,For_Outer_Call,Visible,Unelaborated 0057 029a 0743 | C| Declare_Subprogram INIT_0740,For_Outer_Call,Visible,Unelaborated 0059 4800 |H | Short_Literal 0x0 005a 4802 |H | Short_Literal 0x2 005b 029f 07c3 | | Declare_Subprogram INIT_07c0,For_Call 005d 03fe | | Declare_Type Discrete,Defined,Visible 005e 029a 07eb | | Declare_Subprogram INIT_07e8,For_Outer_Call,Visible,Unelaborated 0060 4800 |H | Short_Literal 0x0 0061 48ff |H | Short_Literal 0xff 0062 00e5 | | Load_Encached Long_Integer_Cache 0063 03f9 | | Declare_Type Discrete,Constrained,Visible 0064 029a 0853 | S| Declare_Subprogram INIT_0850,For_Outer_Call,Visible,Unelaborated 0066 4800 |H | Short_Literal 0x0 0067 48ff |H | Short_Literal 0xff 0068 00e5 | | Load_Encached Long_Integer_Cache 0069 03f9 | | Declare_Type Discrete,Constrained,Visible 006a 4801 |H | Short_Literal 0x1 006b 4802 |H | Short_Literal 0x2 006c 00da | | Load_Top At_Offset_2 006d 02a0 | | Declare_Subprogram Null_Subprogram 006e 4801 |H | Short_Literal 0x1 006f 035e | ^ | Declare_Type Array,Defined,Visible 0070 00d8 | | Load_Top At_Offset_0 0071 0337 | 7 | Declare_Variable Array 0072 4800 |H | Short_Literal 0x0 0073 4801 |H | Short_Literal 0x1 0074 00da | | Load_Top At_Offset_2 0075 01d6 | | Execute Vector,Field_Write 0076 4800 |H | Short_Literal 0x0 0077 4802 |H | Short_Literal 0x2 0078 00da | | Load_Top At_Offset_2 0079 01d6 | | Execute Vector,Field_Write 007a 00d9 | | Load_Top At_Offset_1 007b 01c3 | | Execute Vector,Check_In_Type 007c 0129 | ) | Execute Any,Make_Visible 007d 029a 089b | | Declare_Subprogram INIT_0898,For_Outer_Call,Visible,Unelaborated 007f 029a 08b3 | | Declare_Subprogram INIT_08b0,For_Outer_Call,Visible,Unelaborated 0081 029a 08db | | Declare_Subprogram INIT_08d8,For_Outer_Call,Visible,Unelaborated 0083 4800 |H | Short_Literal 0x0 0084 48ff |H | Short_Literal 0xff 0085 00e5 | | Load_Encached Long_Integer_Cache 0086 03f9 | | Declare_Type Discrete,Constrained,Visible 0087 029a 08e3 | | Declare_Subprogram INIT_08e0,For_Outer_Call,Visible,Unelaborated 0089 029a 08eb | | Declare_Subprogram INIT_08e8,For_Outer_Call,Visible,Unelaborated 008b 029a 091b | | Declare_Subprogram INIT_0918,For_Outer_Call,Visible,Unelaborated 008d 03a8 | | Declare_Type Heap_Access,Indirect_Literal 008e 00d8 | | Load_Top At_Offset_0 008f 02a0 | | Declare_Subprogram Null_Subprogram 0090 e20e | | Load 0x1,0xe 0091 03a3 | | Complete_Type Heap_Access,By_Defining 0092 e20e | | Load 0x1,0xe 0093 0129 | ) | Execute Any,Make_Visible 0094 c20f | | Store 0x1,0xf 0095 00bf | | Action Accept_Activation 0096 e002 | | Load 0x0,0x2 0097 1919 | | Execute Package,Field_Reference,Field_Number 0x19 0098 0007 | | Action Break_Optional 0099 4800 |H | Short_Literal 0x0 009a 4801 |H | Short_Literal 0x1 009b 4801 |H | Short_Literal 0x1 009c 6143 |aC | Indirect_Literal Discrete,0x1e0,{0x00000000, 0x000007b2} 009d e002 | | Load 0x0,0x2 009e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 009f e002 | | Load 0x0,0x2 00a0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a1 011e | | Execute Any,Convert 00a2 4801 |H | Short_Literal 0x1 00a3 4803 |H | Short_Literal 0x3 00a4 00e9 | | Load_Encached String_Cache 00a5 035b | [ | Declare_Type Array,Constrained 00a6 e003 | | Load 0x0,0x3 00a7 1b1a | | Execute Package,Field_Read,Field_Number 0x1a 00a8 0266 | f | Execute Discrete,Bounds 00a9 00da | | Load_Top At_Offset_2 00aa 02a0 | | Declare_Subprogram Null_Subprogram 00ab 4801 |H | Short_Literal 0x1 00ac 035d | ] | Declare_Type Array,Defined 00ad 00d8 | | Load_Top At_Offset_0 00ae 0337 | 7 | Declare_Variable Array 00af 00d8 | | Load_Top At_Offset_0 00b0 0335 | 5 | Declare_Variable Array,Duplicate 00b1 00cd | | Action Spare6_Action 00b2 0092 0b46 | F| Action Push_String_Extended,0xb46 ; ":::" 00b4 e245 | E | Load 0x1,0x45 00b5 0119 | | Execute Any,Check_In_Formal_Type 00b6 4800 |H | Short_Literal 0x0 00b7 00da | | Load_Top At_Offset_2 00b8 01d6 | | Execute Vector,Field_Write 00b9 0092 0b47 | G| Action Push_String_Extended,0xb47 ; "???" 00bb e245 | E | Load 0x1,0x45 00bc 0119 | | Execute Any,Check_In_Formal_Type 00bd 4801 |H | Short_Literal 0x1 00be 00da | | Load_Top At_Offset_2 00bf 01d6 | | Execute Vector,Field_Write 00c0 0092 0b48 | H| Action Push_String_Extended,0xb48 ; "---" 00c2 e245 | E | Load 0x1,0x45 00c3 0119 | | Execute Any,Check_In_Formal_Type 00c4 4802 |H | Short_Literal 0x2 00c5 00da | | Load_Top At_Offset_2 00c6 01d6 | | Execute Vector,Field_Write 00c7 0092 0b49 | I| Action Push_String_Extended,0xb49 ; "+++" 00c9 e245 | E | Load 0x1,0x45 00ca 0119 | | Execute Any,Check_In_Formal_Type 00cb 4803 |H | Short_Literal 0x3 00cc 00da | | Load_Top At_Offset_2 00cd 01d6 | | Execute Vector,Field_Write 00ce 0092 0b4a | J| Action Push_String_Extended,0xb4a ; ">>>" 00d0 e245 | E | Load 0x1,0x45 00d1 0119 | | Execute Any,Check_In_Formal_Type 00d2 4804 |H | Short_Literal 0x4 00d3 00da | | Load_Top At_Offset_2 00d4 01d6 | | Execute Vector,Field_Write 00d5 0092 0b4b | K| Action Push_String_Extended,0xb4b ; "++*" 00d7 e245 | E | Load 0x1,0x45 00d8 0119 | | Execute Any,Check_In_Formal_Type 00d9 4805 |H | Short_Literal 0x5 00da 00da | | Load_Top At_Offset_2 00db 01d6 | | Execute Vector,Field_Write 00dc 0092 0b4c | L| Action Push_String_Extended,0xb4c ; "!!!" 00de e245 | E | Load 0x1,0x45 00df 0119 | | Execute Any,Check_In_Formal_Type 00e0 4806 |H | Short_Literal 0x6 00e1 00da | | Load_Top At_Offset_2 00e2 01d6 | | Execute Vector,Field_Write 00e3 0092 0b4d | M| Action Push_String_Extended,0xb4d ; "***" 00e5 e245 | E | Load 0x1,0x45 00e6 0119 | | Execute Any,Check_In_Formal_Type 00e7 4807 |H | Short_Literal 0x7 00e8 00da | | Load_Top At_Offset_2 00e9 01d6 | | Execute Vector,Field_Write 00ea 0092 0b4e | N| Action Push_String_Extended,0xb4e ; "%%%" 00ec e245 | E | Load 0x1,0x45 00ed 0119 | | Execute Any,Check_In_Formal_Type 00ee 4808 |H | Short_Literal 0x8 00ef 00da | | Load_Top At_Offset_2 00f0 01d6 | | Execute Vector,Field_Write 00f1 0092 0b4f | O| Action Push_String_Extended,0xb4f ; "###" 00f3 e245 | E | Load 0x1,0x45 00f4 0119 | | Execute Any,Check_In_Formal_Type 00f5 4809 |H | Short_Literal 0x9 00f6 00da | | Load_Top At_Offset_2 00f7 01d6 | | Execute Vector,Field_Write 00f8 0092 0b50 | P| Action Push_String_Extended,0xb50 ; "@@@" 00fa e245 | E | Load 0x1,0x45 00fb 0119 | | Execute Any,Check_In_Formal_Type 00fc 480a |H | Short_Literal 0xa 00fd 00da | | Load_Top At_Offset_2 00fe 01d6 | | Execute Vector,Field_Write 00ff 0092 0b51 | Q| Action Push_String_Extended,0xb51 ; "$$$" 0101 e245 | E | Load 0x1,0x45 0102 0119 | | Execute Any,Check_In_Formal_Type 0103 480b |H | Short_Literal 0xb 0104 00da | | Load_Top At_Offset_2 0105 01d6 | | Execute Vector,Field_Write 0106 00d9 | | Load_Top At_Offset_1 0107 01d4 | | Execute Vector,Structure_Write 0108 e004 | | Load 0x0,0x4 0109 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 010a 0266 | f | Execute Discrete,Bounds 010b e234 | 4 | Load 0x1,0x34 010c 02a0 | | Declare_Subprogram Null_Subprogram 010d 4801 |H | Short_Literal 0x1 010e 035d | ] | Declare_Type Array,Defined 010f 00d8 | | Load_Top At_Offset_0 0110 0337 | 7 | Declare_Variable Array 0111 00d8 | | Load_Top At_Offset_0 0112 0335 | 5 | Declare_Variable Array,Duplicate 0113 00cd | | Action Spare6_Action 0114 4800 |H | Short_Literal 0x0 0115 4800 |H | Short_Literal 0x0 0116 00da | | Load_Top At_Offset_2 0117 01d6 | | Execute Vector,Field_Write 0118 4801 |H | Short_Literal 0x1 0119 4801 |H | Short_Literal 0x1 011a 00da | | Load_Top At_Offset_2 011b 01d6 | | Execute Vector,Field_Write 011c 4802 |H | Short_Literal 0x2 011d 4802 |H | Short_Literal 0x2 011e 00da | | Load_Top At_Offset_2 011f 01d6 | | Execute Vector,Field_Write 0120 00d9 | | Load_Top At_Offset_1 0121 01d4 | | Execute Vector,Structure_Write 0122 e234 | 4 | Load 0x1,0x34 0123 0266 | f | Execute Discrete,Bounds 0124 e004 | | Load 0x0,0x4 0125 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a 0126 02a0 | | Declare_Subprogram Null_Subprogram 0127 4801 |H | Short_Literal 0x1 0128 035d | ] | Declare_Type Array,Defined 0129 00d8 | | Load_Top At_Offset_0 012a 0337 | 7 | Declare_Variable Array 012b 00d8 | | Load_Top At_Offset_0 012c 0335 | 5 | Declare_Variable Array,Duplicate 012d 00cd | | Action Spare6_Action 012e 4800 |H | Short_Literal 0x0 012f 4800 |H | Short_Literal 0x0 0130 00da | | Load_Top At_Offset_2 0131 01d6 | | Execute Vector,Field_Write 0132 4801 |H | Short_Literal 0x1 0133 4801 |H | Short_Literal 0x1 0134 00da | | Load_Top At_Offset_2 0135 01d6 | | Execute Vector,Field_Write 0136 4802 |H | Short_Literal 0x2 0137 4802 |H | Short_Literal 0x2 0138 00da | | Load_Top At_Offset_2 0139 01d6 | | Execute Vector,Field_Write 013a 00d9 | | Load_Top At_Offset_1 013b 01d4 | | Execute Vector,Structure_Write 013c e004 | | Load 0x0,0x4 013d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 013e e242 | B | Load 0x1,0x42 013f 03a2 | | Complete_Type Heap_Access,By_Renaming 0140 00e3 | | Load_Encached Natural_Cache 0141 e20e | | Load 0x1,0xe 0142 e005 | | Load 0x0,0x5 0143 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0144 e005 | | Load 0x0,0x5 0145 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0146 e005 | | Load 0x0,0x5 0147 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0148 e20d | | Load 0x1,0xd 0149 00e9 | | Load_Encached String_Cache 014a 029f 092b | +| Declare_Subprogram INIT_0928,For_Call 014c 4800 |H | Short_Literal 0x0 014d 4801 |H | Short_Literal 0x1 014e 4805 |H | Short_Literal 0x5 014f 4800 |H | Short_Literal 0x0 0150 4801 |H | Short_Literal 0x1 0151 4801 |H | Short_Literal 0x1 0152 031d | | Declare_Type Variant_Record,Defined 0153 029d 0963 | c| Declare_Subprogram INIT_0960,For_Outer_Call 0155 029d 0973 | s| Declare_Subprogram INIT_0970,For_Outer_Call 0157 029d 098b | | Declare_Subprogram INIT_0988,For_Outer_Call 0159 029d 09ab | | Declare_Subprogram INIT_09a8,For_Outer_Call 015b 029d 09bb | | Declare_Subprogram INIT_09b8,For_Outer_Call 015d 029d 09e3 | | Declare_Subprogram INIT_09e0,For_Outer_Call 015f 029d 0a1b | | Declare_Subprogram INIT_0a18,For_Outer_Call 0161 e004 | | Load 0x0,0x4 0162 1967 | g | Execute Package,Field_Reference,Field_Number 0x67 0163 00c6 | | Action Check_Subprogram_Elaborated 0164 e24c | L | Load 0x1,0x4c 0165 1d51 | Q | Execute_Immediate Reference_Lex_1,0x51 0166 1d52 | R | Execute_Immediate Reference_Lex_1,0x52 0167 1d53 | S | Execute_Immediate Reference_Lex_1,0x53 0168 e006 | | Load 0x0,0x6 0169 e007 | | Load 0x0,0x7 016a 4800 |H | Short_Literal 0x0 016b 0007 | | Action Break_Optional 016c 029d 0a3b | ;| Declare_Subprogram INIT_0a38,For_Outer_Call 016e 1d10 | | Execute_Immediate Reference_Lex_1,0x10 016f 00c7 | | Action Elaborate_Subprogram 0170 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0171 00c7 | | Action Elaborate_Subprogram 0172 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0173 00c7 | | Action Elaborate_Subprogram 0174 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0175 00c7 | | Action Elaborate_Subprogram 0176 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0177 00c7 | | Action Elaborate_Subprogram 0178 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0179 00c7 | | Action Elaborate_Subprogram 017a 1d17 | | Execute_Immediate Reference_Lex_1,0x17 017b 00c7 | | Action Elaborate_Subprogram 017c 1d18 | | Execute_Immediate Reference_Lex_1,0x18 017d 00c7 | | Action Elaborate_Subprogram 017e 1d19 | | Execute_Immediate Reference_Lex_1,0x19 017f 00c7 | | Action Elaborate_Subprogram 0180 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 0181 00c7 | | Action Elaborate_Subprogram 0182 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 0183 00c7 | | Action Elaborate_Subprogram 0184 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0185 00c7 | | Action Elaborate_Subprogram 0186 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 0187 00c7 | | Action Elaborate_Subprogram 0188 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 0189 00c7 | | Action Elaborate_Subprogram 018a 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 018b 00c7 | | Action Elaborate_Subprogram 018c 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 018d 00c7 | | Action Elaborate_Subprogram 018e 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 018f 00c7 | | Action Elaborate_Subprogram 0190 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 0191 00c7 | | Action Elaborate_Subprogram 0192 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 0193 00c7 | | Action Elaborate_Subprogram 0194 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 0195 00c7 | | Action Elaborate_Subprogram 0196 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 0197 00c7 | | Action Elaborate_Subprogram 0198 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a 0199 00c7 | | Action Elaborate_Subprogram 019a 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 019b 00c7 | | Action Elaborate_Subprogram 019c 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 019d 00c7 | | Action Elaborate_Subprogram 019e 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 019f 00c7 | | Action Elaborate_Subprogram 01a0 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 01a1 00c7 | | Action Elaborate_Subprogram 01a2 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 01a3 00c7 | | Action Elaborate_Subprogram 01a4 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 01a5 00c7 | | Action Elaborate_Subprogram 01a6 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 01a7 00c7 | | Action Elaborate_Subprogram 01a8 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 01a9 00c7 | | Action Elaborate_Subprogram 01aa 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37 01ab 00c7 | | Action Elaborate_Subprogram 01ac 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b 01ad 00c7 | | Action Elaborate_Subprogram 01ae 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c 01af 00c7 | | Action Elaborate_Subprogram 01b0 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d 01b1 00c7 | | Action Elaborate_Subprogram 01b2 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f 01b3 00c7 | | Action Elaborate_Subprogram 01b4 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40 01b5 00c7 | | Action Elaborate_Subprogram 01b6 1d41 | A | Execute_Immediate Reference_Lex_1,0x41 01b7 00c7 | | Action Elaborate_Subprogram 01b8 BODY_0008: 01b8 00bc | | Action Signal_Activated 01b9 00bb | | Action Signal_Completion 01ba 0000 0000 | | .BLANK 0000[0x6] 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 e5fc | | Load 0x2,-0x4 01c4 0120 | | Execute Any,Is_Value 01c5 6802 |h | Jump_Zero 0x1c8 01c6 e20d | | Load 0x1,0xd 01c7 7801 |x | Jump 0x1c9 01c8 e5fc | | Load 0x2,-0x4 01c9 e20e | | Load 0x1,0xe 01ca e5fe | | Load 0x2,-0x2 01cb e003 | | Load 0x0,0x3 01cc 180e | | Execute Package,Field_Execute,Field_Number 0xe 01cd e5ff | | Load 0x2,-0x1 01ce e008 | | Load 0x0,0x8 01cf 1812 | | Execute Package,Field_Execute,Field_Number 0x12 01d0 e003 | | Load 0x0,0x3 01d1 180e | | Execute Package,Field_Execute,Field_Number 0xe 01d2 e5ff | | Load 0x2,-0x1 01d3 e008 | | Load 0x0,0x8 01d4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01d5 e003 | | Load 0x0,0x3 01d6 180e | | Execute Package,Field_Execute,Field_Number 0xe 01d7 e5ff | | Load 0x2,-0x1 01d8 e008 | | Load 0x0,0x8 01d9 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01da e5ff | | Load 0x2,-0x1 01db 8211 | | Call 0x1,0x11 01dc c5fd | | Store 0x2,-0x3 01dd c5fc | | Store 0x2,-0x4 01de 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01df 0000 | | .XXX[0x1] 01e0 0000 0000 | | .LITERAL {0x00000000, 0x000007b2} 01e4 0000 0000 | | .BLANK 0000[0x4] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01f1 | | .CONST 0x01f1 ; Address of begin 01e9 0212 | | .CONST 0x0212 ; Address of exception handler 01ea 0003 | | .CONST 0x0003 ; Number of locals 01eb INIT_01e8: 01eb e004 | | Load 0x0,0x4 01ec 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01ed e20d | | Load 0x1,0xd 01ee 02c7 | | Declare_Variable Any 01ef 00d8 | | Load_Top At_Offset_0 01f0 1c00 | | Execute_Immediate Run_Utility,0x0 01f1 BODY_01e8: 01f1 00d8 | | Load_Top At_Offset_0 01f2 0120 | | Execute Any,Is_Value 01f3 6803 |h | Jump_Zero 0x1f7 01f4 e001 | | Load 0x0,0x1 01f5 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01f6 7801 |x | Jump 0x1f8 01f7 00d8 | | Load_Top At_Offset_0 01f8 e004 | | Load 0x0,0x4 01f9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 01fa e5fb | | Load 0x2,-0x5 01fb e5fc | | Load 0x2,-0x4 01fc e5fd | | Load 0x2,-0x3 01fd e5fe | | Load 0x2,-0x2 01fe e5ff | | Load 0x2,-0x1 01ff e009 | | Load 0x0,0x9 0200 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0201 e00a | | Load 0x0,0xa 0202 180d | | Execute Package,Field_Execute,Field_Number 0xd 0203 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0204 c403 | | Store 0x2,0x3 0205 00d8 | | Load_Top At_Offset_0 0206 824d | M | Call 0x1,0x4d 0207 00d9 | | Load_Top At_Offset_1 0208 e20e | | Load 0x1,0xe 0209 e00b | | Load 0x0,0xb 020a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 020b e00c | | Load 0x0,0xc 020c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 020d 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 020e a5fa | | Store_Unchecked 0x2,-0x6 020f 00d8 | | Load_Top At_Offset_0 0210 c5f9 | | Store 0x2,-0x7 0211 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0212 TRAP_01e8: 0212 e00d | | Load 0x0,0xd 0213 010f | | Execute Exception,Equal 0214 6805 |h | Jump_Zero 0x21a 0215 e20e | | Load 0x1,0xe 0216 a5fa | | Store_Unchecked 0x2,-0x6 0217 00d9 | | Load_Top At_Offset_1 0218 c5f9 | | Store 0x2,-0x7 0219 4506 |E | Exit_Suprogram New_Top_Offset 0x6 021a 00d9 | | Load_Top At_Offset_1 021b 0092 0b52 | R| Action Push_String_Extended,0xb52 ; "Acquire" 021d 824e | N | Call 0x1,0x4e 021e c403 | | Store 0x2,0x3 021f e20e | | Load 0x1,0xe 0220 a5fa | | Store_Unchecked 0x2,-0x6 0221 00d9 | | Load_Top At_Offset_1 0222 c5f9 | | Store 0x2,-0x7 0223 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0224 0000 0000 | | .BLANK 0000[0x4] 0228 ; -------------------------------------------------------------------------------------- 0228 ; SUBPROGRAM 0228 ; -------------------------------------------------------------------------------------- 0228 022f | / | .CONST 0x022f ; Address of begin 0229 0004 | | .CONST 0x0004 ; Address of exception handler 022a 0002 | | .CONST 0x0002 ; Number of locals 022b INIT_0228: 022b e20d | | Load 0x1,0xd 022c 02c7 | | Declare_Variable Any 022d 00d8 | | Load_Top At_Offset_0 022e 1c00 | | Execute_Immediate Run_Utility,0x0 022f BODY_0228: 022f e5fe | | Load 0x2,-0x2 0230 6818 |h | Jump_Zero 0x249 0231 e5fe | | Load 0x2,-0x2 0232 00d9 | | Load_Top At_Offset_1 0233 0120 | | Execute Any,Is_Value 0234 6803 |h | Jump_Zero 0x238 0235 e001 | | Load 0x0,0x1 0236 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0237 7801 |x | Jump 0x239 0238 00d9 | | Load_Top At_Offset_1 0239 00d9 | | Load_Top At_Offset_1 023a 0219 | | Execute Heap_Access,All_Read 023b e004 | | Load 0x0,0x4 023c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 023d 0216 | | Execute Heap_Access,Convert 023e e5ff | | Load 0x2,-0x1 023f e00a | | Load 0x0,0xa 0240 180e | | Execute Package,Field_Execute,Field_Number 0xe 0241 00da | | Load_Top At_Offset_2 0242 0218 | | Execute Heap_Access,All_Write 0243 c402 | | Store 0x2,0x2 0244 00d1 | | Pop_Control Pop_Count_1 0245 e004 | | Load 0x0,0x4 0246 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0247 e5fe | | Load 0x2,-0x2 0248 0218 | | Execute Heap_Access,All_Write 0249 e20e | | Load 0x1,0xe 024a a5fe | | Store_Unchecked 0x2,-0x2 024b 00d8 | | Load_Top At_Offset_0 024c c5fd | | Store 0x2,-0x3 024d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 024e 0000 0000 | | .XXX[0x2] 0250 ; -------------------------------------------------------------------------------------- 0250 ; SUBPROGRAM 0250 ; -------------------------------------------------------------------------------------- 0250 0257 | W | .CONST 0x0257 ; Address of begin 0251 0004 | | .CONST 0x0004 ; Address of exception handler 0252 0002 | | .CONST 0x0002 ; Number of locals 0253 INIT_0250: 0253 e20d | | Load 0x1,0xd 0254 02c7 | | Declare_Variable Any 0255 00d8 | | Load_Top At_Offset_0 0256 1c00 | | Execute_Immediate Run_Utility,0x0 0257 BODY_0250: 0257 00db | | Load_Top At_Offset_3 0258 6817 |h | Jump_Zero 0x270 0259 00db | | Load_Top At_Offset_3 025a 00d9 | | Load_Top At_Offset_1 025b 0120 | | Execute Any,Is_Value 025c 6803 |h | Jump_Zero 0x260 025d e001 | | Load 0x0,0x1 025e 1b0f | | Execute Package,Field_Read,Field_Number 0xf 025f 7801 |x | Jump 0x261 0260 00d9 | | Load_Top At_Offset_1 0261 00d9 | | Load_Top At_Offset_1 0262 0219 | | Execute Heap_Access,All_Read 0263 e004 | | Load 0x0,0x4 0264 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0265 0216 | | Execute Heap_Access,Convert 0266 e00a | | Load 0x0,0xa 0267 180f | | Execute Package,Field_Execute,Field_Number 0xf 0268 00da | | Load_Top At_Offset_2 0269 0218 | | Execute Heap_Access,All_Write 026a c402 | | Store 0x2,0x2 026b 00d1 | | Pop_Control Pop_Count_1 026c e004 | | Load 0x0,0x4 026d 1b0f | | Execute Package,Field_Read,Field_Number 0xf 026e e5ff | | Load 0x2,-0x1 026f 0218 | | Execute Heap_Access,All_Write 0270 e20e | | Load 0x1,0xe 0271 a5ff | | Store_Unchecked 0x2,-0x1 0272 00d8 | | Load_Top At_Offset_0 0273 c5fe | | Store 0x2,-0x2 0274 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0275 0000 0000 | | .XXX[0x3] 0277 0000 | | 0278 ; -------------------------------------------------------------------------------------- 0278 ; SUBPROGRAM 0278 ; -------------------------------------------------------------------------------------- 0278 027b | { | .CONST 0x027b ; Address of begin 0279 0004 | | .CONST 0x0004 ; Address of exception handler 027a 0001 | | .CONST 0x0001 ; Number of locals 027b BODY_0278: 027b INIT_0278: 027b 00da | | Load_Top At_Offset_2 027c e20e | | Load 0x1,0xe 027d 021f | | Execute Heap_Access,Equal 027e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 027f 0000 | | .XXX[0x1] 0280 ; -------------------------------------------------------------------------------------- 0280 ; SUBPROGRAM 0280 ; -------------------------------------------------------------------------------------- 0280 0283 | | .CONST 0x0283 ; Address of begin 0281 0004 | | .CONST 0x0004 ; Address of exception handler 0282 0001 | | .CONST 0x0001 ; Number of locals 0283 BODY_0280: 0283 INIT_0280: 0283 00da | | Load_Top At_Offset_2 0284 8215 | | Call 0x1,0x15 0285 6802 |h | Jump_Zero 0x288 0286 00ea | | Load_Encached Null_String_Cache 0287 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0288 00da | | Load_Top At_Offset_2 0289 0219 | | Execute Heap_Access,All_Read 028a e004 | | Load 0x0,0x4 028b 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c 028c e009 | | Load 0x0,0x9 028d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 028e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 028f 0000 | | .XXX[0x1] 0290 ; -------------------------------------------------------------------------------------- 0290 ; SUBPROGRAM 0290 ; -------------------------------------------------------------------------------------- 0290 0293 | | .CONST 0x0293 ; Address of begin 0291 0004 | | .CONST 0x0004 ; Address of exception handler 0292 0001 | | .CONST 0x0001 ; Number of locals 0293 BODY_0290: 0293 INIT_0290: 0293 00da | | Load_Top At_Offset_2 0294 8215 | | Call 0x1,0x15 0295 6802 |h | Jump_Zero 0x298 0296 00ea | | Load_Encached Null_String_Cache 0297 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0298 00da | | Load_Top At_Offset_2 0299 0219 | | Execute Heap_Access,All_Read 029a e004 | | Load 0x0,0x4 029b 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c 029c e009 | | Load 0x0,0x9 029d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 029e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 029f 0000 | | .XXX[0x1] 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 00da | | Load_Top At_Offset_2 02a4 8215 | | Call 0x1,0x15 02a5 6802 |h | Jump_Zero 0x2a8 02a6 00ea | | Load_Encached Null_String_Cache 02a7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02a8 00da | | Load_Top At_Offset_2 02a9 0219 | | Execute Heap_Access,All_Read 02aa e004 | | Load 0x0,0x4 02ab 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c 02ac e009 | | Load 0x0,0x9 02ad 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02af 0000 | | .XXX[0x1] 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02b3 | | .CONST 0x02b3 ; Address of begin 02b1 0004 | | .CONST 0x0004 ; Address of exception handler 02b2 0001 | | .CONST 0x0001 ; Number of locals 02b3 BODY_02b0: 02b3 INIT_02b0: 02b3 00da | | Load_Top At_Offset_2 02b4 8215 | | Call 0x1,0x15 02b5 6802 |h | Jump_Zero 0x2b8 02b6 00ea | | Load_Encached Null_String_Cache 02b7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02b8 00da | | Load_Top At_Offset_2 02b9 0219 | | Execute Heap_Access,All_Read 02ba e004 | | Load 0x0,0x4 02bb 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c 02bc e009 | | Load 0x0,0x9 02bd 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02be 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02bf 0000 | | .XXX[0x1] 02c0 ; -------------------------------------------------------------------------------------- 02c0 ; SUBPROGRAM 02c0 ; -------------------------------------------------------------------------------------- 02c0 02c3 | | .CONST 0x02c3 ; Address of begin 02c1 0004 | | .CONST 0x0004 ; Address of exception handler 02c2 0001 | | .CONST 0x0001 ; Number of locals 02c3 BODY_02c0: 02c3 INIT_02c0: 02c3 00da | | Load_Top At_Offset_2 02c4 8215 | | Call 0x1,0x15 02c5 6802 |h | Jump_Zero 0x2c8 02c6 00ea | | Load_Encached Null_String_Cache 02c7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02c8 00da | | Load_Top At_Offset_2 02c9 0219 | | Execute Heap_Access,All_Read 02ca e004 | | Load 0x0,0x4 02cb 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c 02cc e009 | | Load 0x0,0x9 02cd 1815 | | Execute Package,Field_Execute,Field_Number 0x15 02ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02cf 0000 | | .XXX[0x1] 02d0 ; -------------------------------------------------------------------------------------- 02d0 ; SUBPROGRAM 02d0 ; -------------------------------------------------------------------------------------- 02d0 02d3 | | .CONST 0x02d3 ; Address of begin 02d1 0004 | | .CONST 0x0004 ; Address of exception handler 02d2 0001 | | .CONST 0x0001 ; Number of locals 02d3 BODY_02d0: 02d3 INIT_02d0: 02d3 00da | | Load_Top At_Offset_2 02d4 6805 |h | Jump_Zero 0x2da 02d5 00da | | Load_Top At_Offset_2 02d6 0219 | | Execute Heap_Access,All_Read 02d7 e004 | | Load 0x0,0x4 02d8 1883 | | Execute Package,Field_Execute,Field_Number 0x83 02d9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02da 4800 |H | Short_Literal 0x0 02db 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02dc 0000 0000 | | .BLANK 0000[0x4] 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02e3 | | .CONST 0x02e3 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0001 | | .CONST 0x0001 ; Number of locals 02e3 BODY_02e0: 02e3 INIT_02e0: 02e3 4800 |H | Short_Literal 0x0 02e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02e5 0000 0000 | | .XXX[0x3] 02e7 0000 | | 02e8 ; -------------------------------------------------------------------------------------- 02e8 ; SUBPROGRAM 02e8 ; -------------------------------------------------------------------------------------- 02e8 02ef | | .CONST 0x02ef ; Address of begin 02e9 0313 | | .CONST 0x0313 ; Address of exception handler 02ea 0002 | | .CONST 0x0002 ; Number of locals 02eb INIT_02e8: 02eb e20d | | Load 0x1,0xd 02ec 02c7 | | Declare_Variable Any 02ed 00d8 | | Load_Top At_Offset_0 02ee 1c00 | | Execute_Immediate Run_Utility,0x0 02ef BODY_02e8: 02ef 00db | | Load_Top At_Offset_3 02f0 8215 | | Call 0x1,0x15 02f1 6810 |h | Jump_Zero 0x302 02f2 00d8 | | Load_Top At_Offset_0 02f3 e004 | | Load 0x0,0x4 02f4 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 02f5 e001 | | Load 0x0,0x1 02f6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02f7 00ea | | Load_Encached Null_String_Cache 02f8 e004 | | Load 0x0,0x4 02f9 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 02fa e001 | | Load 0x0,0x1 02fb 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02fc e001 | | Load 0x0,0x1 02fd 181a | | Execute Package,Field_Execute,Field_Number 0x1a 02fe c402 | | Store 0x2,0x2 02ff 00d8 | | Load_Top At_Offset_0 0300 c5fb | | Store 0x2,-0x5 0301 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0302 e5fb | | Load 0x2,-0x5 0303 0120 | | Execute Any,Is_Value 0304 6803 |h | Jump_Zero 0x308 0305 e004 | | Load 0x0,0x4 0306 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 0307 7801 |x | Jump 0x309 0308 e5fb | | Load 0x2,-0x5 0309 e5ff | | Load 0x2,-0x1 030a 0219 | | Execute Heap_Access,All_Read 030b e5fd | | Load 0x2,-0x3 030c 4801 |H | Short_Literal 0x1 030d e5fc | | Load 0x2,-0x4 030e e5fe | | Load 0x2,-0x2 030f e004 | | Load 0x0,0x4 0310 1879 | y | Execute Package,Field_Execute,Field_Number 0x79 0311 c5fb | | Store 0x2,-0x5 0312 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0313 TRAP_02e8: 0313 e00d | | Load 0x0,0xd 0314 010f | | Execute Exception,Equal 0315 6803 |h | Jump_Zero 0x319 0316 00d9 | | Load_Top At_Offset_1 0317 c5fb | | Store 0x2,-0x5 0318 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0319 00d9 | | Load_Top At_Offset_1 031a 0092 0b53 | S| Action Push_String_Extended,0xb53 ; "Create_Directory" 031c 824e | N | Call 0x1,0x4e 031d c402 | | Store 0x2,0x2 031e 00d9 | | Load_Top At_Offset_1 031f c5fb | | Store 0x2,-0x5 0320 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0321 0000 0000 | | .BLANK 0000[0x7] 0328 ; -------------------------------------------------------------------------------------- 0328 ; SUBPROGRAM 0328 ; -------------------------------------------------------------------------------------- 0328 032f | / | .CONST 0x032f ; Address of begin 0329 0353 | S | .CONST 0x0353 ; Address of exception handler 032a 0002 | | .CONST 0x0002 ; Number of locals 032b INIT_0328: 032b e20d | | Load 0x1,0xd 032c 02c7 | | Declare_Variable Any 032d 00d8 | | Load_Top At_Offset_0 032e 1c00 | | Execute_Immediate Run_Utility,0x0 032f BODY_0328: 032f 00db | | Load_Top At_Offset_3 0330 8215 | | Call 0x1,0x15 0331 6810 |h | Jump_Zero 0x342 0332 00d8 | | Load_Top At_Offset_0 0333 e004 | | Load 0x0,0x4 0334 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 0335 e001 | | Load 0x0,0x1 0336 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0337 00ea | | Load_Encached Null_String_Cache 0338 e004 | | Load 0x0,0x4 0339 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 033a e001 | | Load 0x0,0x1 033b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 033c e001 | | Load 0x0,0x1 033d 181a | | Execute Package,Field_Execute,Field_Number 0x1a 033e c402 | | Store 0x2,0x2 033f 00d8 | | Load_Top At_Offset_0 0340 c5fb | | Store 0x2,-0x5 0341 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0342 e5fb | | Load 0x2,-0x5 0343 0120 | | Execute Any,Is_Value 0344 6803 |h | Jump_Zero 0x348 0345 e004 | | Load 0x0,0x4 0346 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 0347 7801 |x | Jump 0x349 0348 e5fb | | Load 0x2,-0x5 0349 e5ff | | Load 0x2,-0x1 034a 0219 | | Execute Heap_Access,All_Read 034b e5fd | | Load 0x2,-0x3 034c 4800 |H | Short_Literal 0x0 034d e5fc | | Load 0x2,-0x4 034e e5fe | | Load 0x2,-0x2 034f e004 | | Load 0x0,0x4 0350 1879 | y | Execute Package,Field_Execute,Field_Number 0x79 0351 c5fb | | Store 0x2,-0x5 0352 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0353 TRAP_0328: 0353 e00d | | Load 0x0,0xd 0354 010f | | Execute Exception,Equal 0355 6803 |h | Jump_Zero 0x359 0356 00d9 | | Load_Top At_Offset_1 0357 c5fb | | Store 0x2,-0x5 0358 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0359 00d9 | | Load_Top At_Offset_1 035a 0092 0b54 | T| Action Push_String_Extended,0xb54 ; "Create_File" 035c 824e | N | Call 0x1,0x4e 035d c402 | | Store 0x2,0x2 035e 00d9 | | Load_Top At_Offset_1 035f c5fb | | Store 0x2,-0x5 0360 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0361 0000 0000 | | .BLANK 0000[0x7] 0368 ; -------------------------------------------------------------------------------------- 0368 ; SUBPROGRAM 0368 ; -------------------------------------------------------------------------------------- 0368 036f | o | .CONST 0x036f ; Address of begin 0369 0393 | | .CONST 0x0393 ; Address of exception handler 036a 0002 | | .CONST 0x0002 ; Number of locals 036b INIT_0368: 036b e20d | | Load 0x1,0xd 036c 02c7 | | Declare_Variable Any 036d 00d8 | | Load_Top At_Offset_0 036e 1c00 | | Execute_Immediate Run_Utility,0x0 036f BODY_0368: 036f e5fd | | Load 0x2,-0x3 0370 8215 | | Call 0x1,0x15 0371 6810 |h | Jump_Zero 0x382 0372 00d8 | | Load_Top At_Offset_0 0373 e004 | | Load 0x0,0x4 0374 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 0375 e001 | | Load 0x0,0x1 0376 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0377 00ea | | Load_Encached Null_String_Cache 0378 e004 | | Load 0x0,0x4 0379 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 037a e001 | | Load 0x0,0x1 037b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 037c e001 | | Load 0x0,0x1 037d 181a | | Execute Package,Field_Execute,Field_Number 0x1a 037e c402 | | Store 0x2,0x2 037f 00d8 | | Load_Top At_Offset_0 0380 c5fa | | Store 0x2,-0x6 0381 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0382 e5fa | | Load 0x2,-0x6 0383 0120 | | Execute Any,Is_Value 0384 6803 |h | Jump_Zero 0x388 0385 e004 | | Load 0x0,0x4 0386 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 0387 7801 |x | Jump 0x389 0388 e5fa | | Load 0x2,-0x6 0389 e5fd | | Load 0x2,-0x3 038a 0219 | | Execute Heap_Access,All_Read 038b e5fb | | Load 0x2,-0x5 038c e5fc | | Load 0x2,-0x4 038d e5fe | | Load 0x2,-0x2 038e e5ff | | Load 0x2,-0x1 038f e004 | | Load 0x0,0x4 0390 187a | z | Execute Package,Field_Execute,Field_Number 0x7a 0391 c5fa | | Store 0x2,-0x6 0392 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0393 TRAP_0368: 0393 e00d | | Load 0x0,0xd 0394 010f | | Execute Exception,Equal 0395 6803 |h | Jump_Zero 0x399 0396 00d9 | | Load_Top At_Offset_1 0397 c5fa | | Store 0x2,-0x6 0398 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0399 00d9 | | Load_Top At_Offset_1 039a 0092 0b55 | U| Action Push_String_Extended,0xb55 ; "Put'N(1)" 039c 824e | N | Call 0x1,0x4e 039d c402 | | Store 0x2,0x2 039e 00d9 | | Load_Top At_Offset_1 039f c5fa | | Store 0x2,-0x6 03a0 4506 |E | Exit_Suprogram New_Top_Offset 0x6 03a1 0000 0000 | | .BLANK 0000[0x7] 03a8 ; -------------------------------------------------------------------------------------- 03a8 ; SUBPROGRAM 03a8 ; -------------------------------------------------------------------------------------- 03a8 03af | | .CONST 0x03af ; Address of begin 03a9 03d3 | | .CONST 0x03d3 ; Address of exception handler 03aa 0002 | | .CONST 0x0002 ; Number of locals 03ab INIT_03a8: 03ab e20d | | Load 0x1,0xd 03ac 02c7 | | Declare_Variable Any 03ad 00d8 | | Load_Top At_Offset_0 03ae 1c00 | | Execute_Immediate Run_Utility,0x0 03af BODY_03a8: 03af e5fd | | Load 0x2,-0x3 03b0 8215 | | Call 0x1,0x15 03b1 6810 |h | Jump_Zero 0x3c2 03b2 00d8 | | Load_Top At_Offset_0 03b3 e004 | | Load 0x0,0x4 03b4 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 03b5 e001 | | Load 0x0,0x1 03b6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03b7 00ea | | Load_Encached Null_String_Cache 03b8 e004 | | Load 0x0,0x4 03b9 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 03ba e001 | | Load 0x0,0x1 03bb 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03bc e001 | | Load 0x0,0x1 03bd 181a | | Execute Package,Field_Execute,Field_Number 0x1a 03be c402 | | Store 0x2,0x2 03bf 00d8 | | Load_Top At_Offset_0 03c0 c5fa | | Store 0x2,-0x6 03c1 4506 |E | Exit_Suprogram New_Top_Offset 0x6 03c2 e5fa | | Load 0x2,-0x6 03c3 0120 | | Execute Any,Is_Value 03c4 6803 |h | Jump_Zero 0x3c8 03c5 e004 | | Load 0x0,0x4 03c6 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 03c7 7801 |x | Jump 0x3c9 03c8 e5fa | | Load 0x2,-0x6 03c9 e5fd | | Load 0x2,-0x3 03ca 0219 | | Execute Heap_Access,All_Read 03cb e5fb | | Load 0x2,-0x5 03cc e5fc | | Load 0x2,-0x4 03cd e5fe | | Load 0x2,-0x2 03ce e5ff | | Load 0x2,-0x1 03cf e004 | | Load 0x0,0x4 03d0 187b | { | Execute Package,Field_Execute,Field_Number 0x7b 03d1 c5fa | | Store 0x2,-0x6 03d2 4506 |E | Exit_Suprogram New_Top_Offset 0x6 03d3 TRAP_03a8: 03d3 e00d | | Load 0x0,0xd 03d4 010f | | Execute Exception,Equal 03d5 6803 |h | Jump_Zero 0x3d9 03d6 00d9 | | Load_Top At_Offset_1 03d7 c5fa | | Store 0x2,-0x6 03d8 4506 |E | Exit_Suprogram New_Top_Offset 0x6 03d9 00d9 | | Load_Top At_Offset_1 03da 0092 0b56 | V| Action Push_String_Extended,0xb56 ; "Put'N(2)" 03dc 824e | N | Call 0x1,0x4e 03dd c402 | | Store 0x2,0x2 03de 00d9 | | Load_Top At_Offset_1 03df c5fa | | Store 0x2,-0x6 03e0 4506 |E | Exit_Suprogram New_Top_Offset 0x6 03e1 0000 0000 | | .BLANK 0000[0x7] 03e8 ; -------------------------------------------------------------------------------------- 03e8 ; SUBPROGRAM 03e8 ; -------------------------------------------------------------------------------------- 03e8 03ef | | .CONST 0x03ef ; Address of begin 03e9 0413 | | .CONST 0x0413 ; Address of exception handler 03ea 0002 | | .CONST 0x0002 ; Number of locals 03eb INIT_03e8: 03eb e20d | | Load 0x1,0xd 03ec 02c7 | | Declare_Variable Any 03ed 00d8 | | Load_Top At_Offset_0 03ee 1c00 | | Execute_Immediate Run_Utility,0x0 03ef BODY_03e8: 03ef e5fe | | Load 0x2,-0x2 03f0 8215 | | Call 0x1,0x15 03f1 6810 |h | Jump_Zero 0x402 03f2 00d8 | | Load_Top At_Offset_0 03f3 e004 | | Load 0x0,0x4 03f4 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 03f5 e001 | | Load 0x0,0x1 03f6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03f7 00ea | | Load_Encached Null_String_Cache 03f8 e004 | | Load 0x0,0x4 03f9 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 03fa e001 | | Load 0x0,0x1 03fb 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03fc e001 | | Load 0x0,0x1 03fd 181a | | Execute Package,Field_Execute,Field_Number 0x1a 03fe c402 | | Store 0x2,0x2 03ff 00d8 | | Load_Top At_Offset_0 0400 c5fa | | Store 0x2,-0x6 0401 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0402 e5fa | | Load 0x2,-0x6 0403 0120 | | Execute Any,Is_Value 0404 6803 |h | Jump_Zero 0x408 0405 e004 | | Load 0x0,0x4 0406 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 0407 7801 |x | Jump 0x409 0408 e5fa | | Load 0x2,-0x6 0409 e5fe | | Load 0x2,-0x2 040a 0219 | | Execute Heap_Access,All_Read 040b e5fc | | Load 0x2,-0x4 040c e5fd | | Load 0x2,-0x3 040d e5fb | | Load 0x2,-0x5 040e e5ff | | Load 0x2,-0x1 040f e004 | | Load 0x0,0x4 0410 187c | | | Execute Package,Field_Execute,Field_Number 0x7c 0411 c5fa | | Store 0x2,-0x6 0412 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0413 TRAP_03e8: 0413 e00d | | Load 0x0,0xd 0414 010f | | Execute Exception,Equal 0415 6803 |h | Jump_Zero 0x419 0416 00d9 | | Load_Top At_Offset_1 0417 c5fa | | Store 0x2,-0x6 0418 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0419 00d9 | | Load_Top At_Offset_1 041a 0092 0b57 | W| Action Push_String_Extended,0xb57 ; "Get'N(1)" 041c 824e | N | Call 0x1,0x4e 041d c402 | | Store 0x2,0x2 041e 00d9 | | Load_Top At_Offset_1 041f c5fa | | Store 0x2,-0x6 0420 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0421 0000 0000 | | .BLANK 0000[0x7] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 042f | / | .CONST 0x042f ; Address of begin 0429 0452 | R | .CONST 0x0452 ; Address of exception handler 042a 0002 | | .CONST 0x0002 ; Number of locals 042b INIT_0428: 042b e20d | | Load 0x1,0xd 042c 02c7 | | Declare_Variable Any 042d 00d8 | | Load_Top At_Offset_0 042e 1c00 | | Execute_Immediate Run_Utility,0x0 042f BODY_0428: 042f e5fe | | Load 0x2,-0x2 0430 8215 | | Call 0x1,0x15 0431 6810 |h | Jump_Zero 0x442 0432 00d8 | | Load_Top At_Offset_0 0433 e004 | | Load 0x0,0x4 0434 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 0435 e001 | | Load 0x0,0x1 0436 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0437 00ea | | Load_Encached Null_String_Cache 0438 e004 | | Load 0x0,0x4 0439 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 043a e001 | | Load 0x0,0x1 043b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 043c e001 | | Load 0x0,0x1 043d 181a | | Execute Package,Field_Execute,Field_Number 0x1a 043e c402 | | Store 0x2,0x2 043f 00d8 | | Load_Top At_Offset_0 0440 c5fb | | Store 0x2,-0x5 0441 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0442 e5fb | | Load 0x2,-0x5 0443 0120 | | Execute Any,Is_Value 0444 6803 |h | Jump_Zero 0x448 0445 e004 | | Load 0x0,0x4 0446 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 0447 7801 |x | Jump 0x449 0448 e5fb | | Load 0x2,-0x5 0449 e5fe | | Load 0x2,-0x2 044a 0219 | | Execute Heap_Access,All_Read 044b e5fd | | Load 0x2,-0x3 044c e5fc | | Load 0x2,-0x4 044d e5ff | | Load 0x2,-0x1 044e e004 | | Load 0x0,0x4 044f 187d | } | Execute Package,Field_Execute,Field_Number 0x7d 0450 c5fb | | Store 0x2,-0x5 0451 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0452 TRAP_0428: 0452 e00d | | Load 0x0,0xd 0453 010f | | Execute Exception,Equal 0454 6803 |h | Jump_Zero 0x458 0455 00d9 | | Load_Top At_Offset_1 0456 c5fb | | Store 0x2,-0x5 0457 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0458 00d9 | | Load_Top At_Offset_1 0459 0092 0b58 | X| Action Push_String_Extended,0xb58 ; "Get'N(2)" 045b 824e | N | Call 0x1,0x4e 045c c402 | | Store 0x2,0x2 045d 00d9 | | Load_Top At_Offset_1 045e c5fb | | Store 0x2,-0x5 045f 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0460 ; -------------------------------------------------------------------------------------- 0460 ; SUBPROGRAM 0460 ; -------------------------------------------------------------------------------------- 0460 0469 | i | .CONST 0x0469 ; Address of begin 0461 0492 | | .CONST 0x0492 ; Address of exception handler 0462 0003 | | .CONST 0x0003 ; Number of locals 0463 INIT_0460: 0463 e20d | | Load 0x1,0xd 0464 02c7 | | Declare_Variable Any 0465 00d8 | | Load_Top At_Offset_0 0466 1c00 | | Execute_Immediate Run_Utility,0x0 0467 00e2 | | Load_Encached Integer_Cache 0468 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0469 BODY_0460: 0469 e5fe | | Load 0x2,-0x2 046a 8215 | | Call 0x1,0x15 046b 6810 |h | Jump_Zero 0x47c 046c 00d9 | | Load_Top At_Offset_1 046d e004 | | Load 0x0,0x4 046e 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 046f e001 | | Load 0x0,0x1 0470 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0471 00ea | | Load_Encached Null_String_Cache 0472 e004 | | Load 0x0,0x4 0473 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 0474 e001 | | Load 0x0,0x1 0475 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0476 e001 | | Load 0x0,0x1 0477 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0478 c402 | | Store 0x2,0x2 0479 00d9 | | Load_Top At_Offset_1 047a c5fb | | Store 0x2,-0x5 047b 7810 |x | Jump 0x48c 047c e5fb | | Load 0x2,-0x5 047d 0120 | | Execute Any,Is_Value 047e 6803 |h | Jump_Zero 0x482 047f e004 | | Load 0x0,0x4 0480 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 0481 7801 |x | Jump 0x483 0482 e5fb | | Load 0x2,-0x5 0483 00e2 | | Load_Encached Integer_Cache 0484 e5fe | | Load 0x2,-0x2 0485 0219 | | Execute Heap_Access,All_Read 0486 e5fd | | Load 0x2,-0x3 0487 e5ff | | Load 0x2,-0x1 0488 e004 | | Load 0x0,0x4 0489 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e 048a 005a | Z | Store_Top Discrete,At_Offset_2 048b c5fb | | Store 0x2,-0x5 048c 00d8 | | Load_Top At_Offset_0 048d 090f | | Execute_Immediate Binary_Scale,0xf 048e e244 | D | Load 0x1,0x44 048f 8243 | C | Call 0x1,0x43 0490 c5fc | | Store 0x2,-0x4 0491 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0492 TRAP_0460: 0492 e00d | | Load 0x0,0xd 0493 010f | | Execute Exception,Equal 0494 6803 |h | Jump_Zero 0x498 0495 00da | | Load_Top At_Offset_2 0496 c5fb | | Store 0x2,-0x5 0497 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0498 00da | | Load_Top At_Offset_2 0499 0092 0b59 | Y| Action Push_String_Extended,0xb59 ; "Update_Time" 049b 824e | N | Call 0x1,0x4e 049c c402 | | Store 0x2,0x2 049d 00da | | Load_Top At_Offset_2 049e c5fb | | Store 0x2,-0x5 049f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 04a0 ; -------------------------------------------------------------------------------------- 04a0 ; SUBPROGRAM 04a0 ; -------------------------------------------------------------------------------------- 04a0 04a7 | | .CONST 0x04a7 ; Address of begin 04a1 04cc | | .CONST 0x04cc ; Address of exception handler 04a2 0002 | | .CONST 0x0002 ; Number of locals 04a3 INIT_04a0: 04a3 e20d | | Load 0x1,0xd 04a4 02c7 | | Declare_Variable Any 04a5 00d8 | | Load_Top At_Offset_0 04a6 1c00 | | Execute_Immediate Run_Utility,0x0 04a7 BODY_04a0: 04a7 e5fe | | Load 0x2,-0x2 04a8 8215 | | Call 0x1,0x15 04a9 6812 |h | Jump_Zero 0x4bc 04aa 00d8 | | Load_Top At_Offset_0 04ab e004 | | Load 0x0,0x4 04ac 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 04ad e001 | | Load 0x0,0x1 04ae 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04af 00ea | | Load_Encached Null_String_Cache 04b0 e004 | | Load 0x0,0x4 04b1 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 04b2 e001 | | Load 0x0,0x1 04b3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04b4 e001 | | Load 0x0,0x1 04b5 181a | | Execute Package,Field_Execute,Field_Number 0x1a 04b6 c402 | | Store 0x2,0x2 04b7 00d8 | | Load_Top At_Offset_0 04b8 c5fd | | Store 0x2,-0x3 04b9 4800 |H | Short_Literal 0x0 04ba a5fc | | Store_Unchecked 0x2,-0x4 04bb 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04bc e5fd | | Load 0x2,-0x3 04bd 0120 | | Execute Any,Is_Value 04be 6803 |h | Jump_Zero 0x4c2 04bf e004 | | Load 0x0,0x4 04c0 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 04c1 7801 |x | Jump 0x4c3 04c2 e5fd | | Load 0x2,-0x3 04c3 00e1 | | Load_Encached Boolean_Cache 04c4 e5fe | | Load 0x2,-0x2 04c5 0219 | | Execute Heap_Access,All_Read 04c6 e5ff | | Load 0x2,-0x1 04c7 e004 | | Load 0x0,0x4 04c8 186f | o | Execute Package,Field_Execute,Field_Number 0x6f 04c9 c5fc | | Store 0x2,-0x4 04ca c5fd | | Store 0x2,-0x3 04cb 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04cc TRAP_04a0: 04cc e00d | | Load 0x0,0xd 04cd 010f | | Execute Exception,Equal 04ce 6805 |h | Jump_Zero 0x4d4 04cf 00d9 | | Load_Top At_Offset_1 04d0 c5fd | | Store 0x2,-0x3 04d1 4800 |H | Short_Literal 0x0 04d2 a5fc | | Store_Unchecked 0x2,-0x4 04d3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04d4 00d9 | | Load_Top At_Offset_1 04d5 0092 0b59 | Y| Action Push_String_Extended,0xb59 ; "Update_Time" 04d7 824e | N | Call 0x1,0x4e 04d8 c402 | | Store 0x2,0x2 04d9 00d9 | | Load_Top At_Offset_1 04da c5fd | | Store 0x2,-0x3 04db 4800 |H | Short_Literal 0x0 04dc a5fc | | Store_Unchecked 0x2,-0x4 04dd 4503 |E | Exit_Suprogram New_Top_Offset 0x3 04de 0000 0000 | | .XXX[0x2] 04e0 ; -------------------------------------------------------------------------------------- 04e0 ; SUBPROGRAM 04e0 ; -------------------------------------------------------------------------------------- 04e0 04e7 | | .CONST 0x04e7 ; Address of begin 04e1 050b | | .CONST 0x050b ; Address of exception handler 04e2 0002 | | .CONST 0x0002 ; Number of locals 04e3 INIT_04e0: 04e3 e20d | | Load 0x1,0xd 04e4 02c7 | | Declare_Variable Any 04e5 00d8 | | Load_Top At_Offset_0 04e6 1c00 | | Execute_Immediate Run_Utility,0x0 04e7 BODY_04e0: 04e7 e5fd | | Load 0x2,-0x3 04e8 8215 | | Call 0x1,0x15 04e9 6810 |h | Jump_Zero 0x4fa 04ea 00d8 | | Load_Top At_Offset_0 04eb e004 | | Load 0x0,0x4 04ec 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 04ed e001 | | Load 0x0,0x1 04ee 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04ef 00ea | | Load_Encached Null_String_Cache 04f0 e004 | | Load 0x0,0x4 04f1 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 04f2 e001 | | Load 0x0,0x1 04f3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04f4 e001 | | Load 0x0,0x1 04f5 181a | | Execute Package,Field_Execute,Field_Number 0x1a 04f6 c402 | | Store 0x2,0x2 04f7 00d8 | | Load_Top At_Offset_0 04f8 c5fb | | Store 0x2,-0x5 04f9 4505 |E | Exit_Suprogram New_Top_Offset 0x5 04fa e5fb | | Load 0x2,-0x5 04fb 0120 | | Execute Any,Is_Value 04fc 6803 |h | Jump_Zero 0x500 04fd e004 | | Load 0x0,0x4 04fe 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 04ff 7801 |x | Jump 0x501 0500 e5fb | | Load 0x2,-0x5 0501 e5fd | | Load 0x2,-0x3 0502 0219 | | Execute Heap_Access,All_Read 0503 e5fc | | Load 0x2,-0x4 0504 4800 |H | Short_Literal 0x0 0505 e5fe | | Load 0x2,-0x2 0506 e5ff | | Load 0x2,-0x1 0507 e004 | | Load 0x0,0x4 0508 187f | | Execute Package,Field_Execute,Field_Number 0x7f 0509 c5fb | | Store 0x2,-0x5 050a 4505 |E | Exit_Suprogram New_Top_Offset 0x5 050b TRAP_04e0: 050b e00d | | Load 0x0,0xd 050c 010f | | Execute Exception,Equal 050d 6803 |h | Jump_Zero 0x511 050e 00d9 | | Load_Top At_Offset_1 050f c5fb | | Store 0x2,-0x5 0510 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0511 00d9 | | Load_Top At_Offset_1 0512 0092 0b5a | Z| Action Push_String_Extended,0xb5a ; "Copy" 0514 824e | N | Call 0x1,0x4e 0515 c402 | | Store 0x2,0x2 0516 00d9 | | Load_Top At_Offset_1 0517 c5fb | | Store 0x2,-0x5 0518 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0519 0000 0000 | | .BLANK 0000[0x7] 0520 ; -------------------------------------------------------------------------------------- 0520 ; SUBPROGRAM 0520 ; -------------------------------------------------------------------------------------- 0520 0527 | ' | .CONST 0x0527 ; Address of begin 0521 054b | K | .CONST 0x054b ; Address of exception handler 0522 0002 | | .CONST 0x0002 ; Number of locals 0523 INIT_0520: 0523 e20d | | Load 0x1,0xd 0524 02c7 | | Declare_Variable Any 0525 00d8 | | Load_Top At_Offset_0 0526 1c00 | | Execute_Immediate Run_Utility,0x0 0527 BODY_0520: 0527 e5fd | | Load 0x2,-0x3 0528 8215 | | Call 0x1,0x15 0529 6810 |h | Jump_Zero 0x53a 052a 00d8 | | Load_Top At_Offset_0 052b e004 | | Load 0x0,0x4 052c 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 052d e001 | | Load 0x0,0x1 052e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 052f 00ea | | Load_Encached Null_String_Cache 0530 e004 | | Load 0x0,0x4 0531 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 0532 e001 | | Load 0x0,0x1 0533 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0534 e001 | | Load 0x0,0x1 0535 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0536 c402 | | Store 0x2,0x2 0537 00d8 | | Load_Top At_Offset_0 0538 c5fb | | Store 0x2,-0x5 0539 4505 |E | Exit_Suprogram New_Top_Offset 0x5 053a e5fb | | Load 0x2,-0x5 053b 0120 | | Execute Any,Is_Value 053c 6803 |h | Jump_Zero 0x540 053d e004 | | Load 0x0,0x4 053e 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 053f 7801 |x | Jump 0x541 0540 e5fb | | Load 0x2,-0x5 0541 e5fd | | Load 0x2,-0x3 0542 0219 | | Execute Heap_Access,All_Read 0543 e5fc | | Load 0x2,-0x4 0544 4801 |H | Short_Literal 0x1 0545 e5fe | | Load 0x2,-0x2 0546 e5ff | | Load 0x2,-0x1 0547 e004 | | Load 0x0,0x4 0548 187f | | Execute Package,Field_Execute,Field_Number 0x7f 0549 c5fb | | Store 0x2,-0x5 054a 4505 |E | Exit_Suprogram New_Top_Offset 0x5 054b TRAP_0520: 054b e00d | | Load 0x0,0xd 054c 010f | | Execute Exception,Equal 054d 6803 |h | Jump_Zero 0x551 054e 00d9 | | Load_Top At_Offset_1 054f c5fb | | Store 0x2,-0x5 0550 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0551 00d9 | | Load_Top At_Offset_1 0552 0092 0b5b | [| Action Push_String_Extended,0xb5b ; "Link" 0554 824e | N | Call 0x1,0x4e 0555 c402 | | Store 0x2,0x2 0556 00d9 | | Load_Top At_Offset_1 0557 c5fb | | Store 0x2,-0x5 0558 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0559 0000 0000 | | .BLANK 0000[0x7] 0560 ; -------------------------------------------------------------------------------------- 0560 ; SUBPROGRAM 0560 ; -------------------------------------------------------------------------------------- 0560 0567 | g | .CONST 0x0567 ; Address of begin 0561 058a | | .CONST 0x058a ; Address of exception handler 0562 0002 | | .CONST 0x0002 ; Number of locals 0563 INIT_0560: 0563 e20d | | Load 0x1,0xd 0564 02c7 | | Declare_Variable Any 0565 00d8 | | Load_Top At_Offset_0 0566 1c00 | | Execute_Immediate Run_Utility,0x0 0567 BODY_0560: 0567 00db | | Load_Top At_Offset_3 0568 8215 | | Call 0x1,0x15 0569 6810 |h | Jump_Zero 0x57a 056a 00d8 | | Load_Top At_Offset_0 056b e004 | | Load 0x0,0x4 056c 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 056d e001 | | Load 0x0,0x1 056e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 056f 00ea | | Load_Encached Null_String_Cache 0570 e004 | | Load 0x0,0x4 0571 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 0572 e001 | | Load 0x0,0x1 0573 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0574 e001 | | Load 0x0,0x1 0575 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0576 c402 | | Store 0x2,0x2 0577 00d8 | | Load_Top At_Offset_0 0578 c5fb | | Store 0x2,-0x5 0579 4505 |E | Exit_Suprogram New_Top_Offset 0x5 057a e5fb | | Load 0x2,-0x5 057b 0120 | | Execute Any,Is_Value 057c 6803 |h | Jump_Zero 0x580 057d e004 | | Load 0x0,0x4 057e 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 057f 7801 |x | Jump 0x581 0580 e5fb | | Load 0x2,-0x5 0581 e5ff | | Load 0x2,-0x1 0582 0219 | | Execute Heap_Access,All_Read 0583 e5fc | | Load 0x2,-0x4 0584 e5fd | | Load 0x2,-0x3 0585 e5fe | | Load 0x2,-0x2 0586 e004 | | Load 0x0,0x4 0587 1884 | | Execute Package,Field_Execute,Field_Number 0x84 0588 c5fb | | Store 0x2,-0x5 0589 4505 |E | Exit_Suprogram New_Top_Offset 0x5 058a TRAP_0560: 058a e00d | | Load 0x0,0xd 058b 010f | | Execute Exception,Equal 058c 6803 |h | Jump_Zero 0x590 058d 00d9 | | Load_Top At_Offset_1 058e c5fb | | Store 0x2,-0x5 058f 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0590 00d9 | | Load_Top At_Offset_1 0591 0092 0b5c | \| Action Push_String_Extended,0xb5c ; "Delete_Directory" 0593 824e | N | Call 0x1,0x4e 0594 c402 | | Store 0x2,0x2 0595 00d9 | | Load_Top At_Offset_1 0596 c5fb | | Store 0x2,-0x5 0597 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0598 ; -------------------------------------------------------------------------------------- 0598 ; SUBPROGRAM 0598 ; -------------------------------------------------------------------------------------- 0598 059f | | .CONST 0x059f ; Address of begin 0599 05c2 | | .CONST 0x05c2 ; Address of exception handler 059a 0002 | | .CONST 0x0002 ; Number of locals 059b INIT_0598: 059b e20d | | Load 0x1,0xd 059c 02c7 | | Declare_Variable Any 059d 00d8 | | Load_Top At_Offset_0 059e 1c00 | | Execute_Immediate Run_Utility,0x0 059f BODY_0598: 059f 00db | | Load_Top At_Offset_3 05a0 8215 | | Call 0x1,0x15 05a1 6810 |h | Jump_Zero 0x5b2 05a2 00d8 | | Load_Top At_Offset_0 05a3 e004 | | Load 0x0,0x4 05a4 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 05a5 e001 | | Load 0x0,0x1 05a6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05a7 00ea | | Load_Encached Null_String_Cache 05a8 e004 | | Load 0x0,0x4 05a9 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 05aa e001 | | Load 0x0,0x1 05ab 1811 | | Execute Package,Field_Execute,Field_Number 0x11 05ac e001 | | Load 0x0,0x1 05ad 181a | | Execute Package,Field_Execute,Field_Number 0x1a 05ae c402 | | Store 0x2,0x2 05af 00d8 | | Load_Top At_Offset_0 05b0 c5fc | | Store 0x2,-0x4 05b1 4504 |E | Exit_Suprogram New_Top_Offset 0x4 05b2 e5fc | | Load 0x2,-0x4 05b3 0120 | | Execute Any,Is_Value 05b4 6803 |h | Jump_Zero 0x5b8 05b5 e004 | | Load 0x0,0x4 05b6 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 05b7 7801 |x | Jump 0x5b9 05b8 e5fc | | Load 0x2,-0x4 05b9 e5ff | | Load 0x2,-0x1 05ba 0219 | | Execute Heap_Access,All_Read 05bb e5fd | | Load 0x2,-0x3 05bc 4800 |H | Short_Literal 0x0 05bd e5fe | | Load 0x2,-0x2 05be e004 | | Load 0x0,0x4 05bf 1884 | | Execute Package,Field_Execute,Field_Number 0x84 05c0 c5fc | | Store 0x2,-0x4 05c1 4504 |E | Exit_Suprogram New_Top_Offset 0x4 05c2 TRAP_0598: 05c2 e00d | | Load 0x0,0xd 05c3 010f | | Execute Exception,Equal 05c4 6803 |h | Jump_Zero 0x5c8 05c5 00d9 | | Load_Top At_Offset_1 05c6 c5fc | | Store 0x2,-0x4 05c7 4504 |E | Exit_Suprogram New_Top_Offset 0x4 05c8 00d9 | | Load_Top At_Offset_1 05c9 0092 0b5d | ]| Action Push_String_Extended,0xb5d ; "Delete_File" 05cb 824e | N | Call 0x1,0x4e 05cc c402 | | Store 0x2,0x2 05cd 00d9 | | Load_Top At_Offset_1 05ce c5fc | | Store 0x2,-0x4 05cf 4504 |E | Exit_Suprogram New_Top_Offset 0x4 05d0 ; -------------------------------------------------------------------------------------- 05d0 ; SUBPROGRAM 05d0 ; -------------------------------------------------------------------------------------- 05d0 05d7 | | .CONST 0x05d7 ; Address of begin 05d1 05fd | | .CONST 0x05fd ; Address of exception handler 05d2 0002 | | .CONST 0x0002 ; Number of locals 05d3 INIT_05d0: 05d3 e20d | | Load 0x1,0xd 05d4 02c7 | | Declare_Variable Any 05d5 00d8 | | Load_Top At_Offset_0 05d6 1c00 | | Execute_Immediate Run_Utility,0x0 05d7 BODY_05d0: 05d7 00db | | Load_Top At_Offset_3 05d8 8215 | | Call 0x1,0x15 05d9 6810 |h | Jump_Zero 0x5ea 05da 00d8 | | Load_Top At_Offset_0 05db e004 | | Load 0x0,0x4 05dc 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 05dd e001 | | Load 0x0,0x1 05de 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05df 00ea | | Load_Encached Null_String_Cache 05e0 e004 | | Load 0x0,0x4 05e1 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 05e2 e001 | | Load 0x0,0x1 05e3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 05e4 e001 | | Load 0x0,0x1 05e5 181a | | Execute Package,Field_Execute,Field_Number 0x1a 05e6 c402 | | Store 0x2,0x2 05e7 00d8 | | Load_Top At_Offset_0 05e8 c5fc | | Store 0x2,-0x4 05e9 780e |x | Jump 0x5f8 05ea e5fc | | Load 0x2,-0x4 05eb 0120 | | Execute Any,Is_Value 05ec 6803 |h | Jump_Zero 0x5f0 05ed e004 | | Load 0x0,0x4 05ee 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 05ef 7801 |x | Jump 0x5f1 05f0 e5fc | | Load 0x2,-0x4 05f1 e5ff | | Load 0x2,-0x1 05f2 0219 | | Execute Heap_Access,All_Read 05f3 e5fd | | Load 0x2,-0x3 05f4 e5fe | | Load 0x2,-0x2 05f5 e004 | | Load 0x0,0x4 05f6 1882 | | Execute Package,Field_Execute,Field_Number 0x82 05f7 c5fc | | Store 0x2,-0x4 05f8 00d8 | | Load_Top At_Offset_0 05f9 824d | M | Call 0x1,0x4d 05fa 00d8 | | Load_Top At_Offset_0 05fb c5fc | | Store 0x2,-0x4 05fc 4504 |E | Exit_Suprogram New_Top_Offset 0x4 05fd TRAP_05d0: 05fd e00d | | Load 0x0,0xd 05fe 010f | | Execute Exception,Equal 05ff 6803 |h | Jump_Zero 0x603 0600 00d9 | | Load_Top At_Offset_1 0601 c5fc | | Store 0x2,-0x4 0602 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0603 00d9 | | Load_Top At_Offset_1 0604 0092 0b5e | ^| Action Push_String_Extended,0xb5e ; "Expunge" 0606 824e | N | Call 0x1,0x4e 0607 c402 | | Store 0x2,0x2 0608 00d9 | | Load_Top At_Offset_1 0609 c5fc | | Store 0x2,-0x4 060a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 060b 0000 0000 | | .BLANK 0000[0x5] 0610 ; -------------------------------------------------------------------------------------- 0610 ; SUBPROGRAM 0610 ; -------------------------------------------------------------------------------------- 0610 0617 | | .CONST 0x0617 ; Address of begin 0611 063a | : | .CONST 0x063a ; Address of exception handler 0612 0002 | | .CONST 0x0002 ; Number of locals 0613 INIT_0610: 0613 e20d | | Load 0x1,0xd 0614 02c7 | | Declare_Variable Any 0615 00d8 | | Load_Top At_Offset_0 0616 1c00 | | Execute_Immediate Run_Utility,0x0 0617 BODY_0610: 0617 e5fd | | Load 0x2,-0x3 0618 8215 | | Call 0x1,0x15 0619 6810 |h | Jump_Zero 0x62a 061a 00d8 | | Load_Top At_Offset_0 061b e004 | | Load 0x0,0x4 061c 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 061d e001 | | Load 0x0,0x1 061e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 061f 00ea | | Load_Encached Null_String_Cache 0620 e004 | | Load 0x0,0x4 0621 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 0622 e001 | | Load 0x0,0x1 0623 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0624 e001 | | Load 0x0,0x1 0625 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0626 c402 | | Store 0x2,0x2 0627 00d8 | | Load_Top At_Offset_0 0628 c5fb | | Store 0x2,-0x5 0629 4505 |E | Exit_Suprogram New_Top_Offset 0x5 062a e5fb | | Load 0x2,-0x5 062b 0120 | | Execute Any,Is_Value 062c 6803 |h | Jump_Zero 0x630 062d e004 | | Load 0x0,0x4 062e 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 062f 7801 |x | Jump 0x631 0630 e5fb | | Load 0x2,-0x5 0631 e5fd | | Load 0x2,-0x3 0632 0219 | | Execute Heap_Access,All_Read 0633 e5fc | | Load 0x2,-0x4 0634 e5fe | | Load 0x2,-0x2 0635 e5ff | | Load 0x2,-0x1 0636 e004 | | Load 0x0,0x4 0637 1881 | | Execute Package,Field_Execute,Field_Number 0x81 0638 c5fb | | Store 0x2,-0x5 0639 4505 |E | Exit_Suprogram New_Top_Offset 0x5 063a TRAP_0610: 063a e00d | | Load 0x0,0xd 063b 010f | | Execute Exception,Equal 063c 6803 |h | Jump_Zero 0x640 063d 00d9 | | Load_Top At_Offset_1 063e c5fb | | Store 0x2,-0x5 063f 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0640 00d9 | | Load_Top At_Offset_1 0641 0092 0b5f | _| Action Push_String_Extended,0xb5f ; "Move" 0643 824e | N | Call 0x1,0x4e 0644 c402 | | Store 0x2,0x2 0645 00d9 | | Load_Top At_Offset_1 0646 c5fb | | Store 0x2,-0x5 0647 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 064f | O | .CONST 0x064f ; Address of begin 0649 067a | z | .CONST 0x067a ; Address of exception handler 064a 0002 | | .CONST 0x0002 ; Number of locals 064b INIT_0648: 064b e20d | | Load 0x1,0xd 064c 02c7 | | Declare_Variable Any 064d 00d8 | | Load_Top At_Offset_0 064e 1c00 | | Execute_Immediate Run_Utility,0x0 064f BODY_0648: 064f e5fe | | Load 0x2,-0x2 0650 8215 | | Call 0x1,0x15 0651 6810 |h | Jump_Zero 0x662 0652 00d8 | | Load_Top At_Offset_0 0653 e004 | | Load 0x0,0x4 0654 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 0655 e001 | | Load 0x0,0x1 0656 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0657 00ea | | Load_Encached Null_String_Cache 0658 e004 | | Load 0x0,0x4 0659 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 065a e001 | | Load 0x0,0x1 065b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 065c e001 | | Load 0x0,0x1 065d 181a | | Execute Package,Field_Execute,Field_Number 0x1a 065e c402 | | Store 0x2,0x2 065f 00d8 | | Load_Top At_Offset_0 0660 c5fc | | Store 0x2,-0x4 0661 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0662 e5fc | | Load 0x2,-0x4 0663 0120 | | Execute Any,Is_Value 0664 6802 |h | Jump_Zero 0x667 0665 e20d | | Load 0x1,0xd 0666 7801 |x | Jump 0x668 0667 e5fc | | Load 0x2,-0x4 0668 e5fd | | Load 0x2,-0x3 0669 e00e | | Load 0x0,0xe 066a 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 066b e00e | | Load 0x0,0xe 066c 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e 066d e00e | | Load 0x0,0xe 066e 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 066f e00e | | Load 0x0,0xe 0670 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e 0671 e00e | | Load 0x0,0xe 0672 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0673 e00e | | Load 0x0,0xe 0674 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e 0675 e5fe | | Load 0x2,-0x2 0676 e5ff | | Load 0x2,-0x1 0677 8233 | 3 | Call 0x1,0x33 0678 c5fc | | Store 0x2,-0x4 0679 4504 |E | Exit_Suprogram New_Top_Offset 0x4 067a TRAP_0648: 067a e00d | | Load 0x0,0xd 067b 010f | | Execute Exception,Equal 067c 6803 |h | Jump_Zero 0x680 067d 00d9 | | Load_Top At_Offset_1 067e c5fc | | Store 0x2,-0x4 067f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0680 00d9 | | Load_Top At_Offset_1 0681 0092 0b60 | `| Action Push_String_Extended,0xb60 ; "Execute'N(1)" 0683 824e | N | Call 0x1,0x4e 0684 c402 | | Store 0x2,0x2 0685 00d9 | | Load_Top At_Offset_1 0686 c5fc | | Store 0x2,-0x4 0687 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0688 ; -------------------------------------------------------------------------------------- 0688 ; SUBPROGRAM 0688 ; -------------------------------------------------------------------------------------- 0688 06a6 | | .CONST 0x06a6 ; Address of begin 0689 06f4 | | .CONST 0x06f4 ; Address of exception handler 068a 0006 | | .CONST 0x0006 ; Number of locals 068b INIT_0688: 068b e00f | | Load 0x0,0xf 068c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 068d 02c7 | | Declare_Variable Any 068e e010 | | Load 0x0,0x10 068f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0690 e00f | | Load 0x0,0xf 0691 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0692 a402 | | Store_Unchecked 0x2,0x2 0693 e20d | | Load 0x1,0xd 0694 02c7 | | Declare_Variable Any 0695 00d8 | | Load_Top At_Offset_0 0696 1c00 | | Execute_Immediate Run_Utility,0x0 0697 e005 | | Load 0x0,0x5 0698 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0699 02c7 | | Declare_Variable Any 069a 00d8 | | Load_Top At_Offset_0 069b 1c00 | | Execute_Immediate Run_Utility,0x0 069c e005 | | Load 0x0,0x5 069d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 069e 02c7 | | Declare_Variable Any 069f 00d8 | | Load_Top At_Offset_0 06a0 1c00 | | Execute_Immediate Run_Utility,0x0 06a1 e005 | | Load 0x0,0x5 06a2 1b0d | | Execute Package,Field_Read,Field_Number 0xd 06a3 02c7 | | Declare_Variable Any 06a4 00d8 | | Load_Top At_Offset_0 06a5 1c00 | | Execute_Immediate Run_Utility,0x0 06a6 BODY_0688: 06a6 e5fe | | Load 0x2,-0x2 06a7 8215 | | Call 0x1,0x15 06a8 6810 |h | Jump_Zero 0x6b9 06a9 00db | | Load_Top At_Offset_3 06aa e004 | | Load 0x0,0x4 06ab 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 06ac e001 | | Load 0x0,0x1 06ad 1813 | | Execute Package,Field_Execute,Field_Number 0x13 06ae 00ea | | Load_Encached Null_String_Cache 06af e004 | | Load 0x0,0x4 06b0 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 06b1 e001 | | Load 0x0,0x1 06b2 1811 | | Execute Package,Field_Execute,Field_Number 0x11 06b3 e001 | | Load 0x0,0x1 06b4 181a | | Execute Package,Field_Execute,Field_Number 0x1a 06b5 c403 | | Store 0x2,0x3 06b6 00db | | Load_Top At_Offset_3 06b7 c5f9 | | Store 0x2,-0x7 06b8 4507 |E | Exit_Suprogram New_Top_Offset 0x7 06b9 00db | | Load_Top At_Offset_3 06ba 824d | M | Call 0x1,0x4d 06bb 00db | | Load_Top At_Offset_3 06bc 00d9 | | Load_Top At_Offset_1 06bd e402 | | Load 0x2,0x2 06be e5fc | | Load 0x2,-0x4 06bf 825b | [ | Call 0x1,0x5b 06c0 c406 | | Store 0x2,0x6 06c1 c403 | | Store 0x2,0x3 06c2 00db | | Load_Top At_Offset_3 06c3 824d | M | Call 0x1,0x4d 06c4 00db | | Load_Top At_Offset_3 06c5 00db | | Load_Top At_Offset_3 06c6 e402 | | Load 0x2,0x2 06c7 e5fb | | Load 0x2,-0x5 06c8 825b | [ | Call 0x1,0x5b 06c9 c404 | | Store 0x2,0x4 06ca c403 | | Store 0x2,0x3 06cb 00db | | Load_Top At_Offset_3 06cc 824d | M | Call 0x1,0x4d 06cd 00db | | Load_Top At_Offset_3 06ce 0120 | | Execute Any,Is_Value 06cf 6802 |h | Jump_Zero 0x6d2 06d0 e20d | | Load 0x1,0xd 06d1 7801 |x | Jump 0x6d3 06d2 00db | | Load_Top At_Offset_3 06d3 e5fa | | Load 0x2,-0x6 06d4 e404 | | Load 0x2,0x4 06d5 00db | | Load_Top At_Offset_3 06d6 e405 | | Load 0x2,0x5 06d7 e5fe | | Load 0x2,-0x2 06d8 e5ff | | Load 0x2,-0x1 06d9 8233 | 3 | Call 0x1,0x33 06da c403 | | Store 0x2,0x3 06db 00db | | Load_Top At_Offset_3 06dc c5f9 | | Store 0x2,-0x7 06dd 00da | | Load_Top At_Offset_2 06de e005 | | Load 0x0,0x5 06df 1819 | | Execute Package,Field_Execute,Field_Number 0x19 06e0 c404 | | Store 0x2,0x4 06e1 00d9 | | Load_Top At_Offset_1 06e2 e005 | | Load 0x0,0x5 06e3 1819 | | Execute Package,Field_Execute,Field_Number 0x19 06e4 c405 | | Store 0x2,0x5 06e5 00d8 | | Load_Top At_Offset_0 06e6 e005 | | Load 0x0,0x5 06e7 1819 | | Execute Package,Field_Execute,Field_Number 0x19 06e8 c406 | | Store 0x2,0x6 06e9 e402 | | Load 0x2,0x2 06ea 4801 |H | Short_Literal 0x1 06eb 4801 |H | Short_Literal 0x1 06ec e403 | | Load 0x2,0x3 06ed e001 | | Load 0x0,0x1 06ee 1817 | | Execute Package,Field_Execute,Field_Number 0x17 06ef 0f00 | | Execute_Immediate Equal,0x0 06f0 e00f | | Load 0x0,0xf 06f1 1818 | | Execute Package,Field_Execute,Field_Number 0x18 06f2 c402 | | Store 0x2,0x2 06f3 4507 |E | Exit_Suprogram New_Top_Offset 0x7 06f4 TRAP_0688: 06f4 e00d | | Load 0x0,0xd 06f5 010f | | Execute Exception,Equal 06f6 6821 |h! | Jump_Zero 0x718 06f7 e403 | | Load 0x2,0x3 06f8 c5f9 | | Store 0x2,-0x7 06f9 00da | | Load_Top At_Offset_2 06fa e005 | | Load 0x0,0x5 06fb 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 06fc 6804 |h | Jump_Zero 0x701 06fd 00da | | Load_Top At_Offset_2 06fe e005 | | Load 0x0,0x5 06ff 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0700 c405 | | Store 0x2,0x5 0701 00d9 | | Load_Top At_Offset_1 0702 e005 | | Load 0x0,0x5 0703 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0704 6804 |h | Jump_Zero 0x709 0705 00d9 | | Load_Top At_Offset_1 0706 e005 | | Load 0x0,0x5 0707 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0708 c406 | | Store 0x2,0x6 0709 00db | | Load_Top At_Offset_3 070a e005 | | Load 0x0,0x5 070b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 070c 6804 |h | Jump_Zero 0x711 070d 00db | | Load_Top At_Offset_3 070e e005 | | Load 0x0,0x5 070f 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0710 c404 | | Store 0x2,0x4 0711 e402 | | Load 0x2,0x2 0712 4801 |H | Short_Literal 0x1 0713 4800 |H | Short_Literal 0x0 0714 e00f | | Load 0x0,0xf 0715 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0716 c402 | | Store 0x2,0x2 0717 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0718 e403 | | Load 0x2,0x3 0719 0092 0b61 | a| Action Push_String_Extended,0xb61 ; "Execute'N(2)" 071b 824e | N | Call 0x1,0x4e 071c c403 | | Store 0x2,0x3 071d e403 | | Load 0x2,0x3 071e c5f9 | | Store 0x2,-0x7 071f 00da | | Load_Top At_Offset_2 0720 e005 | | Load 0x0,0x5 0721 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0722 6804 |h | Jump_Zero 0x727 0723 00da | | Load_Top At_Offset_2 0724 e005 | | Load 0x0,0x5 0725 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0726 c405 | | Store 0x2,0x5 0727 00d9 | | Load_Top At_Offset_1 0728 e005 | | Load 0x0,0x5 0729 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 072a 6804 |h | Jump_Zero 0x72f 072b 00d9 | | Load_Top At_Offset_1 072c e005 | | Load 0x0,0x5 072d 1819 | | Execute Package,Field_Execute,Field_Number 0x19 072e c406 | | Store 0x2,0x6 072f 00db | | Load_Top At_Offset_3 0730 e005 | | Load 0x0,0x5 0731 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0732 6804 |h | Jump_Zero 0x737 0733 00db | | Load_Top At_Offset_3 0734 e005 | | Load 0x0,0x5 0735 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0736 c404 | | Store 0x2,0x4 0737 e402 | | Load 0x2,0x2 0738 4801 |H | Short_Literal 0x1 0739 4800 |H | Short_Literal 0x0 073a e00f | | Load 0x0,0xf 073b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 073c c402 | | Store 0x2,0x2 073d 4507 |E | Exit_Suprogram New_Top_Offset 0x7 073e 0000 0000 | | .XXX[0x2] 0740 ; -------------------------------------------------------------------------------------- 0740 ; SUBPROGRAM 0740 ; -------------------------------------------------------------------------------------- 0740 077f | | .CONST 0x077f ; Address of begin 0741 07ae | | .CONST 0x07ae ; Address of exception handler 0742 0003 | | .CONST 0x0003 ; Number of locals 0743 INIT_0740: 0743 e20d | | Load 0x1,0xd 0744 02c7 | | Declare_Variable Any 0745 00d8 | | Load_Top At_Offset_0 0746 1c00 | | Execute_Immediate Run_Utility,0x0 0747 00db | | Load_Top At_Offset_3 0748 01db | | Execute Vector,Length 0749 e24c | L | Load 0x1,0x4c 074a 1c08 | | Execute_Immediate Run_Utility,0x8 074b e5ff | | Load 0x2,-0x1 074c 01db | | Execute Vector,Length 074d e24c | L | Load 0x1,0x4c 074e 1c08 | | Execute_Immediate Run_Utility,0x8 074f e5fe | | Load 0x2,-0x2 0750 00d9 | | Load_Top At_Offset_1 0751 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0752 e5fb | | Load 0x2,-0x5 0753 e24c | L | Load 0x1,0x4c 0754 2303 |# | Execute Variant_Record,Field_Type,Field_Number 0x3 0755 0119 | | Execute Any,Check_In_Formal_Type 0756 00d9 | | Load_Top At_Offset_1 0757 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 0758 e5fd | | Load 0x2,-0x3 0759 e24c | L | Load 0x1,0x4c 075a 2304 |# | Execute Variant_Record,Field_Type,Field_Number 0x4 075b 0119 | | Execute Any,Check_In_Formal_Type 075c 00d9 | | Load_Top At_Offset_1 075d 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4 075e e5fc | | Load 0x2,-0x4 075f e24c | L | Load 0x1,0x4c 0760 2305 |# | Execute Variant_Record,Field_Type,Field_Number 0x5 0761 0119 | | Execute Any,Check_In_Formal_Type 0762 00d9 | | Load_Top At_Offset_1 0763 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5 0764 00da | | Load_Top At_Offset_2 0765 e24c | L | Load 0x1,0x4c 0766 2306 |# | Execute Variant_Record,Field_Type,Field_Number 0x6 0767 0119 | | Execute Any,Check_In_Formal_Type 0768 00d9 | | Load_Top At_Offset_1 0769 2806 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6 076a e5ff | | Load 0x2,-0x1 076b 00d9 | | Load_Top At_Offset_1 076c 00d8 | | Load_Top At_Offset_0 076d 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7 076e 00da | | Load_Top At_Offset_2 076f 01da | | Execute Vector,Bounds 0770 00da | | Load_Top At_Offset_2 0771 01da | | Execute Vector,Bounds 0772 00da | | Load_Top At_Offset_2 0773 027f | | Execute Discrete,Equal 0774 7001 |p | Jump_Nonzero 0x776 0775 08e0 | | Execute_Immediate Raise,0xe0 0776 00cd | | Action Spare6_Action 0777 027f | | Execute Discrete,Equal 0778 7001 |p | Jump_Nonzero 0x77a 0779 08e0 | | Execute_Immediate Raise,0xe0 077a 00d2 | | Pop_Control Pop_Count_2 077b 00d9 | | Load_Top At_Offset_1 077c 2907 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x7 077d 00d9 | | Load_Top At_Offset_1 077e 016d | m | Execute Variant_Record,Structure_Write 077f BODY_0740: 077f e5fe | | Load 0x2,-0x2 0780 8215 | | Call 0x1,0x15 0781 6810 |h | Jump_Zero 0x792 0782 00d9 | | Load_Top At_Offset_1 0783 e004 | | Load 0x0,0x4 0784 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 0785 e001 | | Load 0x0,0x1 0786 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0787 00ea | | Load_Encached Null_String_Cache 0788 e004 | | Load 0x0,0x4 0789 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 078a e001 | | Load 0x0,0x1 078b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 078c e001 | | Load 0x0,0x1 078d 181a | | Execute Package,Field_Execute,Field_Number 0x1a 078e c402 | | Store 0x2,0x2 078f 00d9 | | Load_Top At_Offset_1 0790 c5f9 | | Store 0x2,-0x7 0791 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0792 00d9 | | Load_Top At_Offset_1 0793 0120 | | Execute Any,Is_Value 0794 6803 |h | Jump_Zero 0x798 0795 e004 | | Load 0x0,0x4 0796 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 0797 7801 |x | Jump 0x799 0798 00d9 | | Load_Top At_Offset_1 0799 00d9 | | Load_Top At_Offset_1 079a e5fe | | Load 0x2,-0x2 079b 0219 | | Execute Heap_Access,All_Read 079c e5fa | | Load 0x2,-0x6 079d 824f | O | Call 0x1,0x4f 079e e5ff | | Load 0x2,-0x1 079f e254 | T | Load 0x1,0x54 07a0 1d55 | U | Execute_Immediate Reference_Lex_1,0x55 07a1 1d56 | V | Execute_Immediate Reference_Lex_1,0x56 07a2 1d57 | W | Execute_Immediate Reference_Lex_1,0x57 07a3 1d58 | X | Execute_Immediate Reference_Lex_1,0x58 07a4 e004 | | Load 0x0,0x4 07a5 1867 | g | Execute Package,Field_Execute,Field_Number 0x67 07a6 00d1 | | Pop_Control Pop_Count_1 07a7 c402 | | Store 0x2,0x2 07a8 00d8 | | Load_Top At_Offset_0 07a9 2c06 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6 07aa 824d | M | Call 0x1,0x4d 07ab 00d9 | | Load_Top At_Offset_1 07ac c5f9 | | Store 0x2,-0x7 07ad 4507 |E | Exit_Suprogram New_Top_Offset 0x7 07ae TRAP_0740: 07ae e00d | | Load 0x0,0xd 07af 010f | | Execute Exception,Equal 07b0 6804 |h | Jump_Zero 0x7b5 07b1 00d9 | | Load_Top At_Offset_1 07b2 2c06 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6 07b3 c5f9 | | Store 0x2,-0x7 07b4 4507 |E | Exit_Suprogram New_Top_Offset 0x7 07b5 00da | | Load_Top At_Offset_2 07b6 0092 0b62 | b| Action Push_String_Extended,0xb62 ; "Execute'N(3)" 07b8 824e | N | Call 0x1,0x4e 07b9 c402 | | Store 0x2,0x2 07ba 00da | | Load_Top At_Offset_2 07bb c5f9 | | Store 0x2,-0x7 07bc 4507 |E | Exit_Suprogram New_Top_Offset 0x7 07bd 0000 0000 | | .XXX[0x3] 07bf 0000 | | 07c0 ; -------------------------------------------------------------------------------------- 07c0 ; SUBPROGRAM 07c0 ; -------------------------------------------------------------------------------------- 07c0 07c3 | | .CONST 0x07c3 ; Address of begin 07c1 0004 | | .CONST 0x0004 ; Address of exception handler 07c2 0001 | | .CONST 0x0001 ; Number of locals 07c3 BODY_07c0: 07c3 INIT_07c0: 07c3 4607 |F | Jump_Case 0x8 07c4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 07c5 7806 |x | Jump 0x7cc ; case 0x1 07c6 7809 |x | Jump 0x7d0 ; case 0x2 07c7 780d |x | Jump 0x7d5 ; case 0x3 07c8 7810 |x | Jump 0x7d9 ; case 0x4 07c9 7811 |x | Jump 0x7db ; case 0x5 07ca 7812 |x | Jump 0x7dd ; case 0x6 07cb 7815 |x | Jump 0x7e1 ; case 0x7 07cc 00da | | Load_Top At_Offset_2 07cd 0091 0b42 | B| Action Push_String_Extended_Indexed,0xb42 ; "NIL" 07cf 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 07d0 00db | | Load_Top At_Offset_3 07d1 00db | | Load_Top At_Offset_3 07d2 00e0 | | Load_Encached Standard_Cache 07d3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 07d4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 07d5 00da | | Load_Top At_Offset_2 07d6 00e0 | | Load_Encached Standard_Cache 07d7 181c | | Execute Package,Field_Execute,Field_Number 0x1c 07d8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 07d9 00db | | Load_Top At_Offset_3 07da 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 07db 00db | | Load_Top At_Offset_3 07dc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 07dd e234 | 4 | Load 0x1,0x34 07de 00dc | | Load_Top At_Offset_4 07df 0267 | g | Execute Discrete,Predecessor 07e0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 07e1 e234 | 4 | Load 0x1,0x34 07e2 00dc | | Load_Top At_Offset_4 07e3 0268 | h | Execute Discrete,Successor 07e4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 07e5 0000 0000 | | .XXX[0x3] 07e7 0000 | | 07e8 ; -------------------------------------------------------------------------------------- 07e8 ; SUBPROGRAM 07e8 ; -------------------------------------------------------------------------------------- 07e8 0806 | | .CONST 0x0806 ; Address of begin 07e9 0840 | @ | .CONST 0x0840 ; Address of exception handler 07ea 000c | | .CONST 0x000c ; Number of locals 07eb INIT_07e8: 07eb e20d | | Load 0x1,0xd 07ec 02c7 | | Declare_Variable Any 07ed 00d8 | | Load_Top At_Offset_0 07ee 1c00 | | Execute_Immediate Run_Utility,0x0 07ef 029f 0aeb | | Declare_Subprogram INIT_0ae8,For_Call 07f1 029f 0b0b | | Declare_Subprogram INIT_0b08,For_Call 07f3 029f 0b2b | +| Declare_Subprogram INIT_0b28,For_Call 07f5 e004 | | Load 0x0,0x4 07f6 1967 | g | Execute Package,Field_Reference,Field_Number 0x67 07f7 00c6 | | Action Check_Subprogram_Elaborated 07f8 e5fb | | Load 0x2,-0x5 07f9 4803 |H | Short_Literal 0x3 07fa 4802 |H | Short_Literal 0x2 07fb 0099 | | Action Reference_Dynamic 07fc 4804 |H | Short_Literal 0x4 07fd 4802 |H | Short_Literal 0x2 07fe 0099 | | Action Reference_Dynamic 07ff 4805 |H | Short_Literal 0x5 0800 4802 |H | Short_Literal 0x2 0801 0099 | | Action Reference_Dynamic 0802 e011 | | Load 0x0,0x11 0803 e012 | | Load 0x0,0x12 0804 480c |H | Short_Literal 0xc 0805 0007 | | Action Break_Optional 0806 BODY_07e8: 0806 e5f9 | | Load 0x2,-0x7 0807 8215 | | Call 0x1,0x15 0808 6810 |h | Jump_Zero 0x819 0809 e402 | | Load 0x2,0x2 080a e004 | | Load 0x0,0x4 080b 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 080c e001 | | Load 0x0,0x1 080d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 080e 00ea | | Load_Encached Null_String_Cache 080f e004 | | Load 0x0,0x4 0810 1b6d | m | Execute Package,Field_Read,Field_Number 0x6d 0811 e001 | | Load 0x0,0x1 0812 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0813 e001 | | Load 0x0,0x1 0814 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0815 c402 | | Store 0x2,0x2 0816 e402 | | Load 0x2,0x2 0817 c5f6 | | Store 0x2,-0xa 0818 4509 |E | Exit_Suprogram New_Top_Offset 0x9 0819 e5f6 | | Load 0x2,-0xa 081a 0120 | | Execute Any,Is_Value 081b 6803 |h | Jump_Zero 0x81f 081c e004 | | Load 0x0,0x4 081d 1b43 | C | Execute Package,Field_Read,Field_Number 0x43 081e 7801 |x | Jump 0x820 081f e5f6 | | Load 0x2,-0xa 0820 e5f7 | | Load 0x2,-0x9 0821 00d8 | | Load_Top At_Offset_0 0822 0120 | | Execute Any,Is_Value 0823 6803 |h | Jump_Zero 0x827 0824 e406 | | Load 0x2,0x6 0825 011e | | Execute Any,Convert 0826 7802 |x | Jump 0x829 0827 e5fb | | Load 0x2,-0x5 0828 0119 | | Execute Any,Check_In_Formal_Type 0829 e5f9 | | Load 0x2,-0x7 082a 0219 | | Execute Heap_Access,All_Read 082b e5f8 | | Load 0x2,-0x8 082c 824f | O | Call 0x1,0x4f 082d e5fa | | Load 0x2,-0x6 082e e406 | | Load 0x2,0x6 082f 4807 |H | Short_Literal 0x7 0830 4802 |H | Short_Literal 0x2 0831 0099 | | Action Reference_Dynamic 0832 4808 |H | Short_Literal 0x8 0833 4802 |H | Short_Literal 0x2 0834 0099 | | Action Reference_Dynamic 0835 4809 |H | Short_Literal 0x9 0836 4802 |H | Short_Literal 0x2 0837 0099 | | Action Reference_Dynamic 0838 480a |H | Short_Literal 0xa 0839 4802 |H | Short_Literal 0x2 083a 0099 | | Action Reference_Dynamic 083b e004 | | Load 0x0,0x4 083c 1867 | g | Execute Package,Field_Execute,Field_Number 0x67 083d c5f7 | | Store 0x2,-0x9 083e c5f6 | | Store 0x2,-0xa 083f 4509 |E | Exit_Suprogram New_Top_Offset 0x9 0840 TRAP_07e8: 0840 e00d | | Load 0x0,0xd 0841 010f | | Execute Exception,Equal 0842 6801 |h | Jump_Zero 0x844 0843 4509 |E | Exit_Suprogram New_Top_Offset 0x9 0844 e402 | | Load 0x2,0x2 0845 0092 0b63 | c| Action Push_String_Extended,0xb63 ; "Execution" 0847 824e | N | Call 0x1,0x4e 0848 c402 | | Store 0x2,0x2 0849 e402 | | Load 0x2,0x2 084a c5f6 | | Store 0x2,-0xa 084b 4509 |E | Exit_Suprogram New_Top_Offset 0x9 084c 0000 0000 | | .BLANK 0000[0x4] 0850 ; -------------------------------------------------------------------------------------- 0850 ; SUBPROGRAM 0850 ; -------------------------------------------------------------------------------------- 0850 0855 | U | .CONST 0x0855 ; Address of begin 0851 0891 | | .CONST 0x0891 ; Address of exception handler 0852 0002 | | .CONST 0x0002 ; Number of locals 0853 INIT_0850: 0853 e004 | | Load 0x0,0x4 0854 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c 0855 BODY_0850: 0855 00db | | Load_Top At_Offset_3 0856 e001 | | Load 0x0,0x1 0857 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0858 e004 | | Load 0x0,0x4 0859 1b6c | l | Execute Package,Field_Read,Field_Number 0x6c 085a 1c02 | | Execute_Immediate Run_Utility,0x2 085b 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 085c 00d8 | | Load_Top At_Offset_0 085d 4610 |F | Jump_Case 0x11 085e 7812 |x | Jump 0x871 ; case 0x0 085f 7813 |x | Jump 0x873 ; case 0x1 0860 782e |x. | Jump 0x88f ; case 0x2 0861 7813 |x | Jump 0x875 ; case 0x3 0862 7814 |x | Jump 0x877 ; case 0x4 0863 7815 |x | Jump 0x879 ; case 0x5 0864 7816 |x | Jump 0x87b ; case 0x6 0865 7817 |x | Jump 0x87d ; case 0x7 0866 7818 |x | Jump 0x87f ; case 0x8 0867 7819 |x | Jump 0x881 ; case 0x9 0868 781a |x | Jump 0x883 ; case 0xa 0869 781b |x | Jump 0x885 ; case 0xb 086a 781c |x | Jump 0x887 ; case 0xc 086b 781d |x | Jump 0x889 ; case 0xd 086c 781e |x | Jump 0x88b ; case 0xe 086d 781f |x | Jump 0x88d ; case 0xf 086e 7800 |x | Jump 0x86f ; case 0x10 086f 4810 |H | Short_Literal 0x10 0870 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0871 4800 |H | Short_Literal 0x0 0872 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0873 4801 |H | Short_Literal 0x1 0874 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0875 4802 |H | Short_Literal 0x2 0876 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0877 4803 |H | Short_Literal 0x3 0878 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0879 4804 |H | Short_Literal 0x4 087a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 087b 4805 |H | Short_Literal 0x5 087c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 087d 4806 |H | Short_Literal 0x6 087e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 087f 4807 |H | Short_Literal 0x7 0880 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0881 4808 |H | Short_Literal 0x8 0882 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0883 4809 |H | Short_Literal 0x9 0884 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0885 480a |H | Short_Literal 0xa 0886 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0887 480b |H | Short_Literal 0xb 0888 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0889 480c |H | Short_Literal 0xc 088a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 088b 480d |H | Short_Literal 0xd 088c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 088d 480e |H | Short_Literal 0xe 088e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 088f 4811 |H | Short_Literal 0x11 0890 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0891 TRAP_0850: 0891 010e | | Execute Exception,Is_Constraint_Error 0892 6802 |h | Jump_Zero 0x895 0893 48ff |H | Short_Literal 0xff 0894 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0895 0100 | | Execute Exception,Raise 0896 0000 0000 | | .XXX[0x2] 0898 ; -------------------------------------------------------------------------------------- 0898 ; SUBPROGRAM 0898 ; -------------------------------------------------------------------------------------- 0898 089b | | .CONST 0x089b ; Address of begin 0899 0004 | | .CONST 0x0004 ; Address of exception handler 089a 0001 | | .CONST 0x0001 ; Number of locals 089b BODY_0898: 089b INIT_0898: 089b e004 | | Load 0x0,0x4 089c 1b8d | | Execute Package,Field_Read,Field_Number 0x8d 089d 0337 | 7 | Declare_Variable Array 089e 4801 |H | Short_Literal 0x1 089f e5ff | | Load 0x2,-0x1 08a0 01d7 | | Execute Vector,Field_Read 08a1 4801 |H | Short_Literal 0x1 08a2 00da | | Load_Top At_Offset_2 08a3 01d6 | | Execute Vector,Field_Write 08a4 4802 |H | Short_Literal 0x2 08a5 e5ff | | Load 0x2,-0x1 08a6 01d7 | | Execute Vector,Field_Read 08a7 4802 |H | Short_Literal 0x2 08a8 00da | | Load_Top At_Offset_2 08a9 01d6 | | Execute Vector,Field_Write 08aa e004 | | Load 0x0,0x4 08ab 1b8d | | Execute Package,Field_Read,Field_Number 0x8d 08ac 01c3 | | Execute Vector,Check_In_Type 08ad e004 | | Load 0x0,0x4 08ae 188f | | Execute Package,Field_Execute,Field_Number 0x8f 08af 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08b0 ; -------------------------------------------------------------------------------------- 08b0 ; SUBPROGRAM 08b0 ; -------------------------------------------------------------------------------------- 08b0 08b6 | | .CONST 0x08b6 ; Address of begin 08b1 0004 | | .CONST 0x0004 ; Address of exception handler 08b2 0002 | | .CONST 0x0002 ; Number of locals 08b3 INIT_08b0: 08b3 e004 | | Load 0x0,0x4 08b4 1b8d | | Execute Package,Field_Read,Field_Number 0x8d 08b5 0337 | 7 | Declare_Variable Array 08b6 BODY_08b0: 08b6 00db | | Load_Top At_Offset_3 08b7 8215 | | Call 0x1,0x15 08b8 6802 |h | Jump_Zero 0x8bb 08b9 e23a | : | Load 0x1,0x3a 08ba 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08bb 00db | | Load_Top At_Offset_3 08bc 0219 | | Execute Heap_Access,All_Read 08bd e004 | | Load 0x0,0x4 08be 1890 | | Execute Package,Field_Execute,Field_Number 0x90 08bf 00d9 | | Load_Top At_Offset_1 08c0 01d4 | | Execute Vector,Structure_Write 08c1 e239 | 9 | Load 0x1,0x39 08c2 0337 | 7 | Declare_Variable Array 08c3 4801 |H | Short_Literal 0x1 08c4 00da | | Load_Top At_Offset_2 08c5 01d7 | | Execute Vector,Field_Read 08c6 4801 |H | Short_Literal 0x1 08c7 00da | | Load_Top At_Offset_2 08c8 01d6 | | Execute Vector,Field_Write 08c9 4802 |H | Short_Literal 0x2 08ca 00da | | Load_Top At_Offset_2 08cb 01d7 | | Execute Vector,Field_Read 08cc 4802 |H | Short_Literal 0x2 08cd 00da | | Load_Top At_Offset_2 08ce 01d6 | | Execute Vector,Field_Write 08cf e239 | 9 | Load 0x1,0x39 08d0 01c3 | | Execute Vector,Check_In_Type 08d1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08d2 0000 0000 | | .BLANK 0000[0x6] 08d8 ; -------------------------------------------------------------------------------------- 08d8 ; SUBPROGRAM 08d8 ; -------------------------------------------------------------------------------------- 08d8 08db | | .CONST 0x08db ; Address of begin 08d9 0004 | | .CONST 0x0004 ; Address of exception handler 08da 0001 | | .CONST 0x0001 ; Number of locals 08db BODY_08d8: 08db INIT_08d8: 08db 00da | | Load_Top At_Offset_2 08dc 823c | < | Call 0x1,0x3c 08dd 823b | ; | Call 0x1,0x3b 08de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08df 0000 | | .XXX[0x1] 08e0 ; -------------------------------------------------------------------------------------- 08e0 ; SUBPROGRAM 08e0 ; -------------------------------------------------------------------------------------- 08e0 08e3 | | .CONST 0x08e3 ; Address of begin 08e1 0004 | | .CONST 0x0004 ; Address of exception handler 08e2 0001 | | .CONST 0x0001 ; Number of locals 08e3 BODY_08e0: 08e3 INIT_08e0: 08e3 00da | | Load_Top At_Offset_2 08e4 e004 | | Load 0x0,0x4 08e5 1891 | | Execute Package,Field_Execute,Field_Number 0x91 08e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08e7 0000 | | .XXX[0x1] 08e8 ; -------------------------------------------------------------------------------------- 08e8 ; SUBPROGRAM 08e8 ; -------------------------------------------------------------------------------------- 08e8 08eb | | .CONST 0x08eb ; Address of begin 08e9 0004 | | .CONST 0x0004 ; Address of exception handler 08ea 0001 | | .CONST 0x0001 ; Number of locals 08eb BODY_08e8: 08eb INIT_08e8: 08eb 00da | | Load_Top At_Offset_2 08ec 8215 | | Call 0x1,0x15 08ed 6802 |h | Jump_Zero 0x8f0 08ee 4800 |H | Short_Literal 0x0 08ef 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08f0 00da | | Load_Top At_Offset_2 08f1 0219 | | Execute Heap_Access,All_Read 08f2 e004 | | Load 0x0,0x4 08f3 1887 | | Execute Package,Field_Execute,Field_Number 0x87 08f4 00d8 | | Load_Top At_Offset_0 08f5 0c08 | | Execute_Immediate Greater_Equal,0x8 08f6 700b |p | Jump_Nonzero 0x902 08f7 4607 |F | Jump_Case 0x8 08f8 780c |x | Jump 0x905 ; case 0x0 08f9 780d |x | Jump 0x907 ; case 0x1 08fa 780e |x | Jump 0x909 ; case 0x2 08fb 780f |x | Jump 0x90b ; case 0x3 08fc 7810 |x | Jump 0x90d ; case 0x4 08fd 7811 |x | Jump 0x90f ; case 0x5 08fe 7812 |x | Jump 0x911 ; case 0x6 08ff 7800 |x | Jump 0x900 ; case 0x7 0900 4807 |H | Short_Literal 0x7 0901 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0902 00d1 | | Pop_Control Pop_Count_1 0903 4800 |H | Short_Literal 0x0 0904 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0905 4800 |H | Short_Literal 0x0 0906 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0907 4801 |H | Short_Literal 0x1 0908 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0909 4802 |H | Short_Literal 0x2 090a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 090b 4803 |H | Short_Literal 0x3 090c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 090d 4804 |H | Short_Literal 0x4 090e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 090f 4805 |H | Short_Literal 0x5 0910 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0911 4806 |H | Short_Literal 0x6 0912 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0913 0000 0000 | | .BLANK 0000[0x5] 0918 ; -------------------------------------------------------------------------------------- 0918 ; SUBPROGRAM 0918 ; -------------------------------------------------------------------------------------- 0918 091b | | .CONST 0x091b ; Address of begin 0919 0004 | | .CONST 0x0004 ; Address of exception handler 091a 0001 | | .CONST 0x0001 ; Number of locals 091b BODY_0918: 091b INIT_0918: 091b 00da | | Load_Top At_Offset_2 091c 8215 | | Call 0x1,0x15 091d 6803 |h | Jump_Zero 0x921 091e 0092 0b64 | d| Action Push_String_Extended,0xb64 ; "Unknown" 0920 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0921 00da | | Load_Top At_Offset_2 0922 0219 | | Execute Heap_Access,All_Read 0923 e004 | | Load 0x0,0x4 0924 1878 | x | Execute Package,Field_Execute,Field_Number 0x78 0925 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0926 0000 0000 | | .XXX[0x2] 0928 ; -------------------------------------------------------------------------------------- 0928 ; SUBPROGRAM 0928 ; -------------------------------------------------------------------------------------- 0928 092b | + | .CONST 0x092b ; Address of begin 0929 0004 | | .CONST 0x0004 ; Address of exception handler 092a 0001 | | .CONST 0x0001 ; Number of locals 092b BODY_0928: 092b INIT_0928: 092b 4608 |F | Jump_Case 0x9 092c 7808 |x | Jump 0x935 ; case 0x0 092d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 092e 782e |x. | Jump 0x95d ; case 0x2 092f 782d |x- | Jump 0x95d ; case 0x3 0930 782c |x, | Jump 0x95d ; case 0x4 0931 782b |x+ | Jump 0x95d ; case 0x5 0932 782a |x* | Jump 0x95d ; case 0x6 0933 7816 |x | Jump 0x94a ; case 0x7 0934 781e |x | Jump 0x953 ; case 0x8 0935 00da | | Load_Top At_Offset_2 0936 2203 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x3 0937 00da | | Load_Top At_Offset_2 0938 2403 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3 0939 1c00 | | Execute_Immediate Run_Utility,0x0 093a 00da | | Load_Top At_Offset_2 093b 2204 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x4 093c 00da | | Load_Top At_Offset_2 093d 2404 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x4 093e 1c00 | | Execute_Immediate Run_Utility,0x0 093f 00da | | Load_Top At_Offset_2 0940 2205 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x5 0941 00da | | Load_Top At_Offset_2 0942 2405 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x5 0943 1c00 | | Execute_Immediate Run_Utility,0x0 0944 00da | | Load_Top At_Offset_2 0945 2206 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x6 0946 00da | | Load_Top At_Offset_2 0947 2406 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x6 0948 1c00 | | Execute_Immediate Run_Utility,0x0 0949 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 094a 00db | | Load_Top At_Offset_3 094b 4801 |H | Short_Literal 0x1 094c e5fe | | Load 0x2,-0x2 094d 00e9 | | Load_Encached String_Cache 094e 035b | [ | Declare_Type Array,Constrained 094f 4801 |H | Short_Literal 0x1 0950 e5ff | | Load 0x2,-0x1 0951 031b | | Declare_Type Variant_Record,Constrained 0952 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0953 00db | | Load_Top At_Offset_3 0954 00db | | Load_Top At_Offset_3 0955 02fc | | Declare_Variable Variant_Record,With_Constraint 0956 4801 |H | Short_Literal 0x1 0957 e5fe | | Load 0x2,-0x2 0958 00e9 | | Load_Encached String_Cache 0959 0334 | 4 | Declare_Variable Array,With_Constraint 095a 2d07 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x7 095b 016a | j | QQ_execute Variant_Record,XXX 095c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 095d 0869 | i | Execute_Immediate Raise,0x69 095e 0000 0000 | | .XXX[0x2] 0960 ; -------------------------------------------------------------------------------------- 0960 ; SUBPROGRAM 0960 ; -------------------------------------------------------------------------------------- 0960 0963 | c | .CONST 0x0963 ; Address of begin 0961 0004 | | .CONST 0x0004 ; Address of exception handler 0962 0001 | | .CONST 0x0001 ; Number of locals 0963 BODY_0960: 0963 INIT_0960: 0963 4801 |H | Short_Literal 0x1 0964 00db | | Load_Top At_Offset_3 0965 e001 | | Load 0x0,0x1 0966 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0967 6802 |h | Jump_Zero 0x96a 0968 e00d | | Load 0x0,0xd 0969 0257 | W | Execute Discrete,Raise 096a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 096b 0000 0000 | | .BLANK 0000[0x5] 0970 ; -------------------------------------------------------------------------------------- 0970 ; SUBPROGRAM 0970 ; -------------------------------------------------------------------------------------- 0970 0973 | s | .CONST 0x0973 ; Address of begin 0971 0004 | | .CONST 0x0004 ; Address of exception handler 0972 0001 | | .CONST 0x0001 ; Number of locals 0973 BODY_0970: 0973 INIT_0970: 0973 00db | | Load_Top At_Offset_3 0974 4802 |H | Short_Literal 0x2 0975 0092 0b65 | e| Action Push_String_Extended,0xb65 ; "detected in Remote_Operations." 0977 e5ff | | Load 0x2,-0x1 0978 01cc | | Execute Vector,Catenate 0979 0092 0b66 | f| Action Push_String_Extended,0xb66 ; "; " 097b 01cc | | Execute Vector,Catenate 097c e013 | | Load 0x0,0x13 097d 180d | | Execute Package,Field_Execute,Field_Number 0xd 097e 01cc | | Execute Vector,Catenate 097f 0092 0b67 | g| Action Push_String_Extended,0xb67 ; "Unhandled exception" 0981 e001 | | Load 0x0,0x1 0982 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0983 c5fe | | Store 0x2,-0x2 0984 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0985 0000 0000 | | .XXX[0x3] 0987 0000 | | 0988 ; -------------------------------------------------------------------------------------- 0988 ; SUBPROGRAM 0988 ; -------------------------------------------------------------------------------------- 0988 098b | | .CONST 0x098b ; Address of begin 0989 0997 | | .CONST 0x0997 ; Address of exception handler 098a 0001 | | .CONST 0x0001 ; Number of locals 098b BODY_0988: 098b INIT_0988: 098b 00da | | Load_Top At_Offset_2 098c 00d8 | | Load_Top At_Offset_0 098d 0c00 | | Execute_Immediate Greater_Equal,0x0 098e 7002 |p | Jump_Nonzero 0x991 098f 6014 |` | Indirect_Literal Discrete,0x9a4,{0xffffffff, 0xffffc000} 0990 7801 |x | Jump 0x992 0991 600e |` | Indirect_Literal Discrete,0x9a0,{0x00000000, 0x00004000} 0992 0273 | s | Execute Discrete,Plus 0993 09f1 | | Execute_Immediate Binary_Scale,-0xf 0994 00e2 | | Load_Encached Integer_Cache 0995 025e | ^ | Execute Discrete,Convert 0996 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0997 TRAP_0988: 0997 0007 | | Action Break_Optional 0998 6003 |` | Indirect_Literal Discrete,0x99c,{0x00000000, 0x7fffffff} 0999 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 099a 0000 0000 | | .XXX[0x2] 099c 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 09a0 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 09a4 ffff ffff | | .LITERAL {0xffffffff, 0xffffc000} 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 480a |H | Short_Literal 0xa 09ac 4820 |H | Short_Literal 0x20 09ad e5fe | | Load 0x2,-0x2 09ae e247 | G | Load 0x1,0x47 09af 01d5 | | Execute Vector,Field_Reference 09b0 01cb | | Execute Vector,Append 09b1 e5ff | | Load 0x2,-0x1 09b2 01cc | | Execute Vector,Catenate 09b3 01cb | | Execute Vector,Append 09b4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 09b5 0000 0000 | | .XXX[0x3] 09b7 0000 | | 09b8 ; -------------------------------------------------------------------------------------- 09b8 ; SUBPROGRAM 09b8 ; -------------------------------------------------------------------------------------- 09b8 09bb | | .CONST 0x09bb ; Address of begin 09b9 09ce | | .CONST 0x09ce ; Address of exception handler 09ba 0001 | | .CONST 0x0001 ; Number of locals 09bb BODY_09b8: 09bb INIT_09b8: 09bb 00db | | Load_Top At_Offset_3 09bc 4805 |H | Short_Literal 0x5 09bd 4808 |H | Short_Literal 0x8 09be 0262 | b | Execute Discrete,In_Range 09bf 7006 |p | Jump_Nonzero 0x9c6 09c0 00da | | Load_Top At_Offset_2 09c1 e5fd | | Load 0x2,-0x3 09c2 2c05 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5 09c3 e005 | | Load 0x0,0x5 09c4 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 09c5 7805 |x | Jump 0x9cb 09c6 00da | | Load_Top At_Offset_2 09c7 e5fd | | Load 0x2,-0x3 09c8 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 09c9 e005 | | Load 0x0,0x5 09ca 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 09cb 4800 |H | Short_Literal 0x0 09cc a5fc | | Store_Unchecked 0x2,-0x4 09cd 4503 |E | Exit_Suprogram New_Top_Offset 0x3 09ce TRAP_09b8: 09ce 0007 | | Action Break_Optional 09cf e5fd | | Load 0x2,-0x3 09d0 2c06 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6 09d1 0092 0b68 | h| Action Push_String_Extended,0xb68 ; "Execution.Process_Output" 09d3 824e | N | Call 0x1,0x4e 09d4 e5fd | | Load 0x2,-0x3 09d5 2806 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6 09d6 4802 |H | Short_Literal 0x2 09d7 a5fc | | Store_Unchecked 0x2,-0x4 09d8 4503 |E | Exit_Suprogram New_Top_Offset 0x3 09d9 0000 0000 | | .BLANK 0000[0x7] 09e0 ; -------------------------------------------------------------------------------------- 09e0 ; SUBPROGRAM 09e0 ; -------------------------------------------------------------------------------------- 09e0 09e3 | | .CONST 0x09e3 ; Address of begin 09e1 0a00 | | .CONST 0x0a00 ; Address of exception handler 09e2 0001 | | .CONST 0x0001 ; Number of locals 09e3 BODY_09e0: 09e3 INIT_09e0: 09e3 00da | | Load_Top At_Offset_2 09e4 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 09e5 e005 | | Load 0x0,0x5 09e6 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 09e7 680f |h | Jump_Zero 0x9f7 09e8 480a |H | Short_Literal 0xa 09e9 4804 |H | Short_Literal 0x4 09ea 4822 |H" | Short_Literal 0x22 09eb 0092 0b69 | i| Action Push_String_Extended,0xb69 ; "User input is required for \x22" 09ed e5ff | | Load 0x2,-0x1 09ee 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7 09ef 01cc | | Execute Vector,Catenate 09f0 01cb | | Execute Vector,Append 09f1 8250 | P | Call 0x1,0x50 09f2 01ca | | Execute Vector,Prepend 09f3 00db | | Load_Top At_Offset_3 09f4 2c05 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5 09f5 e005 | | Load 0x0,0x5 09f6 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 09f7 00e3 | | Load_Encached Natural_Cache 09f8 e5fe | | Load 0x2,-0x2 09f9 e5ff | | Load 0x2,-0x1 09fa 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 09fb e005 | | Load 0x0,0x5 09fc 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 09fd 00d1 | | Pop_Control Pop_Count_1 09fe c5fd | | Store 0x2,-0x3 09ff 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a00 TRAP_09e0: 0a00 00d8 | | Load_Top At_Offset_0 0a01 0107 | | Execute Exception,Get_Name 0a02 4950 |IP | Short_Literal 0x150 0a03 495f |I_ | Short_Literal 0x15f 0a04 0262 | b | Execute Discrete,In_Range 0a05 6803 |h | Jump_Zero 0xa09 0a06 4800 |H | Short_Literal 0x0 0a07 a5fc | | Store_Unchecked 0x2,-0x4 0a08 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a09 00db | | Load_Top At_Offset_3 0a0a 2c06 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6 0a0b 0092 0b6a | j| Action Push_String_Extended,0xb6a ; "Execution.Read_Input" 0a0d 824e | N | Call 0x1,0x4e 0a0e e5ff | | Load 0x2,-0x1 0a0f 2806 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6 0a10 4802 |H | Short_Literal 0x2 0a11 a5fc | | Store_Unchecked 0x2,-0x4 0a12 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a13 0000 0000 | | .BLANK 0000[0x5] 0a18 ; -------------------------------------------------------------------------------------- 0a18 ; SUBPROGRAM 0a18 ; -------------------------------------------------------------------------------------- 0a18 0a1b | | .CONST 0x0a1b ; Address of begin 0a19 0a2d | - | .CONST 0x0a2d ; Address of exception handler 0a1a 0001 | | .CONST 0x0001 ; Number of locals 0a1b BODY_0a18: 0a1b INIT_0a18: 0a1b 00da | | Load_Top At_Offset_2 0a1c 2c06 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6 0a1d 4822 |H" | Short_Literal 0x22 0a1e e5ff | | Load 0x2,-0x1 0a1f 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7 0a20 01ca | | Execute Vector,Prepend 0a21 0092 0b6b | k| Action Push_String_Extended,0xb6b ; "\x22 has been aborted" 0a23 01cc | | Execute Vector,Catenate 0a24 e004 | | Load 0x0,0x4 0a25 1b52 | R | Execute Package,Field_Read,Field_Number 0x52 0a26 e001 | | Load 0x0,0x1 0a27 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0a28 00db | | Load_Top At_Offset_3 0a29 2806 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6 0a2a 4802 |H | Short_Literal 0x2 0a2b a5fe | | Store_Unchecked 0x2,-0x2 0a2c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a2d TRAP_0a18: 0a2d 0007 | | Action Break_Optional 0a2e 00db | | Load_Top At_Offset_3 0a2f 2c06 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6 0a30 0092 0b68 | h| Action Push_String_Extended,0xb68 ; "Execution.Process_Output" 0a32 824e | N | Call 0x1,0x4e 0a33 e5ff | | Load 0x2,-0x1 0a34 2806 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6 0a35 4802 |H | Short_Literal 0x2 0a36 a5fe | | Store_Unchecked 0x2,-0x2 0a37 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0a38 ; -------------------------------------------------------------------------------------- 0a38 ; SUBPROGRAM 0a38 ; -------------------------------------------------------------------------------------- 0a38 0a3b | ; | .CONST 0x0a3b ; Address of begin 0a39 0a48 | H | .CONST 0x0a48 ; Address of exception handler 0a3a 0001 | | .CONST 0x0001 ; Number of locals 0a3b BODY_0a38: 0a3b INIT_0a38: 0a3b e5fd | | Load 0x2,-0x3 0a3c e5fe | | Load 0x2,-0x2 0a3d e014 | | Load 0x0,0x14 0a3e 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0a3f e015 | | Load 0x0,0x15 0a40 180f | | Execute Package,Field_Execute,Field_Number 0xf 0a41 00ea | | Load_Encached Null_String_Cache 0a42 e5ff | | Load 0x2,-0x1 0a43 4801 |H | Short_Literal 0x1 0a44 e005 | | Load 0x0,0x5 0a45 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0a46 c5fd | | Store 0x2,-0x3 0a47 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a48 TRAP_0a38: 0a48 4922 |I" | Short_Literal 0x122 0a49 010f | | Execute Exception,Equal 0a4a 7006 |p | Jump_Nonzero 0xa51 0a4b 4923 |I# | Short_Literal 0x123 0a4c 010f | | Execute Exception,Equal 0a4d 7003 |p | Jump_Nonzero 0xa51 0a4e 4924 |I$ | Short_Literal 0x124 0a4f 010f | | Execute Exception,Equal 0a50 680e |h | Jump_Zero 0xa5f 0a51 e5fc | | Load 0x2,-0x4 0a52 0092 0b6c | l| Action Push_String_Extended,0xb6c ; "The file \x22" 0a54 e5ff | | Load 0x2,-0x1 0a55 01cc | | Execute Vector,Catenate 0a56 0092 0b6d | m| Action Push_String_Extended,0xb6d ; "\x22 could not be opened" 0a58 01cc | | Execute Vector,Catenate 0a59 e004 | | Load 0x0,0x4 0a5a 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a 0a5b e001 | | Load 0x0,0x1 0a5c 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0a5d c5fc | | Store 0x2,-0x4 0a5e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a5f 4921 |I! | Short_Literal 0x121 0a60 010f | | Execute Exception,Equal 0a61 680e |h | Jump_Zero 0xa70 0a62 e5fc | | Load 0x2,-0x4 0a63 0092 0b6e | n| Action Push_String_Extended,0xb6e ; "Filename \x22" 0a65 e5ff | | Load 0x2,-0x1 0a66 01cc | | Execute Vector,Catenate 0a67 0092 0b6f | o| Action Push_String_Extended,0xb6f ; "\x22 is malformed" 0a69 01cc | | Execute Vector,Catenate 0a6a e004 | | Load 0x0,0x4 0a6b 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a 0a6c e001 | | Load 0x0,0x1 0a6d 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0a6e c5fc | | Store 0x2,-0x4 0a6f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a70 4925 |I% | Short_Literal 0x125 0a71 010f | | Execute Exception,Equal 0a72 680e |h | Jump_Zero 0xa81 0a73 e5fc | | Load 0x2,-0x4 0a74 0092 0b6e | n| Action Push_String_Extended,0xb6e ; "Filename \x22" 0a76 e5ff | | Load 0x2,-0x1 0a77 01cc | | Execute Vector,Catenate 0a78 0092 0b70 | p| Action Push_String_Extended,0xb70 ; "\x22 is ambiguous" 0a7a 01cc | | Execute Vector,Catenate 0a7b e004 | | Load 0x0,0x4 0a7c 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a 0a7d e001 | | Load 0x0,0x1 0a7e 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0a7f c5fc | | Store 0x2,-0x4 0a80 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a81 4931 |I1 | Short_Literal 0x131 0a82 010f | | Execute Exception,Equal 0a83 680e |h | Jump_Zero 0xa92 0a84 e5fc | | Load 0x2,-0x4 0a85 0092 0b71 | q| Action Push_String_Extended,0xb71 ; "Insufficient privilege to access \x22" 0a87 e5ff | | Load 0x2,-0x1 0a88 01cc | | Execute Vector,Catenate 0a89 0092 0b72 | r| Action Push_String_Extended,0xb72 ; "\x22; check the ACLs on this file" 0a8b 01cc | | Execute Vector,Catenate 0a8c e004 | | Load 0x0,0x4 0a8d 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0a8e e001 | | Load 0x0,0x1 0a8f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0a90 c5fc | | Store 0x2,-0x4 0a91 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0a92 4932 |I2 | Short_Literal 0x132 0a93 010f | | Execute Exception,Equal 0a94 6811 |h | Jump_Zero 0xaa6 0a95 e5fc | | Load 0x2,-0x4 0a96 0092 0b6c | l| Action Push_String_Extended,0xb6c ; "The file \x22" 0a98 e5ff | | Load 0x2,-0x1 0a99 01cc | | Execute Vector,Catenate 0a9a 0092 0b73 | s| Action Push_String_Extended,0xb73 ; "\x22 is not checked out; use Cmvc.Check_Out" 0a9c 01cc | | Execute Vector,Catenate 0a9d 0092 0b74 | t| Action Push_String_Extended,0xb74 ; " before attempting this operation again" 0a9f 01cc | | Execute Vector,Catenate 0aa0 e004 | | Load 0x0,0x4 0aa1 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b 0aa2 e001 | | Load 0x0,0x1 0aa3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0aa4 c5fc | | Store 0x2,-0x4 0aa5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0aa6 4933 |I3 | Short_Literal 0x133 0aa7 010f | | Execute Exception,Equal 0aa8 680e |h | Jump_Zero 0xab7 0aa9 e5fc | | Load 0x2,-0x4 0aaa 0092 0b6c | l| Action Push_String_Extended,0xb6c ; "The file \x22" 0aac e5ff | | Load 0x2,-0x1 0aad 01cc | | Execute Vector,Catenate 0aae 0092 0b75 | u| Action Push_String_Extended,0xb75 ; "\x22 does not have the appropriate class" 0ab0 01cc | | Execute Vector,Catenate 0ab1 e004 | | Load 0x0,0x4 0ab2 1b4f | O | Execute Package,Field_Read,Field_Number 0x4f 0ab3 e001 | | Load 0x0,0x1 0ab4 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0ab5 c5fc | | Store 0x2,-0x4 0ab6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0ab7 4934 |I4 | Short_Literal 0x134 0ab8 010f | | Execute Exception,Equal 0ab9 6811 |h | Jump_Zero 0xacb 0aba e5fc | | Load 0x2,-0x4 0abb 0092 0b6c | l| Action Push_String_Extended,0xb6c ; "The file \x22" 0abd e5ff | | Load 0x2,-0x1 0abe 01cc | | Execute Vector,Catenate 0abf 0092 0b76 | v| Action Push_String_Extended,0xb76 ; "\x22 is frozen; use Library.Unfreeze before attempting" 0ac1 01cc | | Execute Vector,Catenate 0ac2 0092 0b77 | w| Action Push_String_Extended,0xb77 ; " this operation again" 0ac4 01cc | | Execute Vector,Catenate 0ac5 e004 | | Load 0x0,0x4 0ac6 1b4b | K | Execute Package,Field_Read,Field_Number 0x4b 0ac7 e001 | | Load 0x0,0x1 0ac8 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0ac9 c5fc | | Store 0x2,-0x4 0aca 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0acb 4935 |I5 | Short_Literal 0x135 0acc 010f | | Execute Exception,Equal 0acd 6811 |h | Jump_Zero 0xadf 0ace e5fc | | Load 0x2,-0x4 0acf 0092 0b6c | l| Action Push_String_Extended,0xb6c ; "The file \x22" 0ad1 e5ff | | Load 0x2,-0x1 0ad2 01cc | | Execute Vector,Catenate 0ad3 0092 0b78 | x| Action Push_String_Extended,0xb78 ; "\x22 is locked; use What.Locks to determine who is" 0ad5 01cc | | Execute Vector,Catenate 0ad6 0092 0b79 | y| Action Push_String_Extended,0xb79 ; " holding the locks on this object" 0ad8 01cc | | Execute Vector,Catenate 0ad9 e004 | | Load 0x0,0x4 0ada 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0adb e001 | | Load 0x0,0x1 0adc 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0add c5fc | | Store 0x2,-0x4 0ade 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0adf e5fc | | Load 0x2,-0x4 0ae0 0092 0b7a | z| Action Push_String_Extended,0xb7a ; "Create_Output" 0ae2 824e | N | Call 0x1,0x4e 0ae3 c5fc | | Store 0x2,-0x4 0ae4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0ae5 0000 0000 | | .XXX[0x3] 0ae7 0000 | | 0ae8 ; -------------------------------------------------------------------------------------- 0ae8 ; SUBPROGRAM 0ae8 ; -------------------------------------------------------------------------------------- 0ae8 0af0 | | .CONST 0x0af0 ; Address of begin 0ae9 0004 | | .CONST 0x0004 ; Address of exception handler 0aea 0002 | | .CONST 0x0002 ; Number of locals 0aeb INIT_0ae8: 0aeb e7fc | | Load 0x3,-0x4 0aec e249 | I | Load 0x1,0x49 0aed 01d7 | | Execute Vector,Field_Read 0aee e234 | 4 | Load 0x1,0x34 0aef 03f1 | | Declare_Variable Discrete,With_Value 0af0 BODY_0ae8: 0af0 00d8 | | Load_Top At_Offset_0 0af1 e7fd | | Load 0x3,-0x3 0af2 00d8 | | Load_Top At_Offset_0 0af3 0120 | | Execute Any,Is_Value 0af4 6803 |h | Jump_Zero 0xaf8 0af5 e5fb | | Load 0x2,-0x5 0af6 011e | | Execute Any,Convert 0af7 7802 |x | Jump 0xafa 0af8 e5fb | | Load 0x2,-0x5 0af9 0119 | | Execute Any,Check_In_Formal_Type 0afa e7fe | | Load 0x3,-0x2 0afb e7ff | | Load 0x3,-0x1 0afc 85fc | | Call 0x2,-0x4 0afd c7fd | | Store 0x3,-0x3 0afe 0059 | Y | Store_Top Discrete,At_Offset_1 0aff 00d8 | | Load_Top At_Offset_0 0b00 e24b | K | Load 0x1,0x4b 0b01 01d7 | | Execute Vector,Field_Read 0b02 a7fc | | Store_Unchecked 0x3,-0x4 0b03 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0b04 0000 0000 | | .BLANK 0000[0x4] 0b08 ; -------------------------------------------------------------------------------------- 0b08 ; SUBPROGRAM 0b08 ; -------------------------------------------------------------------------------------- 0b08 0b10 | | .CONST 0x0b10 ; Address of begin 0b09 0004 | | .CONST 0x0004 ; Address of exception handler 0b0a 0002 | | .CONST 0x0002 ; Number of locals 0b0b INIT_0b08: 0b0b e7fc | | Load 0x3,-0x4 0b0c e249 | I | Load 0x1,0x49 0b0d 01d7 | | Execute Vector,Field_Read 0b0e e234 | 4 | Load 0x1,0x34 0b0f 03f1 | | Declare_Variable Discrete,With_Value 0b10 BODY_0b08: 0b10 00d8 | | Load_Top At_Offset_0 0b11 00e3 | | Load_Encached Natural_Cache 0b12 e7fe | | Load 0x3,-0x2 0b13 e7ff | | Load 0x3,-0x1 0b14 00d8 | | Load_Top At_Offset_0 0b15 0120 | | Execute Any,Is_Value 0b16 6803 |h | Jump_Zero 0xb1a 0b17 e5fb | | Load 0x2,-0x5 0b18 011e | | Execute Any,Convert 0b19 7802 |x | Jump 0xb1c 0b1a e5fb | | Load 0x2,-0x5 0b1b 0119 | | Execute Any,Check_In_Formal_Type 0b1c 85fd | | Call 0x2,-0x3 0b1d c7ff | | Store 0x3,-0x1 0b1e 00d1 | | Pop_Control Pop_Count_1 0b1f c7fd | | Store 0x3,-0x3 0b20 0059 | Y | Store_Top Discrete,At_Offset_1 0b21 00d8 | | Load_Top At_Offset_0 0b22 e24b | K | Load 0x1,0x4b 0b23 01d7 | | Execute Vector,Field_Read 0b24 a7fc | | Store_Unchecked 0x3,-0x4 0b25 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0b26 0000 0000 | | .XXX[0x2] 0b28 ; -------------------------------------------------------------------------------------- 0b28 ; SUBPROGRAM 0b28 ; -------------------------------------------------------------------------------------- 0b28 0b30 | 0 | .CONST 0x0b30 ; Address of begin 0b29 0004 | | .CONST 0x0004 ; Address of exception handler 0b2a 0002 | | .CONST 0x0002 ; Number of locals 0b2b INIT_0b28: 0b2b 00db | | Load_Top At_Offset_3 0b2c e249 | I | Load 0x1,0x49 0b2d 01d7 | | Execute Vector,Field_Read 0b2e e234 | 4 | Load 0x1,0x34 0b2f 03f1 | | Declare_Variable Discrete,With_Value 0b30 BODY_0b28: 0b30 00d8 | | Load_Top At_Offset_0 0b31 e7ff | | Load 0x3,-0x1 0b32 00d8 | | Load_Top At_Offset_0 0b33 0120 | | Execute Any,Is_Value 0b34 6803 |h | Jump_Zero 0xb38 0b35 e5fb | | Load 0x2,-0x5 0b36 011e | | Execute Any,Convert 0b37 7802 |x | Jump 0xb3a 0b38 e5fb | | Load 0x2,-0x5 0b39 0119 | | Execute Any,Check_In_Formal_Type 0b3a 85fe | | Call 0x2,-0x2 0b3b c7ff | | Store 0x3,-0x1 0b3c 0059 | Y | Store_Top Discrete,At_Offset_1 0b3d 00d8 | | Load_Top At_Offset_0 0b3e e24b | K | Load 0x1,0x4b 0b3f 01d7 | | Execute Vector,Field_Read 0b40 a7fe | | Store_Unchecked 0x3,-0x2 0b41 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0b42 ; -------------------------------------------------------------------------------------- 0b42 ; STRING TABLE 0b42 ; -------------------------------------------------------------------------------------- 0b42 0074 | t | .STRTAB 0x0074->0x0b7c ; "NIL" 0b43 0075 | u | .STRTAB 0x0075->0x0b7d ; "READ_INPUT" 0b44 007d | } | .STRTAB 0x007d->0x0b82 ; "ABORT_COMMAND" 0b45 0088 | | .STRTAB 0x0088->0x0b89 ; "!MACHINE.DEVICES.NIL" 0b46 009a | | .STRTAB 0x009a->0x0b93 ; ":::" 0b47 009b | | .STRTAB 0x009b->0x0b94 ; "???" 0b48 009c | | .STRTAB 0x009c->0x0b96 ; "---" 0b49 009d | | .STRTAB 0x009d->0x0b97 ; "+++" 0b4a 009e | | .STRTAB 0x009e->0x0b99 ; ">>>" 0b4b 009f | | .STRTAB 0x009f->0x0b9a ; "++*" 0b4c 00a0 | | .STRTAB 0x00a0->0x0b9c ; "!!!" 0b4d 00a1 | | .STRTAB 0x00a1->0x0b9d ; "***" 0b4e 00a2 | | .STRTAB 0x00a2->0x0b9f ; "%%%" 0b4f 00a3 | | .STRTAB 0x00a3->0x0ba0 ; "###" 0b50 00a4 | | .STRTAB 0x00a4->0x0ba2 ; "@@@" 0b51 00a5 | | .STRTAB 0x00a5->0x0ba3 ; "$$$" 0b52 00a6 | | .STRTAB 0x00a6->0x0ba5 ; "Acquire" 0b53 00ab | | .STRTAB 0x00ab->0x0ba8 ; "Create_Directory" 0b54 00b9 | | .STRTAB 0x00b9->0x0bb0 ; "Create_File" 0b55 00c2 | | .STRTAB 0x00c2->0x0bb6 ; "Put'N(1)" 0b56 00c8 | | .STRTAB 0x00c8->0x0bba ; "Put'N(2)" 0b57 00ce | | .STRTAB 0x00ce->0x0bbe ; "Get'N(1)" 0b58 00d4 | | .STRTAB 0x00d4->0x0bc2 ; "Get'N(2)" 0b59 00da | | .STRTAB 0x00da->0x0bc6 ; "Update_Time" 0b5a 00e3 | | .STRTAB 0x00e3->0x0bcb ; "Copy" 0b5b 00e5 | | .STRTAB 0x00e5->0x0bcd ; "Link" 0b5c 00e7 | | .STRTAB 0x00e7->0x0bcf ; "Delete_Directory" 0b5d 00f5 | | .STRTAB 0x00f5->0x0bd7 ; "Delete_File" 0b5e 00fe | | .STRTAB 0x00fe->0x0bdd ; "Expunge" 0b5f 0103 | | .STRTAB 0x0103->0x0be0 ; "Move" 0b60 0105 | | .STRTAB 0x0105->0x0be2 ; "Execute'N(1)" 0b61 010f | | .STRTAB 0x010f->0x0be8 ; "Execute'N(2)" 0b62 0119 | | .STRTAB 0x0119->0x0bee ; "Execute'N(3)" 0b63 0123 | # | .STRTAB 0x0123->0x0bf4 ; "Execution" 0b64 012a | * | .STRTAB 0x012a->0x0bf9 ; "Unknown" 0b65 012f | / | .STRTAB 0x012f->0x0bfc ; "detected in Remote_Operations." 0b66 014b | K | .STRTAB 0x014b->0x0c0b ; "; " 0b67 014b | K | .STRTAB 0x014b->0x0c0c ; "Unhandled exception" 0b68 015c | \ | .STRTAB 0x015c->0x0c16 ; "Execution.Process_Output" 0b69 0172 | r | .STRTAB 0x0172->0x0c22 ; "User input is required for \x22" 0b6a 018c | | .STRTAB 0x018c->0x0c30 ; "Execution.Read_Input" 0b6b 019e | | .STRTAB 0x019e->0x0c3a ; "\x22 has been aborted" 0b6c 01ae | | .STRTAB 0x01ae->0x0c43 ; "The file \x22" 0b6d 01b6 | | .STRTAB 0x01b6->0x0c48 ; "\x22 could not be opened" 0b6e 01c9 | | .STRTAB 0x01c9->0x0c52 ; "Filename \x22" 0b6f 01d1 | | .STRTAB 0x01d1->0x0c57 ; "\x22 is malformed" 0b70 01dd | | .STRTAB 0x01dd->0x0c5e ; "\x22 is ambiguous" 0b71 01e9 | | .STRTAB 0x01e9->0x0c65 ; "Insufficient privilege to access \x22" 0b72 0209 | | .STRTAB 0x0209->0x0c76 ; "\x22; check the ACLs on this file" 0b73 0225 | % | .STRTAB 0x0225->0x0c85 ; "\x22 is not checked out; use Cmvc.Check_Out" 0b74 024b | K | .STRTAB 0x024b->0x0c99 ; " before attempting this operation again" 0b75 0270 | p | .STRTAB 0x0270->0x0cad ; "\x22 does not have the appropriate class" 0b76 0293 | | .STRTAB 0x0293->0x0cbf ; "\x22 is frozen; use Library.Unfreeze before attempting" 0b77 02c4 | | .STRTAB 0x02c4->0x0cd9 ; " this operation again" 0b78 02d7 | | .STRTAB 0x02d7->0x0ce3 ; "\x22 is locked; use What.Locks to determine who is" 0b79 0304 | | .STRTAB 0x0304->0x0cfb ; " holding the locks on this object" 0b7a 0323 | # | .STRTAB 0x0323->0x0d0b ; "Create_Output" 0b7b 032e | . | .STREND 0x032e->0x0d12 0b7c 4e49 4c52 |NILR| .STRTAB_STRINGS 0d12 0000 0000 | | .BLANK 0000[0x6] 0d18 ; -------------------------------------------------------------------------------------- 0d18 ; Debug Table 0d18 ; -------------------------------------------------------------------------------------- 0d18 0004 000e | | .DEBUG4 0x0004,0x000e,0xf456,0x0000,0x0001,0x0000 0d1e 0000 0017 | | .XXX[0x23] 0d20 e6c8 05f9 | | 0d22 3301 7e5c |3 ~\| 0d24 a010 0308 | | 0d26 7e5c 1005 |~\ | 0d28 f8e5 0000 | | 0d2a 0000 1e00 | | 0d2c 2006 10ff | | 0d2e dcb8 200b | | 0d30 f1ca 0000 | | 0d32 0000 3c00 | < | 0d34 400c 21f1 |@ ! | 0d36 8808 0208 | | 0d38 0000 0000 | | 0d3a 02c4 2c80 | , | 0d3c 0058 9dd8 | X | 0d3e 0000 011d | | 0d40 8d00 | | 0d41 0000 0000 | | .BLANK 0000[0x4] 0d45 000b f3ba | | .XXX[0x2e] 0d47 98b0 8000 | | 0d49 0000 5fb0 | _ | 0d4b 5017 ea18 |P | 0d4d 05fa c580 | | 0d4f 400c 21f9 |@ ! | 0d51 7040 17e8 |p@ | 0d53 e000 0000 | | 0d55 0078 0080 | x | 0d57 1843 ff72 | C r| 0d59 e080 2fd1 | / | 0d5b c000 0000 | | 0d5d 00f0 0100 | | 0d5f 3087 c420 |0 | 0d61 2008 2000 | | 0d63 0000 000b | | 0d65 13bb 0001 | | 0d67 6305 405f |c @_| 0d69 b4e8 000b | | 0d6b 19e9 02fd | | 0d6d b680 0058 | X| 0d6f dd40 0000 | @ | 0d71 011d 8d00 | | 0d73 0000 0000 | | .BLANK 0000[0x4] 0d77 000b f660 | `| .XXX[0x64] 0d79 98b0 8000 | | 0d7b 0000 5fc9 | _ | 0d7d 5017 f058 |P X| 0d7f 05fc 5580 | U | 0d81 400c 21f9 |@ ! | 0d83 7040 17ef |p@ | 0d85 2000 0000 | | 0d87 0078 0080 | x | 0d89 1843 ff72 | C r| 0d8b e080 2fde | / | 0d8d 4000 0000 |@ | 0d8f 00f0 0100 | | 0d91 3087 c360 |0 `| 0d93 2008 2000 | | 0d95 0000 000b | | 0d97 182a 98b0 | * | 0d99 8000 0000 | | 0d9b 5fd8 d017 |_ | 0d9d f438 05fd | 8 | 0d9f 4d80 400c |M @ | 0da1 21f9 7040 |! p@| 0da3 17f3 0000 | | 0da5 0000 0078 | x| 0da7 0080 1843 | C| 0da9 ff72 e080 | r | 0dab 2fe6 0000 |/ | 0dad 0000 00f0 | | 0daf 0100 3087 | 0 | 0db1 cea0 2008 | | 0db3 2000 0000 | | 0db5 000b 19e9 | | 0db7 98b0 8000 | | 0db9 0000 5fe8 | _ | 0dbb 5017 f818 |P | 0dbd 05fe 4580 | E | 0dbf 400c 21f9 |@ ! | 0dc1 7040 17f6 |p@ | 0dc3 e000 0000 | | 0dc5 0078 0080 | x | 0dc7 1843 ff72 | C r| 0dc9 e080 2fed | / | 0dcb c000 0000 | | 0dcd 00f0 0100 | | 0dcf 3087 c260 |0 `| 0dd1 2008 2000 | | 0dd3 0000 000b | | 0dd5 1ba8 0001 | | 0dd7 63d6 2000 |c | 0dd9 0004 7634 | v4| 0ddb 0000 0000 | | .BLANK 0000[0x5] 0de0 2ff5 8262 |/ b| .XXX[0x20] 0de2 c200 0000 | | 0de4 017f f600 | | 0de6 5ff5 9017 |_ | 0de8 fe62 0100 | b | 0dea 3087 e5c1 |0 | 0dec 005f f0b0 | _ | 0dee 0000 0001 | | 0df0 e002 0061 | a| 0df2 0ffd cb82 | | 0df4 00bf e160 | `| 0df6 0000 0003 | | 0df8 c004 00c2 | | 0dfa 1f10 8080 | | 0dfc 2080 0000 | | 0dfe 0000 2c7a | ,z|