|
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_03b8fe
└─⟦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 0024 | $ | .CONST 0x0024 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0005 | | .CONST 0x0005 ; Number of locals 001b INIT_0018: 001b e001 | | Load 0x0,0x1 001c 1915 | | Execute Package,Field_Reference,Field_Number 0x15 001d 00c6 | | Action Check_Subprogram_Elaborated 001e e002 | | Load 0x0,0x2 001f 1964 | d | Execute Package,Field_Reference,Field_Number 0x64 0020 e003 | | Load 0x0,0x3 0021 e004 | | Load 0x0,0x4 0022 4805 |H | Short_Literal 0x5 0023 0007 | | Action Break_Optional 0024 BODY_0018: 0024 e5ff | | Load 0x2,-0x1 0025 700b |p | Jump_Nonzero 0x31 0026 48ff |H | Short_Literal 0xff 0027 4800 |H | Short_Literal 0x0 0028 4802 |H | Short_Literal 0x2 0029 4802 |H | Short_Literal 0x2 002a 0099 | | Action Reference_Dynamic 002b 4803 |H | Short_Literal 0x3 002c 4802 |H | Short_Literal 0x2 002d 0099 | | Action Reference_Dynamic 002e e001 | | Load 0x0,0x1 002f 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0030 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0031 e5ff | | Load 0x2,-0x1 0032 00d8 | | Load_Top At_Offset_0 0033 e005 | | Load 0x0,0x5 0034 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 0035 0260 | ` | Execute Discrete,In_Type 0036 7001 |p | Jump_Nonzero 0x38 0037 08e0 | | Execute_Immediate Raise,0xe0 0038 e5ff | | Load 0x2,-0x1 0039 00d8 | | Load_Top At_Offset_0 003a e005 | | Load 0x0,0x5 003b 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e 003c 0260 | ` | Execute Discrete,In_Type 003d 7001 |p | Jump_Nonzero 0x3f 003e 08e0 | | Execute_Immediate Raise,0xe0 003f 4802 |H | Short_Literal 0x2 0040 4802 |H | Short_Literal 0x2 0041 0099 | | Action Reference_Dynamic 0042 4803 |H | Short_Literal 0x3 0043 4802 |H | Short_Literal 0x2 0044 0099 | | Action Reference_Dynamic 0045 e001 | | Load 0x0,0x1 0046 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0047 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0048 ; -------------------------------------------------------------------------------------- 0048 ; Debug Table 0048 ; -------------------------------------------------------------------------------------- 0048 0004 000b | | .DEBUG4 0x0004,0x000b,0xbb69,0x0000,0x0001,0x0000 004e e0a1 d185 | | .XXX[0x1b2] 0050 a5b1 bdc9 | | 0052 9590 a54c | L| 0054 28c4 d481 |( | 0056 e0a1 d1bc | | 0058 a54c 80c4 | L | 005a d481 e0a1 | | 005c d1a1 85d0 | | 005e a54c 80c4 | L | 0060 d481 e0a1 | | 0062 c1c9 958d | | 0064 a5cd a5bd | | 0066 b8a5 4c80 | L | 0068 c4d4 81e0 | | 006a a170 a199 | p | 006c bdc8 a54c | L| 006e 80c4 d881 | | 0070 e0a1 95e1 | | 0072 85b5 c1b1 | | 0074 94b0 a54c | L| 0076 28c4 d481 |( | 0078 e0a1 89e4 | | 007a a54c 80c4 | L | 007c d481 e0a1 | | 007e d5cd a5b9 | | 0080 9ca5 4c80 | L | 0082 d4c0 81e4 | | 0084 80d0 e4cc | | 0086 8160 a1d1 | ` | 0088 a194 a54c | L| 008a 80c4 d081 | | 008c e0a1 85c1 | | 008e c1c9 bdc1 | | 0090 c9a5 85d1 | | 0092 94a5 4c80 | L | 0094 c4d4 81e0 | | 0096 28a1 b9d5 |( | 0098 b589 95c8 | | 009a a54c 80c4 | L | 009c d081 e0a1 | | 009e bd98 a54c | L| 00a0 80c4 d081 | | 00a2 e0a1 d195 | | 00a4 c9b5 ccb0 | | 00a6 a54c 80c4 | L | 00a8 d081 e0a1 | | 00aa dda5 d1a0 | | 00ac a54c 80c4 | L | 00ae d481 e0a1 | | 00b0 85c1 c1c9 | | 00b2 bdc1 c9a5 | | 00b4 85d1 94a5 | | 00b6 4c80 28c4 |L ( | 00b8 d081 e0a1 | | 00ba 8dbd 9598 | | 00bc a54c 80b4 | L | 00be c481 e0a1 | | 00c0 70c0 c4d1 |p | 00c2 8da5 95b9 | | 00c4 d1cc b0a5 | | 00c6 4c80 c4d4 |L | 00c8 81e0 a1a5 | | 00ca b8a5 4c80 | L | 00cc c4d4 81e0 | | 00ce a184 a54c | L| 00d0 80c4 d481 | | 00d2 e028 a1c1 | ( | 00d4 bdb1 e5b9 | | 00d6 bdb5 a585 | | 00d8 b170 a4b8 | p | 00da a54c 80c8 | L | 00dc c081 e0a1 | | 00de 3db8 a54c |= L| 00e0 80c4 d481 | | 00e2 e0a1 d1a1 | | 00e4 94a5 4c80 | L | 00e6 c4d4 81e0 | | 00e8 a1bd d1a1 | | 00ea 95c8 a54c | L| 00ec 80c4 d481 | | 00ee e0a1 a185 | | 00f0 b990 b0a5 | | 00f2 4c80 c4d0 |L | 00f4 81e0 28a1 | ( | 00f6 d1a1 94a5 | | 00f8 4c80 d0e4 |L | 00fa 81e4 80d0 | | 00fc e4cc 8160 | `| 00fe a191 95c1 | | 0100 95b9 9195 | | 0102 b98d 94a5 | | 0104 4c80 c4d0 |L | 0106 81e0 a1bd | | 0108 98a5 4c80 | L | 010a c4d0 81e0 | | 010c a1d1 a194 | | 010e a54c 80c4 | L | 0110 d081 e0a1 | | 0112 85c8 a54c | L| 0114 80b4 c481 | | 0116 e028 a19d | ( | 0118 d5b5 95b9 | | 011a d0a5 4c80 | L | 011c c4d0 81e0 | | 011e a1c9 9591 | | 0120 d58d d1a5 | | 0122 bdb8 a54c | L| 0124 80c4 d081 | | 0126 e0a1 85b9 | | 0128 90a5 4c80 | L | 012a c4d0 81e0 | | 012c a1c9 95cd | | 012e d5b1 d0a5 | | 0130 4c80 c4d0 |L | 0132 81e0 28a1 | ( | 0134 8dbd b9cd | | 0136 d1c9 d58d | | 0138 d1a5 bdb8 | | 013a a54c 80c4 | L | 013c d081 e0a1 | | 013e cdd1 95c1 | | 0140 cca5 4c80 | L | 0142 c4d0 81e0 | | 0144 a1bd b8a5 | | 0146 4c80 c4d0 |L | 0148 81e0 a1d1 | | 014a a194 a54c | L| 014c 80c4 d081 | | 014e e0a1 c1c9 | | 0150 958d a5cd | | 0152 a5bd b8a5 | | 0154 4c28 c4d0 |L( | 0156 81e0 a1c9 | | 0158 95c5 d5a5 | | 015a c995 90a5 | | 015c 4c80 c4d0 |L | 015e 81e0 a1a5 | | 0160 cca5 4c80 | L | 0162 c4d0 81e0 | | 0164 a18d bdb9 | | 0166 70c0 c4d1 |p | 0168 b995 90a5 | | 016a 4c80 d4c0 |L | 016c 81e4 80d0 | | 016e e4cc 8160 | `| 0170 a1d1 bca5 | | 0172 4c80 c4cc |L | 0174 81e0 28a1 | ( | 0176 d1a1 94a5 | | 0178 4c80 c4cc |L | 017a 81e0 a191 | | 017c 958d b185 | | 017e c985 d1a5 | | 0180 bdb9 cca5 | | 0182 4c80 c4c8 |L | 0184 81e0 a1bd | | 0186 98a5 4c80 | L | 0188 c4c8 81e0 | | 018a a1d1 a194 | | 018c a54c 80c4 | L | 018e c881 e0a1 | | 0190 ddbd c9ad | | 0192 a5b9 9ca5 | | 0194 4c80 c4c8 |L | 0196 81e0 28a1 | ( | 0198 d985 c9a5 | | 019a 8589 b195 | | 019c cca5 4c80 | L | 019e c4c8 81e0 | | 01a0 a1b9 9595 | | 01a2 9195 90a5 | | 01a4 4c80 c4c8 |L | 01a6 81e0 a1a5 | | 01a8 b8a5 4c80 | L | 01aa c4c8 81e0 | | 01ac a1d1 a1bd | | 01ae cd94 a54c | L| 01b0 80c4 c881 | | 01b2 e0a1 cdd1 | | 01b4 95c1 ccec | | 01b6 a54c 80c4 | L | 01b8 cc81 e028 | (| 01ba a1d1 a194 | | 01bc a54c 80c4 | L | 01be cc81 e0a1 | | 01c0 cd85 b594 | | 01c2 a54c 80c4 | L | 01c4 c881 e0a1 | | 01c6 85c8 a54c | L| 01c8 80b4 c481 | | 01ca e0a1 9dd5 | | 01cc b595 b9d0 | | 01ce a54c 80c4 | L | 01d0 d081 e0a1 | | 01d2 c995 91d5 | | 01d4 8dd1 a5bd | | 01d6 b8a5 4c80 | L | 01d8 c4cc 81e0 | | 01da 28a1 85b1 |( | 01dc 9dbd c9a5 | | 01de d1a1 b4a5 | | 01e0 4c80 d4c0 |L | 01e2 81e4 80d0 | | 01e4 e4cc 8160 | `| 01e6 a1bd c8a5 | | 01e8 4c80 c4d4 |L | 01ea 81e0 a1c9 | | 01ec 95cd d5b1 | | 01ee d0a5 4c80 | L | 01f0 c4d8 81e0 | | 01f2 a18d bdb9 | | 01f4 cdd1 c9d5 | | 01f6 8dd1 a5bd | | 01f8 b8a5 4c80 | L | 01fa c4d8 81e0 | | 01fc 28a1 85b1 |( | 01fe 9dbd c9a5 | |