|
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_03bcfe
└─⟦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 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 0007 | | .DEBUG4 0x0004,0x0007,0x489a,0x0000,0x0001,0x0000
0256 0002 1ac0 | | .XXX[0x2]
0258 0000 0000 | | .BLANK 0000[0xbf]
0317 0020 0000 | | .XXX[0x3e]
0319 0dc0 0229 | )|
031b 89ea ebe9 | |
031d 88aa c8a9 | |
031f 8be8 88aa | |
0321 6a8a 49eb |j I |
0323 27af 728f |' r |
0325 d204 6000 | ` |
0327 e9e8 4948 | IH|
0329 a86a 8a62 | j b|
032b e001 ea6a | j|
032d 8829 c888 | ) |
032f 2a48 85ca |*H |
0331 6a8a 4929 |j I)|
0333 c8e1 6001 | ` |
0335 678a 68a9 |g h |
0337 88a8 6a89 | j |
0339 29e9 c7cf |) |
033b d204 6001 | ` |
033d 0a48 aa6a | H j|
033f 09e9 ca68 | h|
0341 a2e0 01ea | |
0343 6a88 29c8 |j ) |
0345 882a 4885 | *H |
0347 ca6a 8a49 | j I|
0349 29c8 e160 |) `|
034b 0127 8a0a | ' |
034d 49e8 c929 |I )|
034f 88a7 c000 | |
0351 0000 0000 | |
0353 0000 0040 | @|
0355 0000 0000 | | .BLANK 0000[0xab]