|
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_5e40f2
└─⟦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 0050 | P | .CONST 0x0050 ; 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 0031 | 1 | .CONST 0x0031 ; Address of exception handler 001a 0002 | | .CONST 0x0002 ; Number of locals 001b INIT_0018: 001b e001 | | Load 0x0,0x1 001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001d 02c7 | | Declare_Variable Any 001e e001 | | Load 0x0,0x1 001f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0020 a402 | | Store_Unchecked 0x2,0x2 0021 BODY_0018: 0021 e5fa | | Load 0x2,-0x6 0022 e001 | | Load 0x0,0x1 0023 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 0024 e001 | | Load 0x0,0x1 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 e002 | | Load 0x0,0x2 002c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 002d 00d8 | | Load_Top At_Offset_0 002e e001 | | Load 0x0,0x1 002f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0030 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0031 TRAP_0018: 0031 0007 | | Action Break_Optional 0032 e001 | | Load 0x0,0x1 0033 180e | | Execute Package,Field_Execute,Field_Number 0xe 0034 4808 |H | Short_Literal 0x8 0035 4801 |H | Short_Literal 0x1 0036 4801 |H | Short_Literal 0x1 0037 e003 | | Load 0x0,0x3 0038 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0039 e004 | | Load 0x0,0x4 003a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 003b e001 | | Load 0x0,0x1 003c 180e | | Execute Package,Field_Execute,Field_Number 0xe 003d e001 | | Load 0x0,0x1 003e 1819 | | Execute Package,Field_Execute,Field_Number 0x19 003f 6805 |h | Jump_Zero 0x45 0040 00d9 | | Load_Top At_Offset_1 0041 e001 | | Load 0x0,0x1 0042 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0043 00d8 | | Load_Top At_Offset_0 0044 0101 | | Execute Exception,Reraise 0045 00d9 | | Load_Top At_Offset_1 0046 e001 | | Load 0x0,0x1 0047 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0048 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0049 0000 0000 | | .BLANK 0000[0x7] 0050 ; -------------------------------------------------------------------------------------- 0050 ; Debug Table 0050 ; -------------------------------------------------------------------------------------- 0050 0004 000d | | .DEBUG4 0x0004,0x000d,0x96a1,0x0000,0x0001,0x0000 0056 9195 9081 | | .XXX[0x1aa] 0058 91bd 95cc | | 005a 8139 3d50 | 9=P| 005c 81b5 85d1 | | 005e 8da0 81d1 | | 0060 a194 81c9 | | 0062 95c5 d595 | | 0064 cdd0 8189 | | 0066 95a5 b99c | | 0068 81b5 8591 | | 006a 94b8 8081 | | 006c 51a1 a5cc |Q | 006e 81b5 a59d | | 0070 a1d0 8189 | | 0072 9481 8d85 | | 0074 d5cd 9590 | | 0076 8189 e481 | | 0078 8481 d1c9 | | 007a 85b9 cd8d | | 007c c9a5 c1d1 | | 007e a5bd b881 | | 0080 95c9 c9bd | | 0082 c881 bd98 | | 0084 81d1 a194 | | 0086 818d bd91 | | 0088 94b0 818d | | 008a d5c9 c995 | | 008c b9d0 81c1 | | 008e c9bd 91d5 | | 0090 8dd0 b081 | | 0092 b995 dc81 | | 0094 c1c9 bd91 | | 0096 d58d d0b0 | | 0098 81bd c881 | | 009a d1a1 9481 | | 009c 3585 8da1 |5 | 009e a5b9 9481 | | 00a0 2510 81bd |% | 00a2 9881 d1a1 | | 00a4 a5cc 81b5 | | 00a6 858d a1a5 | | 00a8 b994 80a0 | | 00aa 81a1 85cc | | 00ac 81b9 bc81 | | 00ae b5bd c994 | | 00b0 81d1 bdad | | 00b2 95b9 ccb9 | | 00b4 05b1 b1bd | | 00b6 dd7d 51bd | }Q | 00b8 ad95 b97d | }| 00ba 0dbd b9d9 | | 00bc 95c9 cda5 | | 00be bdb9 35d5 | 5 | 00c0 cdd0 8189 | | 00c2 9481 c9d5 | | 00c4 b881 99c9 | | 00c6 bdb4 8184 | | 00c8 8149 85d1 | I | 00ca a5bd b985 | | 00cc b081 cda5 | | 00ce d194 b905 | | 00d0 cdcd a59d | | 00d2 b97d 51bd | }Q | 00d4 ad95 b9cd | | 00d6 05cd cda5 | | 00d8 9db9 7d4d | }M| 00da a5d1 9549 | I| 00dc d5b8 81d1 | | 00de a194 8199 | | 00e0 bdb1 b1bd | | 00e2 dda5 b99c | | 00e4 81bd b881 | | 00e6 d1a1 9481 | | 00e8 c995 b5bd | | 00ea d194 81b5 | | 00ec 858d a1a5 | | 00ee b994 e94d | M| 00f0 a5d1 950d | | 00f2 bd91 9551 | Q| 00f4 c985 a5b9 | | 00f6 a5b9 9d51 | Q| 00f8 c985 a5b9 | | 00fa a5b9 9d7d | }| 00fc 05d5 d1a1 | | 00fe bdc9 a5e9 | | 0100 85d1 a5bd | | 0102 b941 c9bd | A | 0104 91d5 8dd0 | | 0106 8185 b990 | | 0108 8151 bdad | Q | 010a 95b8 8185 | | 010c d5d1 a1bd | | 010e c9a5 e985 | | 0110 d1a5 bdb8 | | 0112 818d a195 | | 0114 8dad a5b9 | | 0116 9c81 a185 | | 0118 cc81 8995 | | 011a 95b8 81c9 | | 011c 95a5 b9cd | | 011e d185 d195 | | 0120 90b9 05d5 | | 0122 d1a1 bdc9 | | 0124 a5e9 85d1 | | 0126 a5bd b97d | }| 0128 0da1 958d | | 012a ada5 b99d | | 012c 7d49 95a5 |}I | 012e b9cd d185 | | 0130 d195 9141 | A| 0132 c9bd 91d5 | | 0134 8dd0 8185 | | 0136 b990 8151 | Q| 0138 bdad 95b8 | | 013a 8185 d5d1 | | 013c a1bd c9a5 | | 013e e985 d1a5 | | 0140 bdb8 818d | | 0142 a195 8dad | | 0144 a5b9 9c81 | | 0146 a185 cc81 | | 0148 8995 95b8 | | 014a 81cd d5cd | | 014c c195 b991 | | 014e 9590 81d1 | | 0150 bc81 85b1 | | 0152 b1bd dc81 | | 0154 d1c9 85a5 | | 0156 b9a5 b99c | | 0158 81d1 bc81 | | 015a c1c9 bd8d | | 015c 9595 90b8 | | 015e 8081 0da1 | | 0160 958d ada5 | | 0162 b99c 81dd | | 0164 a5b1 b081 | | 0166 8994 81c9 | | 0168 94b5 a5b9 | | 016a cdd1 85d1 | | 016c 9590 81d1 | | 016e a194 81b9 | | 0170 95e1 d081 | | 0172 d1a5 b594 | | 0174 81d1 a194 | | 0176 81b5 858d | | 0178 a1a5 b994 | | 017a 8189 bdbd | | 017c d1cc 81bd | | 017e c881 89e4 | | 0180 8195 e195 | | 0182 8dd1 d5d1 | | 0184 a5b9 9c81 | | 0186 d1a1 a5cc | | 0188 81c1 c9bd | | 018a 8d95 91d5 | | 018c c994 81dd | | 018e a5d1 a081 | | 0190 15b9 8589 | | 0192 b194 80f4 | | 0194 f881 1985 | | 0196 b1cd 94b9 | | 0198 05d5 d1a1 | | 019a bdc9 a5e9 | | 019c 85d1 a5bd | | 019e b97d 0da1 | } | 01a0 958d ada5 | | 01a2 b99d 7d4d | }M| 01a4 d5cd c195 | | 01a6 b991 9591 | | 01a8 51a1 9481 |Q | 01aa 8dbd 9194 | | 01ac 81c1 c9bd | | 01ae d9a5 9195 | | 01b0 9081 a5cc | | 01b2 8139 3d50 | 9=P| 01b4 818d bdc9 | | 01b6 c995 8dd0 | | 01b8 8199 bdc8 | | 01ba 81d1 a1a5 | | 01bc cc81 c1d5 | | 01be c9c1 bdcd | | 01c0 94b0 81bd | | 01c2 b881 d1a1 | | 01c4 a5cc 81b5 | | 01c6 858d a1a5 | | 01c8 b994 b081 | | 01ca 85b9 9081 | | 01cc 99bd c881 | | 01ce d1bd 9185 | | 01d0 e49d cc81 | | 01d2 9185 d194 | | 01d4 b880 8141 | A| 01d6 b195 85cd | | 01d8 9481 8da1 | | 01da 958d ac81 | | 01dc 99bd c881 | | 01de d1c9 85b9 | | 01e0 cd8d c9a5 | | 01e2 c1d1 a5bd | | 01e4 b881 95c9 | | 01e6 c9bd c9cc | | 01e8 81bd c881 | | 01ea 8dbd b9d1 | | 01ec 858d d081 | | 01ee e5bd d5c8 | | 01f0 8149 85d1 | I | 01f2 a5bd b985 | | 01f4 b081 c995 | | 01f6 c1c9 95cd | | 01f8 95b9 d185 | | 01fa d1a5 d994 | | 01fc b905 d5d1 | | 01fe a1bd c9a5 | |