|
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: 4096 (0x1000) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_1188cd9
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0658 | X | .CONST 0x0658 ; 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 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 003c | < | .CONST 0x003c ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0022 | " | .CONST 0x0022 ; Number of locals 000b INIT_0008: 000b 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated 000d 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated 000f 00bf | | Action Accept_Activation 0010 0092 04c7 | | Action Push_String_Extended,0x4c7 ; "<NIL>" 0012 029d 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call 0014 029d 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call 0016 e001 | | Load 0x0,0x1 0017 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0018 1919 | | Execute Package,Field_Reference,Field_Number 0x19 0019 00c6 | | Action Check_Subprogram_Elaborated 001a 00e1 | | Load_Encached Boolean_Cache 001b 1d11 | | Execute_Immediate Reference_Lex_1,0x11 001c e002 | | Load 0x0,0x2 001d e003 | | Load 0x0,0x3 001e 4800 |H | Short_Literal 0x0 001f 0007 | | Action Break_Optional 0020 029d 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call 0022 e001 | | Load 0x0,0x1 0023 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0024 1919 | | Execute Package,Field_Reference,Field_Number 0x19 0025 00c6 | | Action Check_Subprogram_Elaborated 0026 00e3 | | Load_Encached Natural_Cache 0027 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0028 e004 | | Load 0x0,0x4 0029 e005 | | Load 0x0,0x5 002a 4800 |H | Short_Literal 0x0 002b 0007 | | Action Break_Optional 002c 029d 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call 002e 029d 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call 0030 029d 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call 0032 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0033 00c7 | | Action Elaborate_Subprogram 0034 029d 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call 0036 029d 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call 0038 029d 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call 003a 1d0e | | Execute_Immediate Reference_Lex_1,0xe 003b 00c7 | | Action Elaborate_Subprogram 003c BODY_0008: 003c 00bc | | Action Signal_Activated 003d 00bb | | Action Signal_Completion 003e 0000 0000 | | .XXX[0x2] 0040 ; -------------------------------------------------------------------------------------- 0040 ; SUBPROGRAM 0040 ; -------------------------------------------------------------------------------------- 0040 006d | m | .CONST 0x006d ; Address of begin 0041 0075 | u | .CONST 0x0075 ; Address of exception handler 0042 0003 | | .CONST 0x0003 ; Number of locals 0043 INIT_0040: 0043 e006 | | Load 0x0,0x6 0044 e007 | | Load 0x0,0x7 0045 0092 04c8 | | Action Push_String_Extended,0x4c8 ; "Destroy_All (" 0047 e5fc | | Load 0x2,-0x4 0048 01cc | | Execute Vector,Catenate 0049 0092 04c9 | | Action Push_String_Extended,0x4c9 ; ")" 004b 01cc | | Execute Vector,Catenate 004c 0092 04ca | | Action Push_String_Extended,0x4ca ; "Of_These => \x22" 004e e5ff | | Load 0x2,-0x1 004f 01cc | | Execute Vector,Catenate 0050 0092 04cb | | Action Push_String_Extended,0x4cb ; "\x22, Effort_Only => " 0052 01cc | | Execute Vector,Catenate 0053 e5fe | | Load 0x2,-0x2 0054 00e1 | | Load_Encached Boolean_Cache 0055 011c | | Execute Any,Convert_Unchecked 0056 1c01 | | Execute_Immediate Run_Utility,0x1 0057 01cc | | Execute Vector,Catenate 0058 0092 04cc | | Action Push_String_Extended,0x4cc ; ", Response => \x22" 005a 01cc | | Execute Vector,Catenate 005b e5fd | | Load 0x2,-0x3 005c 01cc | | Execute Vector,Catenate 005d 0092 04cd | | Action Push_String_Extended,0x4cd ; "\x22" 005f 01cc | | Execute Vector,Catenate 0060 e5fd | | Load 0x2,-0x3 0061 e008 | | Load 0x0,0x8 0062 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0063 00c4 | | Action Make_Default 0064 e008 | | Load 0x0,0x8 0065 180e | | Execute Package,Field_Execute,Field_Number 0xe 0066 c407 | | Store 0x2,0x7 0067 e009 | | Load 0x0,0x9 0068 0387 | | Declare_Variable Package 0069 00d8 | | Load_Top At_Offset_0 006a 020f | | Execute Module,Activate 006b 029f 02ab | | Declare_Subprogram INIT_02a8,For_Call 006d BODY_0040: 006d 4801 |H | Short_Literal 0x1 006e e00a | | Load 0x0,0xa 006f 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0070 4800 |H | Short_Literal 0x0 0071 00da | | Load_Top At_Offset_2 0072 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0073 8403 | | Call 0x2,0x3 0074 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0075 TRAP_0040: 0075 00da | | Load_Top At_Offset_2 0076 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0077 010f | | Execute Exception,Equal 0078 6802 |h | Jump_Zero 0x7b 0079 00d8 | | Load_Top At_Offset_0 007a 0101 | | Execute Exception,Reraise 007b 00da | | Load_Top At_Offset_2 007c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 007d 010f | | Execute Exception,Equal 007e 6801 |h | Jump_Zero 0x80 007f 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0080 4800 |H | Short_Literal 0x0 0081 4800 |H | Short_Literal 0x0 0082 4801 |H | Short_Literal 0x1 0083 4808 |H | Short_Literal 0x8 0084 0092 04ce | | Action Push_String_Extended,0x4ce ; "EXCEPTION: " 0086 4800 |H | Short_Literal 0x0 0087 4801 |H | Short_Literal 0x1 0088 e00b | | Load 0x0,0xb 0089 1815 | | Execute Package,Field_Execute,Field_Number 0x15 008a 01cc | | Execute Vector,Catenate 008b e402 | | Load 0x2,0x2 008c 1817 | | Execute Package,Field_Execute,Field_Number 0x17 008d 4505 |E | Exit_Suprogram New_Top_Offset 0x5 008e 0000 0000 | | .XXX[0x2] 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 00c1 | | .CONST 0x00c1 ; Address of begin 0091 0004 | | .CONST 0x0004 ; Address of exception handler 0092 0004 | | .CONST 0x0004 ; Number of locals 0093 INIT_0090: 0093 e5fd | | Load 0x2,-0x3 0094 e008 | | Load 0x0,0x8 0095 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0096 e008 | | Load 0x0,0x8 0097 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0098 011e | | Execute Any,Convert 0099 e00c | | Load 0x0,0xc 009a e00d | | Load 0x0,0xd 009b 0092 04cf | | Action Push_String_Extended,0x4cf ; "Destroy_Users (" 009d e5fc | | Load 0x2,-0x4 009e 01cc | | Execute Vector,Catenate 009f 0092 04c9 | | Action Push_String_Extended,0x4c9 ; ")" 00a1 01cc | | Execute Vector,Catenate 00a2 0092 04d0 | | Action Push_String_Extended,0x4d0 ; "Named => \x22" 00a4 e5ff | | Load 0x2,-0x1 00a5 01cc | | Execute Vector,Catenate 00a6 0092 04cb | | Action Push_String_Extended,0x4cb ; "\x22, Effort_Only => " 00a8 01cc | | Execute Vector,Catenate 00a9 e5fe | | Load 0x2,-0x2 00aa 00e1 | | Load_Encached Boolean_Cache 00ab 011c | | Execute Any,Convert_Unchecked 00ac 1c01 | | Execute_Immediate Run_Utility,0x1 00ad 01cc | | Execute Vector,Catenate 00ae 0092 04cc | | Action Push_String_Extended,0x4cc ; ", Response => \x22" 00b0 01cc | | Execute Vector,Catenate 00b1 e5fd | | Load 0x2,-0x3 00b2 01cc | | Execute Vector,Catenate 00b3 0092 04cd | | Action Push_String_Extended,0x4cd ; "\x22" 00b5 01cc | | Execute Vector,Catenate 00b6 e402 | | Load 0x2,0x2 00b7 00c4 | | Action Make_Default 00b8 e008 | | Load 0x0,0x8 00b9 180e | | Execute Package,Field_Execute,Field_Number 0xe 00ba c408 | | Store 0x2,0x8 00bb e009 | | Load 0x0,0x9 00bc 0387 | | Declare_Variable Package 00bd 00d8 | | Load_Top At_Offset_0 00be 020f | | Execute Module,Activate 00bf 029f 0353 | S| Declare_Subprogram INIT_0350,For_Call 00c1 BODY_0090: 00c1 4801 |H | Short_Literal 0x1 00c2 e00a | | Load 0x0,0xa 00c3 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00c4 4800 |H | Short_Literal 0x0 00c5 00da | | Load_Top At_Offset_2 00c6 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00c7 8404 | | Call 0x2,0x4 00c8 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00c9 0000 0000 | | .BLANK 0000[0x7] 00d0 ; -------------------------------------------------------------------------------------- 00d0 ; SUBPROGRAM 00d0 ; -------------------------------------------------------------------------------------- 00d0 00de | | .CONST 0x00de ; Address of begin 00d1 0004 | | .CONST 0x0004 ; Address of exception handler 00d2 0004 | | .CONST 0x0004 ; Number of locals 00d3 INIT_00d0: 00d3 00da | | Load_Top At_Offset_2 00d4 e001 | | Load 0x0,0x1 00d5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00d6 1820 | | Execute Package,Field_Execute,Field_Number 0x20 00d7 e00e | | Load 0x0,0xe 00d8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00d9 02c7 | | Declare_Variable Any 00da 00d8 | | Load_Top At_Offset_0 00db 1c00 | | Execute_Immediate Run_Utility,0x0 00dc e00e | | Load 0x0,0xe 00dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00de BODY_00d0: 00de e008 | | Load 0x0,0x8 00df 180e | | Execute Package,Field_Execute,Field_Number 0xe 00e0 4802 |H | Short_Literal 0x2 00e1 0092 04d1 | | Action Push_String_Extended,0x4d1 ; "PROCESSING " 00e3 e402 | | Load 0x2,0x2 00e4 01cc | | Execute Vector,Catenate 00e5 e00f | | Load 0x0,0xf 00e6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00e7 e20f | | Load 0x1,0xf 00e8 00db | | Load_Top At_Offset_3 00e9 0092 04d2 | | Action Push_String_Extended,0x4d2 ; "Network_Public => RWCOD" 00eb e010 | | Load 0x0,0x10 00ec 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00ed e20f | | Load 0x1,0xf 00ee 4800 |H | Short_Literal 0x0 00ef e402 | | Load 0x2,0x2 00f0 e011 | | Load 0x0,0x11 00f1 181f | | Execute Package,Field_Execute,Field_Number 0x1f 00f2 e00e | | Load 0x0,0xe 00f3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00f4 00da | | Load_Top At_Offset_2 00f5 0120 | | Execute Any,Is_Value 00f6 6803 |h | Jump_Zero 0xfa 00f7 e00e | | Load 0x0,0xe 00f8 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00f9 7801 |x | Jump 0xfb 00fa 00da | | Load_Top At_Offset_2 00fb e5ff | | Load 0x2,-0x1 00fc e001 | | Load 0x0,0x1 00fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00fe 1b56 | V | Execute Package,Field_Read,Field_Number 0x56 00ff 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0100 c403 | | Store 0x2,0x3 0101 0059 | Y | Store_Top Discrete,At_Offset_1 0102 e00e | | Load 0x0,0xe 0103 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0104 6027 |`' | Indirect_Literal Discrete,0x12c,{0x00000000, 0x00004000} 0105 e012 | | Load 0x0,0x12 0106 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0107 4800 |H | Short_Literal 0x0 0108 e403 | | Load 0x2,0x3 0109 e00e | | Load 0x0,0xe 010a 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 010b 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 010c 0059 | Y | Store_Top Discrete,At_Offset_1 010d e00e | | Load 0x0,0xe 010e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 010f 601c |` | Indirect_Literal Discrete,0x12c,{0x00000000, 0x00004000} 0110 e012 | | Load 0x0,0x12 0111 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0112 4800 |H | Short_Literal 0x0 0113 e403 | | Load 0x2,0x3 0114 e00e | | Load 0x0,0xe 0115 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 0116 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0117 0059 | Y | Store_Top Discrete,At_Offset_1 0118 00d9 | | Load_Top At_Offset_1 0119 e00e | | Load 0x0,0xe 011a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 011b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 011c e00e | | Load 0x0,0xe 011d 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 011e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 011f 6808 |h | Jump_Zero 0x128 0120 00da | | Load_Top At_Offset_2 0121 8013 | | Call 0x0,0x13 0122 e20f | | Load 0x1,0xf 0123 0092 04d3 | | Action Push_String_Extended,0x4d3 ; "WORLD" 0125 e402 | | Load 0x2,0x2 0126 e011 | | Load 0x0,0x11 0127 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0128 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0129 0000 0000 | | .XXX[0x3] 012b 0000 | | 012c 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0133 | 3 | .CONST 0x0133 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0001 | | .CONST 0x0001 ; Number of locals 0133 BODY_0130: 0133 INIT_0130: 0133 e5fd | | Load 0x2,-0x3 0134 e5fe | | Load 0x2,-0x2 0135 8210 | | Call 0x1,0x10 0136 c5fd | | Store 0x2,-0x3 0137 e001 | | Load 0x0,0x1 0138 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0139 1854 | T | Execute Package,Field_Execute,Field_Number 0x54 013a c5fc | | Store 0x2,-0x4 013b 4800 |H | Short_Literal 0x0 013c a5fb | | Store_Unchecked 0x2,-0x5 013d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 013e 0000 0000 | | .XXX[0x2] 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 0143 | C | .CONST 0x0143 ; Address of begin 0141 0004 | | .CONST 0x0004 ; Address of exception handler 0142 0001 | | .CONST 0x0001 ; Number of locals 0143 BODY_0140: 0143 INIT_0140: 0143 e5fd | | Load 0x2,-0x3 0144 0a01 | | Execute_Immediate Plus,0x1 0145 c5fd | | Store 0x2,-0x3 0146 e001 | | Load 0x0,0x1 0147 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0148 1854 | T | Execute Package,Field_Execute,Field_Number 0x54 0149 c5fc | | Store 0x2,-0x4 014a 4800 |H | Short_Literal 0x0 014b a5fb | | Store_Unchecked 0x2,-0x5 014c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 014d 0000 0000 | | .XXX[0x3] 014f 0000 | | 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0163 | c | .CONST 0x0163 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0005 | | .CONST 0x0005 ; Number of locals 0153 INIT_0150: 0153 e001 | | Load 0x0,0x1 0154 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0155 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0156 02c7 | | Declare_Variable Any 0157 00db | | Load_Top At_Offset_3 0158 a402 | | Store_Unchecked 0x2,0x2 0159 00e3 | | Load_Encached Natural_Cache 015a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 015b e001 | | Load 0x0,0x1 015c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 015d 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30 015e 02c7 | | Declare_Variable Any 015f 00d8 | | Load_Top At_Offset_0 0160 1c00 | | Execute_Immediate Run_Utility,0x0 0161 029f 03cb | | Declare_Subprogram INIT_03c8,For_Call 0163 BODY_0150: 0163 00db | | Load_Top At_Offset_3 0164 e001 | | Load 0x0,0x1 0165 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0166 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0167 e5fe | | Load 0x2,-0x2 0168 6814 |h | Jump_Zero 0x17d 0169 00cf | | Action Mark_Auxiliary 016a 780a |x | Jump 0x175 016b 00db | | Load_Top At_Offset_3 016c 0a01 | | Execute_Immediate Plus,0x1 016d c403 | | Store 0x2,0x3 016e 8405 | | Call 0x2,0x5 016f e402 | | Load 0x2,0x2 0170 e001 | | Load 0x0,0x1 0171 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0172 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0173 c402 | | Store 0x2,0x2 0174 00c9 | | Action Pop_Auxiliary_Loop 0175 e402 | | Load 0x2,0x2 0176 e001 | | Load 0x0,0x1 0177 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0178 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0179 6ff1 |o | Jump_Zero 0x16b 017a 00ce | | Action Pop_Auxiliary 017b 00da | | Load_Top At_Offset_2 017c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 017d 00cf | | Action Mark_Auxiliary 017e 7809 |x | Jump 0x188 017f 00db | | Load_Top At_Offset_3 0180 0a01 | | Execute_Immediate Plus,0x1 0181 c403 | | Store 0x2,0x3 0182 e402 | | Load 0x2,0x2 0183 e001 | | Load 0x0,0x1 0184 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0185 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0186 c402 | | Store 0x2,0x2 0187 00c9 | | Action Pop_Auxiliary_Loop 0188 e402 | | Load 0x2,0x2 0189 e001 | | Load 0x0,0x1 018a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 018b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 018c 6ff2 |o | Jump_Zero 0x17f 018d 00ce | | Action Pop_Auxiliary 018e 00da | | Load_Top At_Offset_2 018f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0193 | | .CONST 0x0193 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0001 | | .CONST 0x0001 ; Number of locals 0193 BODY_0190: 0193 INIT_0190: 0193 00da | | Load_Top At_Offset_2 0194 0f01 | | Execute_Immediate Equal,0x1 0195 6802 |h | Jump_Zero 0x198 0196 00ea | | Load_Encached Null_String_Cache 0197 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0198 0092 04d4 | | Action Push_String_Extended,0x4d4 ; "s" 019a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 019b 0000 0000 | | .BLANK 0000[0x5] 01a0 ; -------------------------------------------------------------------------------------- 01a0 ; SUBPROGRAM 01a0 ; -------------------------------------------------------------------------------------- 01a0 01ab | | .CONST 0x01ab ; Address of begin 01a1 0004 | | .CONST 0x0004 ; Address of exception handler 01a2 0003 | | .CONST 0x0003 ; Number of locals 01a3 INIT_01a0: 01a3 e001 | | Load 0x0,0x1 01a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01a5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01a6 02c7 | | Declare_Variable Any 01a7 00db | | Load_Top At_Offset_3 01a8 a402 | | Store_Unchecked 0x2,0x2 01a9 029f 03f3 | | Declare_Subprogram INIT_03f0,For_Call 01ab BODY_01a0: 01ab 00d9 | | Load_Top At_Offset_1 01ac e001 | | Load 0x0,0x1 01ad 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01ae 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 01af 4800 |H | Short_Literal 0x0 01b0 00da | | Load_Top At_Offset_2 01b1 821d | | Call 0x1,0x1d 01b2 0b00 | | Execute_Immediate Case_Compare,0x0 01b3 700f |p | Jump_Nonzero 0x1c3 01b4 0f01 | | Execute_Immediate Equal,0x1 01b5 7011 |p | Jump_Nonzero 0x1c7 01b6 00d9 | | Load_Top At_Offset_1 01b7 e001 | | Load 0x0,0x1 01b8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01b9 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 01ba 0092 04d5 | | Action Push_String_Extended,0x4d5 ; "[" 01bc 00da | | Load_Top At_Offset_2 01bd 8403 | | Call 0x2,0x3 01be 01cc | | Execute Vector,Catenate 01bf 0092 04d6 | | Action Push_String_Extended,0x4d6 ; "]" 01c1 01cc | | Execute Vector,Catenate 01c2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01c3 00d1 | | Pop_Control Pop_Count_1 01c4 0092 04d7 | | Action Push_String_Extended,0x4d7 ; "*** NOTHING RESOLVES TO THIS EXPRESSION ***" 01c6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01c7 00d9 | | Load_Top At_Offset_1 01c8 e001 | | Load 0x0,0x1 01c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01ca 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 01cb 00d9 | | Load_Top At_Offset_1 01cc e001 | | Load 0x0,0x1 01cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01ce 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 01cf e001 | | Load 0x0,0x1 01d0 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01d1 1820 | | Execute Package,Field_Execute,Field_Number 0x20 01d2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01d3 0000 0000 | | .BLANK 0000[0x5] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01db | | .CONST 0x01db ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0001 | | .CONST 0x0001 ; Number of locals 01db BODY_01d8: 01db INIT_01d8: 01db 00da | | Load_Top At_Offset_2 01dc e014 | | Load 0x0,0x14 01dd 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01de 6808 |h | Jump_Zero 0x1e7 01df 00da | | Load_Top At_Offset_2 01e0 e001 | | Load 0x0,0x1 01e1 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01e2 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01e3 0092 04d8 | | Action Push_String_Extended,0x4d8 ; "!USERS" 01e5 01df | | Execute Vector,Equal 01e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e7 4800 |H | Short_Literal 0x0 01e8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01e9 0000 0000 | | .BLANK 0000[0x7] 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 020b | | .CONST 0x020b ; Address of begin 01f1 0004 | | .CONST 0x0004 ; Address of exception handler 01f2 0005 | | .CONST 0x0005 ; Number of locals 01f3 INIT_01f0: 01f3 e001 | | Load 0x0,0x1 01f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01f5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 01f6 02c7 | | Declare_Variable Any 01f7 4801 |H | Short_Literal 0x1 01f8 e001 | | Load 0x0,0x1 01f9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01fa 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01fb e5ff | | Load 0x2,-0x1 01fc e001 | | Load 0x0,0x1 01fd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01fe 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 01ff a402 | | Store_Unchecked 0x2,0x2 0200 e001 | | Load 0x0,0x1 0201 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0202 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0203 02c7 | | Declare_Variable Any 0204 e001 | | Load 0x0,0x1 0205 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0206 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0207 a403 | | Store_Unchecked 0x2,0x3 0208 00e1 | | Load_Encached Boolean_Cache 0209 029f 041b | | Declare_Subprogram INIT_0418,For_Call 020b BODY_01f0: 020b 00db | | Load_Top At_Offset_3 020c e001 | | Load 0x0,0x1 020d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 020e 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 020f 00cf | | Action Mark_Auxiliary 0210 7807 |x | Jump 0x218 0211 8405 | | Call 0x2,0x5 0212 e402 | | Load 0x2,0x2 0213 e001 | | Load 0x0,0x1 0214 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0215 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0216 c402 | | Store 0x2,0x2 0217 00c9 | | Action Pop_Auxiliary_Loop 0218 e402 | | Load 0x2,0x2 0219 e001 | | Load 0x0,0x1 021a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 021b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 021c 6ff4 |o | Jump_Zero 0x211 021d 00ce | | Action Pop_Auxiliary 021e 00da | | Load_Top At_Offset_2 021f e001 | | Load 0x0,0x1 0220 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0221 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0222 00da | | Load_Top At_Offset_2 0223 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0224 0000 0000 | | .BLANK 0000[0x4] 0228 ; -------------------------------------------------------------------------------------- 0228 ; SUBPROGRAM 0228 ; -------------------------------------------------------------------------------------- 0228 0233 | 3 | .CONST 0x0233 ; Address of begin 0229 0004 | | .CONST 0x0004 ; Address of exception handler 022a 0003 | | .CONST 0x0003 ; Number of locals 022b INIT_0228: 022b 00da | | Load_Top At_Offset_2 022c e001 | | Load 0x0,0x1 022d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 022e 1820 | | Execute Package,Field_Execute,Field_Number 0x20 022f 00db | | Load_Top At_Offset_3 0230 e001 | | Load 0x0,0x1 0231 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0232 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0233 BODY_0228: 0233 e008 | | Load 0x0,0x8 0234 180e | | Execute Package,Field_Execute,Field_Number 0xe 0235 4802 |H | Short_Literal 0x2 0236 0092 04d9 | | Action Push_String_Extended,0x4d9 ; "DELETING USER " 0238 e402 | | Load 0x2,0x2 0239 01cc | | Execute Vector,Catenate 023a e00f | | Load 0x0,0xf 023b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 023c e20f | | Load 0x1,0xf 023d 00d9 | | Load_Top At_Offset_1 023e e00a | | Load 0x0,0xa 023f 180f | | Execute Package,Field_Execute,Field_Number 0xf 0240 e5fd | | Load 0x2,-0x3 0241 e20f | | Load 0x1,0xf 0242 4800 |H | Short_Literal 0x0 0243 0092 04da | | Action Push_String_Extended,0x4da ; "!MACHINE.GROUPS." 0245 e403 | | Load 0x2,0x3 0246 01cc | | Execute Vector,Catenate 0247 820d | | Call 0x1,0xd 0248 e5fd | | Load 0x2,-0x3 0249 e20f | | Load 0x1,0xf 024a 4800 |H | Short_Literal 0x0 024b 0092 04db | | Action Push_String_Extended,0x4db ; "!MACHINE.USERS." 024d e403 | | Load 0x2,0x3 024e 01cc | | Execute Vector,Catenate 024f 820d | | Call 0x1,0xd 0250 e5fd | | Load 0x2,-0x3 0251 e20f | | Load 0x1,0xf 0252 4800 |H | Short_Literal 0x0 0253 0092 04dc | | Action Push_String_Extended,0x4dc ; "!MACHINE.ERROR_LOGS." 0255 e403 | | Load 0x2,0x3 0256 01cc | | Execute Vector,Catenate 0257 0092 04dd | | Action Push_String_Extended,0x4dd ; "_@" 0259 01cc | | Execute Vector,Catenate 025a 820d | | Call 0x1,0xd 025b e5fd | | Load 0x2,-0x3 025c e20f | | Load 0x1,0xf 025d 4800 |H | Short_Literal 0x0 025e 0092 04de | | Action Push_String_Extended,0x4de ; "!MACHINE.SEARCH_LISTS." 0260 e403 | | Load 0x2,0x3 0261 01cc | | Execute Vector,Catenate 0262 0092 04dd | | Action Push_String_Extended,0x4dd ; "_@" 0264 01cc | | Execute Vector,Catenate 0265 820d | | Call 0x1,0xd 0266 e20f | | Load 0x1,0xf 0267 4800 |H | Short_Literal 0x0 0268 00ea | | Load_Encached Null_String_Cache 0269 00db | | Load_Top At_Offset_3 026a e00a | | Load 0x0,0xa 026b 180e | | Execute Package,Field_Execute,Field_Number 0xe 026c e20f | | Load 0x1,0xf 026d 00d9 | | Load_Top At_Offset_1 026e e00a | | Load 0x0,0xa 026f 180f | | Execute Package,Field_Execute,Field_Number 0xf 0270 e5fd | | Load 0x2,-0x3 0271 e20f | | Load 0x1,0xf 0272 4800 |H | Short_Literal 0x0 0273 0092 04da | | Action Push_String_Extended,0x4da ; "!MACHINE.GROUPS." 0275 e403 | | Load 0x2,0x3 0276 01cc | | Execute Vector,Catenate 0277 820d | | Call 0x1,0xd 0278 e5fd | | Load 0x2,-0x3 0279 e20f | | Load 0x1,0xf 027a 4800 |H | Short_Literal 0x0 027b 0092 04db | | Action Push_String_Extended,0x4db ; "!MACHINE.USERS." 027d e403 | | Load 0x2,0x3 027e 01cc | | Execute Vector,Catenate 027f 820d | | Call 0x1,0xd 0280 e5fd | | Load 0x2,-0x3 0281 e20f | | Load 0x1,0xf 0282 4800 |H | Short_Literal 0x0 0283 0092 04dc | | Action Push_String_Extended,0x4dc ; "!MACHINE.ERROR_LOGS." 0285 e403 | | Load 0x2,0x3 0286 01cc | | Execute Vector,Catenate 0287 0092 04dd | | Action Push_String_Extended,0x4dd ; "_@" 0289 01cc | | Execute Vector,Catenate 028a 820d | | Call 0x1,0xd 028b e5fd | | Load 0x2,-0x3 028c e20f | | Load 0x1,0xf 028d 4800 |H | Short_Literal 0x0 028e 0092 04de | | Action Push_String_Extended,0x4de ; "!MACHINE.SEARCH_LISTS." 0290 e403 | | Load 0x2,0x3 0291 01cc | | Execute Vector,Catenate 0292 0092 04dd | | Action Push_String_Extended,0x4dd ; "_@" 0294 01cc | | Execute Vector,Catenate 0295 820d | | Call 0x1,0xd 0296 e5fd | | Load 0x2,-0x3 0297 0092 04df | | Action Push_String_Extended,0x4df ; "PROPAGATE," 0299 e5fe | | Load 0x2,-0x2 029a 01cc | | Execute Vector,Catenate 029b 4800 |H | Short_Literal 0x0 029c 0092 04e0 | | Action Push_String_Extended,0x4e0 ; "!USERS." 029e e403 | | Load 0x2,0x3 029f 01cc | | Execute Vector,Catenate 02a0 820d | | Call 0x1,0xd 02a1 4504 |E | Exit_Suprogram New_Top_Offset 0x4 02a2 0000 0000 | | .BLANK 0000[0x6] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02c4 | | .CONST 0x02c4 ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0006 | | .CONST 0x0006 ; Number of locals 02ab INIT_02a8: 02ab e001 | | Load 0x0,0x1 02ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02ad 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30 02ae 02c7 | | Declare_Variable Any 02af 00d8 | | Load_Top At_Offset_0 02b0 1c00 | | Execute_Immediate Run_Utility,0x0 02b1 00e1 | | Load_Encached Boolean_Cache 02b2 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 02b3 e001 | | Load 0x0,0x1 02b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02b5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 02b6 02c7 | | Declare_Variable Any 02b7 4801 |H | Short_Literal 0x1 02b8 e001 | | Load 0x0,0x1 02b9 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02ba 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02bb e5ff | | Load 0x2,-0x1 02bc e001 | | Load 0x0,0x1 02bd 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02be 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 02bf a604 | | Store_Unchecked 0x3,0x4 02c0 00d8 | | Load_Top At_Offset_0 02c1 821f | | Call 0x1,0x1f 02c2 029f 0443 | C| Declare_Subprogram INIT_0440,For_Call 02c4 BODY_02a8: 02c4 00da | | Load_Top At_Offset_2 02c5 e001 | | Load 0x0,0x1 02c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02c7 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 02c8 00da | | Load_Top At_Offset_2 02c9 e001 | | Load 0x0,0x1 02ca 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02cb 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 02cc 6811 |h | Jump_Zero 0x2de 02cd 4800 |H | Short_Literal 0x0 02ce 4801 |H | Short_Literal 0x1 02cf 4800 |H | Short_Literal 0x0 02d0 4806 |H | Short_Literal 0x6 02d1 0092 04e1 | | Action Push_String_Extended,0x4e1 ; "Cannot resolve any objects in \x22" 02d3 e5ff | | Load 0x2,-0x1 02d4 01cc | | Execute Vector,Catenate 02d5 0092 04cd | | Action Push_String_Extended,0x4cd ; "\x22" 02d7 01cc | | Execute Vector,Catenate 02d8 e402 | | Load 0x2,0x2 02d9 1817 | | Execute Package,Field_Execute,Field_Number 0x17 02da 4800 |H | Short_Literal 0x0 02db e402 | | Load 0x2,0x2 02dc 1819 | | Execute Package,Field_Execute,Field_Number 0x19 02dd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 02de e5fe | | Load 0x2,-0x2 02df 6821 |h! | Jump_Zero 0x301 02e0 00cf | | Action Mark_Auxiliary 02e1 7815 |x | Jump 0x2f7 02e2 e008 | | Load 0x0,0x8 02e3 180e | | Execute Package,Field_Execute,Field_Number 0xe 02e4 4802 |H | Short_Literal 0x2 02e5 0092 04e2 | | Action Push_String_Extended,0x4e2 ; "WOULD ATTEMPT TO DESTROY " 02e7 e604 | | Load 0x3,0x4 02e8 e001 | | Load 0x0,0x1 02e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02ea 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 02eb e001 | | Load 0x0,0x1 02ec 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02ed 1820 | | Execute Package,Field_Execute,Field_Number 0x20 02ee 01cc | | Execute Vector,Catenate 02ef e00f | | Load 0x0,0xf 02f0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02f1 00db | | Load_Top At_Offset_3 02f2 e001 | | Load 0x0,0x1 02f3 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02f4 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 02f5 c604 | | Store 0x3,0x4 02f6 00c9 | | Action Pop_Auxiliary_Loop 02f7 00db | | Load_Top At_Offset_3 02f8 e001 | | Load 0x0,0x1 02f9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02fa 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 02fb 6fe6 |o | Jump_Zero 0x2e2 02fc 00ce | | Action Pop_Auxiliary 02fd 4800 |H | Short_Literal 0x0 02fe e402 | | Load 0x2,0x2 02ff 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0300 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0301 e20f | | Load 0x1,0xf 0302 0092 04e3 | | Action Push_String_Extended,0x4e3 ; "<CURRENT_USER>" 0304 0092 04e4 | | Action Push_String_Extended,0x4e4 ; "<>" 0306 e015 | | Load 0x0,0x15 0307 180d | | Execute Package,Field_Execute,Field_Number 0xd 0308 00db | | Load_Top At_Offset_3 0309 00db | | Load_Top At_Offset_3 030a e001 | | Load 0x0,0x1 030b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 030c 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 030d 8210 | | Call 0x1,0x10 030e c603 | | Store 0x3,0x3 030f 00cf | | Action Mark_Auxiliary 0310 7823 |x# | Jump 0x334 0311 e602 | | Load 0x3,0x2 0312 0120 | | Execute Any,Is_Value 0313 6804 |h | Jump_Zero 0x318 0314 e001 | | Load 0x0,0x1 0315 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0316 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30 0317 7801 |x | Jump 0x319 0318 e602 | | Load 0x3,0x2 0319 e603 | | Load 0x3,0x3 031a 4800 |H | Short_Literal 0x0 031b 4801 |H | Short_Literal 0x1 031c 4801 |H | Short_Literal 0x1 031d 4801 |H | Short_Literal 0x1 031e 4801 |H | Short_Literal 0x1 031f 4800 |H | Short_Literal 0x0 0320 0092 04e5 | | Action Push_String_Extended,0x4e5 ; "@" 0322 e604 | | Load 0x3,0x4 0323 e001 | | Load 0x0,0x1 0324 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0325 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0326 e212 | | Load 0x1,0x12 0327 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0328 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0329 e001 | | Load 0x0,0x1 032a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 032b 1819 | | Execute Package,Field_Execute,Field_Number 0x19 032c c603 | | Store 0x3,0x3 032d c602 | | Store 0x3,0x2 032e 00db | | Load_Top At_Offset_3 032f e001 | | Load 0x0,0x1 0330 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0331 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0332 c604 | | Store 0x3,0x4 0333 00c9 | | Action Pop_Auxiliary_Loop 0334 00db | | Load_Top At_Offset_3 0335 e001 | | Load 0x0,0x1 0336 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0337 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0338 6fd8 |o | Jump_Zero 0x311 0339 00ce | | Action Pop_Auxiliary 033a 0092 04e6 | | Action Push_String_Extended,0x4e6 ; "PERSEVERE," 033c e5fd | | Load 0x2,-0x3 033d 01cc | | Execute Vector,Catenate 033e 0092 04e7 | | Action Push_String_Extended,0x4e7 ; "<ALL_WORLDS>" 0340 6007 |` | Indirect_Literal Discrete,0x348,{0x00000000, 0x7fffffff} 0341 e605 | | Load 0x3,0x5 0342 e016 | | Load 0x0,0x16 0343 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0344 8606 | | Call 0x3,0x6 0345 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0346 0000 0000 | | .XXX[0x2] 0348 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 034c 0000 0000 | | .BLANK 0000[0x4] 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 0360 | ` | .CONST 0x0360 ; Address of begin 0351 03ae | | .CONST 0x03ae ; Address of exception handler 0352 0005 | | .CONST 0x0005 ; Number of locals 0353 INIT_0350: 0353 e001 | | Load 0x0,0x1 0354 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0355 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0356 02c7 | | Declare_Variable Any 0357 e5ff | | Load 0x2,-0x1 0358 8221 | ! | Call 0x1,0x21 0359 a602 | | Store_Unchecked 0x3,0x2 035a 00d8 | | Load_Top At_Offset_0 035b 821f | | Call 0x1,0x1f 035c 029f 0483 | | Declare_Subprogram INIT_0480,For_Call 035e 029f 04b3 | | Declare_Subprogram INIT_04b0,For_Call 0360 BODY_0350: 0360 00db | | Load_Top At_Offset_3 0361 e001 | | Load 0x0,0x1 0362 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0363 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0364 00db | | Load_Top At_Offset_3 0365 e001 | | Load 0x0,0x1 0366 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0367 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0368 6811 |h | Jump_Zero 0x37a 0369 4800 |H | Short_Literal 0x0 036a 4801 |H | Short_Literal 0x1 036b 4800 |H | Short_Literal 0x0 036c 4806 |H | Short_Literal 0x6 036d 0092 04e8 | | Action Push_String_Extended,0x4e8 ; "Cannot resolve any users in \x22" 036f e5ff | | Load 0x2,-0x1 0370 01cc | | Execute Vector,Catenate 0371 0092 04cd | | Action Push_String_Extended,0x4cd ; "\x22" 0373 01cc | | Execute Vector,Catenate 0374 e403 | | Load 0x2,0x3 0375 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0376 4800 |H | Short_Literal 0x0 0377 e403 | | Load 0x2,0x3 0378 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0379 4501 |E | Exit_Suprogram New_Top_Offset 0x1 037a e5fe | | Load 0x2,-0x2 037b 6821 |h! | Jump_Zero 0x39d 037c 00cf | | Action Mark_Auxiliary 037d 7815 |x | Jump 0x393 037e e008 | | Load 0x0,0x8 037f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0380 4802 |H | Short_Literal 0x2 0381 0092 04e2 | | Action Push_String_Extended,0x4e2 ; "WOULD ATTEMPT TO DESTROY " 0383 e602 | | Load 0x3,0x2 0384 e001 | | Load 0x0,0x1 0385 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0386 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0387 e001 | | Load 0x0,0x1 0388 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0389 1820 | | Execute Package,Field_Execute,Field_Number 0x20 038a 01cc | | Execute Vector,Catenate 038b e00f | | Load 0x0,0xf 038c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 038d e602 | | Load 0x3,0x2 038e e001 | | Load 0x0,0x1 038f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0390 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0391 c602 | | Store 0x3,0x2 0392 00c9 | | Action Pop_Auxiliary_Loop 0393 e602 | | Load 0x3,0x2 0394 e001 | | Load 0x0,0x1 0395 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0396 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0397 6fe6 |o | Jump_Zero 0x37e 0398 00ce | | Action Pop_Auxiliary 0399 4800 |H | Short_Literal 0x0 039a e403 | | Load 0x2,0x3 039b 1819 | | Execute Package,Field_Execute,Field_Number 0x19 039c 4501 |E | Exit_Suprogram New_Top_Offset 0x1 039d 00cf | | Action Mark_Auxiliary 039e 7807 |x | Jump 0x3a6 039f 8605 | | Call 0x3,0x5 03a0 e602 | | Load 0x3,0x2 03a1 e001 | | Load 0x0,0x1 03a2 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03a3 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 03a4 c602 | | Store 0x3,0x2 03a5 00c9 | | Action Pop_Auxiliary_Loop 03a6 e602 | | Load 0x3,0x2 03a7 e001 | | Load 0x0,0x1 03a8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03a9 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 03aa 6ff4 |o | Jump_Zero 0x39f 03ab 00ce | | Action Pop_Auxiliary 03ac 8604 | | Call 0x3,0x4 03ad 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03ae TRAP_0350: 03ae e403 | | Load 0x2,0x3 03af 1b13 | | Execute Package,Field_Read,Field_Number 0x13 03b0 010f | | Execute Exception,Equal 03b1 6802 |h | Jump_Zero 0x3b4 03b2 00d8 | | Load_Top At_Offset_0 03b3 0101 | | Execute Exception,Reraise 03b4 e403 | | Load 0x2,0x3 03b5 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03b6 010f | | Execute Exception,Equal 03b7 6801 |h | Jump_Zero 0x3b9 03b8 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03b9 4800 |H | Short_Literal 0x0 03ba 4800 |H | Short_Literal 0x0 03bb 4801 |H | Short_Literal 0x1 03bc 4808 |H | Short_Literal 0x8 03bd 0092 04ce | | Action Push_String_Extended,0x4ce ; "EXCEPTION: " 03bf 4800 |H | Short_Literal 0x0 03c0 4801 |H | Short_Literal 0x1 03c1 e00b | | Load 0x0,0xb 03c2 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03c3 01cc | | Execute Vector,Catenate 03c4 e403 | | Load 0x2,0x3 03c5 1817 | | Execute Package,Field_Execute,Field_Number 0x17 03c6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03c7 0000 | | .XXX[0x1] 03c8 ; -------------------------------------------------------------------------------------- 03c8 ; SUBPROGRAM 03c8 ; -------------------------------------------------------------------------------------- 03c8 03cd | | .CONST 0x03cd ; Address of begin 03c9 0004 | | .CONST 0x0004 ; Address of exception handler 03ca 0002 | | .CONST 0x0002 ; Number of locals 03cb INIT_03c8: 03cb 00e3 | | Load_Encached Natural_Cache 03cc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 03cd BODY_03c8: 03cd e404 | | Load 0x2,0x4 03ce 0120 | | Execute Any,Is_Value 03cf 6804 |h | Jump_Zero 0x3d4 03d0 e001 | | Load 0x0,0x1 03d1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03d2 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30 03d3 7801 |x | Jump 0x3d5 03d4 e404 | | Load 0x2,0x4 03d5 00d9 | | Load_Top At_Offset_1 03d6 4800 |H | Short_Literal 0x0 03d7 4801 |H | Short_Literal 0x1 03d8 4801 |H | Short_Literal 0x1 03d9 4801 |H | Short_Literal 0x1 03da 4801 |H | Short_Literal 0x1 03db 4800 |H | Short_Literal 0x0 03dc 0092 04e5 | | Action Push_String_Extended,0x4e5 ; "@" 03de e402 | | Load 0x2,0x2 03df e001 | | Load 0x0,0x1 03e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03e1 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 03e2 e218 | | Load 0x1,0x18 03e3 1d19 | | Execute_Immediate Reference_Lex_1,0x19 03e4 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 03e5 e001 | | Load 0x0,0x1 03e6 1b0f | | Execute Package,Field_Read,Field_Number 0xf 03e7 1819 | | Execute Package,Field_Execute,Field_Number 0x19 03e8 005a | Z | Store_Top Discrete,At_Offset_2 03e9 c404 | | Store 0x2,0x4 03ea e403 | | Load 0x2,0x3 03eb 00d9 | | Load_Top At_Offset_1 03ec 0273 | s | Execute Discrete,Plus 03ed c403 | | Store 0x2,0x3 03ee 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03ef 0000 | | .XXX[0x1] 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 0400 | | .CONST 0x0400 ; Address of begin 03f1 0004 | | .CONST 0x0004 ; Address of exception handler 03f2 0003 | | .CONST 0x0003 ; Number of locals 03f3 INIT_03f0: 03f3 e001 | | Load 0x0,0x1 03f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03f5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 03f6 02c7 | | Declare_Variable Any 03f7 00db | | Load_Top At_Offset_3 03f8 a602 | | Store_Unchecked 0x3,0x2 03f9 00d8 | | Load_Top At_Offset_0 03fa e001 | | Load 0x0,0x1 03fb 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03fc 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 03fd e001 | | Load 0x0,0x1 03fe 1b0e | | Execute Package,Field_Read,Field_Number 0xe 03ff 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0400 BODY_03f0: 0400 00d9 | | Load_Top At_Offset_1 0401 e001 | | Load 0x0,0x1 0402 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0403 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0404 c602 | | Store 0x3,0x2 0405 00d9 | | Load_Top At_Offset_1 0406 e001 | | Load 0x0,0x1 0407 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0408 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0409 6802 |h | Jump_Zero 0x40c 040a 00d8 | | Load_Top At_Offset_0 040b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 040c 00d8 | | Load_Top At_Offset_0 040d 0092 04e9 | | Action Push_String_Extended,0x4e9 ; "," 040f 01cc | | Execute Vector,Catenate 0410 00da | | Load_Top At_Offset_2 0411 8403 | | Call 0x2,0x3 0412 01cc | | Execute Vector,Catenate 0413 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0414 0000 0000 | | .BLANK 0000[0x4] 0418 ; -------------------------------------------------------------------------------------- 0418 ; SUBPROGRAM 0418 ; -------------------------------------------------------------------------------------- 0418 0422 | " | .CONST 0x0422 ; Address of begin 0419 0004 | | .CONST 0x0004 ; Address of exception handler 041a 0002 | | .CONST 0x0002 ; Number of locals 041b INIT_0418: 041b e402 | | Load 0x2,0x2 041c e001 | | Load 0x0,0x1 041d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 041e 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 041f e001 | | Load 0x0,0x1 0420 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0421 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0422 BODY_0418: 0422 00d8 | | Load_Top At_Offset_0 0423 8220 | | Call 0x1,0x20 0424 680e |h | Jump_Zero 0x433 0425 00e1 | | Load_Encached Boolean_Cache 0426 e001 | | Load 0x0,0x1 0427 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0428 180e | | Execute Package,Field_Execute,Field_Number 0xe 0429 e402 | | Load 0x2,0x2 042a e001 | | Load 0x0,0x1 042b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 042c 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 042d e403 | | Load 0x2,0x3 042e e001 | | Load 0x0,0x1 042f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0430 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0431 c404 | | Store 0x2,0x4 0432 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0433 e008 | | Load 0x0,0x8 0434 180e | | Execute Package,Field_Execute,Field_Number 0xe 0435 4806 |H | Short_Literal 0x6 0436 0092 04ea | | Action Push_String_Extended,0x4ea ; "Invalid user name \x22" 0438 00db | | Load_Top At_Offset_3 0439 01cc | | Execute Vector,Catenate 043a 0092 04cd | | Action Push_String_Extended,0x4cd ; "\x22" 043c 01cc | | Execute Vector,Catenate 043d e00f | | Load 0x0,0xf 043e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 043f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0440 ; -------------------------------------------------------------------------------------- 0440 ; SUBPROGRAM 0440 ; -------------------------------------------------------------------------------------- 0440 044d | M | .CONST 0x044d ; Address of begin 0441 0004 | | .CONST 0x0004 ; Address of exception handler 0442 0002 | | .CONST 0x0002 ; Number of locals 0443 INIT_0440: 0443 4801 |H | Short_Literal 0x1 0444 4801 |H | Short_Literal 0x1 0445 e001 | | Load 0x0,0x1 0446 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0447 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0448 e605 | | Load 0x3,0x5 0449 e001 | | Load 0x0,0x1 044a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 044b 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 044c 821d | | Call 0x1,0x1d 044d BODY_0440: 044d 00d8 | | Load_Top At_Offset_0 044e 0c01 | | Execute_Immediate Greater_Equal,0x1 044f 6828 |h( | Jump_Zero 0x478 0450 4800 |H | Short_Literal 0x0 0451 4801 |H | Short_Literal 0x1 0452 4801 |H | Short_Literal 0x1 0453 4807 |H | Short_Literal 0x7 0454 0092 04eb | | Action Push_String_Extended,0x4eb ; "Unable to destroy " 0456 4820 |H | Short_Literal 0x20 0457 e802 | | Load 0x4,0x2 0458 00e0 | | Load_Encached Standard_Cache 0459 1818 | | Execute Package,Field_Execute,Field_Number 0x18 045a e017 | | Load 0x0,0x17 045b 181a | | Execute Package,Field_Execute,Field_Number 0x1a 045c 01cc | | Execute Vector,Catenate 045d 0092 04ec | | Action Push_String_Extended,0x4ec ; " object" 045f 01cc | | Execute Vector,Catenate 0460 e802 | | Load 0x4,0x2 0461 821e | | Call 0x1,0x1e 0462 01cc | | Execute Vector,Catenate 0463 0092 04ed | | Action Push_String_Extended,0x4ed ; ". " 0465 01cc | | Execute Vector,Catenate 0466 0092 04ee | | Action Push_String_Extended,0x4ee ; "If locks are suspected, analyze them with " 0468 01cc | | Execute Vector,Catenate 0469 0092 04ef | | Action Push_String_Extended,0x4ef ; "Action_Utilities.Lock_Information from !Commands. " 046b 01cc | | Execute Vector,Catenate 046c 0092 04f0 | | Action Push_String_Extended,0x4f0 ; "If locks are not the problem, you might try Uncode, " 046e 01cc | | Execute Vector,Catenate 046f 0092 04f1 | | Action Push_String_Extended,0x4f1 ; "Uninstall, or Repair_Directory from " 0471 01cc | | Execute Vector,Catenate 0472 0092 04f2 | | Action Push_String_Extended,0x4f2 ; "!Commands.System_Maintenance, but BE CAREFUL." 0474 01cc | | Execute Vector,Catenate 0475 e402 | | Load 0x2,0x2 0476 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0477 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0478 4800 |H | Short_Literal 0x0 0479 e402 | | Load 0x2,0x2 047a 1819 | | Execute Package,Field_Execute,Field_Number 0x19 047b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 047c 0000 0000 | | .BLANK 0000[0x4] 0480 ; -------------------------------------------------------------------------------------- 0480 ; SUBPROGRAM 0480 ; -------------------------------------------------------------------------------------- 0480 048d | | .CONST 0x048d ; Address of begin 0481 0004 | | .CONST 0x0004 ; Address of exception handler 0482 0002 | | .CONST 0x0002 ; Number of locals 0483 INIT_0480: 0483 4800 |H | Short_Literal 0x0 0484 4801 |H | Short_Literal 0x1 0485 e001 | | Load 0x0,0x1 0486 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0487 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0488 e603 | | Load 0x3,0x3 0489 e001 | | Load 0x0,0x1 048a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 048b 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 048c 821d | | Call 0x1,0x1d 048d BODY_0480: 048d 00d8 | | Load_Top At_Offset_0 048e 0c01 | | Execute_Immediate Greater_Equal,0x1 048f 6816 |h | Jump_Zero 0x4a6 0490 4800 |H | Short_Literal 0x0 0491 4801 |H | Short_Literal 0x1 0492 4801 |H | Short_Literal 0x1 0493 4807 |H | Short_Literal 0x7 0494 0092 04eb | | Action Push_String_Extended,0x4eb ; "Unable to destroy " 0496 4820 |H | Short_Literal 0x20 0497 e802 | | Load 0x4,0x2 0498 00e0 | | Load_Encached Standard_Cache 0499 1818 | | Execute Package,Field_Execute,Field_Number 0x18 049a e017 | | Load 0x0,0x17 049b 181a | | Execute Package,Field_Execute,Field_Number 0x1a 049c 01cc | | Execute Vector,Catenate 049d 0092 04f3 | | Action Push_String_Extended,0x4f3 ; " user" 049f 01cc | | Execute Vector,Catenate 04a0 e802 | | Load 0x4,0x2 04a1 821e | | Call 0x1,0x1e 04a2 01cc | | Execute Vector,Catenate 04a3 e403 | | Load 0x2,0x3 04a4 1817 | | Execute Package,Field_Execute,Field_Number 0x17 04a5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04a6 4800 |H | Short_Literal 0x0 04a7 e403 | | Load 0x2,0x3 04a8 1819 | | Execute Package,Field_Execute,Field_Number 0x19 04a9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04aa 0000 0000 | | .BLANK 0000[0x6] 04b0 ; -------------------------------------------------------------------------------------- 04b0 ; SUBPROGRAM 04b0 ; -------------------------------------------------------------------------------------- 04b0 04b3 | | .CONST 0x04b3 ; Address of begin 04b1 04bb | | .CONST 0x04bb ; Address of exception handler 04b2 0001 | | .CONST 0x0001 ; Number of locals 04b3 BODY_04b0: 04b3 INIT_04b0: 04b3 e5fc | | Load 0x2,-0x4 04b4 e5fd | | Load 0x2,-0x3 04b5 e602 | | Load 0x3,0x2 04b6 e001 | | Load 0x0,0x1 04b7 1b0d | | Execute Package,Field_Read,Field_Number 0xd 04b8 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 04b9 8222 | " | Call 0x1,0x22 04ba 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04bb TRAP_04b0: 04bb 0007 | | Action Break_Optional 04bc e402 | | Load 0x2,0x2 04bd e008 | | Load 0x0,0x8 04be 1817 | | Execute Package,Field_Execute,Field_Number 0x17 04bf 4802 |H | Short_Literal 0x2 04c0 4803 |H | Short_Literal 0x3 04c1 0262 | b | Execute Discrete,In_Range 04c2 7003 |p | Jump_Nonzero 0x4c6 04c3 7800 |x | Jump 0x4c4 04c4 00cc | | Action Pop_Block 04c5 7ee5 |~ | Jump 0x3ab 04c6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04c7 ; -------------------------------------------------------------------------------------- 04c7 ; STRING TABLE 04c7 ; -------------------------------------------------------------------------------------- 04c7 005c | \ | .STRTAB 0x005c->0x04f5 ; "<NIL>" 04c8 005f | _ | .STRTAB 0x005f->0x04f7 ; "Destroy_All (" 04c9 006a | j | .STRTAB 0x006a->0x04fe ; ")" 04ca 0069 | i | .STRTAB 0x0069->0x04fe ; "Of_These => \x22" 04cb 0074 | t | .STRTAB 0x0074->0x0505 ; "\x22, Effort_Only => " 04cc 0084 | | .STRTAB 0x0084->0x050e ; ", Response => \x22" 04cd 0091 | | .STRTAB 0x0091->0x0515 ; "\x22" 04ce 0090 | | .STRTAB 0x0090->0x0516 ; "EXCEPTION: " 04cf 0099 | | .STRTAB 0x0099->0x051b ; "Destroy_Users (" 04d0 00a6 | | .STRTAB 0x00a6->0x0523 ; "Named => \x22" 04d1 00ae | | .STRTAB 0x00ae->0x0528 ; "PROCESSING " 04d2 00b7 | | .STRTAB 0x00b7->0x052d ; "Network_Public => RWCOD" 04d3 00cc | | .STRTAB 0x00cc->0x0539 ; "WORLD" 04d4 00cf | | .STRTAB 0x00cf->0x053b ; "s" 04d5 00ce | | .STRTAB 0x00ce->0x053c ; "[" 04d6 00cd | | .STRTAB 0x00cd->0x053c ; "]" 04d7 00cc | | .STRTAB 0x00cc->0x053d ; "*** NOTHING RESOLVES TO THIS EXPRESSION ***" 04d8 00f5 | | .STRTAB 0x00f5->0x0552 ; "!USERS" 04d9 00f9 | | .STRTAB 0x00f9->0x0555 ; "DELETING USER " 04da 0105 | | .STRTAB 0x0105->0x055c ; "!MACHINE.GROUPS." 04db 0113 | | .STRTAB 0x0113->0x0564 ; "!MACHINE.USERS." 04dc 0120 | | .STRTAB 0x0120->0x056c ; "!MACHINE.ERROR_LOGS." 04dd 0132 | 2 | .STRTAB 0x0132->0x0576 ; "_@" 04de 0132 | 2 | .STRTAB 0x0132->0x0577 ; "!MACHINE.SEARCH_LISTS." 04df 0146 | F | .STRTAB 0x0146->0x0582 ; "PROPAGATE," 04e0 014e | N | .STRTAB 0x014e->0x0587 ; "!USERS." 04e1 0153 | S | .STRTAB 0x0153->0x058a ; "Cannot resolve any objects in \x22" 04e2 0170 | p | .STRTAB 0x0170->0x059a ; "WOULD ATTEMPT TO DESTROY " 04e3 0187 | | .STRTAB 0x0187->0x05a6 ; "<CURRENT_USER>" 04e4 0193 | | .STRTAB 0x0193->0x05ad ; "<>" 04e5 0193 | | .STRTAB 0x0193->0x05ae ; "@" 04e6 0192 | | .STRTAB 0x0192->0x05af ; "PERSEVERE," 04e7 019a | | .STRTAB 0x019a->0x05b4 ; "<ALL_WORLDS>" 04e8 01a4 | | .STRTAB 0x01a4->0x05ba ; "Cannot resolve any users in \x22" 04e9 01bf | | .STRTAB 0x01bf->0x05c8 ; "," 04ea 01be | | .STRTAB 0x01be->0x05c9 ; "Invalid user name \x22" 04eb 01cf | | .STRTAB 0x01cf->0x05d2 ; "Unable to destroy " 04ec 01df | | .STRTAB 0x01df->0x05db ; " object" 04ed 01e4 | | .STRTAB 0x01e4->0x05df ; ". " 04ee 01e4 | | .STRTAB 0x01e4->0x05e0 ; "If locks are suspected, analyze them with " 04ef 020c | | .STRTAB 0x020c->0x05f5 ; "Action_Utilities.Lock_Information from !Commands. " 04f0 023c | < | .STRTAB 0x023c->0x060e ; "If locks are not the problem, you might try Uncode, " 04f1 026e | n | .STRTAB 0x026e->0x0628 ; "Uninstall, or Repair_Directory from " 04f2 0290 | | .STRTAB 0x0290->0x063a ; "!Commands.System_Maintenance, but BE CAREFUL." 04f3 02bb | | .STRTAB 0x02bb->0x0650 ; " user" 04f4 02be | | .STREND 0x02be->0x0653 04f5 3c4e 494c |<NIL| .STRTAB_STRINGS 0653 0000 0000 | | .BLANK 0000[0x5] 0658 ; -------------------------------------------------------------------------------------- 0658 ; Debug Table 0658 ; -------------------------------------------------------------------------------------- 0658 0004 000e | | .DEBUG4 0x0004,0x000e,0x59b9,0x0000,0x0001,0x0000 065e 0000 0000 | | .BLANK 0000[0x1a2]