|
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 001b | | .CONST 0x001b ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0001 | | .CONST 0x0001 ; Number of locals 001b BODY_0018: 001b INIT_0018: 001b e001 | | Load 0x0,0x1 001c 181f | | Execute Package,Field_Execute,Field_Number 0x1f 001d 6806 |h | Jump_Zero 0x24 001e e5fd | | Load 0x2,-0x3 001f e5fe | | Load 0x2,-0x2 0020 e5ff | | Load 0x2,-0x1 0021 e002 | | Load 0x0,0x2 0022 180e | | Execute Package,Field_Execute,Field_Number 0xe 0023 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0024 0092 0029 | )| Action Push_String_Extended,0x29 ; "Operator Capability is required to use this command." 0026 e003 | | Load 0x0,0x3 0027 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0028 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0029 ; -------------------------------------------------------------------------------------- 0029 ; STRING TABLE 0029 ; -------------------------------------------------------------------------------------- 0029 0004 | | .STRTAB 0x0004->0x002b ; "Operator Capability is required to use this command." 002a 0036 | 6 | .STREND 0x0036->0x0045 002b 4f70 6572 |Oper| .STRTAB_STRINGS 0045 0000 0000 | | .XXX[0x3] 0047 0000 | | 0048 ; -------------------------------------------------------------------------------------- 0048 ; Debug Table 0048 ; -------------------------------------------------------------------------------------- 0048 0004 000b | | .DEBUG4 0x0004,0x000b,0xbb5d,0x0000,0x0001,0x0000 004e c8e4 c881 | | .XXX[0x1b2] 0050 60a0 e4a5 |` | 0052 4c28 9495 |L( | 0054 4185 9d95 |A | 0056 51c9 85a5 |Q | 0058 b195 c828 | (| 005a bdc1 85c1 | | 005c 95c8 b585 | | 005e d5d1 bdb5 | | 0060 85d1 a58c | | 0062 81d1 c9d5 | | 0064 9481 4d41 | MA| 0066 4c80 c481 |L | 0068 4140 8115 |A@ | 006a 4028 9495 |@( | 006c 4185 9d95 |A | 006e 09bd d5b9 | | 0070 91a5 b99d | | 0072 09bd e0e8 | | 0074 80dc e080 | | 0076 cce4 80d4 | | 0078 d0d8 80dc | | 007a c4e0 2828 | ((| 007c 9495 4185 | A | 007e 9d95 09bd | | 0080 d5b9 91a5 | | 0082 b99d 09bd | | 0084 e0e8 80a1 | | 0086 85d1 95b9 | | 0088 90a4 2894 | ( | 008a 9509 959d | | 008c a5b9 4185 | A | 008e 9d95 4d95 | M | 0090 d1d5 c028 | (| 0092 c4c0 c0c0 | | 0094 8109 4080 | @ | 0096 cccc c0c0 | | 0098 80c8 d4d4 | | 009a c081 4134 | A4| 009c 80bd c185 | | 009e c195 c8b5 | | 00a0 85d5 d1bd | | 00a2 b585 d1a5 | | 00a4 8c81 9985 | | 00a6 b1cd 9481 | | 00a8 4d41 4c80 |MAL | 00aa d0c4 c080 | | 00ac c081 6164 | ad| 00ae 2894 9515 |( | 00b0 b991 4185 | A | 00b2 9d95 4d95 | M | 00b4 d1d5 c028 | (| 00b6 d0c4 c080 | | 00b8 ccd0 c881 | | 00ba 6164 8118 |ad | 00bc d8a1 70c8 | p | 00be d8dc a54c | L| 00c0 80d8 e081 | | 00c2 e0a1 25d0 | % | 00c4 a54c 80c8 | L | 00c6 cc81 e0a1 | | 00c8 b585 e4a5 | | 00ca 4c80 c8cc |L | 00cc 81e0 a1a1 | | 00ce 85c1 c195 | | 00d0 b8a5 4c80 | L | 00d2 c8cc 81e0 | | 00d4 a1d1 a185 | | 00d6 d0a5 4c28 | L(| 00d8 c8cc 81e0 | | 00da a1d1 a194 | | 00dc a54c 80c8 | L | 00de cc81 e0a1 | | 00e0 8dbd b5c1 | | 00e2 d5d1 9590 | | 00e4 a54c 80c8 | L | 00e6 cc81 e0a1 | | 00e8 c995 cdd5 | | 00ea b1d0 a54c | L| 00ec 80c8 cc81 | | 00ee e0a1 a5cc | | 00f0 a54c 80c8 | L | 00f2 cc81 e0a1 | | 00f4 cdbc a54c | L| 00f6 80c8 cc81 | | 00f8 e028 a1b1 | ( | 00fa 85c8 a54c | L| 00fc 80b4 c481 | | 00fe e0a1 9d94 | | 0100 b0a5 4c80 | L | 0102 c8d8 81e0 | | 0104 a1a5 b8a5 | | 0106 4c80 c8cc |L | 0108 81e0 a1b5 | | 010a 859d b9a5 | | 010c d1d5 9194 | | 010e b0a5 4c80 | L | 0110 c8d4 81e0 | | 0112 a1d1 a185 | | 0114 d0a5 4c80 | L | 0116 c8cc 81e0 | | 0118 a1a5 d0a5 | | 011a 4c28 c8cc |L( | 011c 81e0 a195 | | 011e e18d 9595 | | 0120 91cc a54c | L| 0122 80c8 cc81 | | 0124 e0a1 d1a1 | | 0126 94a5 4c80 | L | 0128 c8cc 81e0 | | 012a a1a1 85c9 | | 012c 91dd 85c9 | | 012e 949d cca5 | | 0130 4c80 d0e4 |L | 0132 81e4 80d0 | | 0134 e4cc 8160 | `| 0136 28a1 c995 |( | 0138 c1c9 95cd | | 013a 95b9 d185 | | 013c d1a5 bdb9 | | 013e 85b0 a54c | L| 0140 80c4 dc81 | | 0142 e0a1 8d85 | | 0144 c185 89a5 | | 0146 b1a5 d1a5 | | 0148 95cd 70cc | p | 014a c8c1 a4b9 | | 014c 94b8 b0a5 | | 014e 4c80 c4e0 |L | 0150 81e0 a1a5 | | 0152 d0a5 4c80 | L | 0154 c4e0 81e0 | | 0156 28a1 bdd9 |( | 0158 95c8 a54c | L| 015a 28a1 70c0 |( p | 015c c4d5 bddd | | 015e ccb8 a54c | L| 0160 80dc d481 | | 0162 e480 d0c4 | | 0164 c081 60a1 | ` | 0166 51a1 94a5 |Q | 0168 4c80 c4d0 |L | 016a 81e0 a170 | p| 016c c0c4 d1c9 | | 016e cdd0 a54c | L| 0170 80c4 d481 | | 0172 e0a1 bd98 | | 0174 a54c 80c4 | L | 0176 d481 e0a1 | | 0178 d1a1 95cd | | 017a 94a5 4c28 | L(| 017c c4d4 81e0 | | 017e a1b5 a5cd | | 0180 99bd c9d1 | | 0182 d5b9 95cc | | 0184 a54c 80c4 | L | 0186 d081 e0a1 | | 0188 8d85 b8a5 | | 018a 4c80 c4d4 |L | 018c 81e0 a1bd | | 018e 8d8d d5c8 | | 0190 a54c 80c4 | L | 0192 d481 e0a1 | | 0194 91d5 c9a5 | | 0196 b99c a54c | L| 0198 80c4 d481 | | 019a e0a1 85b9 | | 019c e4a5 4c28 | L(| 019e c4d0 81e0 | | 01a0 a1c1 85c9 | | 01a2 85b5 95d1 | | 01a4 95c8 a54c | L| 01a6 80c4 d481 | | 01a8 e0a1 85cd | | 01aa cdbd 8da5 | | 01ac 85d1 a5bd | | 01ae b8a5 4c80 | L | 01b0 c4d4 81e0 | | 01b2 a1bd c8a5 | | 01b4 4c80 c4d0 |L | 01b6 81e0 a1bd | | 01b8 b8a5 4c80 | L | 01ba c4d0 81e0 | | 01bc a185 b9e4 | | 01be a54c 28c4 | L( | 01c0 d481 e0a1 | | 01c2 99d5 b98d | | 01c4 d1a5 bdb8 | | 01c6 a54c 80c4 | L | 01c8 d481 e0a1 | | 01ca c995 d1d5 | | 01cc c9b8 eca5 | | 01ce 4c80 c4d4 |L | 01d0 81e0 a1a5 | | 01d2 d0a5 4c80 | L | 01d4 c4d4 81e0 | | 01d6 a1a5 cca5 | | 01d8 4c80 c4d4 |L | 01da 81e0 a1b9 | | 01dc bdd0 a54c | L| 01de 80d4 c081 | | 01e0 e480 28cc | ( | 01e2 c8dc 8160 | `| 01e4 a1c1 958d | | 01e6 d5b1 a585 | | 01e8 c8a5 4c80 | L | 01ea c4c4 81e0 | | 01ec a1d1 bca5 | | 01ee 4c80 c4c8 |L | 01f0 81e0 a1d1 | | 01f2 a194 a54c | L| 01f4 80c4 c881 | | 01f6 e0a1 99d5 | | 01f8 b98d d1a5 | | 01fa bdb9 cca5 | | 01fc 4c80 c4c4 |L | 01fe 81e0 a1a5 | |