|
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_5850da
└─⟦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 0060 | ` | .CONST 0x0060 ; 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 001d | | .CONST 0x001d ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0013 | | .CONST 0x0013 ; Number of locals 000b INIT_0008: 000b 00c4 | | Action Make_Default 000c 00c4 | | Action Make_Default 000d 00c4 | | Action Make_Default 000e 00c4 | | Action Make_Default 000f 00c4 | | Action Make_Default 0010 00c4 | | Action Make_Default 0011 00c4 | | Action Make_Default 0012 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated 0014 c212 | | Store 0x1,0x12 0015 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated 0017 c213 | | Store 0x1,0x13 0018 00bf | | Action Accept_Activation 0019 1d13 | | Execute_Immediate Reference_Lex_1,0x13 001a 00c7 | | Action Elaborate_Subprogram 001b 1d12 | | Execute_Immediate Reference_Lex_1,0x12 001c 00c7 | | Action Elaborate_Subprogram 001d BODY_0008: 001d 00bc | | Action Signal_Activated 001e 00bb | | Action Signal_Completion 001f 0000 | | .XXX[0x1] 0020 ; -------------------------------------------------------------------------------------- 0020 ; SUBPROGRAM 0020 ; -------------------------------------------------------------------------------------- 0020 002d | - | .CONST 0x002d ; Address of begin 0021 0004 | | .CONST 0x0004 ; Address of exception handler 0022 0002 | | .CONST 0x0002 ; Number of locals 0023 INIT_0020: 0023 e001 | | Load 0x0,0x1 0024 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0025 0322 | " | Declare_Variable Record 0026 00db | | Load_Top At_Offset_3 0027 e002 | | Load 0x0,0x2 0028 180e | | Execute Package,Field_Execute,Field_Number 0xe 0029 e002 | | Load 0x0,0x2 002a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 002b 00d9 | | Load_Top At_Offset_1 002c 017d | } | Execute Record,Structure_Write 002d BODY_0020: 002d 00d8 | | Load_Top At_Offset_0 002e e5ff | | Load 0x2,-0x1 002f e001 | | Load 0x0,0x1 0030 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0031 00db | | Load_Top At_Offset_3 0032 e003 | | Load 0x0,0x3 0033 180d | | Execute Package,Field_Execute,Field_Number 0xd 0034 e5f4 | | Load 0x2,-0xc 0035 00d9 | | Load_Top At_Offset_1 0036 e5ff | | Load 0x2,-0x1 0037 e5f5 | | Load 0x2,-0xb 0038 e5f6 | | Load 0x2,-0xa 0039 e5f7 | | Load 0x2,-0x9 003a e5f8 | | Load 0x2,-0x8 003b e5f9 | | Load 0x2,-0x7 003c e5fa | | Load 0x2,-0x6 003d e5fb | | Load 0x2,-0x5 003e e5fc | | Load 0x2,-0x4 003f e5fd | | Load 0x2,-0x3 0040 e5fe | | Load 0x2,-0x2 0041 8004 | | Call 0x0,0x4 0042 450d |E | Exit_Suprogram New_Top_Offset 0xd 0043 0000 0000 | | .BLANK 0000[0x5] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004f | O | .CONST 0x004f ; Address of begin 0049 0059 | Y | .CONST 0x0059 ; Address of exception handler 004a 0002 | | .CONST 0x0002 ; Number of locals 004b INIT_0048: 004b 4820 |H | Short_Literal 0x20 004c 00db | | Load_Top At_Offset_3 004d e005 | | Load 0x0,0x5 004e 181c | | Execute Package,Field_Execute,Field_Number 0x1c 004f BODY_0048: 004f 00d8 | | Load_Top At_Offset_0 0050 e001 | | Load 0x0,0x1 0051 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0052 e006 | | Load 0x0,0x6 0053 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0054 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b 0055 00d8 | | Load_Top At_Offset_0 0056 e001 | | Load 0x0,0x1 0057 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0058 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0059 TRAP_0048: 0059 0007 | | Action Break_Optional 005a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 005b 0000 0000 | | .BLANK 0000[0x5] 0060 ; -------------------------------------------------------------------------------------- 0060 ; Debug Table 0060 ; -------------------------------------------------------------------------------------- 0060 0004 000d | | .DEBUG4 0x0004,0x000d,0xa600,0x0000,0x0001,0x0000 0066 0000 0000 | | .BLANK 0000[0x14] 007a 0003 c845 | E| .XXX[0x7] 007c 2160 16e7 |!` | 007e 17c0 0000 | | 0080 0700 | | 0081 0000 0000 | | .BLANK 0000[0x5] 0086 0080 0000 | | .XXX[0xdc] 0088 0000 079a | | 008a 2a80 0000 |* | 008c 0040 0000 | @ | 008e 0040 0000 | @ | 0090 0080 0000 | | 0092 0080 0173 | s| 0094 7200 0000 |r | 0096 0100 0000 | | 0098 0400 0000 | | 009a 0000 3cd3 | < | 009c 8e00 0000 | | 009e 0200 0000 | | 00a0 0200 0000 | | 00a2 0400 0000 | | 00a4 0400 0b9b | | 00a6 9000 0000 | | 00a8 0800 0000 | | 00aa 2000 0000 | | 00ac 0001 e6ae | | 00ae 4000 0000 |@ | 00b0 1000 0000 | | 00b2 1000 0000 | | 00b4 2000 0000 | | 00b6 2000 5cdc | \ | 00b8 8000 0000 | | 00ba 4000 0001 |@ | 00bc 0000 0000 | | 00be 000f 3600 | 6 | 00c0 8000 0000 | | 00c2 8000 0000 | | 00c4 8000 000a | | 00c6 0000 0001 | | 00c8 0002 f0de | | 00ca 0000 0002 | | 00cc 0000 0008 | | 00ce 0000 0000 | | 00d0 0079 b478 | y x| 00d2 0000 0004 | | 00d4 0000 0004 | | 00d6 0000 0030 | 0| 00d8 0000 0008 | | 00da 0017 f870 | p| 00dc 0000 0010 | | 00de 0000 0040 | @| 00e0 0000 0000 | | 00e2 03cd c760 | `| 00e4 0000 0020 | | 00e6 0000 0020 | | 00e8 0000 00c0 | | 00ea 0000 0040 | @| 00ec 00bb 4d00 | M | 00ee 0000 0080 | | 00f0 0000 0200 | | 00f2 0000 0000 | | 00f4 1e6f 5800 | oX | 00f6 0000 0100 | | 00f8 0000 0100 | | 00fa 0000 0200 | | 00fc 0000 0200 | | 00fe 05da 6000 | ` | 0100 0000 0400 | | 0102 0000 1000 | | 0104 0000 0000 | | 0106 f383 a800 | | 0108 0000 0800 | | 010a 0000 0800 | | 010c 0000 1000 | | 010e 0000 1000 | | 0110 2ed4 6000 |. ` | 0112 0000 2000 | | 0114 0000 8000 | | 0116 0000 0007 | | 0118 9c64 8000 | d | 011a 0000 4000 | @ | 011c 0000 4000 | @ | 011e 0001 0000 | | 0120 0000 8001 | | 0122 7696 0000 |v | 0124 0001 0000 | | 0126 0004 0000 | | 0128 0000 003c | <| 012a e55e 0000 | ^ | 012c 0002 0000 | | 012e 0002 0000 | | 0130 0004 0000 | | 0132 0004 000b | | 0134 bc28 0000 | ( | 0136 0008 0000 | | 0138 00e0 0000 | | 013a 0080 0f10 | | 013c 23c8 4521 |# E!| 013e 6017 2560 |` %`| 0140 e00f 1023 | #| 0142 c845 2160 | E!`| 0144 1725 60e3 | %` | 0146 dcb3 2160 | !`| 0148 0000 1000 | | 014a 0000 0000 | | 014c 03d7 0540 | @| 014e 0000 0060 | `| 0150 004f 7040 | Op@| 0152 0000 0040 | @| 0154 1e20 7d60 | }`| 0156 0000 0500 | | 0158 0000 0a00 | | 015a 0000 2000 | | 015c 0003 d600 | | 015e 0000 0080 | | 0160 0000 0a00 | | 0162 0000 0000 | | .BLANK 0000[0x5] 0167 4e00 |N | .XXX[0x1] 0168 0000 0000 | | .BLANK 0000[0x5] 016d 003d cb32 | = 2| .XXX[0x78] 016f 1600 0060 | `| 0171 8000 0001 | | 0173 107b 9664 | { d| 0175 2c00 02bb |, | 0177 b000 0002 | | 0179 18f7 2cc8 | , | 017b 5800 00c0 |X | 017d 5000 0004 |P | 017f 71ee 5990 |q Y | 0181 b000 01ed | | 0183 6000 0008 |` | 0185 e3dc b321 | !| 0187 6000 177c |` || 0189 8000 0011 | | 018b 87b9 6642 | fB| 018d c000 5a5a | ZZ| 018f 8000 0023 | #| 0191 8f72 cc85 | r | 0193 8000 69f5 | i | 0195 0000 0043 | C| 0197 1ee5 990b | | 0199 0000 d0a0 | | 019b 0000 0088 | | 019d 3dcb 3216 |= 2 | 019f 0001 2f7c | /|| 01a1 0000 0110 | | 01a3 7b96 642c |{ d,| 01a5 0000 b3f8 | | 01a7 0000 0220 | | 01a9 f72c c858 | , X| 01ab 0005 5cd0 | \ | 01ad 0000 0431 | 1| 01af ee59 90b0 | Y | 01b1 000c 2f00 | / | 01b3 0000 08c3 | | 01b5 dcb3 2160 | !`| 01b7 000c a000 | | 01b9 0000 1187 | | 01bb b966 42c0 | fB | 01bd 0068 2c80 | h, | 01bf 0000 238f | # | 01c1 72cc 8580 |r | 01c3 0034 5100 | 4Q | 01c5 0000 471e | G | 01c7 e599 0b00 | | 01c9 0011 4e00 | N | 01cb 0000 8e3d | =| 01cd cb32 1600 | 2 | 01cf 02e7 8000 | | 01d1 0001 1c7b | {| 01d3 9664 2c00 | d, | 01d5 00d9 7000 | p | 01d7 0002 3c00 | < | 01d9 0000 f800 | | 01db 0001 f000 | | 01dd 0004 0000 | | 01df 00bc 1000 | | 01e1 0000 1000 | | 01e3 0001 f000 | | 01e5 0000 0000 | | .BLANK 0000[0x4] 01e9 0009 c000 | | .XXX[0x2] 01eb 0000 0000 | | .BLANK 0000[0x5] 01f0 07b9 6642 | fB| .XXX[0x10] 01f2 c000 0c10 | | 01f4 0000 0022 | "| 01f6 0f72 cc85 | r | 01f8 8000 5776 | Wv| 01fa 0000 0043 | C| 01fc 1ee5 990b | | 01fe 0000 180a | |