|
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_0bf8df
└─⟦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 0021 | ! | .CONST 0x0021 ; Address of begin 0019 0030 | 0 | .CONST 0x0030 ; Address of exception handler 001a 0002 | | .CONST 0x0002 ; Number of locals 001b INIT_0018: 001b e002 | | Load 0x0,0x2 001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001d 02c7 | | Declare_Variable Any 001e e002 | | Load 0x0,0x2 001f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0020 a402 | | Store_Unchecked 0x2,0x2 0021 BODY_0018: 0021 e5fa | | Load 0x2,-0x6 0022 e002 | | Load 0x0,0x2 0023 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0024 e002 | | Load 0x0,0x2 0025 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0026 e5fb | | Load 0x2,-0x5 0027 e5fc | | Load 0x2,-0x4 0028 e5fd | | Load 0x2,-0x3 0029 e5fe | | Load 0x2,-0x2 002a e5ff | | Load 0x2,-0x1 002b 8003 | | Call 0x0,0x3 002c 00d8 | | Load_Top At_Offset_0 002d e002 | | Load 0x0,0x2 002e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 002f 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0030 TRAP_0018: 0030 0007 | | Action Break_Optional 0031 e002 | | Load 0x0,0x2 0032 180e | | Execute Package,Field_Execute,Field_Number 0xe 0033 4808 |H | Short_Literal 0x8 0034 4801 |H | Short_Literal 0x1 0035 4801 |H | Short_Literal 0x1 0036 e004 | | Load 0x0,0x4 0037 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0038 e005 | | Load 0x0,0x5 0039 1813 | | Execute Package,Field_Execute,Field_Number 0x13 003a e002 | | Load 0x0,0x2 003b 180e | | Execute Package,Field_Execute,Field_Number 0xe 003c e002 | | Load 0x0,0x2 003d 1819 | | Execute Package,Field_Execute,Field_Number 0x19 003e 6805 |h | Jump_Zero 0x44 003f 00d9 | | Load_Top At_Offset_1 0040 e002 | | Load 0x0,0x2 0041 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0042 00d8 | | Load_Top At_Offset_0 0043 0101 | | Execute Exception,Reraise 0044 00d9 | | Load_Top At_Offset_1 0045 e002 | | Load 0x0,0x2 0046 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0047 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0048 ; -------------------------------------------------------------------------------------- 0048 ; Debug Table 0048 ; -------------------------------------------------------------------------------------- 0048 0004 0002 | | .DEBUG4 0x0004,0x0002,0x0b70,0x0000,0x0001,0x0000 004e 0000 0000 | | .BLANK 0000[0x4] 0052 002f 2c00 | /, | .XXX[0x24] 0054 1000 0797 | | 0056 fc03 6035 | `5| 0058 b1c0 602a | `*| 005a 5118 4de0 |Q M | 005c 5de0 49e0 |] I | 005e 45e0 41e0 |E A | 0060 3de0 39e0 |= 9 | 0062 35e0 31e0 |5 1 | 0064 3de0 29e0 |= ) | 0066 25e0 21e0 |% ! | 0068 1de0 19e0 | | 006a 15e0 11e0 | | 006c 1de0 09e0 | | 006e 05e0 0120 | | 0070 0110 0403 | | 0072 45ff f120 |E | 0074 0510 0400 | | 0076 0000 0000 | | .BLANK 0000[0x4] 007a 002f cc00 | / | .XXX[0x3b] 007c 1000 0797 | | 007e fe0b e5c0 | | 0080 2397 fe0a |# | 0082 35c0 0f97 |5 | 0084 fe0b e910 | | 0086 0520 0510 | | 0088 0520 0510 | | 008a 0430 0c00 | 0 | 008c 1000 0797 | | 008e f9a0 0b97 | | 0090 fd10 0f97 | | 0092 f407 6dc0 | m | 0094 0803 a910 | | 0096 0f97 f797 | | 0098 fc07 3110 | 1 | 009a 0c30 9800 | 0 | 009c 1000 0920 | | 009e 0797 fc03 | | 00a0 a40d 6c0c | l | 00a2 dc03 600c | ` | 00a4 d403 3790 | 7 | 00a6 0807 6409 | d | 00a8 8dc0 1520 | | 00aa 8390 1790 | | 00ac 0c07 58ff | X | 00ae ef90 0807 | | 00b0 5003 6003 |P ` | 00b2 a407 1910 | | 00b4 0400 | | 00b5 0000 0000 | | .BLANK 0000[0x5] 00ba 0030 cc00 | 0 | .XXX[0x53] 00bc 1000 0520 | | 00be 0f97 fc09 | | 00c0 c524 b009 | $ | 00c2 cc03 6003 | ` | 00c4 8c09 81c0 | | 00c6 0420 0510 | | 00c8 0400 0000 | | 00ca 0031 0c00 | 1 | 00cc 1000 0797 | | 00ce f403 6120 | a | 00d0 8120 0120 | | 00d2 2b97 ff81 |+ | 00d4 5c60 5c07 |\`\ | 00d6 2c02 486f |, Ho| 00d8 6407 3007 |d 0 | 00da 2d20 8120 |- | 00dc 0120 2b97 | + | 00de fb81 5c60 | \`| 00e0 5c07 3110 |\ 1 | 00e2 0c31 6c00 | 1l | 00e4 1000 0797 | | 00e6 f830 09a0 | 0 | 00e8 8b97 fb97 | | 00ea ff81 6060 | ``| 00ec 9409 f1a0 | | 00ee 6b97 f82b |k +| 00f0 fc03 6003 | ` | 00f2 9009 81c0 | | 00f4 0420 0797 | | 00f6 ff81 6060 | ``| 00f8 983c 9da0 | < | 00fa 3397 f828 |3 (| 00fc 0403 6003 | ` | 00fe 9009 81c0 | | 0100 0420 0797 | | 0102 ff81 6060 | ``| 0104 983c 9d10 | < | 0106 0920 0110 | | 0108 0920 0110 | | 010a 0920 0110 | | 010c 0800 | | 010d 0000 0000 | | .BLANK 0000[0x5] 0112 0032 2c00 | 2, | .XXX[0x44] 0114 1000 0797 | | 0116 fb97 fc07 | | 0118 7409 f5a0 |t | 011a 5797 fb97 |W | 011c fc07 7009 | p | 011e f1a0 3b97 | ; | 0120 f82b ff97 | + | 0122 fc07 5c3c | \<| 0124 9da0 1b97 | | 0126 f828 0797 | ( | 0128 fc07 5c3c | \<| 012a 9d10 0920 | | 012c 0110 0920 | | 012e 0110 0920 | | 0130 0110 0800 | | 0132 0032 cc00 | 2 | 0134 1000 0f97 | | 0136 fc07 6c03 | l | 0138 8c0f b397 | | 013a fc07 7003 | p | 013c 8c0f b390 | | 013e 0830 0da0 | 0 | 0140 4c03 602b |L `+| 0142 fb90 0f97 | | 0144 fc07 3c02 | < | 0146 486f 6807 |Hoh | 0148 7da0 2b97 |} + | 014a fc07 7790 | w | 014c 0c2b f797 | + | 014e fc07 3c02 | < | 0150 486f 6c07 |Hol | 0152 3110 0797 |1 | 0154 fd10 0400 | | 0156 0000 0000 | | .BLANK 0000[0x4] 015a 0033 7000 | 3p | .XXX[0x94] 015c 1000 0f97 | | 015e fb81 6060 | ``| 0160 9403 8c0f | | 0162 c797 fc07 | | 0164 6c03 8c0f |l | 0166 b390 0830 | 0| 0168 05a0 6390 | c | 016a 0803 6003 | ` | 016c 9009 81c0 | | 016e 0420 0797 | | 0170 fb81 6060 | ``| 0172 983c 29a0 | <) | 0174 3797 f920 |7 | 0176 8390 082b | +| 0178 fc03 6003 | ` | 017a 8c09 81c0 | | 017c 0420 0781 | | 017e 6060 9003 |`` | 0180 4514 0803 |E | 0182 6030 05a0 |`0 | 0184 8f90 0b90 | | 0186 0c09 f5a0 | | 0188 7f90 0803 | | 018a 6390 0c09 |c | 018c c803 6003 | ` | 018e 9009 81c0 | | 0190 0420 0797 | | 0192 fb81 6060 | ``| 0194 9d20 2b97 | + | 0196 fc07 2807 | ( | 0198 7da0 3b97 |} ; | 019a f920 8390 | | 019c 0b90 0c28 | (| 019e 0409 c803 | | 01a0 6003 8c09 |` | 01a2 81c0 0420 | | 01a4 0781 6060 | ``| 01a6 9003 4514 | E | 01a8 0800 0000 | | 01aa 0034 9000 | 4 | 01ac 1000 0803 | | 01ae 8797 fc07 | | 01b0 6f97 f807 |o | 01b2 6c09 cc28 |l (| 01b4 0431 41a0 | 1A | 01b6 0d20 0690 | | 01b8 09e0 3120 | 1 | 01ba 0397 f920 | | 01bc 2b81 5c60 |+ \`| 01be 7830 05a0 |x0 | 01c0 0d20 0690 | | 01c2 09e0 0920 | | 01c4 0290 0b97 | | 01c6 fc03 ab90 | | 01c8 0920 2b97 | + | 01ca f60c 3807 | 8 | 01cc 2a0c 3407 |* 4 | 01ce 3397 f807 |3 | 01d0 3110 0c00 |1 | 01d2 0035 2c00 | 5, | 01d4 1000 0797 | | 01d6 f5a0 5397 | S | 01d8 fb97 ff81 | | 01da 6060 9409 |`` | 01dc f1a0 3397 | 3 | 01de f828 0403 | ( | 01e0 6003 9009 |` | 01e2 81c0 0420 | | 01e4 0797 ff81 | | 01e6 6060 983c |`` <| 01e8 8910 0d20 | | 01ea 0110 0d20 | | 01ec 0110 0c00 | | 01ee 0000 0000 | | .BLANK 0000[0x4] 01f2 0035 ac00 | 5 | .XXX[0xe] 01f4 1000 0797 | | 01f6 f803 6003 | ` | 01f8 9009 81c0 | | 01fa 0420 0797 | | 01fc ff81 6060 | ``| 01fe 983c 89c0 | < |