|
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 0008 038b | | .XXX[0xa0] 00e8 9061 2002 | a | 00ea 10a3 1060 | `| 00ec 033d e055 | = U| 00ee 2007 907c | || 00f0 075c 3895 | \8 | 00f2 a01d 2007 | | 00f4 9083 907c | || 00f6 073f 9fff | ? | 00f8 8024 618d | $a | 00fa 2007 9083 | | 00fc 907c 073c | | <| 00fe 0248 3968 | H9h| 0100 077d c010 | } | 0102 0327 9062 | ' b| 0104 10b1 dfa0 | | 0106 0325 e140 | % @| 0108 033d e0ff | = | 010a 9015 200b | | 010c 9062 10cf | b | 010e 1085 2007 | | 0110 907b 9074 | { t| 0112 073f 903f | ? ?| 0114 9038 604e | 8`N| 0116 980b 980b | | 0118 9050 075d | P ]| 011a a0ad 2007 | | 011c 9083 907c | || 011e 073f 9fff | ? | 0120 8024 618c | $a | 0122 033d e075 | = u| 0124 2007 907c | || 0126 075c 3cbd | \< | 0128 c06d 2007 | m | 012a 9083 907c | || 012c 073c 0248 | < H| 012e 396c 077d |9l }| 0130 a00c 0338 | 8| 0132 0339 e09d | 9 | 0134 2007 907c | || 0136 075c 3895 | \8 | 0138 a01d 2007 | | 013a 9083 907c | || 013c 073f 9fff | ? | 013e 8024 618c | $a | 0140 0327 9062 | ' b| 0142 10b1 df80 | | 0144 0339 e00b | 9 | 0146 9062 10ac | b | 0148 0325 2007 | % | 014a 907c 075c | | \| 014c 3cbd def0 |< | 014e 0339 2007 | 9 | 0150 9083 907c | || 0152 073c 0248 | < H| 0154 396c 077d |9l }| 0156 c010 0327 | '| 0158 9062 10b1 | b | 015a deb4 0338 | 8| 015c 0248 3983 | H9 | 015e 9fff 8024 | $| 0160 618d 1408 |a | 0162 0000 0000 | | 0164 270c 0010 |' | 0166 000b 9ffc | | 0168 0768 03a4 | h | 016a 0d6c 0cdf | l | 016c 9fff 9808 | | 016e 0750 033f | P ?| 0170 9808 0764 | d| 0172 098d c034 | 4| 0174 0363 9808 | c | 0176 075d 2001 | ] | 0178 207c 0989 | | | 017a a011 2083 | | 017c 9817 9808 | | 017e 0758 0320 | X | 0180 ffcc 0338 | 8| 0182 0360 03a4 | ` | 0184 0719 1004 | | 0186 0000 0000 | | .BLANK 0000[0x6] 018c 278c 0010 |' | .XXX[0x4b] 018e 0007 9ffd | | 0190 2002 10a3 | | 0192 1ffc 033d | =| 0194 e0f9 200f | | 0196 9083 907c | || 0198 073f 9094 | ? | 019a 089c 077d | }| 019c a02f 9ffb | / | 019e 9088 09c8 | | 01a0 0360 0388 | ` | 01a2 0981 c004 | | 01a4 2007 9ffe | | 01a6 109d e0ab | | 01a8 9080 3021 | 0!| 01aa a055 2005 | U | 01ac 201f 907c | || 01ae 073c 0248 | < H| 01b0 3974 077d |9t }| 01b2 a037 908a | 7 | 01b4 9ffb 908f | | 01b6 9088 09c8 | | 01b8 0360 0388 | ` | 01ba 0981 c004 | | 01bc 2007 9ffe | | 01be 109d e049 | I| 01c0 2007 9083 | | 01c2 907c 073c | | <| 01c4 0248 397c | H9|| 01c6 077d a00d | } | 01c8 2002 9ff9 | | 01ca e01d 2007 | | 01cc 9083 907c | || 01ce 073f 905f | ? _| 01d0 8024 618c | $a | 01d2 0327 9ffe | ' | 01d4 10b1 defd | | 01d6 1404 | | 01d7 0000 0000 | | .BLANK 0000[0x5] 01dc 28d8 0010 |( | .XXX[0x12] 01de 000b 9fff | | 01e0 8024 6083 | $` | 01e2 9fff 8024 | $| 01e4 606f 1ffc |`o | 01e6 0248 3984 | H9 | 01e8 0248 398b | H9 | 01ea 980b 805c | \| 01ec 6085 1404 |` | 01ee 0000 0000 | | .BLANK 0000[0x6] 01f4 2968 29a4 |)h) | .XXX[0xc] 01f6 002c 0384 | , | 01f8 1800 0388 | | 01fa 1800 038c | | 01fc 1800 0388 | | 01fe 0390 1804 | |