|
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_0694fc
└─⟦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 0026 | & | .CONST 0x0026 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0013 | | .CONST 0x0013 ; Number of locals 000b INIT_0008: 000b 00c4 | | Action Make_Default 000c 00c4 | | Action Make_Default 000d 00c4 | | Action Make_Default 000e 00c4 | | Action Make_Default 000f 00c4 | | Action Make_Default 0010 00c4 | | Action Make_Default 0011 00c4 | | Action Make_Default 0012 e001 | | Load 0x0,0x1 0013 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0014 0129 | ) | Execute Any,Make_Visible 0015 c211 | | Store 0x1,0x11 0016 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated 0018 c212 | | Store 0x1,0x12 0019 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated 001b c213 | | Store 0x1,0x13 001c 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated 001e c210 | | Store 0x1,0x10 001f 00bf | | Action Accept_Activation 0020 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0021 00c7 | | Action Elaborate_Subprogram 0022 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0023 00c7 | | Action Elaborate_Subprogram 0024 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0025 00c7 | | Action Elaborate_Subprogram 0026 BODY_0008: 0026 00bc | | Action Signal_Activated 0027 00bb | | Action Signal_Completion 0028 ; -------------------------------------------------------------------------------------- 0028 ; SUBPROGRAM 0028 ; -------------------------------------------------------------------------------------- 0028 002b | + | .CONST 0x002b ; Address of begin 0029 0004 | | .CONST 0x0004 ; Address of exception handler 002a 0001 | | .CONST 0x0001 ; Number of locals 002b BODY_0028: 002b INIT_0028: 002b 480a |H | Short_Literal 0xa 002c 00db | | Load_Top At_Offset_3 002d 01cb | | Execute Vector,Append 002e e5fe | | Load 0x2,-0x2 002f e001 | | Load 0x0,0x1 0030 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 0031 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0032 0000 0000 | | .BLANK 0000[0x6] 0038 ; -------------------------------------------------------------------------------------- 0038 ; SUBPROGRAM 0038 ; -------------------------------------------------------------------------------------- 0038 003b | ; | .CONST 0x003b ; Address of begin 0039 0004 | | .CONST 0x0004 ; Address of exception handler 003a 0001 | | .CONST 0x0001 ; Number of locals 003b BODY_0038: 003b INIT_0038: 003b 00da | | Load_Top At_Offset_2 003c e5fe | | Load 0x2,-0x2 003d e001 | | Load 0x0,0x1 003e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 003f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0040 ; -------------------------------------------------------------------------------------- 0040 ; SUBPROGRAM 0040 ; -------------------------------------------------------------------------------------- 0040 0043 | C | .CONST 0x0043 ; Address of begin 0041 0004 | | .CONST 0x0004 ; Address of exception handler 0042 0001 | | .CONST 0x0001 ; Number of locals 0043 BODY_0040: 0043 INIT_0040: 0043 00da | | Load_Top At_Offset_2 0044 e001 | | Load 0x0,0x1 0045 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0046 6804 |h | Jump_Zero 0x4b 0047 00da | | Load_Top At_Offset_2 0048 e001 | | Load 0x0,0x1 0049 1819 | | Execute Package,Field_Execute,Field_Number 0x19 004a c5ff | | Store 0x2,-0x1 004b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 004c 0000 0000 | | .BLANK 0000[0x4] 0050 ; -------------------------------------------------------------------------------------- 0050 ; Debug Table 0050 ; -------------------------------------------------------------------------------------- 0050 0004 000d | | .DEBUG4 0x0004,0x000d,0x91c0,0x0000,0x0001,0x0000 0056 5d4a 7a78 |]Jzx| .XXX[0x1aa] 0058 2a6e 9c34 |*n 4| 005a 0172 8935 | r 5| 005c 4aa9 a4d1 |J | 005e 77c0 7153 |w qS| 0060 d0be 9b13 | | 0062 6481 0789 |d | 0064 f08c 02a2 | | 0066 a458 4c3c | XL<| 0068 a103 4072 | @r| 006a 48c5 d7ba |H | 006c 5adf e47d |Z }| 006e f1d9 10de | | 0070 a955 7271 | Urq| 0072 b7c8 24c1 | $ | 0074 7855 4288 |xUB | 0076 7681 bab8 |v | 0078 6cba 9f43 |l C| 007a 8488 11d3 | | 007c 0c1d 2002 | | 007e e084 e2e0 | | 0080 f70d 3430 | 40| 0082 7cc0 0702 || | 0084 b317 51b0 | Q | 0086 c036 b21a | 6 | 0088 0097 80f6 | | 008a 402b a353 |@+ S| 008c c756 7898 | Vx | 008e 0830 78ae | 0x | 0090 a01f 4602 | F | 0092 b2ed 85b5 | | 0094 62c5 f68e |b | 0096 5a9d 0011 |Z | 0098 8161 a127 | a '| 009a d651 1037 | Q 7| 009c 3e40 c81e |>@ | 009e 680c df80 |h | 00a0 8ad3 ddce | | 00a2 8cf4 2598 | % | 00a4 7ffe 0137 | 7| 00a6 0342 b616 | B | 00a8 143e 2002 | > | 00aa 5001 f446 |P F| 00ac bc58 5daf | X] | 00ae 5b2b 1b87 |[+ | 00b0 c22a 09d4 | * | 00b2 2cd8 0400 |, | 00b4 f4ce 111d | | 00b6 0c04 c0db | | 00b8 511e fbc9 |Q | 00ba f1e0 421b | B | 00bc 5424 1fb7 |T$ | 00be 77c0 16e0 |w | 00c0 0ca1 77f8 | w | 00c2 8792 d6b1 | | 00c4 a751 3729 | Q7)| 00c6 2995 56cf |) V | 00c8 5b92 68cb |[ h | 00ca bec1 6321 | c!| 00cc 14b4 08c1 | | 00ce d2ef 89c1 | | 00d0 65c4 3e00 |e > | 00d2 5809 1307 |X | 00d4 cca8 014d | M| 00d6 4ecc c840 |N @| 00d8 4803 9ede |H | 00da 259f 4314 |% C | 00dc 9bc0 51e0 | Q | 00de 0000 2f9a | / | 00e0 b1de 00eb | | 00e2 ae77 d42f | w /| 00e4 02fd 85ce | | 00e6 e15a 8db8 | Z | 00e8 a640 a4af | @ | 00ea 3587 be1e |5 | 00ec 22f0 4100 |" A | 00ee 2678 b17a |&x z| 00f0 47af 60fd |G ` | 00f2 004f 41a2 | OA | 00f4 76c5 0800 |v | 00f6 68a4 9b00 |h | 00f8 65ad 741f |e t | 00fa 83c1 90a6 | | 00fc cf1b 1cc8 | | 00fe 0784 e4a3 | | 0100 928e 5666 | Vf| 0102 1da3 6011 | ` | 0104 b116 c050 | P| 0106 cf1e 8586 | | 0108 0b3c 9a40 | < @| 010a f70e d1f8 | | 010c 0700 a9c0 | | 010e 0139 ae78 | 9 x| 0110 d403 65b3 | e | 0112 07f6 2168 | !h| 0114 2402 9359 |$ Y| 0116 8e0e a554 | T| 0118 2d51 a107 |-Q | 011a ddd0 db84 | | 011c 14c6 7163 | qc| 011e ae82 57d9 | W | 0120 99ae 7580 | u | 0122 70db f9da |p | 0124 eb59 f800 | Y | 0126 0a02 1261 | a| 0128 b7c2 d6b8 | | 012a 1632 b367 | 2 g| 012c 5540 2d56 |U@-V| 012e 2fc1 c9a4 |/ | 0130 d459 996a | Y j| 0132 46b7 2959 |F )Y| 0134 3fad 2546 |? %F| 0136 76e8 da08 |v | 0138 0200 2d84 | - | 013a 0b1c 808b | | 013c 2ec5 d796 |. | 013e 41b1 5468 |A Th| 0140 e89c a4ea | | 0142 e71e 4d8e | M | 0144 8703 7ac7 | z | 0146 dfec be90 | | 0148 3036 958e |06 | 014a 1b99 0c0f | | 014c 0318 283a | (:| 014e e6c7 e00f | | 0150 6806 0732 |h 2| 0152 618d fec1 |a | 0154 0121 cff1 | ! | 0156 8a35 6900 | 5i | 0158 dc52 029a | R | 015a 1ae7 966b | k| 015c cc15 a034 | 4| 015e 43c1 1961 |C a| 0160 7c01 fdaf || | 0162 6707 90a1 |g | 0164 e981 8445 | E| 0166 70cc d81d |p | 0168 5d89 3640 |] 6@| 016a 547f 4002 |T @ | 016c 02a4 d570 | p| 016e cc67 f801 | g | 0170 d902 f24c | L| 0172 fd20 8351 | Q| 0174 e476 df01 | v | 0176 6288 0741 |b A| 0178 3411 038f |4 | 017a 2957 e40a |)W | 017c 72c2 724d |r rM| 017e be02 43ac | C | 0180 6f83 7d29 |o })| 0182 c9b4 d661 | a| 0184 7286 b4a1 |r | 0186 5dbd 25de |] % | 0188 837e 0c3d | ~ =| 018a 8000 6389 | c | 018c 7abb 5ec6 |z ^ | 018e 62ad 194b |b K| 0190 8969 ccd5 | i | 0192 bb17 55c2 | U | 0194 b8d8 0742 | B| 0196 3416 039f |4 | 0198 29c4 f587 |) | 019a 3407 e1b9 |4 | 019c 8a03 4e3b | N;| 019e 4354 e4a6 |CT | 01a0 3690 7154 |6 qT| 01a2 8fe4 bad1 | | 01a4 576c 3516 |Wl5 | 01a6 92c0 a71a | | 01a8 a41f e00c | | 01aa 927b 8120 | { | 01ac f885 3482 | 4 | 01ae e3a9 b905 | | 01b0 1f39 c520 | 9 | 01b2 e31f 5575 | Uu| 01b4 a87b 9ee3 | { | 01b6 98a3 8039 | 9| 01b8 4558 8407 |EX | 01ba 32d5 af91 |2 | 01bc cc37 88c2 | 7 | 01be 3ef1 2d4b |> -K| 01c0 5f70 0c41 |_p A| 01c2 21f3 9217 |! | 01c4 5737 28e7 |W7( | 01c6 b50b c921 | !| 01c8 2c0d 6200 |, b | 01ca 2a69 ccca |*i | 01cc f25a bc60 | Z `| 01ce 0a43 5f98 | C_ | 01d0 0398 d745 | E| 01d2 0196 4401 | D | 01d4 4aaf c792 |J | 01d6 3027 f802 |0' | 01d8 f603 3c12 | < | 01da 8230 2398 | 0# | 01dc ccd4 1bd0 | | 01de 0fea 6642 | fB| 01e0 0cf9 00fb | | 01e2 0068 411f | hA | 01e4 400a 917a |@ z| 01e6 5803 d601 |X | 01e8 9703 193e | >| 01ea ea88 3a05 | : | 01ec cd48 01b8 | H | 01ee 0262 4353 | bCS| 01f0 5698 823a |V :| 01f2 c015 e2f7 | | 01f4 197a ede0 | z | 01f6 2139 3d19 |!9= | 01f8 b050 ee56 | P V| 01fa 9163 4170 | cAp| 01fc 0ba8 600b | ` | 01fe 18be 03dd | |