|
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 |