|
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, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_5e40f2
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0048 | H | .CONST 0x0048 ; 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 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 0023 | # | .CONST 0x0023 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0003 | | .CONST 0x0003 ; Number of locals 001b INIT_0018: 001b e001 | | Load 0x0,0x1 001c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 001d 02c7 | | Declare_Variable Any 001e 00d8 | | Load_Top At_Offset_0 001f 1c00 | | Execute_Immediate Run_Utility,0x0 0020 e001 | | Load 0x0,0x1 0021 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0022 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0023 BODY_0018: 0023 e001 | | Load 0x0,0x1 0024 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0025 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0026 00da | | Load_Top At_Offset_2 0027 0120 | | Execute Any,Is_Value 0028 6803 |h | Jump_Zero 0x2c 0029 e001 | | Load 0x0,0x1 002a 1b0f | | Execute Package,Field_Read,Field_Number 0xf 002b 7801 |x | Jump 0x2d 002c 00da | | Load_Top At_Offset_2 002d 6012 |` | Indirect_Literal Discrete,0x40,{0x00000000, 0x00004000} 002e e002 | | Load 0x0,0x2 002f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0030 e003 | | Load 0x0,0x3 0031 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0032 e001 | | Load 0x0,0x1 0033 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0034 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0035 e5ff | | Load 0x2,-0x1 0036 e001 | | Load 0x0,0x1 0037 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0038 182c | , | Execute Package,Field_Execute,Field_Number 0x2c 0039 c402 | | Store 0x2,0x2 003a 0059 | Y | Store_Top Discrete,At_Offset_1 003b 00d8 | | Load_Top At_Offset_0 003c 0f00 | | Execute_Immediate Equal,0x0 003d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 003e 0000 0000 | | .XXX[0x2] 0040 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 0044 0000 0000 | | .BLANK 0000[0x4] 0048 ; -------------------------------------------------------------------------------------- 0048 ; Debug Table 0048 ; -------------------------------------------------------------------------------------- 0048 0004 000d | | .DEBUG4 0x0004,0x000d,0x9710,0x0000,0x0001,0x0000 004e 0000 0000 | | .XXX[0x16] 0050 000e 1404 | | 0052 0800 0100 | | 0054 8000 0000 | | 0056 0000 0000 | | 0058 000e 5004 | P | 005a 0000 0100 | | 005c 0000 0000 | | 005e 0000 6734 | g4| 0060 000e 1404 | | 0062 0800 0100 | | 0064 0000 0000 | | .BLANK 0000[0x4] 0068 077d 0004 | } | .XXX[0x10] 006a 0000 1644 | D| 006c 005e 40f2 | ^@ | 006e 0000 85a6 | | 0070 000e 5004 | P | 0072 0000 0100 | | 0074 0000 0000 | | 0076 0000 6734 | g4| 0078 0000 0000 | | .BLANK 0000[0x7] 007f 4000 |@ | .XXX[0x1] 0080 0000 0000 | | .BLANK 0000[0x8] 0088 000e 1c04 | | .XXX[0x1c] 008a 0000 034c | L| 008c 005e 40f2 | ^@ | 008e 0000 8468 | h| 0090 077d 0004 | } | 0092 0000 007f | | 0094 00d5 c40a | | 0096 0000 30f2 | 0 | 0098 077d 0004 | } | 009a 0000 04bf | | 009c 0010 41d6 | A | 009e 0000 8bbb | | 00a0 000e 1404 | | 00a2 0800 0100 | | 00a4 0000 0000 | | .BLANK 0000[0x4] 00a8 077d 0004 | } | .XXX[0x10] 00aa 0000 1644 | D| 00ac 005e 40f2 | ^@ | 00ae 0000 85a6 | | 00b0 000e 5004 | P | 00b2 0000 0100 | | 00b4 0000 0000 | | 00b6 0000 6734 | g4| 00b8 0000 0000 | | .BLANK 0000[0x7] 00bf 4000 000e |@ | .XXX[0x1d] 00c1 1c04 0000 | | 00c3 034c 005e | L ^| 00c5 40f2 0000 |@ | 00c7 8468 077d | h }| 00c9 1804 0000 | | 00cb 007f 00d5 | | 00cd c40a 0000 | | 00cf ec42 077d | B }| 00d1 1804 0000 | | 00d3 04bf 0011 | | 00d5 202a 0000 | * | 00d7 8c35 000e | 5 | 00d9 5004 0800 |P | 00db 0280 | | 00dc 0000 0000 | | .BLANK 0000[0x4] 00e0 000e 5004 | P | .XXX[0x14] 00e2 0000 0100 | | 00e4 0000 0000 | | 00e6 0000 6734 | g4| 00e8 000e 1404 | | 00ea 0800 0100 | | 00ec 8000 0000 | | 00ee 0000 0000 | | 00f0 000e 1404 | | 00f2 0800 0100 | | 00f4 0000 0000 | | .BLANK 0000[0x4] 00f8 077d 0004 | } | .XXX[0xc] 00fa 0000 1644 | D| 00fc 005e 40f2 | ^@ | 00fe 0000 85a6 | | 0100 000e 5004 | P | 0102 0800 0280 | | 0104 0000 0000 | | .BLANK 0000[0x4] 0108 000e 5004 | P | .XXX[0x8] 010a 0000 0100 | | 010c 0000 0000 | | 010e 0000 6734 | g4| 0110 0000 0000 | | .BLANK 0000[0x7] 0117 4000 000e |@ | .XXX[0x51] 0119 1c04 0000 | | 011b 034c 005e | L ^| 011d 40f2 0000 |@ | 011f 8468 077d | h }| 0121 1804 0000 | | 0123 007f 00cf | | 0125 5c0a 0000 |\ | 0127 16e2 077d | }| 0129 1804 0000 | | 012b 04bf 0011 | | 012d 9073 0000 | s | 012f 8c35 0001 | 5 | 0131 0404 0800 | | 0133 0100 0000 | | 0135 0000 0000 | | 0137 0001 000e | | 0139 1c04 0000 | | 013b 034c 005e | L ^| 013d 40f2 0000 |@ | 013f 8c35 077d | 5 }| 0141 0004 0000 | | 0143 1644 005e | D ^| 0145 40f2 0000 |@ | 0147 8c94 077d | }| 0149 1804 0000 | | 014b 0644 077d | D }| 014d 1804 0000 | | 014f 06d4 077d | }| 0151 0004 0000 | | 0153 1644 005e | D ^| 0155 40f2 0000 |@ | 0157 8c94 000e | | 0159 5004 0000 |P | 015b 0100 0000 | | 015d 0000 0000 | | 015f 6734 000e |g4 | 0161 1c04 0000 | | 0163 034c 005e | L ^| 0165 40f2 0000 |@ | 0167 8c35 | 5 | 0168 0000 0000 | | .BLANK 0000[0x7] 016f 0005 | | .XXX[0x1] 0170 0000 0000 | | .BLANK 0000[0x7] 0177 0005 077d | }| .XXX[0x7] 0179 1804 0000 | | 017b 0a98 077d | }| 017d 1c04 | | 017e 0000 0000 | | .BLANK 0000[0x9] 0187 0005 077d | }| .XXX[0xd] 0189 1804 0000 | | 018b 0a98 077d | }| 018d 1c04 0000 | | 018f 0000 000e | | 0191 1404 0800 | | 0193 0100 | | 0194 0000 0000 | | .BLANK 0000[0x4] 0198 077d 0004 | } | .XXX[0x18] 019a 0000 1644 | D| 019c 005e 40f2 | ^@ | 019e 0001 c067 | g| 01a0 000e 5004 | P | 01a2 0800 0280 | | 01a4 0000 0000 | | 01a6 0000 0002 | | 01a8 000e 5004 | P | 01aa 0000 0100 | | 01ac 0000 0000 | | 01ae 0002 8294 | | 01b0 0000 0000 | | .BLANK 0000[0x8] 01b8 0011 3c04 | < | .XXX[0x48] 01ba 0800 01cc | | 01bc 005e 40f2 | ^@ | 01be 0001 bf88 | | 01c0 077d 1804 | } | 01c2 0000 007f | | 01c4 00cf 5c0a | \ | 01c6 0000 16e2 | | 01c8 077d 1804 | } | 01ca 0000 04bf | | 01cc 0012 d073 | s| 01ce 0001 c776 | v| 01d0 0001 0404 | | 01d2 0800 0100 | | 01d4 0000 0000 | | 01d6 0000 0001 | | 01d8 0011 3c04 | < | 01da 0800 01cc | | 01dc 005e 40f2 | ^@ | 01de 0001 c776 | v| 01e0 077d 0004 | } | 01e2 0000 1644 | D| 01e4 005e 40f2 | ^@ | 01e6 0001 c7d5 | | 01e8 077d 1804 | } | 01ea 0000 0644 | D| 01ec 077d 1804 | } | 01ee 0000 06d4 | | 01f0 077d 0004 | } | 01f2 0000 1644 | D| 01f4 005e 40f2 | ^@ | 01f6 0001 c7d5 | | 01f8 000e 5004 | P | 01fa 0000 0100 | | 01fc 0000 0000 | | 01fe 0002 8294 | |