|
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: 1024 (0x400)
Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c8f4
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦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 0050 | P | .CONST 0x0050 ; 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 8000 | | .CONST 0x8000 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 001b | | .CONST 0x001b ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0006 | | .CONST 0x0006 ; Number of locals 000b INIT_0008: 000b e067 | g | Load 0x0,0x67 000c 0322 | " | Declare_Variable Record 000d 00db | | Load_Top At_Offset_3 000e 800f | | Call 0x0,0xf 000f 8010 | | Call 0x0,0x10 0010 e5ff | | Load 0x2,-0x1 0011 800f | | Call 0x0,0xf 0012 8096 | | Call 0x0,0x96 0013 e00e | | Load 0x0,0xe 0014 0322 | " | Declare_Variable Record 0015 00d8 | | Load_Top At_Offset_0 0016 1c01 | | Execute_Immediate Run_Utility,0x1 0017 e5ff | | Load 0x2,-0x1 0018 00d9 | | Load_Top At_Offset_1 0019 017d | } | Execute Record,Structure_Write 001a 00e3 | | Load_Encached Natural_Cache 001b BODY_0008: 001b e5ff | | Load 0x2,-0x1 001c 8215 | | Call 0x1,0x15 001d 00d9 | | Load_Top At_Offset_1 001e 4800 |H | Short_Literal 0x0 001f 8017 | | Call 0x0,0x17 0020 00d1 | | Pop_Control Pop_Count_1 0021 00d9 | | Load_Top At_Offset_1 0022 8011 | | Call 0x0,0x11 0023 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0024 00d8 | | Load_Top At_Offset_0 0025 6802 |h | Jump_Zero 0x28 0026 00d9 | | Load_Top At_Offset_1 0027 8217 | | Call 0x1,0x17 0028 00da | | Load_Top At_Offset_2 0029 e403 | | Load 0x2,0x3 002a 8097 | | Call 0x0,0x97 002b e402 | | Load 0x2,0x2 002c 017d | } | Execute Record,Structure_Write 002d 00cf | | Action Mark_Auxiliary 002e 7812 |x | Jump 0x41 002f 00db | | Load_Top At_Offset_3 0030 e403 | | Load 0x2,0x3 0031 e402 | | Load 0x2,0x2 0032 8098 | | Call 0x0,0x98 0033 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0034 00da | | Load_Top At_Offset_2 0035 00da | | Load_Top At_Offset_2 0036 8016 | | Call 0x0,0x16 0037 00d1 | | Pop_Control Pop_Count_1 0038 00da | | Load_Top At_Offset_2 0039 8217 | | Call 0x1,0x17 003a 00db | | Load_Top At_Offset_3 003b e403 | | Load 0x2,0x3 003c e402 | | Load 0x2,0x2 003d 8099 | | Call 0x0,0x99 003e e402 | | Load 0x2,0x2 003f 017d | } | Execute Record,Structure_Write 0040 00c9 | | Action Pop_Auxiliary_Loop 0041 00db | | Load_Top At_Offset_3 0042 e403 | | Load 0x2,0x3 0043 e402 | | Load 0x2,0x2 0044 809a | | Call 0x0,0x9a 0045 6fe9 |o | Jump_Zero 0x2f 0046 00ce | | Action Pop_Auxiliary 0047 e5ff | | Load 0x2,-0x1 0048 8007 | | Call 0x0,0x7 0049 e5ff | | Load 0x2,-0x1 004a 8214 | | Call 0x1,0x14 004b 4502 |E | Exit_Suprogram New_Top_Offset 0x2 004c 0000 0000 | | .BLANK 0000[0x4] 0050 ; -------------------------------------------------------------------------------------- 0050 ; Debug Table 0050 ; -------------------------------------------------------------------------------------- 0050 0004 0002 | | .DEBUG4 0x0004,0x0002,0xd1c0,0x0000,0x0001,0x0000 0056 c00a 0000 | | .XXX[0xe] 0058 0002 0000 | | 005a 0080 0000 | | 005c 0440 0000 | @ | 005e 0002 0000 | | 0060 0014 8000 | | 0062 0414 32fc | 2 | 0064 0000 0000 | | .BLANK 0000[0x1d] 0081 007c 4001 | |@ | .XXX[0x1d] 0083 c400 010c | | 0085 dd48 0000 | H | 0087 8006 0008 | | 0089 9000 0000 | | 008b 40c6 0000 |@ | 008d 1000 0000 | | 008f 1801 4000 | @ | 0091 0000 4000 | @ | 0093 0010 0000 | | 0095 0088 0000 | | 0097 0000 4000 | @ | 0099 0002 9000 | | 009b 0082 8346 | F| 009d c000 | | 009e 0000 0000 | | .BLANK 0000[0x1c] 00ba 000f 8800 | | .XXX[0x1d] 00bc 38e0 0021 |8 !| 00be 9ba9 0000 | | 00c0 1000 c001 | | 00c2 1200 0000 | | 00c4 0817 8000 | | 00c6 0200 0000 | | 00c8 0300 2800 | ( | 00ca 0000 0800 | | 00cc 0002 0000 | | 00ce 0011 0000 | | 00d0 0000 0800 | | 00d2 0000 5200 | R | 00d4 0010 5067 | Pg| 00d6 7800 |x | 00d7 0000 0000 | | .BLANK 0000[0x1c] 00f3 0001 f100 | | .XXX[0x1d] 00f5 071e 0004 | | 00f7 3375 2000 |3u | 00f9 0200 1800 | | 00fb 2240 0000 |"@ | 00fd 0104 9800 | | 00ff 0040 0000 | @ | 0101 00a0 0500 | | 0103 0000 0100 | | 0105 0000 4000 | @ | 0107 0002 2000 | | 0109 0000 0100 | | 010b 0000 0a40 | @| 010d 0002 0a16 | | 010f f400 | | 0110 0000 0000 | | .BLANK 0000[0x8] 0118 0040 0002 | @ | .XXX[0x4] 011a 0a0f 4000 | @ | 011c 0000 0000 | | .BLANK 0000[0x11] 012d 3e20 00e5 |> | .XXX[0x19] 012f 0000 866e | n| 0131 a400 0040 | @| 0133 0300 0448 | H| 0135 0000 0022 | "| 0137 5000 0008 |P | 0139 0000 000c | | 013b 00a0 0000 | | 013d 0020 0000 | | 013f 0800 0000 | | 0141 4400 0000 |D | 0143 0020 0000 | | 0145 0140 | @ | 0146 0000 0000 | | .BLANK 0000[0xb] 0151 0008 0000 | | .XXX[0x4] 0153 4143 dfc0 |AC | 0155 0000 0000 | | .BLANK 0000[0x11] 0166 07c4 001c | | .XXX[0x1c] 0168 c800 10cd | | 016a d480 0008 | | 016c 0060 0089 | ` | 016e 0000 0004 | | 0170 50a0 0001 |P | 0172 0000 0001 | | 0174 8014 0000 | | 0176 0004 0000 | | 0178 0100 0000 | | 017a 0880 0000 | | 017c 0004 0000 | | 017e 0029 0000 | ) | 0180 0828 81dc | ( | 0182 0000 0000 | | .BLANK 0000[0x1d] 019f 00f8 8003 | | .XXX[0x19] 01a1 9a00 0219 | | 01a3 ba90 0001 | | 01a5 000c 0011 | | 01a7 2000 0000 | | 01a9 82d8 0000 | | 01ab 2000 0000 | | 01ad 3002 8000 |0 | 01af 0000 8000 | | 01b1 0020 0000 | | 01b3 0110 0000 | | 01b5 0000 8000 | | 01b7 0005 | | 01b8 0000 0000 | | .BLANK 0000[0xc] 01c4 2000 0105 | | .XXX[0x3] 01c6 0919 | | 01c7 0000 0000 | | .BLANK 0000[0x39]