|
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 00a0 | | .CONST 0x00a0 ; 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 0058 | X | .CONST 0x0058 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 001a | | .CONST 0x001a ; Number of locals 000b INIT_0008: 000b e001 | | Load 0x0,0x1 000c e002 | | Load 0x0,0x2 000d 1d0f | | Execute_Immediate Reference_Lex_1,0xf 000e 00db | | Load_Top At_Offset_3 000f e003 | | Load 0x0,0x3 0010 0386 | | Declare_Variable Package,Visible 0011 00d8 | | Load_Top At_Offset_0 0012 020f | | Execute Module,Activate 0013 00d8 | | Load_Top At_Offset_0 0014 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0015 0129 | ) | Execute Any,Make_Visible 0016 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated 0018 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated 001a 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated 001c 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated 001e 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated 0020 e004 | | Load 0x0,0x4 0021 e005 | | Load 0x0,0x5 0022 e212 | | Load 0x1,0x12 0023 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0024 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0025 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0026 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0027 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0028 482f |H/ | Short_Literal 0x2f 0029 603e |`> | Indirect_Literal Discrete,0x68,{0x7fffffff, 0xffffffff} 002a e006 | | Load 0x0,0x6 002b 0386 | | Declare_Variable Package,Visible 002c 00d8 | | Load_Top At_Offset_0 002d 020f | | Execute Module,Activate 002e 00bf | | Action Accept_Activation 002f e007 | | Load 0x0,0x7 0030 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0031 0266 | f | Execute Discrete,Bounds 0032 e211 | | Load 0x1,0x11 0033 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0034 02a0 | | Declare_Subprogram Null_Subprogram 0035 4801 |H | Short_Literal 0x1 0036 035d | ] | Declare_Type Array,Defined 0037 00d8 | | Load_Top At_Offset_0 0038 0337 | 7 | Declare_Variable Array 0039 00d8 | | Load_Top At_Offset_0 003a 0335 | 5 | Declare_Variable Array,Duplicate 003b 00cd | | Action Spare6_Action 003c 4800 |H | Short_Literal 0x0 003d 4800 |H | Short_Literal 0x0 003e 00da | | Load_Top At_Offset_2 003f 01d6 | | Execute Vector,Field_Write 0040 4801 |H | Short_Literal 0x1 0041 4801 |H | Short_Literal 0x1 0042 00da | | Load_Top At_Offset_2 0043 01d6 | | Execute Vector,Field_Write 0044 4802 |H | Short_Literal 0x2 0045 4802 |H | Short_Literal 0x2 0046 00da | | Load_Top At_Offset_2 0047 01d6 | | Execute Vector,Field_Write 0048 4801 |H | Short_Literal 0x1 0049 4803 |H | Short_Literal 0x3 004a 00da | | Load_Top At_Offset_2 004b 01d6 | | Execute Vector,Field_Write 004c 00d9 | | Load_Top At_Offset_1 004d 01d4 | | Execute Vector,Structure_Write 004e 1d13 | | Execute_Immediate Reference_Lex_1,0x13 004f 00c7 | | Action Elaborate_Subprogram 0050 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0051 00c7 | | Action Elaborate_Subprogram 0052 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0053 00c7 | | Action Elaborate_Subprogram 0054 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0055 00c7 | | Action Elaborate_Subprogram 0056 1d17 | | Execute_Immediate Reference_Lex_1,0x17 0057 00c7 | | Action Elaborate_Subprogram 0058 BODY_0008: 0058 00bc | | Action Signal_Activated 0059 00bb | | Action Signal_Completion 005a 0000 0000 | | .BLANK 0000[0x6] 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 e211 | | Load 0x1,0x11 0065 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0066 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0067 0000 | | .XXX[0x1] 0068 7fff ffff | | .LITERAL {0x7fffffff, 0xffffffff} 006c 0000 0000 | | .BLANK 0000[0x4] 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 0075 | u | .CONST 0x0075 ; Address of begin 0071 0004 | | .CONST 0x0004 ; Address of exception handler 0072 0002 | | .CONST 0x0002 ; Number of locals 0073 INIT_0070: 0073 e212 | | Load 0x1,0x12 0074 0007 | | Action Break_Optional 0075 BODY_0070: 0075 e211 | | Load 0x1,0x11 0076 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0077 e5fd | | Load 0x2,-0x3 0078 00ea | | Load_Encached Null_String_Cache 0079 e5fe | | Load 0x2,-0x2 007a e5ff | | Load 0x2,-0x1 007b e21a | | Load 0x1,0x1a 007c 01d7 | | Execute Vector,Field_Read 007d e211 | | Load 0x1,0x11 007e 1817 | | Execute Package,Field_Execute,Field_Number 0x17 007f 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0080 00d8 | | Load_Top At_Offset_0 0081 a5fc | | Store_Unchecked 0x2,-0x4 0082 00d8 | | Load_Top At_Offset_0 0083 e211 | | Load 0x1,0x11 0084 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0085 a5fb | | Store_Unchecked 0x2,-0x5 0086 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0087 0000 | | .XXX[0x1] 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 008b | | .CONST 0x008b ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 0001 | | .CONST 0x0001 ; Number of locals 008b BODY_0088: 008b INIT_0088: 008b 00da | | Load_Top At_Offset_2 008c e211 | | Load 0x1,0x11 008d 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 008e 0033 | 3 | Store_Top Heap_Access,At_Offset_3 008f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 0093 | | .CONST 0x0093 ; Address of begin 0091 0004 | | .CONST 0x0004 ; Address of exception handler 0092 0001 | | .CONST 0x0001 ; Number of locals 0093 BODY_0090: 0093 INIT_0090: 0093 00da | | Load_Top At_Offset_2 0094 e211 | | Load 0x1,0x11 0095 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0096 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0097 0000 | | .XXX[0x1] 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 009b | | .CONST 0x009b ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0001 | | .CONST 0x0001 ; Number of locals 009b BODY_0098: 009b INIT_0098: 009b 00da | | Load_Top At_Offset_2 009c e211 | | Load 0x1,0x11 009d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 009e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 009f 0000 | | .XXX[0x1] 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; Debug Table 00a0 ; -------------------------------------------------------------------------------------- 00a0 0004 000d | | .DEBUG4 0x0004,0x000d,0xdd56,0x0000,0x0001,0x0000 00a6 0025 5551 | %UQ| .XXX[0x15a] 00a8 2531 2551 |%1%Q| 00aa 2515 4cf9 |% L | 00ac f000 0000 | | 00ae bc00 0001 | | 00b0 4400 8555 |D U| 00b2 5125 3125 |Q%1%| 00b4 5125 154c |Q% L| 00b6 b91d 1551 | Q| 00b8 7d15 390d |} 9 | 00ba 313d 4d25 |1=M%| 00bc 391d 7d4d |9 }M| 00be 5509 4d65 |U Me| 00c0 4d51 1534 |MQ 4| 00c2 f5ea 51fa | Q | 00c4 408c 0011 |@ | 00c6 393d 1114 |9= | 00c8 5c00 2911 |\ ) | 00ca 2505 3904 |% 9 | 00cc b951 4915 | QI | 00ce 1400 5c00 | \ | 00d0 4111 2549 |A %I| 00d2 150d 513d | Q=| 00d4 4964 b93d |Id =| 00d6 0929 150d | ) | 00d8 5000 0000 |P | 00da 00d4 0000 | | 00dc 014c 0065 | L e| 00de 5551 2531 |UQ%1| 00e0 2551 2515 |%Q% | 00e2 4cb9 254d |L %M| 00e4 7d55 3925 |}U9%| 00e6 517d 2511 |Q}% | 00e8 7d2d 2539 |}-%9| 00ea 10f5 ea51 | Q| 00ec fa40 8c00 | @ | 00ee 2539 3d11 |%9= | 00f0 157d 2d25 | }-%| 00f2 3910 5c00 |9 \ | 00f4 3d11 2505 |= % | 00f6 3904 b939 |9 9| 00f8 3d11 157d |= }| 00fa 3905 3514 |9 5 | 00fc 005c 0041 | \ A| 00fe 4d51 0539 |MQ 9| 0100 1105 4910 | I | 0102 b909 3d3d | ==| 0104 3115 0538 |1 8| 0106 0000 0000 | | 0108 1000 0001 | | 010a e400 3155 | 1U| 010c 5125 3125 |Q%1%| 010e 5125 154c |Q% L| 0110 b93d 2cf5 | =, | 0112 ea51 fa40 | Q @| 0114 8c00 0d3d | =| 0116 0928 5c00 | (\ | 0118 7511 2549 |u %I| 011a 150d 513d | Q=| 011c 4965 7d51 |Ie}Q| 011e 3d3d 314c |==1L| 0120 b93d 0929 | = )| 0122 150d 50b9 | P | 0124 2105 3911 |! 9 | 0126 3114 01fa |1 | 0128 408c 0021 |@ !| 012a 4915 4d41 |I MA| 012c 3d39 4d14 |=9M | 012e 5c00 6955 |\ iU| 0130 5125 3125 |Q%1%| 0132 5125 154c |Q% L| 0134 b949 154d | I M| 0136 413d 394d |A=9M| 0138 157d 4149 | }AI| 013a 3d19 2531 |= %1| 013c 1400 5c00 | \ | 013e 414d 5105 |AMQ | 0140 3911 0549 |9 I| 0142 10b9 093d | =| 0144 3d31 1505 |=1 | 0146 3800 0000 |8 | 0148 00c4 0000 | | 014a 0174 0069 | t i| 014c 5551 2531 |UQ%1| 014e 2551 2515 |%Q% | 0150 4cb9 254d |L %M| 0152 7d05 490d |} I | 0154 2125 5915 |!%Y | 0156 117d 5925 | }Y%| 0158 155c f5ea | \ | 015a 51fa 408c |Q @ | 015c 0011 5925 | Y%| 015e 155c 5c00 | \\ | 0160 7511 2549 |u %I| 0162 150d 513d | Q=| 0164 4965 7d51 |Ie}Q| 0166 3d3d 314c |==1L| 0168 b93d 0929 | = )| 016a 150d 50b9 | P | 016c 2105 3911 |! 9 | 016e 3114 005c |1 \| 0170 0041 4d51 | AMQ| 0172 0539 1105 | 9 | 0174 4910 b909 |I | 0176 3d3d 3115 |==1 | 0178 0538 0000 | 8 | 017a 0000 4800 | H | 017c 0001 9000 | | 017e 5d55 5125 |]UQ%| 0180 3125 5125 |1%Q%| 0182 154c b955 | L U| 0184 4111 0551 |A Q| 0186 157d 4d51 | }MQ| 0188 0551 554c | QUL| 018a f5ee 51fe | Q | 018c 4090 0049 |@ I| 018e 050d 0d55 | U| 0190 3555 3105 |5U1 | 0192 5115 117d |Q }| 0194 4d51 0551 |MQ Q| 0196 554c 5c00 |UL\ | 0198 310d 2115 |1 ! | 019a 0d2c b94d | , M| 019c 5105 5155 |Q QU| 019e 4c01 fa40 |L @| 01a0 8c00 2d25 | -%| 01a2 5115 357d |Q 5}| 01a4 4d51 0551 |MQ Q| 01a6 554c 5c00 |UL\ | 01a8 310d 2115 |1 ! | 01aa 0d2c b94d | , M| 01ac 5105 5155 |Q QU| 01ae 4c00 0000 |L | 01b0 0000 4000 | @ | 01b2 0002 fc00 | | 01b4 5d55 5125 |]UQ%| 01b6 3125 5125 |1%Q%| 01b8 154c b91d | L | 01ba 1551 7d4d | Q}M| 01bc 4115 0d7d |A }| 01be 5925 155c |Y% \| 01c0 f5ea 51fa | Q | 01c2 408c 004d |@ M| 01c4 1539 0d31 | 9 1| 01c6 3d4d 2539 |=M%9| 01c8 1d7d 4d55 | }MU| 01ca 094d 654d | MeM| 01cc 5115 345c |Q 4\| 01ce 0041 1125 | A %| 01d0 4915 0d51 |I Q| 01d2 3d49 64b9 |=Id | 01d4 3d09 2915 |= ) | 01d6 0d50 01fa | P | 01d8 408c 0031 |@ 1| 01da 5121 157d |Q! }| 01dc 050d 5125 | Q%| 01de 5925 5164 |Y%Qd| 01e0 5c00 8d05 |\ | 01e2 0d51 2559 | Q%Y| 01e4 2551 657d |%Qe}| 01e6 2535 4131 |%5A1| 01e8 1535 1539 | 5 9| 01ea 5105 5125 |Q Q%| 01ec 3d38 b905 |=8 | 01ee 0d51 2559 | Q%Y| 01f0 2551 657d |%Qe}| 01f2 2510 01fa |% | 01f4 408c 0021 |@ !| 01f6 4915 4d41 |I MA| 01f8 3d39 4d14 |=9M | 01fa 5c00 6955 |\ iU| 01fc 5125 3125 |Q%1%| 01fe 5125 154c |Q% L|