|
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_0bf8df
└─⟦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 00e0 | | .CONST 0x00e0 ; 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 006a | j | .CONST 0x006a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0019 | | .CONST 0x0019 ; Number of locals 000b INIT_0008: 000b 0093 0000 | | push_full_address 0x0 000d 6076 |`v | Indirect_Literal Discrete,0x84,{0x80000000, 0x00020000} 000e 0273 | s | Execute Discrete,Plus 000f 00db | | Load_Top At_Offset_3 0010 606f |`o | Indirect_Literal Discrete,0x80,{0x00000000, 0x0000ffff} 0011 0279 | y | Execute Discrete,And 0012 0273 | s | Execute Discrete,Plus 0013 e002 | | Load 0x0,0x2 0014 0273 | s | Execute Discrete,Plus 0015 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0016 00da | | Load_Top At_Offset_2 0017 e003 | | Load 0x0,0x3 0018 0386 | | Declare_Variable Package,Visible 0019 00d8 | | Load_Top At_Offset_0 001a 020f | | Execute Module,Activate 001b 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated 001d 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated 001f 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated 0021 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated 0023 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated 0025 029c 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible 0027 0093 0000 | | push_full_address 0x0 0029 6052 |`R | Indirect_Literal Discrete,0x7c,{0x80000000, 0x00010000} 002a 0273 | s | Execute Discrete,Plus 002b e20d | | Load 0x1,0xd 002c 6053 |`S | Indirect_Literal Discrete,0x80,{0x00000000, 0x0000ffff} 002d 0279 | y | Execute Discrete,And 002e 0273 | s | Execute Discrete,Plus 002f e004 | | Load 0x0,0x4 0030 0273 | s | Execute Discrete,Plus 0031 e005 | | Load 0x0,0x5 0032 e210 | | Load 0x1,0x10 0033 0098 | | Execute Package,Field_Read_Dynamic 0034 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0035 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0036 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0037 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0038 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0039 482f |H/ | Short_Literal 0x2f 003a 603d |`= | Indirect_Literal Discrete,0x78,{0x7fffffff, 0xffffffff} 003b e006 | | Load 0x0,0x6 003c 0386 | | Declare_Variable Package,Visible 003d 00d8 | | Load_Top At_Offset_0 003e 020f | | Execute Module,Activate 003f 00bf | | Action Accept_Activation 0040 e007 | | Load 0x0,0x7 0041 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0042 0266 | f | Execute Discrete,Bounds 0043 e008 | | Load 0x0,0x8 0044 e210 | | Load 0x1,0x10 0045 0098 | | Execute Package,Field_Read_Dynamic 0046 02a0 | | Declare_Subprogram Null_Subprogram 0047 4801 |H | Short_Literal 0x1 0048 035d | ] | Declare_Type Array,Defined 0049 00d8 | | Load_Top At_Offset_0 004a 0337 | 7 | Declare_Variable Array 004b 00d8 | | Load_Top At_Offset_0 004c 0335 | 5 | Declare_Variable Array,Duplicate 004d 00cd | | Action Spare6_Action 004e 4800 |H | Short_Literal 0x0 004f 4800 |H | Short_Literal 0x0 0050 00da | | Load_Top At_Offset_2 0051 01d6 | | Execute Vector,Field_Write 0052 4801 |H | Short_Literal 0x1 0053 4801 |H | Short_Literal 0x1 0054 00da | | Load_Top At_Offset_2 0055 01d6 | | Execute Vector,Field_Write 0056 4802 |H | Short_Literal 0x2 0057 4802 |H | Short_Literal 0x2 0058 00da | | Load_Top At_Offset_2 0059 01d6 | | Execute Vector,Field_Write 005a 4801 |H | Short_Literal 0x1 005b 4803 |H | Short_Literal 0x3 005c 00da | | Load_Top At_Offset_2 005d 01d6 | | Execute Vector,Field_Write 005e 00d9 | | Load_Top At_Offset_1 005f 01d4 | | Execute Vector,Structure_Write 0060 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0061 00c7 | | Action Elaborate_Subprogram 0062 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0063 00c7 | | Action Elaborate_Subprogram 0064 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0065 00c7 | | Action Elaborate_Subprogram 0066 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0067 00c7 | | Action Elaborate_Subprogram 0068 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0069 00c7 | | Action Elaborate_Subprogram 006a BODY_0008: 006a 00bc | | Action Signal_Activated 006b 00bb | | Action Signal_Completion 006c 0000 0000 | | .BLANK 0000[0x4] 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 e009 | | Load 0x0,0x9 0075 e210 | | Load 0x1,0x10 0076 0096 | | Execute Package,Entry 0077 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0078 7fff ffff | | .LITERAL {0x7fffffff, 0xffffffff} 007c 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0080 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 0084 8000 0000 | | .LITERAL {0x80000000, 0x00020000} 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 008f | | .CONST 0x008f ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 0002 | | .CONST 0x0002 ; Number of locals 008b INIT_0088: 008b e005 | | Load 0x0,0x5 008c e210 | | Load 0x1,0x10 008d 0098 | | Execute Package,Field_Read_Dynamic 008e 0007 | | Action Break_Optional 008f BODY_0088: 008f e005 | | Load 0x0,0x5 0090 e210 | | Load 0x1,0x10 0091 0098 | | Execute Package,Field_Read_Dynamic 0092 e5fd | | Load 0x2,-0x3 0093 00ea | | Load_Encached Null_String_Cache 0094 e5fe | | Load 0x2,-0x2 0095 e5ff | | Load 0x2,-0x1 0096 e219 | | Load 0x1,0x19 0097 01d7 | | Execute Vector,Field_Read 0098 e00a | | Load 0x0,0xa 0099 e210 | | Load 0x1,0x10 009a 0096 | | Execute Package,Entry 009b 0031 | 1 | Store_Top Heap_Access,At_Offset_1 009c 00d8 | | Load_Top At_Offset_0 009d a5fc | | Store_Unchecked 0x2,-0x4 009e 00d8 | | Load_Top At_Offset_0 009f e00b | | Load 0x0,0xb 00a0 e210 | | Load 0x1,0x10 00a1 0096 | | Execute Package,Entry 00a2 a5fb | | Store_Unchecked 0x2,-0x5 00a3 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00a4 0000 0000 | | .BLANK 0000[0x4] 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 00ab | | .CONST 0x00ab ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 0001 | | .CONST 0x0001 ; Number of locals 00ab BODY_00a8: 00ab INIT_00a8: 00ab 00da | | Load_Top At_Offset_2 00ac e00c | | Load 0x0,0xc 00ad e210 | | Load 0x1,0x10 00ae 0096 | | Execute Package,Entry 00af 0033 | 3 | Store_Top Heap_Access,At_Offset_3 00b0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00b1 0000 0000 | | .BLANK 0000[0x7] 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; SUBPROGRAM 00b8 ; -------------------------------------------------------------------------------------- 00b8 00bb | | .CONST 0x00bb ; Address of begin 00b9 0004 | | .CONST 0x0004 ; Address of exception handler 00ba 0001 | | .CONST 0x0001 ; Number of locals 00bb BODY_00b8: 00bb INIT_00b8: 00bb 00da | | Load_Top At_Offset_2 00bc e00d | | Load 0x0,0xd 00bd e210 | | Load 0x1,0x10 00be 0096 | | Execute Package,Entry 00bf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00c3 | | .CONST 0x00c3 ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0001 | | .CONST 0x0001 ; Number of locals 00c3 BODY_00c0: 00c3 INIT_00c0: 00c3 00da | | Load_Top At_Offset_2 00c4 e00e | | Load 0x0,0xe 00c5 e210 | | Load 0x1,0x10 00c6 0096 | | Execute Package,Entry 00c7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00cb | | .CONST 0x00cb ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0001 | | .CONST 0x0001 ; Number of locals 00cb BODY_00c8: 00cb INIT_00c8: 00cb e00f | | Load 0x0,0xf 00cc 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00cd e005 | | Load 0x0,0x5 00ce e210 | | Load 0x1,0x10 00cf 0098 | | Execute Package,Field_Read_Dynamic 00d0 e5fd | | Load 0x2,-0x3 00d1 e010 | | Load 0x0,0x10 00d2 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00d3 0119 | | Execute Any,Check_In_Formal_Type 00d4 e5fe | | Load 0x2,-0x2 00d5 e5ff | | Load 0x2,-0x1 00d6 8212 | | Call 0x1,0x12 00d7 c5fc | | Store 0x2,-0x4 00d8 c5fb | | Store 0x2,-0x5 00d9 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00da 0000 0000 | | .BLANK 0000[0x6] 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; Debug Table 00e0 ; -------------------------------------------------------------------------------------- 00e0 0004 0002 | | .DEBUG4 0x0004,0x0002,0x0b9c,0x0000,0x0001,0x0000 00e6 4000 6248 |@ bH| .XXX[0x11a] 00e8 8900 45ff | E | 00ea fffe e404 | | 00ec 0000 0207 | | 00ee 1f80 2207 | " | 00f0 a000 0277 | w| 00f2 8efe 8300 | | 00f4 9882 b300 | | 00f6 d883 d9ff | | 00f8 fffc 7a40 | z@| 00fa 4000 6207 |@ b | 00fc 1f80 2207 | " | 00fe a000 0277 | w| 0100 8efe 8240 | @| 0102 1881 e348 | H| 0104 0882 c348 | H| 0106 9900 0350 | P| 0108 0882 b248 | H| 010a 1980 3b50 | ;P| 010c 9980 13c0 | | 010e 1889 0250 | P| 0110 4080 13c0 |@ | 0112 9980 2361 | #a| 0114 2885 d360 |( `| 0116 b980 3369 | 3i| 0118 2885 d640 |( @| 011a 0885 c100 | | 011c 0751 2b68 | Q+h| 011e b980 3607 | 6 | 0120 1f80 2207 | " | 0122 a000 0277 | w| 0124 8efe 82e8 | | 0126 1881 e248 | H| 0128 1d85 c240 | @| 012a 1980 3900 | 9 | 012c 0751 0a50 | Q P| 012e 4080 1349 |@ I| 0130 3980 3084 |9 0 | 0132 000c c348 | H| 0134 bd85 d351 | Q| 0136 3980 3750 |9 7P| 0138 bd85 d758 | X| 013a 1889 0258 | X| 013c 2bff 6358 |+ cX| 013e 9889 0360 | `| 0140 1980 2378 | #x| 0142 1889 0260 | `| 0144 2c80 9e78 |, x| 0146 4f00 3378 |O 3x| 0148 9889 0381 | | 014a 308f 5202 |0 R | 014c 4000 400a |@ @ | 014e 0000 1348 | H| 0150 1900 0042 | B| 0152 0000 1640 | @| 0154 4000 7788 |@ w | 0156 1d82 f240 | @| 0158 4000 7648 |@ vH| 015a 8900 4750 | GP| 015c 1980 11ff | | 015e fffc 0358 | X| 0160 1889 0207 | | 0162 1f80 2207 | " | 0164 a000 0000 | | 0166 0000 0277 | w| 0168 8efe 43d0 | C | 016a 1883 33e8 | 3 | 016c 1882 e360 | `| 016e 1882 72d0 | r | 0170 8000 6a02 | j | 0172 4000 300a |@ 0 | 0174 0000 12e8 | | 0176 9d00 69ff | i | 0178 ffe5 1c04 | | 017a 0000 0368 | h| 017c 1885 e202 | | 017e 4000 3412 |@ 4 | 0180 0001 6fe0 | o | 0182 1885 f378 | x| 0184 1883 03d8 | | 0186 1882 f3c8 | | 0188 1883 0350 | P| 018a 1882 e3b0 | | 018c 1885 e2c8 | | 018e 9900 72c8 | r | 0190 1980 06b0 | | 0192 8a00 5ab0 | Z | 0194 1680 06c8 | | 0196 1900 6ad8 | j | 0198 8f00 6ed8 | n | 019a 9b00 7202 | r | 019c 9900 5812 | X | 019e 0000 0ed8 | | 01a0 1b80 06c8 | | 01a2 4000 5b78 |@ [x| 01a4 1883 1202 | | 01a6 4000 3c8a |@ < | 01a8 0000 afb8 | | 01aa 1882 f381 | | 01ac 3883 d202 |8 | 01ae 4000 40ca |@ @ | 01b0 0000 9fb8 | | 01b2 1882 f388 | | 01b4 1882 f202 | | 01b6 4000 44ca |@ D | 01b8 0000 8fb8 | | 01ba 1882 f2d8 | | 01bc 1b00 6a02 | j | 01be 9b00 5812 | X | 01c0 0000 0eb8 | | 01c2 4080 02d8 |@ | 01c4 4000 5b90 |@ [ | 01c6 1883 0290 | | 01c8 9200 7602 | v | 01ca 4000 4892 |@ H | 01cc 0000 27e8 | ' | 01ce 1883 43a0 | C | 01d0 1885 e2e0 | | 01d2 9c00 4a02 | J | 01d4 9c00 50da | P | 01d6 0000 13e8 | | 01d8 1883 43e0 | C | 01da 1885 e3e8 | | 01dc 1883 43a8 | C | 01de 1883 5202 | R | 01e0 9d00 54da | T | 01e2 0001 0602 | | 01e4 4000 6f40 |@ o@| 01e6 1885 e348 | H| 01e8 1883 52e8 | R | 01ea 1d00 2202 | " | 01ec 9d00 2492 | $ | 01ee 0000 13e8 | | 01f0 9883 43e8 | C | 01f2 1883 53e8 | S | 01f4 9883 4100 | A | 01f6 0031 6b40 | 1k@| 01f8 1883 1042 | B| 01fa 0000 d602 | | 01fc 4000 6f60 |@ o`| 01fe 1883 0368 | h|