|
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, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 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 e001 | | Load 0x0,0x1 005d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 005e 4807 |H | Short_Literal 0x7 005f e7ff | | Load 0x3,-0x1 0060 e002 | | Load 0x0,0x2 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 e001 | | Load 0x0,0x1 006d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 006e 4805 |H | Short_Literal 0x5 006f e7ff | | Load 0x3,-0x1 0070 e002 | | Load 0x0,0x2 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 e001 | | Load 0x0,0x1 007d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 007e 4803 |H | Short_Literal 0x3 007f e7ff | | Load 0x3,-0x1 0080 e002 | | Load 0x0,0x2 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 e001 | | Load 0x0,0x1 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 e002 | | Load 0x0,0x2 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 e001 | | Load 0x0,0x1 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 e002 | | Load 0x0,0x2 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 e003 | | Load 0x0,0x3 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 e004 | | Load 0x0,0x4 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 e003 | | Load 0x0,0x3 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 e004 | | Load 0x0,0x4 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 e003 | | Load 0x0,0x3 00ed 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 00ee BODY_00e8: 00ee 00d8 | | Load_Top At_Offset_0 00ef e005 | | Load 0x0,0x5 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 e005 | | Load 0x0,0x5 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 e005 | | Load 0x0,0x5 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 e003 | | Load 0x0,0x3 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 e003 | | Load 0x0,0x3 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 e003 | | Load 0x0,0x3 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 e003 | | Load 0x0,0x3 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 e006 | | Load 0x0,0x6 0124 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0125 e007 | | Load 0x0,0x7 0126 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0127 e008 | | Load 0x0,0x8 0128 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0129 4801 |H | Short_Literal 0x1 012a 4800 |H | Short_Literal 0x0 012b e007 | | Load 0x0,0x7 012c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 012d e003 | | Load 0x0,0x3 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 e003 | | Load 0x0,0x3 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 e006 | | Load 0x0,0x6 0142 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0143 e007 | | Load 0x0,0x7 0144 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0145 e008 | | Load 0x0,0x8 0146 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0147 4801 |H | Short_Literal 0x1 0148 4800 |H | Short_Literal 0x0 0149 e007 | | Load 0x0,0x7 014a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 014b e003 | | Load 0x0,0x3 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 e003 | | Load 0x0,0x3 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 e003 | | Load 0x0,0x3 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 e003 | | Load 0x0,0x3 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 e003 | | Load 0x0,0x3 0171 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0172 BODY_0168: 0172 e003 | | Load 0x0,0x3 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 e003 | | Load 0x0,0x3 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 e003 | | Load 0x0,0x3 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 e003 | | Load 0x0,0x3 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 e003 | | Load 0x0,0x3 0193 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0194 025e | ^ | Execute Discrete,Convert 0195 1c01 | | Execute_Immediate Run_Utility,0x1 0196 01cc | | Execute Vector,Catenate 0197 8405 | | Call 0x2,0x5 0198 e602 | | Load 0x3,0x2 0199 e003 | | Load 0x0,0x3 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 000f | | .DEBUG4 0x0004,0x000f,0xc0a5,0x0000,0x0001,0x0000 0256 c00a 0000 | | .XXX[0xe] 0258 0002 0000 | | 025a 0080 0000 | | 025c 0440 0000 | @ | 025e 0002 0000 | | 0260 0014 8000 | | 0262 040f 9b12 | | 0264 0000 0000 | | .BLANK 0000[0x9] 026d 8000 040f | | .XXX[0x3] 026f 95a2 | | 0270 0000 0000 | | .BLANK 0000[0x6] 0276 8000 040f | | .XXX[0x3] 0278 9ede | | 0279 0000 0000 | | .BLANK 0000[0x8] 0281 0031 c000 | 1 | .XXX[0x1a] 0283 f100 0051 | Q| 0285 a548 0000 | H | 0287 800a 0005 | | 0289 9800 0006 | | 028b 610a 0000 |a | 028d 1000 0000 | | 028f 1801 4000 | @ | 0291 0000 4000 | @ | 0293 0010 0000 | | 0295 0088 0000 | | 0297 0000 4000 | @ | 0299 0002 8000 | | 029b 0000 0000 | | .BLANK 0000[0xb] 02a6 1000 0081 | | .XXX[0x4] 02a8 f4ac 4000 | @ | 02aa 0000 0000 | | .BLANK 0000[0x10] 02ba 0006 3800 | 8 | .XXX[0x1d] 02bc 1e20 000a | | 02be 34c9 0000 |4 | 02c0 1001 4000 | @ | 02c2 b300 0000 | | 02c4 cc21 4000 | !@ | 02c6 0300 0000 | | 02c8 0500 2800 | ( | 02ca 0000 0800 | | 02cc 0002 0000 | | 02ce 0011 0000 | | 02d0 0000 0800 | | 02d2 0000 5200 | R | 02d4 0018 3f34 | ?4| 02d6 e000 | | 02d7 0000 0000 | | .BLANK 0000[0x8] 02df 0200 0010 | | .XXX[0x4] 02e1 3e95 8800 |> | 02e3 0000 0000 | | .BLANK 0000[0x11] 02f4 c700 03c6 | | .XXX[0x19] 02f6 0001 4695 | F | 02f8 2000 0200 | | 02fa 2800 1660 |( `| 02fc 0000 197b | {| 02fe 1800 0040 | @| 0300 0000 00a0 | | 0302 0500 0000 | | 0304 0100 0000 | | 0306 4000 0002 |@ | 0308 2000 0000 | | 030a 0100 0000 | | 030c 0a00 | | 030d 0000 0000 | | .BLANK 0000[0xb] 0318 0040 0002 | @ | .XXX[0x4] 031a 07c9 5e00 | ^ | 031c 0000 0000 | | .BLANK 0000[0x5] 0321 0040 0002 | @ | .XXX[0x4] 0323 07cb dd00 | | 0325 0000 0000 | | .BLANK 0000[0x8] 032d 18e0 0079 | y| .XXX[0x19] 032f 4000 28d2 |@ ( | 0331 a400 0040 | @| 0333 0500 02cc | | 0335 0000 032f | /| 0337 4e00 0008 |N | 0339 0000 0014 | | 033b 00a0 0000 | | 033d 0020 0000 | | 033f 0800 0000 | | 0341 4400 0000 |D | 0343 0020 0000 | | 0345 0140 | @ | 0346 0000 0000 | | .BLANK 0000[0xb] 0351 0008 0000 | | .XXX[0x4] 0353 40f9 0f80 |@ | 0355 0000 0000 | | .BLANK 0000[0x5] 035a 0008 0000 | | .XXX[0x4] 035c 40f9 9400 |@ | 035e 0000 0000 | | .BLANK 0000[0x8] 0366 031c 000f | | .XXX[0x19] 0368 2800 051a |( | 036a 6480 0008 |d | 036c 00a0 0059 | Y| 036e 8000 0065 | e| 0370 e9c0 0001 | | 0372 8000 0002 | | 0374 8014 0000 | | 0376 0004 0000 | | 0378 0100 0000 | | 037a 0880 0000 | | 037c 0004 0000 | | 037e 0028 | ( | 037f 0000 0000 | | .BLANK 0000[0xb] 038a 0001 0000 | | .XXX[0x4] 038c 081f 21f0 | ! | 038e 0000 0000 | | .BLANK 0000[0x5] 0393 0001 0000 | | .XXX[0x4] 0395 0c1f 792c | y,| 0397 0000 0000 | | .BLANK 0000[0x8] 039f 0063 8001 | c | .XXX[0x20] 03a1 e600 00a3 | | 03a3 4a90 0001 |J | 03a5 0014 000b | | 03a7 3000 000c |0 | 03a9 be60 0000 | ` | 03ab 2000 0000 | | 03ad 7002 8000 |p | 03af 3342 0000 |3B | 03b1 0020 0000 | | 03b3 0110 0000 | | 03b5 0000 8000 | | 03b7 0005 2000 | | 03b9 0103 e75e | ^| 03bb 2000 0103 | | 03bd e75e 8000 | ^ | 03bf 0000 0000 | | .BLANK 0000[0x14] 03d3 0040 0002 | @ | .XXX[0x2d] 03d5 7dc0 01d8 |} | 03d7 4d11 150d |M | 03d9 3105 4905 |1 I | 03db 5125 3d39 |Q%=9| 03dd 7d39 5535 |}9U5| 03df 0915 494c | IL| 03e1 00a0 1119 | | 03e3 2531 1400 |%1 | 03e5 d839 0531 | 9 1| 03e7 317d 1561 |1} a| 03e9 5115 394d |Q 9M| 03eb 253d 394c |%=9L| 03ed 01b0 4109 | A | 03ef 0551 0d21 | Q !| 03f1 7d15 6151 |} aQ| 03f3 1539 4d25 | 9M%| 03f5 3d39 4c00 |=9L | 03f7 9c59 0d3d | Y =| 03f9 3541 2531 |5A%1| 03fb 0551 253d | Q%=| 03fd 397d 1561 |9} a| 03ff 5115 |Q |