|
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: 2048 (0x800) Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c0fe
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0250 | P | .CONST 0x0250 ; 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 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 0033 | 3 | .CONST 0x0033 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 000d | | .CONST 0x000d ; Number of locals 001b INIT_0018: 001b 0092 019e | | Action Push_String_Extended,0x19e ; "Destroy_delta1_Code_Databases" 001d 029f 004b | K| Declare_Subprogram INIT_0048,For_Call 001f 029f 0053 | S| Declare_Subprogram INIT_0050,For_Call 0021 029f 005b | [| Declare_Subprogram INIT_0058,For_Call 0023 029f 006b | k| Declare_Subprogram INIT_0068,For_Call 0025 029f 007b | {| Declare_Subprogram INIT_0078,For_Call 0027 029f 008b | | Declare_Subprogram INIT_0088,For_Call 0029 029f 00a3 | | Declare_Subprogram INIT_00a0,For_Call 002b 029f 00bb | | Declare_Subprogram INIT_00b8,For_Call 002d 029f 00d3 | | Declare_Subprogram INIT_00d0,For_Call 002f 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call 0031 029f 0113 | | Declare_Subprogram INIT_0110,For_Call 0033 BODY_0018: 0033 0092 019f | | Action Push_String_Extended,0x19f ; "Code_Views_Or_Loaded_Main_Programs => \x22" 0035 e5ff | | Load 0x2,-0x1 0036 01cc | | Execute Vector,Catenate 0037 0092 01a0 | | Action Push_String_Extended,0x1a0 ; "\x22, Options => \x22" 0039 01cc | | Execute Vector,Catenate 003a e5fe | | Load 0x2,-0x2 003b 01cc | | Execute Vector,Catenate 003c 0092 01a1 | | Action Push_String_Extended,0x1a1 ; "\x22, Response => \x22" 003e 01cc | | Execute Vector,Catenate 003f e5fd | | Load 0x2,-0x3 0040 01cc | | Execute Vector,Catenate 0041 e402 | | Load 0x2,0x2 0042 8408 | | Call 0x2,0x8 0043 840d | | Call 0x2,0xd 0044 e402 | | Load 0x2,0x2 0045 8409 | | Call 0x2,0x9 0046 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0047 0000 | | .XXX[0x1] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004b | K | .CONST 0x004b ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0001 | | .CONST 0x0001 ; Number of locals 004b BODY_0048: 004b INIT_0048: 004b 00da | | Load_Top At_Offset_2 004c 0f00 | | Execute_Immediate Equal,0x0 004d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 004e 0000 0000 | | .XXX[0x2] 0050 ; -------------------------------------------------------------------------------------- 0050 ; SUBPROGRAM 0050 ; -------------------------------------------------------------------------------------- 0050 0053 | S | .CONST 0x0053 ; Address of begin 0051 0004 | | .CONST 0x0004 ; Address of exception handler 0052 0001 | | .CONST 0x0001 ; Number of locals 0053 BODY_0050: 0053 INIT_0050: 0053 00da | | Load_Top At_Offset_2 0054 0f00 | | Execute_Immediate Equal,0x0 0055 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0056 0000 0000 | | .XXX[0x2] 0058 ; -------------------------------------------------------------------------------------- 0058 ; SUBPROGRAM 0058 ; -------------------------------------------------------------------------------------- 0058 005b | [ | .CONST 0x005b ; Address of begin 0059 0004 | | .CONST 0x0004 ; Address of exception handler 005a 0001 | | .CONST 0x0001 ; Number of locals 005b BODY_0058: 005b INIT_0058: 005b e5fd | | Load 0x2,-0x3 005c e002 | | Load 0x0,0x2 005d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 005e 4807 |H | Short_Literal 0x7 005f e7ff | | Load 0x3,-0x1 0060 e003 | | Load 0x0,0x3 0061 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0062 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0063 0000 0000 | | .BLANK 0000[0x5] 0068 ; -------------------------------------------------------------------------------------- 0068 ; SUBPROGRAM 0068 ; -------------------------------------------------------------------------------------- 0068 006b | k | .CONST 0x006b ; Address of begin 0069 0004 | | .CONST 0x0004 ; Address of exception handler 006a 0001 | | .CONST 0x0001 ; Number of locals 006b BODY_0068: 006b INIT_0068: 006b e5fd | | Load 0x2,-0x3 006c e002 | | Load 0x0,0x2 006d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 006e 4805 |H | Short_Literal 0x5 006f e7ff | | Load 0x3,-0x1 0070 e003 | | Load 0x0,0x3 0071 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0072 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0073 0000 0000 | | .BLANK 0000[0x5] 0078 ; -------------------------------------------------------------------------------------- 0078 ; SUBPROGRAM 0078 ; -------------------------------------------------------------------------------------- 0078 007b | { | .CONST 0x007b ; Address of begin 0079 0004 | | .CONST 0x0004 ; Address of exception handler 007a 0001 | | .CONST 0x0001 ; Number of locals 007b BODY_0078: 007b INIT_0078: 007b e5fd | | Load 0x2,-0x3 007c e002 | | Load 0x0,0x2 007d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 007e 4803 |H | Short_Literal 0x3 007f e7ff | | Load 0x3,-0x1 0080 e003 | | Load 0x0,0x3 0081 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0082 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0083 0000 0000 | | .BLANK 0000[0x5] 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 008b | | .CONST 0x008b ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 0001 | | .CONST 0x0001 ; Number of locals 008b BODY_0088: 008b INIT_0088: 008b e5fd | | Load 0x2,-0x3 008c e002 | | Load 0x0,0x2 008d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 008e 4800 |H | Short_Literal 0x0 008f 0092 01a2 | | Action Push_String_Extended,0x1a2 ; "[Program_Library_Maintenance." 0091 e7ff | | Load 0x3,-0x1 0092 01cc | | Execute Vector,Catenate 0093 0092 01a3 | | Action Push_String_Extended,0x1a3 ; " (" 0095 01cc | | Execute Vector,Catenate 0096 e7fe | | Load 0x3,-0x2 0097 01cc | | Execute Vector,Catenate 0098 0092 01a4 | | Action Push_String_Extended,0x1a4 ; ");]" 009a 01cc | | Execute Vector,Catenate 009b e003 | | Load 0x0,0x3 009c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 009d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 009e 0000 0000 | | .XXX[0x2] 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; SUBPROGRAM 00a0 ; -------------------------------------------------------------------------------------- 00a0 00a3 | | .CONST 0x00a3 ; Address of begin 00a1 0004 | | .CONST 0x0004 ; Address of exception handler 00a2 0001 | | .CONST 0x0001 ; Number of locals 00a3 BODY_00a0: 00a3 INIT_00a0: 00a3 e5fd | | Load 0x2,-0x3 00a4 e002 | | Load 0x0,0x2 00a5 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 00a6 4800 |H | Short_Literal 0x0 00a7 0092 01a5 | | Action Push_String_Extended,0x1a5 ; "[End of Program_Library_Maintenance." 00a9 e7ff | | Load 0x3,-0x1 00aa 01cc | | Execute Vector,Catenate 00ab 0092 01a6 | | Action Push_String_Extended,0x1a6 ; " command]" 00ad 01cc | | Execute Vector,Catenate 00ae e003 | | Load 0x0,0x3 00af 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00b0 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00b1 0000 0000 | | .BLANK 0000[0x7] 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; SUBPROGRAM 00b8 ; -------------------------------------------------------------------------------------- 00b8 00bf | | .CONST 0x00bf ; Address of begin 00b9 0004 | | .CONST 0x0004 ; Address of exception handler 00ba 0002 | | .CONST 0x0002 ; Number of locals 00bb INIT_00b8: 00bb 00da | | Load_Top At_Offset_2 00bc e004 | | Load 0x0,0x4 00bd 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00be 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 00bf BODY_00b8: 00bf e5fd | | Load 0x2,-0x3 00c0 0092 01a7 | | Action Push_String_Extended,0x1a7 ; "<DIRECTORIES>" 00c2 4801 |H | Short_Literal 0x1 00c3 00db | | Load_Top At_Offset_3 00c4 0092 01a8 | | Action Push_String_Extended,0x1a8 ; ".Code_Database" 00c6 01cc | | Execute Vector,Catenate 00c7 e005 | | Load 0x0,0x5 00c8 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00c9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00ca 0000 0000 | | .BLANK 0000[0x6] 00d0 ; -------------------------------------------------------------------------------------- 00d0 ; SUBPROGRAM 00d0 ; -------------------------------------------------------------------------------------- 00d0 00d7 | | .CONST 0x00d7 ; Address of begin 00d1 0004 | | .CONST 0x0004 ; Address of exception handler 00d2 0002 | | .CONST 0x0002 ; Number of locals 00d3 INIT_00d0: 00d3 00da | | Load_Top At_Offset_2 00d4 e004 | | Load 0x0,0x4 00d5 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00d6 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 00d7 BODY_00d0: 00d7 e5fd | | Load 0x2,-0x3 00d8 0092 01a7 | | Action Push_String_Extended,0x1a7 ; "<DIRECTORIES>" 00da 4801 |H | Short_Literal 0x1 00db 00db | | Load_Top At_Offset_3 00dc 0092 01a9 | | Action Push_String_Extended,0x1a9 ; ".<*Code_Database>" 00de 01cc | | Execute Vector,Catenate 00df e005 | | Load 0x0,0x5 00e0 181a | | Execute Package,Field_Execute,Field_Number 0x1a 00e1 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00e2 0000 0000 | | .BLANK 0000[0x6] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00ee | | .CONST 0x00ee ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0002 | | .CONST 0x0002 ; Number of locals 00eb INIT_00e8: 00eb 00da | | Load_Top At_Offset_2 00ec e004 | | Load 0x0,0x4 00ed 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 00ee BODY_00e8: 00ee 00d8 | | Load_Top At_Offset_0 00ef e006 | | Load 0x0,0x6 00f0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00f1 027f | | Execute Discrete,Equal 00f2 6803 |h | Jump_Zero 0xf6 00f3 00db | | Load_Top At_Offset_3 00f4 840a | | Call 0x2,0xa 00f5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00f6 00d8 | | Load_Top At_Offset_0 00f7 e006 | | Load 0x0,0x6 00f8 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 00f9 027f | | Execute Discrete,Equal 00fa 7005 |p | Jump_Nonzero 0x100 00fb 00d8 | | Load_Top At_Offset_0 00fc e006 | | Load 0x0,0x6 00fd 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 00fe 027f | | Execute Discrete,Equal 00ff 6803 |h | Jump_Zero 0x103 0100 00db | | Load_Top At_Offset_3 0101 840b | | Call 0x2,0xb 0102 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0103 00db | | Load_Top At_Offset_3 0104 e004 | | Load 0x0,0x4 0105 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0106 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0107 0092 01aa | | Action Push_String_Extended,0x1aa ; " is not a code view or a loaded main program" 0109 01cc | | Execute Vector,Catenate 010a 8405 | | Call 0x2,0x5 010b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 010c 0000 0000 | | .BLANK 0000[0x4] 0110 ; -------------------------------------------------------------------------------------- 0110 ; SUBPROGRAM 0110 ; -------------------------------------------------------------------------------------- 0110 011e | | .CONST 0x011e ; Address of begin 0111 0004 | | .CONST 0x0004 ; Address of exception handler 0112 0004 | | .CONST 0x0004 ; Number of locals 0113 INIT_0110: 0113 e004 | | Load 0x0,0x4 0114 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0115 1b18 | | Execute Package,Field_Read,Field_Number 0x18 0116 02c7 | | Declare_Variable Any 0117 00d8 | | Load_Top At_Offset_0 0118 1c00 | | Execute_Immediate Run_Utility,0x0 0119 e004 | | Load 0x0,0x4 011a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 011b 1b0f | | Execute Package,Field_Read,Field_Number 0xf 011c 029f 016b | k| Declare_Subprogram INIT_0168,For_Call 011e BODY_0110: 011e e004 | | Load 0x0,0x4 011f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0120 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0121 00db | | Load_Top At_Offset_3 0122 6041 |`A | Indirect_Literal Discrete,0x164,{0x00000000, 0x00004000} 0123 e007 | | Load 0x0,0x7 0124 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0125 e008 | | Load 0x0,0x8 0126 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0127 e009 | | Load 0x0,0x9 0128 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0129 4801 |H | Short_Literal 0x1 012a 4800 |H | Short_Literal 0x0 012b e008 | | Load 0x0,0x8 012c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 012d e004 | | Load 0x0,0x4 012e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 012f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0130 e5ff | | Load 0x2,-0x1 0131 e004 | | Load 0x0,0x4 0132 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0133 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0134 c602 | | Store 0x3,0x2 0135 005a | Z | Store_Top Discrete,At_Offset_2 0136 00d9 | | Load_Top At_Offset_1 0137 8403 | | Call 0x2,0x3 0138 701e |p | Jump_Nonzero 0x157 0139 0092 01ab | | Action Push_String_Extended,0x1ab ; "Can't resolve \x22" 013b e5ff | | Load 0x2,-0x1 013c 01cc | | Execute Vector,Catenate 013d 0092 01ac | | Action Push_String_Extended,0x1ac ; "\x22 because " 013f 01cc | | Execute Vector,Catenate 0140 6023 |`# | Indirect_Literal Discrete,0x164,{0x00000000, 0x00004000} 0141 e007 | | Load 0x0,0x7 0142 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0143 e008 | | Load 0x0,0x8 0144 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0145 e009 | | Load 0x0,0x9 0146 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0147 4801 |H | Short_Literal 0x1 0148 4800 |H | Short_Literal 0x0 0149 e008 | | Load 0x0,0x8 014a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 014b e004 | | Load 0x0,0x4 014c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 014d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 014e e5ff | | Load 0x2,-0x1 014f e603 | | Load 0x3,0x3 0150 e004 | | Load 0x0,0x4 0151 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0152 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 0153 01cc | | Execute Vector,Catenate 0154 8406 | | Call 0x2,0x6 0155 e402 | | Load 0x2,0x2 0156 8409 | | Call 0x2,0x9 0157 00cf | | Action Mark_Auxiliary 0158 7802 |x | Jump 0x15b 0159 8604 | | Call 0x3,0x4 015a 00c9 | | Action Pop_Auxiliary_Loop 015b 00db | | Load_Top At_Offset_3 015c e004 | | Load 0x0,0x4 015d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 015e 181e | | Execute Package,Field_Execute,Field_Number 0x1e 015f 6ff9 |o | Jump_Zero 0x159 0160 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0161 0000 0000 | | .XXX[0x3] 0163 0000 | | 0164 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 0172 | r | .CONST 0x0172 ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0003 | | .CONST 0x0003 ; Number of locals 016b INIT_0168: 016b e004 | | Load 0x0,0x4 016c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 016d 02c7 | | Declare_Variable Any 016e 00d8 | | Load_Top At_Offset_0 016f 1c00 | | Execute_Immediate Run_Utility,0x0 0170 e004 | | Load 0x0,0x4 0171 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0172 BODY_0168: 0172 e004 | | Load 0x0,0x4 0173 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0174 00da | | Load_Top At_Offset_2 0175 0120 | | Execute Any,Is_Value 0176 6803 |h | Jump_Zero 0x17a 0177 e004 | | Load 0x0,0x4 0178 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0179 7801 |x | Jump 0x17b 017a 00da | | Load_Top At_Offset_2 017b e602 | | Load 0x3,0x2 017c e004 | | Load 0x0,0x4 017d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 017e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 017f c802 | | Store 0x4,0x2 0180 0059 | Y | Store_Top Discrete,At_Offset_1 0181 00d8 | | Load_Top At_Offset_0 0182 8404 | | Call 0x2,0x4 0183 6803 |h | Jump_Zero 0x187 0184 00d9 | | Load_Top At_Offset_1 0185 840c | | Call 0x2,0xc 0186 7811 |x | Jump 0x198 0187 0092 01ad | | Action Push_String_Extended,0x1ad ; "Can't get object for " 0189 e602 | | Load 0x3,0x2 018a e004 | | Load 0x0,0x4 018b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 018c 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 018d 01cc | | Execute Vector,Catenate 018e 0092 01ae | | Action Push_String_Extended,0x1ae ; ": " 0190 01cc | | Execute Vector,Catenate 0191 00d9 | | Load_Top At_Offset_1 0192 e004 | | Load 0x0,0x4 0193 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0194 011c | | Execute Any,Convert_Unchecked 0195 1c01 | | Execute_Immediate Run_Utility,0x1 0196 01cc | | Execute Vector,Catenate 0197 8405 | | Call 0x2,0x5 0198 e602 | | Load 0x3,0x2 0199 e004 | | Load 0x0,0x4 019a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 019b 181d | | Execute Package,Field_Execute,Field_Number 0x1d 019c c602 | | Store 0x3,0x2 019d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 019e ; -------------------------------------------------------------------------------------- 019e ; STRING TABLE 019e ; -------------------------------------------------------------------------------------- 019e 0024 | $ | .STRTAB 0x0024->0x01b0 ; "Destroy_delta1_Code_Databases" 019f 003f | ? | .STRTAB 0x003f->0x01be ; "Code_Views_Or_Loaded_Main_Programs => \x22" 01a0 0064 | d | .STRTAB 0x0064->0x01d2 ; "\x22, Options => \x22" 01a1 0071 | q | .STRTAB 0x0071->0x01d9 ; "\x22, Response => \x22" 01a2 007f | | .STRTAB 0x007f->0x01e1 ; "[Program_Library_Maintenance." 01a3 009a | | .STRTAB 0x009a->0x01f0 ; " (" 01a4 009a | | .STRTAB 0x009a->0x01f1 ; ");]" 01a5 009b | | .STRTAB 0x009b->0x01f2 ; "[End of Program_Library_Maintenance." 01a6 00bd | | .STRTAB 0x00bd->0x0204 ; " command]" 01a7 00c4 | | .STRTAB 0x00c4->0x0209 ; "<DIRECTORIES>" 01a8 00cf | | .STRTAB 0x00cf->0x020f ; ".Code_Database" 01a9 00db | | .STRTAB 0x00db->0x0216 ; ".<*Code_Database>" 01aa 00ea | | .STRTAB 0x00ea->0x021f ; " is not a code view or a loaded main program" 01ab 0114 | | .STRTAB 0x0114->0x0235 ; "Can't resolve \x22" 01ac 0121 | ! | .STRTAB 0x0121->0x023c ; "\x22 because " 01ad 0129 | ) | .STRTAB 0x0129->0x0241 ; "Can't get object for " 01ae 013c | < | .STRTAB 0x013c->0x024c ; ": " 01af 013c | < | .STREND 0x013c->0x024d 01b0 4465 7374 |Dest| .STRTAB_STRINGS 024d 0000 0000 | | .XXX[0x3] 024f 0000 | | 0250 ; -------------------------------------------------------------------------------------- 0250 ; Debug Table 0250 ; -------------------------------------------------------------------------------------- 0250 0004 0008 | | .DEBUG4 0x0004,0x0008,0xc283,0x0000,0x0001,0x0000 0256 0000 0000 | | .BLANK 0000[0x1aa]