|
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_0500e0
└─⟦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 0098 | | .CONST 0x0098 ; 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 0022 | " | .CONST 0x0022 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0014 | | .CONST 0x0014 ; Number of locals 000b INIT_0008: 000b 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated 000d 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated 000f 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated 0011 00bf | | Action Accept_Activation 0012 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0013 00c7 | | Action Elaborate_Subprogram 0014 a001 | | Store_Unchecked 0x0,0x1 0015 00c6 | | Action Check_Subprogram_Elaborated 0016 e002 | | Load 0x0,0x2 0017 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0018 e002 | | Load 0x0,0x2 0019 1b0e | | Execute Package,Field_Read,Field_Number 0xe 001a e003 | | Load 0x0,0x3 001b e004 | | Load 0x0,0x4 001c 4800 |H | Short_Literal 0x0 001d 0007 | | Action Break_Optional 001e 1d0e | | Execute_Immediate Reference_Lex_1,0xe 001f 00c7 | | Action Elaborate_Subprogram 0020 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0021 00c7 | | Action Elaborate_Subprogram 0022 BODY_0008: 0022 00bc | | Action Signal_Activated 0023 00bb | | Action Signal_Completion 0024 0000 0000 | | .BLANK 0000[0x4] 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 00da | | Load_Top At_Offset_2 002c e002 | | Load 0x0,0x2 002d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002e 1c08 | | Execute_Immediate Run_Utility,0x8 002f e002 | | Load 0x0,0x2 0030 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0031 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0032 00d8 | | Load_Top At_Offset_0 0033 0227 | ' | Execute Access,All_Reference 0034 1c00 | | Execute_Immediate Run_Utility,0x0 0035 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0036 0000 0000 | | .XXX[0x2] 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 e210 | | Load 0x1,0x10 003d e211 | | Load 0x1,0x11 003e 1d12 | | Execute_Immediate Reference_Lex_1,0x12 003f 8001 | | Call 0x0,0x1 0040 003b | ; | Store_Top Access,At_Offset_3 0041 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0042 0000 0000 | | .BLANK 0000[0x6] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004d | M | .CONST 0x004d ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0002 | | .CONST 0x0002 ; Number of locals 004b INIT_0048: 004b e002 | | Load 0x0,0x2 004c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 004d BODY_0048: 004d e5fe | | Load 0x2,-0x2 004e 0227 | ' | Execute Access,All_Reference 004f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0050 e5ff | | Load 0x2,-0x1 0051 027f | | Execute Discrete,Equal 0052 6801 |h | Jump_Zero 0x54 0053 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0054 00db | | Load_Top At_Offset_3 0055 e002 | | Load 0x0,0x2 0056 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0057 1c08 | | Execute_Immediate Run_Utility,0x8 0058 e002 | | Load 0x0,0x2 0059 1b0e | | Execute Package,Field_Read,Field_Number 0xe 005a 03b6 | | Declare_Variable Access,By_Allocation,With_Value 005b 00d8 | | Load_Top At_Offset_0 005c 0227 | ' | Execute Access,All_Reference 005d 1c00 | | Execute_Immediate Run_Utility,0x0 005e 0039 | 9 | Store_Top Access,At_Offset_1 005f e5fe | | Load 0x2,-0x2 0060 0227 | ' | Execute Access,All_Reference 0061 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0062 e5ff | | Load 0x2,-0x1 0063 027a | z | Execute Discrete,Less_Equal 0064 6817 |h | Jump_Zero 0x7c 0065 e5fe | | Load 0x2,-0x2 0066 0227 | ' | Execute Access,All_Reference 0067 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0068 00d9 | | Load_Top At_Offset_1 0069 0227 | ' | Execute Access,All_Reference 006a 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 006b 4801 |H | Short_Literal 0x1 006c e5fe | | Load 0x2,-0x2 006d 0227 | ' | Execute Access,All_Reference 006e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 006f e5fe | | Load 0x2,-0x2 0070 0227 | ' | Execute Access,All_Reference 0071 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0072 01cf | | Execute Vector,Slice_Read 0073 4801 |H | Short_Literal 0x1 0074 e5fe | | Load 0x2,-0x2 0075 0227 | ' | Execute Access,All_Reference 0076 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0077 00db | | Load_Top At_Offset_3 0078 0229 | ) | Execute Access,All_Read 0079 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 007a 01ce | | Execute Vector,Slice_Write 007b 7810 |x | Jump 0x8c 007c 00db | | Load_Top At_Offset_3 007d 00d9 | | Load_Top At_Offset_1 007e 0227 | ' | Execute Access,All_Reference 007f 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0080 4801 |H | Short_Literal 0x1 0081 e5ff | | Load 0x2,-0x1 0082 e5fe | | Load 0x2,-0x2 0083 0227 | ' | Execute Access,All_Reference 0084 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0085 01cf | | Execute Vector,Slice_Read 0086 4801 |H | Short_Literal 0x1 0087 e5ff | | Load 0x2,-0x1 0088 00db | | Load_Top At_Offset_3 0089 0229 | ) | Execute Access,All_Read 008a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 008b 01ce | | Execute Vector,Slice_Write 008c e5fe | | Load 0x2,-0x2 008d e210 | | Load 0x1,0x10 008e e211 | | Load 0x1,0x11 008f 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0090 8001 | | Call 0x0,0x1 0091 c5fe | | Store 0x2,-0x2 0092 00d8 | | Load_Top At_Offset_0 0093 a5fe | | Store_Unchecked 0x2,-0x2 0094 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0095 0000 0000 | | .XXX[0x3] 0097 0000 | | 0098 ; -------------------------------------------------------------------------------------- 0098 ; Debug Table 0098 ; -------------------------------------------------------------------------------------- 0098 0004 0004 | | .DEBUG4 0x0004,0x0004,0xa8ea,0x0000,0x0001,0x0000 009e 0202 71d0 | q | .XXX[0x13] 00a0 da50 d800 | P | 00a2 0004 0000 | | 00a4 0024 0000 | $ | 00a6 d108 0000 | | 00a8 0008 0000 | | 00aa 0020 0000 | | 00ac 0018 0001 | | 00ae 5d88 020b |] | 00b0 31f0 |1 | 00b1 0000 0000 | | .BLANK 0000[0x4] 00b5 0105 ae44 | D| .XXX[0x1b] 00b7 0000 0cb6 | | 00b9 9f2a dbf0 | * | 00bb 0000 0000 | | 00bd 004f 956d | O m| 00bf f800 0000 | | 00c1 0000 2000 | | 00c3 0000 0000 | | 00c5 0000 0001 | | 00c7 7946 8000 |yF | 00c9 0000 4001 | @ | 00cb 794a 8000 |yJ | 00cd 0000 4000 | @ | 00cf 2600 |& | 00d0 0000 0000 | | .BLANK 0000[0x5] 00d5 5e52 a000 |^R | .XXX[0x12] 00d7 0000 1007 | | 00d9 cab6 fc00 | | 00db 0000 0000 | | 00dd 1000 0000 | | 00df 9000 0414 | | 00e1 e000 0000 | | 00e3 2000 0000 | | 00e5 4009 8000 |@ | 00e7 0000 0000 | | .BLANK 0000[0x8] 00ef 0202 320a | 2 | .XXX[0x25] 00f1 1943 4000 | C@ | 00f3 0004 0000 | | 00f5 0024 0001 | $ | 00f7 0538 0000 | 8 | 00f9 0008 0000 | | 00fb 0010 0000 | | 00fd 0018 0001 | | 00ff bc20 020b | | 0101 5a70 020b |Zp | 0103 5568 020b |Uh | 0105 a668 0105 | h | 0107 c284 0000 | | 0109 a6f3 2036 | 6| 010b 56da c000 |V | 010d 0000 0150 | P| 010f 1b2b 6d60 | +m`| 0111 0000 0000 | | 0113 a000 | | 0114 0000 0000 | | .BLANK 0000[0x4] 0118 958e 8500 | | .XXX[0x9] 011a 0000 4000 | @ | 011c 9590 8500 | | 011e 0000 4000 | @ | 0120 2600 |& | 0121 0000 0000 | | .BLANK 0000[0x5] 0126 2564 2140 |%d!@| .XXX[0x9] 0128 0000 1008 | | 012a 0d95 b6b0 | | 012c 0000 0000 | | 012e 5000 |P | 012f 0000 0000 | | .BLANK 0000[0x5] 0134 2000 0000 | | .XXX[0x4] 0136 0009 8000 | | 0138 0000 0000 | | .BLANK 0000[0x8] 0140 0206 5e03 | ^ | .XXX[0x5] 0142 b253 9c00 | S | 0144 0014 | | 0145 0000 0000 | | .BLANK 0000[0x5] 014a 0008 0000 | | .XXX[0x9] 014c 0000 0000 | | 014e 0018 0002 | | 0150 7950 020b |yP | 0152 82f0 | | 0153 0000 0000 | | .BLANK 0000[0x4] 0157 0105 d6c4 | | .XXX[0xe] 0159 0000 ab61 | a| 015b a065 e1c3 | e | 015d 5c27 c000 |\' | 015f 0150 37f1 | P7 | 0161 72fd 65e0 |r e | 0163 0004 6400 | d | 0165 0000 0000 | | .BLANK 0000[0x4] 0169 9896 8500 | | .XXX[0x21] 016b 0000 4000 | @ | 016d 989a 8500 | | 016f 0000 4000 | @ | 0171 0203 0802 | | 0173 2091 8000 | | 0175 0000 0000 | | 0177 2626 a140 |&& @| 0179 0000 1008 | | 017b 1978 70da | xp | 017d 5ee0 0000 |^ | 017f 5000 0000 |P | 0181 9000 0617 | | 0183 2000 0000 | | 0185 2000 0000 | | 0187 4001 80c6 |@ | 0189 0088 | | 018a 0000 0000 | | .BLANK 0000[0x7] 0191 0206 5e1c | ^ | .XXX[0x25] 0193 3697 b800 |6 | 0195 0014 0000 | | 0197 0024 0001 | $ | 0199 85c8 0000 | | 019b 0008 0000 | | 019d 0010 0000 | | 019f 0018 0002 | | 01a1 98d8 020b | | 01a3 ab70 020b | p | 01a5 7de8 020c |} | 01a7 70ec 0105 |p | 01a9 eb04 0000 | | 01ab bb36 a065 | 6 e| 01ad e369 ff83 | i | 01af c000 0150 | P| 01b1 32f1 c777 |2 w| 01b3 8380 0000 | | 01b5 a000 | | 01b6 0000 0000 | | .BLANK 0000[0xc] 01c2 0203 0802 | | .XXX[0x19] 01c4 2091 8000 | | 01c6 0000 0000 | | 01c8 29c2 2140 |) !@| 01ca 0000 1008 | | 01cc 1978 da80 | x | 01ce 54d0 0000 |T | 01d0 5000 0000 |P | 01d2 9000 0674 | t| 01d4 a000 0000 | | 01d6 2000 0000 | | 01d8 2001 80c6 | | 01da 0088 | | 01db 0000 0000 | | .BLANK 0000[0x7] 01e2 0206 5e36 | ^6| .XXX[0x13] 01e4 a015 3400 | 4 | 01e6 0014 0000 | | 01e8 0024 0001 | $ | 01ea 9d28 0000 | ( | 01ec 0008 0000 | | 01ee 0008 0000 | | 01f0 0018 0002 | | 01f2 b860 020b | ` | 01f4 d3f0 | | 01f5 0000 0000 | | .BLANK 0000[0x4] 01f9 0105 ff44 | D| .XXX[0x7] 01fb 0000 37bc | 7 | 01fd 2069 9b6a | i j| 01ff 9080 | |