|
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_0340e4
└─⟦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 0238 | 8 | .CONST 0x0238 ; 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 0001 | | .CONST 0x0001 ; 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 006b | k | .CONST 0x006b ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0011 | | .CONST 0x0011 ; Number of locals 001b INIT_0018: 001b e001 | | Load 0x0,0x1 001c 1b10 | | Execute Package,Field_Read,Field_Number 0x10 001d 0322 | " | Declare_Variable Record 001e 00d8 | | Load_Top At_Offset_0 001f 1c00 | | Execute_Immediate Run_Utility,0x0 0020 e002 | | Load 0x0,0x2 0021 191f | | Execute Package,Field_Reference,Field_Number 0x1f 0022 0007 | | Action Break_Optional 0023 e003 | | Load 0x0,0x3 0024 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0025 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0026 02c7 | | Declare_Variable Any 0027 4801 |H | Short_Literal 0x1 0028 e003 | | Load 0x0,0x3 0029 1b0e | | Execute Package,Field_Read,Field_Number 0xe 002a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 002b e5ff | | Load 0x2,-0x1 002c e003 | | Load 0x0,0x3 002d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 002e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 002f a404 | | Store_Unchecked 0x2,0x4 0030 e003 | | Load 0x0,0x3 0031 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0032 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0033 02c7 | | Declare_Variable Any 0034 4801 |H | Short_Literal 0x1 0035 e003 | | Load 0x0,0x3 0036 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0037 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0038 e5fd | | Load 0x2,-0x3 0039 e003 | | Load 0x0,0x3 003a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 003b 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 003c a405 | | Store_Unchecked 0x2,0x5 003d e5ff | | Load 0x2,-0x1 003e e003 | | Load 0x0,0x3 003f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0040 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0041 00da | | Load_Top At_Offset_2 0042 e003 | | Load 0x0,0x3 0043 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0044 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0045 00da | | Load_Top At_Offset_2 0046 e003 | | Load 0x0,0x3 0047 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0048 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0049 0092 01d5 | | Action Push_String_Extended,0x1d5 ; ".Remote_Host_Units" 004b 01cc | | Execute Vector,Catenate 004c 0007 | | Action Break_Optional 004d 00db | | Load_Top At_Offset_3 004e e003 | | Load 0x0,0x3 004f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0050 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0051 0092 01d6 | | Action Push_String_Extended,0x1d6 ; ".R1000_Units" 0053 01cc | | Execute Vector,Catenate 0054 0007 | | Action Break_Optional 0055 e004 | | Load 0x0,0x4 0056 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0057 02c7 | | Declare_Variable Any 0058 00d8 | | Load_Top At_Offset_0 0059 1c00 | | Execute_Immediate Run_Utility,0x0 005a e001 | | Load 0x0,0x1 005b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 005c 0322 | " | Declare_Variable Record 005d 00d8 | | Load_Top At_Offset_0 005e 1c00 | | Execute_Immediate Run_Utility,0x0 005f 029f 00e3 | | Declare_Subprogram INIT_00e0,For_Call 0061 029f 00fb | | Declare_Subprogram INIT_00f8,For_Call 0063 029f 011b | | Declare_Subprogram INIT_0118,For_Call 0065 029f 0143 | C| Declare_Subprogram INIT_0140,For_Call 0067 029f 016b | k| Declare_Subprogram INIT_0168,For_Call 0069 029f 018b | | Declare_Subprogram INIT_0188,For_Call 006b BODY_0018: 006b e404 | | Load 0x2,0x4 006c e003 | | Load 0x0,0x3 006d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 006e 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 006f 680a |h | Jump_Zero 0x7a 0070 e005 | | Load 0x0,0x5 0071 180e | | Execute Package,Field_Execute,Field_Number 0xe 0072 4807 |H | Short_Literal 0x7 0073 e5ff | | Load 0x2,-0x1 0074 0092 01d7 | | Action Push_String_Extended,0x1d7 ; " is not a valid pathname" 0076 01cc | | Execute Vector,Catenate 0077 e006 | | Load 0x0,0x6 0078 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0079 4505 |E | Exit_Suprogram New_Top_Offset 0x5 007a e404 | | Load 0x2,0x4 007b e003 | | Load 0x0,0x3 007c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 007d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 007e 700a |p | Jump_Nonzero 0x89 007f e005 | | Load 0x0,0x5 0080 180e | | Execute Package,Field_Execute,Field_Number 0xe 0081 4807 |H | Short_Literal 0x7 0082 e5ff | | Load 0x2,-0x1 0083 0092 01d8 | | Action Push_String_Extended,0x1d8 ; " is not installed" 0085 01cc | | Execute Vector,Catenate 0086 e006 | | Load 0x0,0x6 0087 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0088 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0089 e404 | | Load 0x2,0x4 008a 840d | | Call 0x2,0xd 008b 700a |p | Jump_Nonzero 0x96 008c e005 | | Load 0x0,0x5 008d 180e | | Execute Package,Field_Execute,Field_Number 0xe 008e 4807 |H | Short_Literal 0x7 008f e5ff | | Load 0x2,-0x1 0090 0092 01d9 | | Action Push_String_Extended,0x1d9 ; " is not a library level package" 0092 01cc | | Execute Vector,Catenate 0093 e006 | | Load 0x0,0x6 0094 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0095 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0096 e405 | | Load 0x2,0x5 0097 e003 | | Load 0x0,0x3 0098 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0099 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 009a 680a |h | Jump_Zero 0xa5 009b e005 | | Load 0x0,0x5 009c 180e | | Execute Package,Field_Execute,Field_Number 0xe 009d 4807 |H | Short_Literal 0x7 009e e5fd | | Load 0x2,-0x3 009f 0092 01d7 | | Action Push_String_Extended,0x1d7 ; " is not a valid pathname" 00a1 01cc | | Execute Vector,Catenate 00a2 e006 | | Load 0x0,0x6 00a3 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00a4 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00a5 e5fc | | Load 0x2,-0x4 00a6 0092 01da | | Action Push_String_Extended,0x1da ; "!Model.R1000_IMPLEMENTATION" 00a8 4800 |H | Short_Literal 0x0 00a9 4800 |H | Short_Literal 0x0 00aa e409 | | Load 0x2,0x9 00ab e007 | | Load 0x0,0x7 00ac 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 00ad e5fc | | Load 0x2,-0x4 00ae 0092 01da | | Action Push_String_Extended,0x1da ; "!Model.R1000_IMPLEMENTATION" 00b0 4800 |H | Short_Literal 0x0 00b1 4800 |H | Short_Literal 0x0 00b2 e408 | | Load 0x2,0x8 00b3 e007 | | Load 0x0,0x7 00b4 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 00b5 00ea | | Load_Encached Null_String_Cache 00b6 4801 |H | Short_Literal 0x1 00b7 e5fc | | Load 0x2,-0x4 00b8 4801 |H | Short_Literal 0x1 00b9 e409 | | Load 0x2,0x9 00ba e406 | | Load 0x2,0x6 00bb e007 | | Load 0x0,0x7 00bc 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00bd 00ea | | Load_Encached Null_String_Cache 00be 4801 |H | Short_Literal 0x1 00bf e5fc | | Load 0x2,-0x4 00c0 4801 |H | Short_Literal 0x1 00c1 e408 | | Load 0x2,0x8 00c2 e406 | | Load 0x2,0x6 00c3 e007 | | Load 0x0,0x7 00c4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00c5 e40b | | Load 0x2,0xb 00c6 e406 | | Load 0x2,0x6 00c7 e001 | | Load 0x0,0x1 00c8 180e | | Execute Package,Field_Execute,Field_Number 0xe 00c9 00d1 | | Pop_Control Pop_Count_1 00ca e402 | | Load 0x2,0x2 00cb e40b | | Load 0x2,0xb 00cc e001 | | Load 0x0,0x1 00cd 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00ce 00d1 | | Pop_Control Pop_Count_1 00cf 00cf | | Action Mark_Auxiliary 00d0 7806 |x | Jump 0xd7 00d1 840e | | Call 0x2,0xe 00d2 e402 | | Load 0x2,0x2 00d3 e001 | | Load 0x0,0x1 00d4 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00d5 00d1 | | Pop_Control Pop_Count_1 00d6 00c9 | | Action Pop_Auxiliary_Loop 00d7 e402 | | Load 0x2,0x2 00d8 e001 | | Load 0x0,0x1 00d9 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00da 6ff6 |o | Jump_Zero 0xd1 00db 00ce | | Action Pop_Auxiliary 00dc 840f | | Call 0x2,0xf 00dd 8410 | | Call 0x2,0x10 00de 8411 | | Call 0x2,0x11 00df 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; SUBPROGRAM 00e0 ; -------------------------------------------------------------------------------------- 00e0 00e3 | | .CONST 0x00e3 ; Address of begin 00e1 0004 | | .CONST 0x0004 ; Address of exception handler 00e2 0001 | | .CONST 0x0001 ; Number of locals 00e3 BODY_00e0: 00e3 INIT_00e0: 00e3 0092 01db | | Action Push_String_Extended,0x1db ; "!MACHINE.TEMPORARY.RPC_" 00e5 e008 | | Load 0x0,0x8 00e6 1819 | | Execute Package,Field_Execute,Field_Number 0x19 00e7 e008 | | Load 0x0,0x8 00e8 181c | | Execute Package,Field_Execute,Field_Number 0x1c 00e9 01cc | | Execute Vector,Catenate 00ea 0092 01dc | | Action Push_String_Extended,0x1dc ; "_" 00ec 01cc | | Execute Vector,Catenate 00ed 4800 |H | Short_Literal 0x0 00ee 4803 |H | Short_Literal 0x3 00ef 4804 |H | Short_Literal 0x4 00f0 e002 | | Load 0x0,0x2 00f1 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00f2 8403 | | Call 0x2,0x3 00f3 01cc | | Execute Vector,Catenate 00f4 00ca | | Action Exit_Nullary_Function 00f5 0000 0000 | | .XXX[0x3] 00f7 0000 | | 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 010b | | .CONST 0x010b ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0003 | | .CONST 0x0003 ; Number of locals 00fb INIT_00f8: 00fb 00da | | Load_Top At_Offset_2 00fc e003 | | Load 0x0,0x3 00fd 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00fe 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00ff e003 | | Load 0x0,0x3 0100 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0101 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0102 03f1 | | Declare_Variable Discrete,With_Value 0103 00db | | Load_Top At_Offset_3 0104 e003 | | Load 0x0,0x3 0105 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0106 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0107 e003 | | Load 0x0,0x3 0108 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0109 1b17 | | Execute Package,Field_Read,Field_Number 0x17 010a 03f1 | | Declare_Variable Discrete,With_Value 010b BODY_00f8: 010b 00d9 | | Load_Top At_Offset_1 010c 0f02 | | Execute_Immediate Equal,0x2 010d 7002 |p | Jump_Nonzero 0x110 010e 4800 |H | Short_Literal 0x0 010f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0110 00d8 | | Load_Top At_Offset_0 0111 0f06 | | Execute_Immediate Equal,0x6 0112 7002 |p | Jump_Nonzero 0x115 0113 4800 |H | Short_Literal 0x0 0114 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0115 4801 |H | Short_Literal 0x1 0116 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0117 0000 | | .XXX[0x1] 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 012a | * | .CONST 0x012a ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0003 | | .CONST 0x0003 ; Number of locals 011b INIT_0118: 011b e003 | | Load 0x0,0x3 011c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 011d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 011e 02c7 | | Declare_Variable Any 011f e402 | | Load 0x2,0x2 0120 e001 | | Load 0x0,0x1 0121 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0122 e009 | | Load 0x0,0x9 0123 1b58 | X | Execute Package,Field_Read,Field_Number 0x58 0124 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0125 a602 | | Store_Unchecked 0x3,0x2 0126 00d8 | | Load_Top At_Offset_0 0127 e003 | | Load 0x0,0x3 0128 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0129 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 012a BODY_0118: 012a e404 | | Load 0x2,0x4 012b 00da | | Load_Top At_Offset_2 012c e003 | | Load 0x0,0x3 012d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 012e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 012f 700e |p | Jump_Nonzero 0x13e 0130 e5fc | | Load 0x2,-0x4 0131 e409 | | Load 0x2,0x9 0132 0092 01dd | | Action Push_String_Extended,0x1dd ; "#" 0134 00db | | Load_Top At_Offset_3 0135 e00a | | Load 0x0,0xa 0136 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0137 e5fc | | Load 0x2,-0x4 0138 e408 | | Load 0x2,0x8 0139 0092 01dd | | Action Push_String_Extended,0x1dd ; "#" 013b 00db | | Load_Top At_Offset_3 013c e00a | | Load 0x0,0xa 013d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 013e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 013f 0000 | | .XXX[0x1] 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 0144 | D | .CONST 0x0144 ; Address of begin 0141 0004 | | .CONST 0x0004 ; Address of exception handler 0142 0002 | | .CONST 0x0002 ; Number of locals 0143 INIT_0140: 0143 840c | | Call 0x2,0xc 0144 BODY_0140: 0144 e40a | | Load 0x2,0xa 0145 00ea | | Load_Encached Null_String_Cache 0146 00da | | Load_Top At_Offset_2 0147 4801 |H | Short_Literal 0x1 0148 e004 | | Load 0x0,0x4 0149 1814 | | Execute Package,Field_Execute,Field_Number 0x14 014a c40a | | Store 0x2,0xa 014b e40a | | Load 0x2,0xa 014c e407 | | Load 0x2,0x7 014d e40b | | Load 0x2,0xb 014e e00b | | Load 0x0,0xb 014f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0150 e40a | | Load 0x2,0xa 0151 e407 | | Load 0x2,0x7 0152 e40b | | Load 0x2,0xb 0153 e00b | | Load 0x0,0xb 0154 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0155 e40a | | Load 0x2,0xa 0156 e004 | | Load 0x0,0x4 0157 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0158 c40a | | Store 0x2,0xa 0159 e5fc | | Load 0x2,-0x4 015a 00ea | | Load_Encached Null_String_Cache 015b 4800 |H | Short_Literal 0x0 015c e409 | | Load 0x2,0x9 015d e602 | | Load 0x3,0x2 015e e00c | | Load 0x0,0xc 015f 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0160 e5fc | | Load 0x2,-0x4 0161 00ea | | Load_Encached Null_String_Cache 0162 4800 |H | Short_Literal 0x0 0163 e408 | | Load 0x2,0x8 0164 e602 | | Load 0x3,0x2 0165 e00c | | Load 0x0,0xc 0166 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0167 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 016c | l | .CONST 0x016c ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0002 | | .CONST 0x0002 ; Number of locals 016b INIT_0168: 016b 840c | | Call 0x2,0xc 016c BODY_0168: 016c e40a | | Load 0x2,0xa 016d 00ea | | Load_Encached Null_String_Cache 016e 00da | | Load_Top At_Offset_2 016f 4801 |H | Short_Literal 0x1 0170 e004 | | Load 0x0,0x4 0171 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0172 c40a | | Store 0x2,0xa 0173 e40a | | Load 0x2,0xa 0174 e407 | | Load 0x2,0x7 0175 e40b | | Load 0x2,0xb 0176 e00b | | Load 0x0,0xb 0177 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0178 e40a | | Load 0x2,0xa 0179 e004 | | Load 0x0,0x4 017a 181b | | Execute Package,Field_Execute,Field_Number 0x1b 017b c40a | | Store 0x2,0xa 017c e5fc | | Load 0x2,-0x4 017d 00ea | | Load_Encached Null_String_Cache 017e 4800 |H | Short_Literal 0x0 017f e409 | | Load 0x2,0x9 0180 e602 | | Load 0x3,0x2 0181 e00c | | Load 0x0,0xc 0182 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0183 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0184 0000 0000 | | .BLANK 0000[0x4] 0188 ; -------------------------------------------------------------------------------------- 0188 ; SUBPROGRAM 0188 ; -------------------------------------------------------------------------------------- 0188 018c | | .CONST 0x018c ; Address of begin 0189 0004 | | .CONST 0x0004 ; Address of exception handler 018a 0002 | | .CONST 0x0002 ; Number of locals 018b INIT_0188: 018b 840c | | Call 0x2,0xc 018c BODY_0188: 018c e40a | | Load 0x2,0xa 018d 00ea | | Load_Encached Null_String_Cache 018e 00da | | Load_Top At_Offset_2 018f 4801 |H | Short_Literal 0x1 0190 e004 | | Load 0x0,0x4 0191 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0192 c40a | | Store 0x2,0xa 0193 e40a | | Load 0x2,0xa 0194 e407 | | Load 0x2,0x7 0195 e40b | | Load 0x2,0xb 0196 e00b | | Load 0x0,0xb 0197 180d | | Execute Package,Field_Execute,Field_Number 0xd 0198 e40a | | Load 0x2,0xa 0199 e004 | | Load 0x0,0x4 019a 181b | | Execute Package,Field_Execute,Field_Number 0x1b 019b c40a | | Store 0x2,0xa 019c e5fc | | Load 0x2,-0x4 019d 00ea | | Load_Encached Null_String_Cache 019e 4800 |H | Short_Literal 0x0 019f e409 | | Load 0x2,0x9 01a0 e602 | | Load 0x3,0x2 01a1 e00c | | Load 0x0,0xc 01a2 1817 | | Execute Package,Field_Execute,Field_Number 0x17 01a3 e5fe | | Load 0x2,-0x2 01a4 6809 |h | Jump_Zero 0x1ae 01a5 e5fc | | Load 0x2,-0x4 01a6 4800 |H | Short_Literal 0x0 01a7 0092 01de | | Action Push_String_Extended,0x1de ; "<WORLDS>" 01a9 4802 |H | Short_Literal 0x2 01aa 4803 |H | Short_Literal 0x3 01ab e409 | | Load 0x2,0x9 01ac e00c | | Load 0x0,0xc 01ad 181a | | Execute Package,Field_Execute,Field_Number 0x1a 01ae e40a | | Load 0x2,0xa 01af 00ea | | Load_Encached Null_String_Cache 01b0 00da | | Load_Top At_Offset_2 01b1 e004 | | Load 0x0,0x4 01b2 1817 | | Execute Package,Field_Execute,Field_Number 0x17 01b3 c40a | | Store 0x2,0xa 01b4 e40a | | Load 0x2,0xa 01b5 e407 | | Load 0x2,0x7 01b6 e40b | | Load 0x2,0xb 01b7 e00b | | Load 0x0,0xb 01b8 180e | | Execute Package,Field_Execute,Field_Number 0xe 01b9 e40a | | Load 0x2,0xa 01ba e407 | | Load 0x2,0x7 01bb e40b | | Load 0x2,0xb 01bc e00b | | Load 0x0,0xb 01bd 180f | | Execute Package,Field_Execute,Field_Number 0xf 01be e40a | | Load 0x2,0xa 01bf e004 | | Load 0x0,0x4 01c0 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01c1 c40a | | Store 0x2,0xa 01c2 e5fc | | Load 0x2,-0x4 01c3 00ea | | Load_Encached Null_String_Cache 01c4 4800 |H | Short_Literal 0x0 01c5 e408 | | Load 0x2,0x8 01c6 e602 | | Load 0x3,0x2 01c7 e00c | | Load 0x0,0xc 01c8 1817 | | Execute Package,Field_Execute,Field_Number 0x17 01c9 e5fe | | Load 0x2,-0x2 01ca 6809 |h | Jump_Zero 0x1d4 01cb e5fc | | Load 0x2,-0x4 01cc 4800 |H | Short_Literal 0x0 01cd 0092 01de | | Action Push_String_Extended,0x1de ; "<WORLDS>" 01cf 4802 |H | Short_Literal 0x2 01d0 4803 |H | Short_Literal 0x3 01d1 e408 | | Load 0x2,0x8 01d2 e00c | | Load 0x0,0xc 01d3 181a | | Execute Package,Field_Execute,Field_Number 0x1a 01d4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 01d5 ; -------------------------------------------------------------------------------------- 01d5 ; STRING TABLE 01d5 ; -------------------------------------------------------------------------------------- 01d5 0016 | | .STRTAB 0x0016->0x01e0 ; ".Remote_Host_Units" 01d6 0026 | & | .STRTAB 0x0026->0x01e9 ; ".R1000_Units" 01d7 0030 | 0 | .STRTAB 0x0030->0x01ef ; " is not a valid pathname" 01d8 0046 | F | .STRTAB 0x0046->0x01fb ; " is not installed" 01d9 0055 | U | .STRTAB 0x0055->0x0203 ; " is not a library level package" 01da 0072 | r | .STRTAB 0x0072->0x0213 ; "!Model.R1000_IMPLEMENTATION" 01db 008b | | .STRTAB 0x008b->0x0220 ; "!MACHINE.TEMPORARY.RPC_" 01dc 00a0 | | .STRTAB 0x00a0->0x022c ; "_" 01dd 009f | | .STRTAB 0x009f->0x022c ; "#" 01de 009e | | .STRTAB 0x009e->0x022d ; "<WORLDS>" 01df 00a4 | | .STREND 0x00a4->0x0231 01e0 2e52 656d |.Rem| .STRTAB_STRINGS 0231 0000 0000 | | .BLANK 0000[0x7] 0238 ; -------------------------------------------------------------------------------------- 0238 ; Debug Table 0238 ; -------------------------------------------------------------------------------------- 0238 0004 0004 | | .DEBUG4 0x0004,0x0004,0x2f37,0x0000,0x0001,0x0008 023e 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000 0242 001b 025e | ^| .DBG4T 0x001b,0x025e,0x8001,0xc000 0246 00e3 02a0 | | .DBG4T 0x00e3,0x02a0,0x0002,0x0000 024a 00fb 02a3 | | .DBG4T 0x00fb,0x02a3,0x0002,0x4000 024e 011b 02b1 | | .DBG4T 0x011b,0x02b1,0x0004,0x0000 0252 0143 02b8 | C | .DBG4T 0x0143,0x02b8,0x0004,0x0000 0256 016b 02c1 | k | .DBG4T 0x016b,0x02c1,0x0004,0x0000 025a 018b 02c8 | | .DBG4T 0x018b,0x02c8,0x0004,0x0000 025e ; -------------------------------------------------------------------------------------- 025e ; Debug chain 025e ; -------------------------------------------------------------------------------------- 025e 000c 0014 | | .DBGLEN 0x000c,0x0014 0260 001b 0020 | | .DBGLNO 0x001b,0x0020,0x0023,0x0030,0x003d,0x0041,0x0045,0x004d,0x0055,0x005a,0x005f,0x0061,0x006b,0x0070,0x007a,0x007f,0x0089,0x008c,0x0096,0x009b,0x00a5,0x00ad,0x00b5,0x00bd,0x00c5,0x00ca,0x00d1,0x00d2,0x00d7,0x00dc,0x00dd,0x00de 0280 0005 0006 | | .XXX[0x20] 0282 0007 0008 | | 0284 0009 000a | | 0286 000b 000c | | 0288 000d 000e | | 028a 000f 0010 | | 028c 0001 0002 | | 028e 0003 0004 | | 0290 0005 0006 | | 0292 0007 0008 | | 0294 0009 000a | | 0296 000b 000c | | 0298 000d 000e | | 029a 0010 0011 | | 029c 000f 0012 | | 029e 0013 0014 | | 02a0 ; -------------------------------------------------------------------------------------- 02a0 ; Debug chain 02a0 ; -------------------------------------------------------------------------------------- 02a0 0000 0001 | | .DBGLEN 0x0000,0x0001 02a2 00e3 | | .DBGLNO 0x00e3 02a3 ; -------------------------------------------------------------------------------------- 02a3 ; Debug chain 02a3 ; -------------------------------------------------------------------------------------- 02a3 0002 0005 | | .DBGLEN 0x0002,0x0005 02a5 00fb 0103 | | .DBGLNO 0x00fb,0x0103,0x010b,0x010e,0x0110,0x0113,0x0115 02ac 0001 0003 | | .XXX[0x5] 02ae 0004 0006 | | 02b0 0005 | | 02b1 ; -------------------------------------------------------------------------------------- 02b1 ; Debug chain 02b1 ; -------------------------------------------------------------------------------------- 02b1 0002 0003 | | .DBGLEN 0x0002,0x0003 02b3 011b 0126 | &| .DBGLNO 0x011b,0x0126,0x012a,0x0130,0x0137 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; Debug chain 02b8 ; -------------------------------------------------------------------------------------- 02b8 0001 0006 | | .DBGLEN 0x0001,0x0006 02ba 0143 0144 | C D| .DBGLNO 0x0143,0x0144,0x014b,0x0150,0x0155,0x0159,0x0160 02c1 ; -------------------------------------------------------------------------------------- 02c1 ; Debug chain 02c1 ; -------------------------------------------------------------------------------------- 02c1 0001 0004 | | .DBGLEN 0x0001,0x0004 02c3 016b 016c | k l| .DBGLNO 0x016b,0x016c,0x0173,0x0178,0x017c 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; Debug chain 02c8 ; -------------------------------------------------------------------------------------- 02c8 0001 000d | | .DBGLEN 0x0001,0x000d 02ca 018b 018c | | .DBGLNO 0x018b,0x018c,0x0193,0x0198,0x019c,0x01a3,0x01a5,0x01ae,0x01b4,0x01b9,0x01be,0x01c2,0x01c9,0x01cb 02d8 0000 0000 | | .BLANK 0000[0x128]