|
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_058cf1
└─⟦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 0080 | | .CONST 0x0080 ; 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 0028 | ( | .CONST 0x0028 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000e | | .CONST 0x000e ; Number of locals 000b INIT_0008: 000b e214 | | Load 0x1,0x14 000c 1b13 | | Execute Package,Field_Read,Field_Number 0x13 000d e214 | | Load 0x1,0x14 000e 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 000f e214 | | Load 0x1,0x14 0010 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0011 00e1 | | Load_Encached Boolean_Cache 0012 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0013 029f 004b | K| Declare_Subprogram INIT_0048,For_Call 0015 029f 0053 | S| Declare_Subprogram INIT_0050,For_Call 0017 e013 | | Load 0x0,0x13 0018 1916 | | Execute Package,Field_Reference,Field_Number 0x16 0019 00c6 | | Action Check_Subprogram_Elaborated 001a 4806 |H | Short_Literal 0x6 001b 4802 |H | Short_Literal 0x2 001c 0099 | | Action Reference_Dynamic 001d 4807 |H | Short_Literal 0x7 001e 4802 |H | Short_Literal 0x2 001f 0099 | | Action Reference_Dynamic 0020 e021 | ! | Load 0x0,0x21 0021 e022 | " | Load 0x0,0x22 0022 480c |H | Short_Literal 0xc 0023 0007 | | Action Break_Optional 0024 e023 | # | Load 0x0,0x23 0025 02ab | | Declare_Subprogram For_Call,With_Address 0026 e024 | $ | Load 0x0,0x24 0027 02ab | | Declare_Subprogram For_Call,With_Address 0028 BODY_0008: 0028 e214 | | Load 0x1,0x14 0029 1b12 | | Execute Package,Field_Read,Field_Number 0x12 002a 1b12 | | Execute Package,Field_Read,Field_Number 0x12 002b e011 | | Load 0x0,0x11 002c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 002d e018 | | Load 0x0,0x18 002e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 002f e214 | | Load 0x1,0x14 0030 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0031 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0032 c402 | | Store 0x2,0x2 0033 e214 | | Load 0x1,0x14 0034 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0035 e214 | | Load 0x1,0x14 0036 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0037 c403 | | Store 0x2,0x3 0038 e5ff | | Load 0x2,-0x1 0039 840d | | Call 0x2,0xd 003a e214 | | Load 0x1,0x14 003b 1b13 | | Execute Package,Field_Read,Field_Number 0x13 003c e403 | | Load 0x2,0x3 003d e214 | | Load 0x1,0x14 003e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 003f c404 | | Store 0x2,0x4 0040 e5fb | | Load 0x2,-0x5 0041 e5fc | | Load 0x2,-0x4 0042 e5fd | | Load 0x2,-0x3 0043 e5fe | | Load 0x2,-0x2 0044 e404 | | Load 0x2,0x4 0045 840e | | Call 0x2,0xe 0046 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0047 0000 | | .XXX[0x1] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004b | K | .CONST 0x004b ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0001 | | .CONST 0x0001 ; Number of locals 004b BODY_0048: 004b INIT_0048: 004b 00da | | Load_Top At_Offset_2 004c e402 | | Load 0x2,0x2 004d e214 | | Load 0x1,0x14 004e 1819 | | Execute Package,Field_Execute,Field_Number 0x19 004f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0050 ; -------------------------------------------------------------------------------------- 0050 ; SUBPROGRAM 0050 ; -------------------------------------------------------------------------------------- 0050 0053 | S | .CONST 0x0053 ; Address of begin 0051 0004 | | .CONST 0x0004 ; Address of exception handler 0052 0001 | | .CONST 0x0001 ; Number of locals 0053 BODY_0050: 0053 INIT_0050: 0053 00da | | Load_Top At_Offset_2 0054 8213 | | Call 0x1,0x13 0055 e405 | | Load 0x2,0x5 0056 6811 |h | Jump_Zero 0x68 0057 e00e | | Load 0x0,0xe 0058 180e | | Execute Package,Field_Execute,Field_Number 0xe 0059 4800 |H | Short_Literal 0x0 005a e7fe | | Load 0x3,-0x2 005b e008 | | Load 0x0,0x8 005c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 005d 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 005e 0092 0073 | s| Action Push_String_Extended,0x73 ; " depends upon " 0060 01cc | | Execute Vector,Catenate 0061 e7ff | | Load 0x3,-0x1 0062 e008 | | Load 0x0,0x8 0063 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0064 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0065 01cc | | Execute Vector,Catenate 0066 e00f | | Load 0x0,0xf 0067 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0068 00db | | Load_Top At_Offset_3 0069 00db | | Load_Top At_Offset_3 006a e403 | | Load 0x2,0x3 006b e214 | | Load 0x1,0x14 006c 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 006d e402 | | Load 0x2,0x2 006e 00db | | Load_Top At_Offset_3 006f e214 | | Load 0x1,0x14 0070 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0071 c402 | | Store 0x2,0x2 0072 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0073 ; -------------------------------------------------------------------------------------- 0073 ; STRING TABLE 0073 ; -------------------------------------------------------------------------------------- 0073 0004 | | .STRTAB 0x0004->0x0075 ; " depends upon " 0074 0010 | | .STREND 0x0010->0x007c 0075 2064 6570 | dep| .STRTAB_STRINGS 007c 0000 0000 | | .BLANK 0000[0x4] 0080 ; -------------------------------------------------------------------------------------- 0080 ; Debug Table 0080 ; -------------------------------------------------------------------------------------- 0080 0004 000d | | .DEBUG4 0x0004,0x000d,0x4d05,0x0000,0x0001,0x0000 0086 e3a0 0807 | | .XXX[0x8] 0088 3002 488a |0 H | 008a ac07 3210 | 2 | 008c 2914 0400 |) | 008e 0000 0000 | | .BLANK 0000[0x6] 0094 0081 1400 | | .XXX[0xa3] 0096 1000 0f80 | | 0098 146c 740b | lt | 009a 1f9f ff80 | | 009c 146d b060 | m `| 009e 4720 0803 |G | 00a0 8c18 0003 | | 00a2 3de0 3003 |= 0 | 00a4 6b80 1460 |k `| 00a6 7e10 5403 |~ T | 00a8 6b80 1460 |k `| 00aa 8720 0803 | | 00ac 6428 0401 |d( | 00ae 6803 2403 |h $ | 00b0 6b80 146c |k l| 00b2 7804 bdbf |x | 00b4 bc03 3803 | 8 | 00b6 6210 3114 |b 1 | 00b8 0400 0000 | | 00ba 0000 0000 | | 00bc 0081 fc00 | | 00be 1000 1b9f | | 00c0 ff80 146d | m| 00c2 b060 4803 | `H | 00c4 8c0f c79f | | 00c6 ff80 146d | m| 00c8 b060 4c03 | `L | 00ca 8c0f c79f | | 00cc ff80 146d | m| 00ce b060 5003 | `P | 00d0 8c0f c79f | | 00d2 ff80 5060 | P`| 00d4 c403 8c0f | | 00d6 c79f ff80 | | 00d8 5060 c803 |P` | 00da 8c0f c7a0 | | 00dc 0830 05a0 | 0 | 00de 2520 0380 |% | 00e0 146c 5120 | lQ | 00e2 2ba0 0a09 |+ | 00e4 6802 488b |h H | 00e6 e610 3403 | 4 | 00e8 6c30 05a0 |l0 | 00ea 2520 0380 |% | 00ec 146c 5120 | lQ | 00ee 2ba0 0e09 |+ | 00f0 6802 488b |h H | 00f2 ea10 3403 | 4 | 00f4 6830 05a0 |h0 | 00f6 2520 0380 |% | 00f8 146c 5120 | lQ | 00fa 2ba0 1209 |+ | 00fc 6802 488b |h H | 00fe ee10 3403 | 4 | 0100 6430 05a0 |d0 | 0102 2520 0380 |% | 0104 146c 5120 | lQ | 0106 2ba0 1609 |+ | 0108 6802 488b |h H | 010a f210 3403 | 4 | 010c 6030 05a0 |`0 | 010e 2520 0380 |% | 0110 146c 5120 | lQ | 0112 2803 6e09 |( n | 0114 6802 488b |h H | 0116 f610 3514 | 5 | 0118 0400 0000 | | 011a 0134 d058 | 4 X| 011c 0800 0000 | | 011e 0000 0100 | | 0120 0000 0000 | | 0122 0000 0012 | | 0124 bc00 0000 | | 0126 0001 34d0 | 4 | 0128 5800 0000 |X | 012a 0000 0000 | | 012c 0083 4c00 | L | 012e 1000 0403 | | 0130 6b80 206d |k m| 0132 0060 3780 | `7 | 0134 5460 6d10 |T`m | 0136 0400 | | 0137 0000 0000 | | .BLANK 0000[0x5] 013c 0083 c800 | | .XXX[0x64] 013e 1000 1120 | | 0140 0403 6c08 | l | 0142 5c07 6f98 |\ o | 0144 100c d120 | | 0146 03a7 fc08 | | 0148 5c07 6c03 |\ l | 014a 8c0f e01c | | 014c 0003 8418 | | 014e 0003 3fa7 | ? | 0150 fc08 5c07 | \ | 0152 6409 8dc0 |d | 0154 7803 63a7 |x c | 0156 fc08 5c07 | \ | 0158 5da0 3403 |] 4 | 015a 6dc0 5520 |m U | 015c 06a0 13a0 | | 015e 0c28 0720 | ( | 0160 0c03 63a0 | c | 0162 0fa0 0807 | | 0164 54e0 01e0 |T | 0166 2803 6da0 |( m | 0168 2120 02a0 |! | 016a 1003 602b | `+| 016c ffa0 0fa0 | | 016e 0807 54e0 | T | 0170 0403 20ff | | 0172 8803 3803 | 8 | 0174 61a0 23a7 |a # | 0176 fc08 5c07 | \ | 0178 702b fc03 |p+ | 017a 6ba0 0807 |k | 017c 54e0 0520 |T | 017e 0403 6ba0 | k | 0180 0807 3d10 | = | 0182 0400 0000 | | 0184 0084 ac00 | | 0186 1000 0403 | | 0188 68f0 0003 |h | 018a 6cf0 0409 |l | 018c fda0 1520 | | 018e 2803 6cf0 |( l | 0190 0209 6910 | i | 0192 0520 2803 | ( | 0194 6cf0 0209 |l | 0196 6802 488b |h H | 0198 f807 3120 | 1 | 019a 2ba7 fcf0 |+ | 019c 0609 6807 | h | 019e 3110 0400 |1 | 01a0 0000 0000 | | .BLANK 0000[0x4] 01a4 0085 4c00 | L | .XXX[0x5c] 01a6 1000 0c03 | | 01a8 6807 7403 |h t | 01aa 8c0f b003 | | 01ac 6c07 7003 |l p | 01ae 8c0f b3a7 | | 01b0 fc07 6c2c | l,| 01b2 01c0 482c | H,| 01b4 05c0 4803 | H | 01b6 6ba7 fc07 |k | 01b8 5618 1802 |V | 01ba 488b 5807 |H X | 01bc 3003 6c28 |0 l(| 01be 0409 2003 | | 01c0 6fa7 fc07 |o | 01c2 3e18 1c07 |> | 01c4 3110 0403 |1 | 01c6 a910 0403 | | 01c8 6ba7 fc07 |k | 01ca 5618 1910 |V | 01cc 0485 cc85 | | 01ce e000 0403 | | 01d0 6808 5c07 |h \ | 01d2 6c30 0510 |l0 | 01d4 0404 39a0 | 9 | 01d6 0920 0110 | | 01d8 0404 0000 | | 01da 0000 0000 | | 01dc 0086 0c00 | | 01de 1000 0403 | | 01e0 6b80 5060 |k P`| 01e2 6f80 506c |o Pl| 01e4 6009 7870 |` xp| 01e6 0608 3d10 | = | 01e8 0400 0000 | | 01ea 0000 0000 | | 01ec 0086 4c00 | L | 01ee 1000 0403 | | 01f0 6a18 1002 |j | 01f2 488b fc07 |H | 01f4 3120 03a7 |1 | 01f6 ff98 0b80 | | 01f8 5060 7380 |P`s | 01fa 146d b060 | m `| 01fc 6e08 3c07 |n < | 01fe 3110 0400 |1 |