|
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 0088 | | .CONST 0x0088 ; 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 0059 | Y | .CONST 0x0059 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0021 | ! | .CONST 0x0021 ; Number of locals 000b INIT_0008: 000b e001 | | Load 0x0,0x1 000c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 000d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 000e 0129 | ) | Execute Any,Make_Visible 000f e001 | | Load 0x0,0x1 0010 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0011 1b23 | # | Execute Package,Field_Read,Field_Number 0x23 0012 0129 | ) | Execute Any,Make_Visible 0013 00e9 | | Load_Encached String_Cache 0014 0129 | ) | Execute Any,Make_Visible 0015 00c4 | | Action Make_Default 0016 00c4 | | Action Make_Default 0017 00c4 | | Action Make_Default 0018 00c4 | | Action Make_Default 0019 00c4 | | Action Make_Default 001a 00c4 | | Action Make_Default 001b 00c4 | | Action Make_Default 001c 00c4 | | Action Make_Default 001d 00c4 | | Action Make_Default 001e 00c4 | | Action Make_Default 001f 00c4 | | Action Make_Default 0020 00c4 | | Action Make_Default 0021 00c4 | | Action Make_Default 0022 00c4 | | Action Make_Default 0023 00c4 | | Action Make_Default 0024 00c4 | | Action Make_Default 0025 00c4 | | Action Make_Default 0026 00c4 | | Action Make_Default 0027 e002 | | Load 0x0,0x2 0028 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0029 0129 | ) | Execute Any,Make_Visible 002a c216 | | Store 0x1,0x16 002b e001 | | Load 0x0,0x1 002c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 002d 192a | * | Execute Package,Field_Reference,Field_Number 0x2a 002e 0129 | ) | Execute Any,Make_Visible 002f c217 | | Store 0x1,0x17 0030 e001 | | Load 0x0,0x1 0031 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0032 1924 | $ | Execute Package,Field_Reference,Field_Number 0x24 0033 0129 | ) | Execute Any,Make_Visible 0034 c220 | | Store 0x1,0x20 0035 e001 | | Load 0x0,0x1 0036 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0037 1925 | % | Execute Package,Field_Reference,Field_Number 0x25 0038 0129 | ) | Execute Any,Make_Visible 0039 c221 | ! | Store 0x1,0x21 003a e001 | | Load 0x0,0x1 003b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 003c 1929 | ) | Execute Package,Field_Reference,Field_Number 0x29 003d 0129 | ) | Execute Any,Make_Visible 003e c218 | | Store 0x1,0x18 003f e001 | | Load 0x0,0x1 0040 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0041 1912 | | Execute Package,Field_Reference,Field_Number 0x12 0042 0129 | ) | Execute Any,Make_Visible 0043 c212 | | Store 0x1,0x12 0044 e001 | | Load 0x0,0x1 0045 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0046 192a | * | Execute Package,Field_Reference,Field_Number 0x2a 0047 0129 | ) | Execute Any,Make_Visible 0048 c213 | | Store 0x1,0x13 0049 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated 004b c21c | | Store 0x1,0x1c 004c 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated 004e c21e | | Store 0x1,0x1e 004f 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated 0051 c21f | | Store 0x1,0x1f 0052 00bf | | Action Accept_Activation 0053 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0054 00c7 | | Action Elaborate_Subprogram 0055 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0056 00c7 | | Action Elaborate_Subprogram 0057 1d1f | | Execute_Immediate Reference_Lex_1,0x1f 0058 00c7 | | Action Elaborate_Subprogram 0059 BODY_0008: 0059 00bc | | Action Signal_Activated 005a 00bb | | Action Signal_Completion 005b 0000 0000 | | .BLANK 0000[0x5] 0060 ; -------------------------------------------------------------------------------------- 0060 ; SUBPROGRAM 0060 ; -------------------------------------------------------------------------------------- 0060 0063 | c | .CONST 0x0063 ; Address of begin 0061 0004 | | .CONST 0x0004 ; Address of exception handler 0062 0001 | | .CONST 0x0001 ; Number of locals 0063 BODY_0060: 0063 INIT_0060: 0063 00da | | Load_Top At_Offset_2 0064 e001 | | Load 0x0,0x1 0065 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0066 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0067 e003 | | Load 0x0,0x3 0068 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0069 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 006a 0000 0000 | | .BLANK 0000[0x6] 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 0073 | s | .CONST 0x0073 ; Address of begin 0071 0004 | | .CONST 0x0004 ; Address of exception handler 0072 0001 | | .CONST 0x0001 ; Number of locals 0073 BODY_0070: 0073 INIT_0070: 0073 00da | | Load_Top At_Offset_2 0074 e001 | | Load 0x0,0x1 0075 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0076 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0077 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0078 ; -------------------------------------------------------------------------------------- 0078 ; SUBPROGRAM 0078 ; -------------------------------------------------------------------------------------- 0078 007b | { | .CONST 0x007b ; Address of begin 0079 0004 | | .CONST 0x0004 ; Address of exception handler 007a 0001 | | .CONST 0x0001 ; Number of locals 007b BODY_0078: 007b INIT_0078: 007b 4800 |H | Short_Literal 0x0 007c 00ea | | Load_Encached Null_String_Cache 007d 6006 |` | Indirect_Literal Discrete,0x84,{0x00000000, 0x7fffffff} 007e e5ff | | Load 0x2,-0x1 007f 8212 | | Call 0x1,0x12 0080 e001 | | Load 0x0,0x1 0081 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0082 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0083 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0084 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 0088 ; -------------------------------------------------------------------------------------- 0088 ; Debug Table 0088 ; -------------------------------------------------------------------------------------- 0088 0004 0014 | | .DEBUG4 0x0004,0x0014,0x0e56,0x0000,0x0001,0x0000 008e 1a7e 1881 | ~ | .XXX[0x172] 0090 a0c8 0060 | `| 0092 15b2 c808 | | 0094 6041 b0c8 |`A | 0096 0e2d ac76 | - v| 0098 8136 16d4 | 6 | 009a 5555 01cc |UU | 009c 84d5 6349 | cI| 009e c3d3 85e0 | | 00a0 2ce4 b6f5 |, | 00a2 1028 4049 | (@I| 00a4 1354 09b2 | T | 00a6 db22 4f6d | "Om| 00a8 cc80 719c | q | 00aa 2840 5052 |(@PR| 00ac 140a 49e3 | I | 00ae d69c 5d53 | ]S| 00b0 e044 5b59 | D[Y| 00b2 d55a 080b | Z | 00b4 7913 f376 |y v| 00b6 8894 8e18 | | 00b8 f795 2807 | ( | 00ba 7eb6 9604 |~ | 00bc ec55 195b | U [| 00be 0170 e825 | p %| 00c0 d965 fe64 | e d| 00c2 06a3 4548 | EH| 00c4 8716 261c | & | 00c6 d551 768b | Qv | 00c8 094e 6020 | N` | 00ca 0030 0e35 | 0 5| 00cc 854e 854c | N L| 00ce 6129 1655 |a) U| 00d0 57f5 9417 |W | 00d2 8911 2208 | " | 00d4 9459 659a | Ye | 00d6 85d5 8dd5 | | 00d8 52d9 902d |R -| 00da 7001 5141 |p QA| 00dc 500e ea40 |P @| 00de 5000 ec0f |P | 00e0 4508 6022 |E `"| 00e2 d300 1720 | | 00e4 15f6 1569 | i| 00e6 4981 e020 |I | 00e8 1008 7a02 | z | 00ea 6008 301d |` 0 | 00ec 4444 429a |DDB | 00ee ac06 11e6 | | 00f0 652c c006 |e, | 00f2 4302 9f48 |C H| 00f4 6000 28bb |` ( | 00f6 5062 2e18 |Pb. | 00f8 d41a 0200 | | 00fa 1930 cbd5 | 0 | 00fc 57b2 c760 |W `| 00fe 612c 1cf3 |a, | 0100 374a c468 |7J h| 0102 0060 2041 | ` A| 0104 7800 0210 |x | 0106 ecb4 b900 | | 0108 12c1 08b6 | | 010a 4103 0358 |A X| 010c 7fff c34d | M| 010e 2ee9 b3c4 |. | 0110 6b20 c780 |k | 0112 8040 24e8 | @$ | 0114 01d3 4324 | C$| 0116 e2fe 00ca | | 0118 051a 8920 | | 011a 8e00 60b3 | ` | 011c 026c 0497 | l | 011e a989 8226 | &| 0120 e86a 52af | jR | 0122 04ee 62a2 | b | 0124 ef06 f3d7 | | 0126 7aad 46e3 |z F | 0128 8418 c932 | 2| 012a f781 9af0 | | 012c c408 740c | t | 012e 0230 2302 | 0# | 0130 20b0 08e0 | | 0132 1230 1308 | 0 | 0134 1f4a 7232 | Jr2| 0136 031b d598 | | 0138 1008 00c0 | | 013a 8c81 cc00 | | 013c d72d 33cf | -3 | 013e 1ceb 5c73 | \s| 0140 cafa fd00 | | 0142 4807 0340 |H @| 0144 20c0 08ab | | 0146 21b6 117c |! || 0148 1402 5ded | ] | 014a 241c 87fe |$ | 014c 2e00 a342 |. B| 014e 20c0 18a9 | | 0150 313d 3634 |1=64| 0152 028e 8008 | | 0154 bc18 a80d | | 0156 40b8 9665 |@ e| 0158 61cb 00bf |a | 015a f093 b4b4 | | 015c 0166 1033 | f 3| 015e 3022 8203 |0" | 0160 c4d8 a170 | p| 0162 502c 088e |P, | 0164 6a40 9203 |j@ | 0166 0180 8040 | @| 0168 c420 20b2 | | 016a f0cb 0880 | | 016c 9381 d0d1 | | 016e 7f3f 3717 | ?7 | 0170 7183 6337 |q c7| 0172 235d f08d |#] | 0174 02e0 0a09 | | 0176 ffc0 dc09 | | 0178 387e 4edd |8~N | 017a 9228 cfb8 | ( | 017c e390 0bd1 | | 017e 37e0 0a55 |7 U| 0180 7fb9 d0be | | 0182 6c2c 2bdf |l,+ | 0184 89c0 df7b | {| 0186 b38c 251d | % | 0188 38e0 0e96 |8 | 018a 4e11 e402 |N | 018c 5f32 49eb |_2I | 018e 9eb5 fc79 | y| 0190 efa2 4a4f | JO| 0192 5103 b600 |Q | 0194 ee77 2bba | w+ | 0196 adef f8eb | | 0198 a28a 4f90 | O | 019a 03c6 dd7f | | 019c c827 c9d0 | ' | 019e adfc dfcf | | 01a0 060f c003 | | 01a2 d139 5d08 | 9] | 01a4 f7ad c7ef | | 01a6 3ab7 b091 |: | 01a8 0700 f7ba | | 01aa 2fb1 f80b |/ | 01ac 6966 2ec9 |if. | 01ae d75d 7e1c | ]~ | 01b0 f7d8 002d | -| 01b2 9d33 bf2f | 3 /| 01b4 e008 02d2 | | 01b6 ff09 d885 | | 01b8 c063 c000 | c | 01ba 0802 b844 | D| 01bc 3120 d02c |1 ,| 01be 39ab ec5b |9 [| 01c0 1a28 58b9 | (X | 01c2 2020 0010 | | 01c4 be82 180b | | 01c6 0914 2426 | $&| 01c8 3218 4828 |2 H(| 01ca 0314 fea2 | | 01cc 840b ef54 | T| 01ce ac43 e76f | C o| 01d0 7f40 4182 | @A | 01d2 2a8a 0600 |* | 01d4 0487 4320 | C | 01d6 a101 0404 | | 01d8 4640 0468 |F@ h| 01da 9261 6759 | agY| 01dc 32c6 d41a |2 | 01de 3500 8e9e |5 | 01e0 8118 3025 | 0%| 01e2 40b9 f660 |@ `| 01e4 0c48 1020 | H | 01e6 0cdd c284 | | 01e8 b812 5100 | Q | 01ea 8ea3 a284 | | 01ec e200 e029 | )| 01ee 8362 8a20 | b | 01f0 9f43 224c | C"L| 01f2 0a80 3dbc | = | 01f4 0044 7051 | DpQ| 01f6 c080 00e2 | | 01f8 8314 3651 | 6Q| 01fa 2c02 55c1 |, U | 01fc 8125 0a94 | % | 01fe 45e1 d681 |E |