|
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_1060f5
└─⟦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 0040 | @ | .CONST 0x0040 ; 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 0010 | | .CONST 0x0010 ; Number of locals 000b INIT_0008: 000b 6020 |` | Indirect_Literal Discrete,0x2c,{0x00000000, 0x00000400} 000c e001 | | Load 0x0,0x1 000d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 000e 1c08 | | Execute_Immediate Run_Utility,0x8 000f 0129 | ) | Execute Any,Make_Visible 0010 00d8 | | Load_Top At_Offset_0 0011 1c00 | | Execute_Immediate Run_Utility,0x0 0012 e002 | | Load 0x0,0x2 0013 0129 | ) | Execute Any,Make_Visible 0014 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated 0016 029a 0033 | 3| Declare_Subprogram INIT_0030,For_Outer_Call,Visible,Unelaborated 0018 00bf | | Action Accept_Activation 0019 1d0f | | Execute_Immediate Reference_Lex_1,0xf 001a 00c7 | | Action Elaborate_Subprogram 001b 1d10 | | Execute_Immediate Reference_Lex_1,0x10 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 0023 | # | .CONST 0x0023 ; Address of begin 0021 0004 | | .CONST 0x0004 ; Address of exception handler 0022 0001 | | .CONST 0x0001 ; Number of locals 0023 BODY_0020: 0023 INIT_0020: 0023 e20d | | Load 0x1,0xd 0024 00db | | Load_Top At_Offset_3 0025 e001 | | Load 0x0,0x1 0026 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0027 00d1 | | Pop_Control Pop_Count_1 0028 e20e | | Load 0x1,0xe 0029 0257 | W | Execute Discrete,Raise 002a 0000 0000 | | .XXX[0x2] 002c 0000 0000 | | .LITERAL {0x00000000, 0x00000400} 0030 ; -------------------------------------------------------------------------------------- 0030 ; SUBPROGRAM 0030 ; -------------------------------------------------------------------------------------- 0030 0033 | 3 | .CONST 0x0033 ; Address of begin 0031 0004 | | .CONST 0x0004 ; Address of exception handler 0032 0001 | | .CONST 0x0001 ; Number of locals 0033 BODY_0030: 0033 INIT_0030: 0033 e20d | | Load 0x1,0xd 0034 00db | | Load_Top At_Offset_3 0035 e001 | | Load 0x0,0x1 0036 180f | | Execute Package,Field_Execute,Field_Number 0xf 0037 00d1 | | Pop_Control Pop_Count_1 0038 e20e | | Load 0x1,0xe 0039 0257 | W | Execute Discrete,Raise 003a 0000 0000 | | .BLANK 0000[0x6] 0040 ; -------------------------------------------------------------------------------------- 0040 ; Debug Table 0040 ; -------------------------------------------------------------------------------------- 0040 0004 0014 | | .DEBUG4 0x0004,0x0014,0x0b9a,0x0000,0x0001,0x0000 0046 a428 810d | ( | .XXX[0x1ba] 0048 d1c9 b081 | | 004a 4da1 a599 |M | 004c d081 f935 | 5| 004e 95d1 8481 | | 0050 f905 b1d0 | | 0052 80f1 2d95 | - | 0054 e4f9 cdc1 | | 0056 858d 94e8 | | 0058 25ad 95e4 |% | 005a b5cd 95b1 | | 005c 958d d0a0 | | 005e a428 81f9 | ( | 0060 0dd1 c9b0 | | 0062 81f9 3595 | 5 | 0064 d184 81f9 | | 0066 05b1 d080 | | 0068 f12d 95e4 | - | 006a f8e8 25cd | % | 006c 95b1 98b5 | | 006e a5b9 cd95 | | 0070 c9d0 a0a4 | | 0072 2800 0000 |( | 0074 01f9 0dd1 | | 0076 c9b0 8081 | | 0078 4da1 a599 |M | 007a d081 f935 | 5| 007c 95d1 8481 | | 007e f905 b1d0 | | 0080 f109 d1b8 | | 0082 c511 bddd | | 0084 b8f8 e824 | $| 0086 2595 e1d1 |% | 0088 95b9 90b5 | | 008a cdd1 85c9 | | 008c d0a0 a428 | (| 008e 8081 0dd1 | | 0090 c9b0 81f9 | | 0092 4da1 a599 |M | 0094 d081 f935 | 5| 0096 95d1 8481 | | 0098 f905 b1d0 | | 009a f109 d1b8 | | 009c c511 bddd | | 009e b8f8 e824 | $| 00a0 25b5 bdd9 |% | 00a2 94b5 9195 | | 00a4 cdd1 a5b9 | | 00a6 85d1 a5bd | | 00a8 b8a0 a428 | (| 00aa 81f9 0dd1 | | 00ac c9b0 81f9 | | 00ae 4da1 a599 |M | 00b0 d081 f935 | 5| 00b2 95d1 8481 | | 00b4 f905 b1d0 | | 00b6 f109 d1b8 | | 00b8 c511 bddd | | 00ba b8f8 e824 | $| 00bc 259d c985 |% | 00be 88b5 99bd | | 00c0 8dd5 cca0 | | 00c2 a428 81f9 | ( | 00c4 0dd1 c9b0 | | 00c6 81f9 3595 | 5 | 00c8 d184 81f9 | | 00ca 05b1 d0f1 | | 00cc 09d1 b8c5 | | 00ce 35bd d1a5 |5 | 00d0 bdb8 f8e8 | | 00d2 2424 2595 |$$% | 00d4 e1d1 95b9 | | 00d6 90b5 8591 | | 00d8 a9d5 cdd0 | | 00da a0a4 2881 | ( | 00dc f90d d1c9 | | 00de b081 f935 | 5| 00e0 95d1 8481 | | 00e2 f905 b1d0 | | 00e4 f109 d1b8 | | 00e6 c555 c0f8 | U | 00e8 e824 2425 | $$%| 00ea 95e1 d195 | | 00ec b990 b595 | | 00ee b990 a0a4 | | 00f0 2880 810d |( | 00f2 d1c9 b081 | | 00f4 f94d a1a5 | M | 00f6 99d0 81f9 | | 00f8 3595 d184 |5 | 00fa 81f9 05b1 | | 00fc d0f1 09d1 | | 00fe b8c9 11bd | | 0100 ddb8 f8e8 | | 0102 2425 cd95 |$% | 0104 8dbd b991 | | 0106 85c9 e4b5 | | 0108 cdd1 85c9 | | 010a d0a0 a428 | (| 010c 81f9 0dd1 | | 010e c9b0 81f9 | | 0110 4da1 a599 |M | 0112 d080 8135 | 5| 0114 95d1 8481 | | 0116 f905 b1d0 | | 0118 f109 d1b8 | | 011a c911 bddd | | 011c b8f8 e824 | $| 011e 25cd 958d |% | 0120 bdb9 9185 | | 0122 c9e4 b5cd | | 0124 d185 c9d0 | | 0126 a0a4 2881 | ( | 0128 f90d d1c9 | | 012a b081 f94d | M| 012c a1a5 99d0 | | 012e 81f9 3595 | 5 | 0130 d184 8081 | | 0132 05b1 d0f1 | | 0134 09d1 b8c9 | | 0136 11bd ddb8 | | 0138 f8e8 2425 | $%| 013a cd95 8dbd | | 013c b991 85c9 | | 013e e4b5 cdd1 | | 0140 85c9 d0a0 | | 0142 a428 81f9 | ( | 0144 0dd1 c9b0 | | 0146 81f9 4da1 | M | 0148 a599 d081 | | 014a f935 95d1 | 5 | 014c 8481 f905 | | 014e b1d0 f109 | | 0150 d1b8 c911 | | 0152 bddd b8f8 | | 0154 e824 25cd | $% | 0156 958d bdb9 | | 0158 9185 c9e4 | | 015a b5cd d185 | | 015c c9d0 a0a4 | | 015e 2880 810d |( | 0160 d1c9 b081 | | 0162 f94d a1a5 | M | 0164 99d0 81f9 | | 0166 3595 d184 |5 | 0168 81f9 05b1 | | 016a d0f1 09d1 | | 016c b8c9 35bd | 5 | 016e d1a5 bdb8 | | 0170 f8e8 2425 | $%| 0172 cd95 8dbd | | 0174 b991 85c9 | | 0176 e4b5 8591 | | 0178 a9d5 cdd0 | | 017a a0a4 2881 | ( | 017c f90d d1c9 | | 017e b081 f94d | M| 0180 a1a5 99d0 | | 0182 8081 3595 | 5 | 0184 d184 81f9 | | 0186 05b1 d0f1 | | 0188 09d1 b8c9 | | 018a 35bd d1a5 |5 | 018c bdb8 f8e8 | | 018e 2425 cd95 |$% | 0190 8dbd b991 | | 0192 85c9 e4b5 | | 0194 8591 a9d5 | | 0196 cdd0 a0a4 | | 0198 2881 f90d |( | 019a d1c9 b081 | | 019c f94d a1a5 | M | 019e 99d0 81f9 | | 01a0 3595 d184 |5 | 01a2 8081 05b1 | | 01a4 d0f1 09d1 | | 01a6 b8c9 35bd | 5 | 01a8 d1a5 bdb8 | | 01aa f8e8 2425 | $%| 01ac cd95 8dbd | | 01ae b991 85c9 | | 01b0 e4b5 8591 | | 01b2 a9d5 cdd0 | | 01b4 a0a4 2881 | ( | 01b6 f90d d1c9 | | 01b8 b081 f94d | M| 01ba a1a5 99d0 | | 01bc 81f9 3595 | 5 | 01be d184 81f9 | | 01c0 05b1 d0f1 | | 01c2 09d1 b8c9 | | 01c4 35bd d1a5 |5 | 01c6 bdb8 f8e8 | | 01c8 2425 cd95 |$% | 01ca 8dbd b991 | | 01cc 85c9 e4b5 | | 01ce 8591 a9d5 | | 01d0 cdd0 a0a4 | | 01d2 2881 f90d |( | 01d4 d1c9 b081 | | 01d6 f94d a1a5 | M | 01d8 99d0 8081 | | 01da 3595 d184 |5 | 01dc 81f9 05b1 | | 01de d0f1 09d1 | | 01e0 b8c9 55c0 | U | 01e2 f8e8 2425 | $%| 01e4 b5bd d994 | | 01e6 b5d1 bca0 | | 01e8 a428 81f9 | ( | 01ea 0dd1 c9b0 | | 01ec 81f9 4da1 | M | 01ee a599 d081 | | 01f0 f935 95d1 | 5 | 01f2 8480 8105 | | 01f4 b1d0 f109 | | 01f6 d1b8 c955 | U| 01f8 c0f8 e824 | $| 01fa 25b5 bdd9 |% | 01fc 94b5 d1bc | | 01fe a0a4 2881 | ( |