|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_41f4ab
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0148 | H | .CONST 0x0148 ; 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 0000 | | .CONST 0x0000 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 004b | K | .CONST 0x004b ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0020 | | .CONST 0x0020 ; Number of locals 000b INIT_0008: 000b 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 00e3 | | Load_Encached Natural_Cache 000f 4801 |H | Short_Literal 0x1 0010 480b |H | Short_Literal 0xb 0011 e002 | | Load 0x0,0x2 0012 029f 010b | | Declare_Subprogram INIT_0108,For_Call 0014 4801 |H | Short_Literal 0x1 0015 035d | ] | Declare_Type Array,Defined 0016 00d8 | | Load_Top At_Offset_0 0017 0337 | 7 | Declare_Variable Array 0018 00d8 | | Load_Top At_Offset_0 0019 1c00 | | Execute_Immediate Run_Utility,0x0 001a e003 | | Load 0x0,0x3 001b 0322 | " | Declare_Variable Record 001c 00d8 | | Load_Top At_Offset_0 001d 0322 | " | Declare_Variable Record 001e e004 | | Load 0x0,0x4 001f 0322 | " | Declare_Variable Record 0020 e005 | | Load 0x0,0x5 0021 0322 | " | Declare_Variable Record 0022 e006 | | Load 0x0,0x6 0023 0322 | " | Declare_Variable Record 0024 00d8 | | Load_Top At_Offset_0 0025 1c00 | | Execute_Immediate Run_Utility,0x0 0026 e007 | | Load 0x0,0x7 0027 0322 | " | Declare_Variable Record 0028 00d8 | | Load_Top At_Offset_0 0029 1c00 | | Execute_Immediate Run_Utility,0x0 002a e007 | | Load 0x0,0x7 002b 0322 | " | Declare_Variable Record 002c 00d8 | | Load_Top At_Offset_0 002d 1c00 | | Execute_Immediate Run_Utility,0x0 002e e008 | | Load 0x0,0x8 002f 0322 | " | Declare_Variable Record 0030 00d8 | | Load_Top At_Offset_0 0031 1c00 | | Execute_Immediate Run_Utility,0x0 0032 e009 | | Load 0x0,0x9 0033 0322 | " | Declare_Variable Record 0034 e00a | | Load 0x0,0xa 0035 0322 | " | Declare_Variable Record 0036 00d8 | | Load_Top At_Offset_0 0037 0322 | " | Declare_Variable Record 0038 e00b | | Load 0x0,0xb 0039 0322 | " | Declare_Variable Record 003a e00c | | Load 0x0,0xc 003b 0322 | " | Declare_Variable Record 003c 1d0f | | Execute_Immediate Reference_Lex_1,0xf 003d 00c7 | | Action Elaborate_Subprogram 003e 4800 |H | Short_Literal 0x0 003f 0093 0123 | #| push_full_address INIT_0120 0041 00f5 | | Load_Encached Unused21 0042 037d | } | Declare_Type Task,Defined 0043 036f | o | Declare_Variable Task 0044 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0045 e212 | | Load 0x1,0x12 0046 a00d | | Store_Unchecked 0x0,0xd 0047 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0048 4804 |H | Short_Literal 0x4 0049 e220 | | Load 0x1,0x20 004a 020e | | Execute Module,Augment_Imports 004b BODY_0008: 004b 00be | | Action Activate_Tasks 004c e215 | | Load 0x1,0x15 004d 483c |H< | Short_Literal 0x3c 004e 800e | | Call 0x0,0xe 004f 00d1 | | Pop_Control Pop_Count_1 0050 e216 | | Load 0x1,0x16 0051 4801 |H | Short_Literal 0x1 0052 4801 |H | Short_Literal 0x1 0053 4801 |H | Short_Literal 0x1 0054 4800 |H | Short_Literal 0x0 0055 480a |H | Short_Literal 0xa 0056 800f | | Call 0x0,0xf 0057 00d1 | | Pop_Control Pop_Count_1 0058 e213 | | Load 0x1,0x13 0059 e216 | | Load 0x1,0x16 005a e215 | | Load 0x1,0x15 005b 4803 |H | Short_Literal 0x3 005c 8010 | | Call 0x0,0x10 005d 00d1 | | Pop_Control Pop_Count_1 005e e214 | | Load 0x1,0x14 005f e216 | | Load 0x1,0x16 0060 e215 | | Load 0x1,0x15 0061 4804 |H | Short_Literal 0x4 0062 8010 | | Call 0x0,0x10 0063 00d1 | | Pop_Control Pop_Count_1 0064 e217 | | Load 0x1,0x17 0065 8011 | | Call 0x0,0x11 0066 00d1 | | Pop_Control Pop_Count_1 0067 e217 | | Load 0x1,0x17 0068 4800 |H | Short_Literal 0x0 0069 8012 | | Call 0x0,0x12 006a 00d1 | | Pop_Control Pop_Count_1 006b e217 | | Load 0x1,0x17 006c 4802 |H | Short_Literal 0x2 006d 8012 | | Call 0x0,0x12 006e 00d1 | | Pop_Control Pop_Count_1 006f e218 | | Load 0x1,0x18 0070 e217 | | Load 0x1,0x17 0071 4800 |H | Short_Literal 0x0 0072 4800 |H | Short_Literal 0x0 0073 4800 |H | Short_Literal 0x0 0074 4800 |H | Short_Literal 0x0 0075 4805 |H | Short_Literal 0x5 0076 480b |H | Short_Literal 0xb 0077 481e |H | Short_Literal 0x1e 0078 480a |H | Short_Literal 0xa 0079 8013 | | Call 0x0,0x13 007a 00d1 | | Pop_Control Pop_Count_1 007b e219 | | Load 0x1,0x19 007c 8014 | | Call 0x0,0x14 007d 00d1 | | Pop_Control Pop_Count_1 007e e21a | | Load 0x1,0x1a 007f e219 | | Load 0x1,0x19 0080 00d8 | | Load_Top At_Offset_0 0081 e218 | | Load 0x1,0x18 0082 4802 |H | Short_Literal 0x2 0083 4801 |H | Short_Literal 0x1 0084 8015 | | Call 0x0,0x15 0085 00d1 | | Pop_Control Pop_Count_1 0086 e21c | | Load 0x1,0x1c 0087 48c8 |H | Short_Literal 0xc8 0088 8016 | | Call 0x0,0x16 0089 00d1 | | Pop_Control Pop_Count_1 008a 00db | | Load_Top At_Offset_3 008b 48c7 |H | Short_Literal 0xc7 008c 8016 | | Call 0x0,0x16 008d 00d1 | | Pop_Control Pop_Count_1 008e 00da | | Load_Top At_Offset_2 008f 4802 |H | Short_Literal 0x2 0090 4803 |H | Short_Literal 0x3 0091 8017 | | Call 0x0,0x17 0092 00d1 | | Pop_Control Pop_Count_1 0093 00d9 | | Load_Top At_Offset_1 0094 4805 |H | Short_Literal 0x5 0095 48c8 |H | Short_Literal 0xc8 0096 8018 | | Call 0x0,0x18 0097 00d1 | | Pop_Control Pop_Count_1 0098 e21b | | Load 0x1,0x1b 0099 4805 |H | Short_Literal 0x5 009a 4801 |H | Short_Literal 0x1 009b 4802 |H | Short_Literal 0x2 009c 8019 | | Call 0x0,0x19 009d 00d1 | | Pop_Control Pop_Count_1 009e 4801 |H | Short_Literal 0x1 009f e212 | | Load 0x1,0x12 00a0 01d5 | | Execute Vector,Field_Reference 00a1 4801 |H | Short_Literal 0x1 00a2 801a | | Call 0x0,0x1a 00a3 00d1 | | Pop_Control Pop_Count_1 00a4 4802 |H | Short_Literal 0x2 00a5 e212 | | Load 0x1,0x12 00a6 01d5 | | Execute Vector,Field_Reference 00a7 e213 | | Load 0x1,0x13 00a8 801b | | Call 0x0,0x1b 00a9 4801 |H | Short_Literal 0x1 00aa 4805 |H | Short_Literal 0x5 00ab 801c | | Call 0x0,0x1c 00ac 00d1 | | Pop_Control Pop_Count_1 00ad 4803 |H | Short_Literal 0x3 00ae e212 | | Load 0x1,0x12 00af 01d5 | | Execute Vector,Field_Reference 00b0 e21a | | Load 0x1,0x1a 00b1 801d | | Call 0x0,0x1d 00b2 4802 |H | Short_Literal 0x2 00b3 4805 |H | Short_Literal 0x5 00b4 801c | | Call 0x0,0x1c 00b5 00d1 | | Pop_Control Pop_Count_1 00b6 4804 |H | Short_Literal 0x4 00b7 e212 | | Load 0x1,0x12 00b8 01d5 | | Execute Vector,Field_Reference 00b9 e21b | | Load 0x1,0x1b 00ba 801e | | Call 0x0,0x1e 00bb 4803 |H | Short_Literal 0x3 00bc 4805 |H | Short_Literal 0x5 00bd 801c | | Call 0x0,0x1c 00be 00d1 | | Pop_Control Pop_Count_1 00bf 4805 |H | Short_Literal 0x5 00c0 e212 | | Load 0x1,0x12 00c1 01d5 | | Execute Vector,Field_Reference 00c2 e21c | | Load 0x1,0x1c 00c3 801f | | Call 0x0,0x1f 00c4 4804 |H | Short_Literal 0x4 00c5 4805 |H | Short_Literal 0x5 00c6 801c | | Call 0x0,0x1c 00c7 00d1 | | Pop_Control Pop_Count_1 00c8 4806 |H | Short_Literal 0x6 00c9 e212 | | Load 0x1,0x12 00ca 01d5 | | Execute Vector,Field_Reference 00cb 00db | | Load_Top At_Offset_3 00cc 8020 | | Call 0x0,0x20 00cd 4805 |H | Short_Literal 0x5 00ce 4805 |H | Short_Literal 0x5 00cf 801c | | Call 0x0,0x1c 00d0 00d1 | | Pop_Control Pop_Count_1 00d1 4807 |H | Short_Literal 0x7 00d2 e212 | | Load 0x1,0x12 00d3 01d5 | | Execute Vector,Field_Reference 00d4 00da | | Load_Top At_Offset_2 00d5 8021 | ! | Call 0x0,0x21 00d6 4806 |H | Short_Literal 0x6 00d7 4805 |H | Short_Literal 0x5 00d8 801c | | Call 0x0,0x1c 00d9 00d1 | | Pop_Control Pop_Count_1 00da 4808 |H | Short_Literal 0x8 00db e212 | | Load 0x1,0x12 00dc 01d5 | | Execute Vector,Field_Reference 00dd e21d | | Load 0x1,0x1d 00de 801f | | Call 0x0,0x1f 00df 4804 |H | Short_Literal 0x4 00e0 4805 |H | Short_Literal 0x5 00e1 801c | | Call 0x0,0x1c 00e2 00d1 | | Pop_Control Pop_Count_1 00e3 4809 |H | Short_Literal 0x9 00e4 e212 | | Load 0x1,0x12 00e5 01d5 | | Execute Vector,Field_Reference 00e6 e214 | | Load 0x1,0x14 00e7 801b | | Call 0x0,0x1b 00e8 4801 |H | Short_Literal 0x1 00e9 4805 |H | Short_Literal 0x5 00ea 801c | | Call 0x0,0x1c 00eb 00d1 | | Pop_Control Pop_Count_1 00ec 480a |H | Short_Literal 0xa 00ed e212 | | Load 0x1,0x12 00ee 01d5 | | Execute Vector,Field_Reference 00ef 4802 |H | Short_Literal 0x2 00f0 801a | | Call 0x0,0x1a 00f1 00d1 | | Pop_Control Pop_Count_1 00f2 480b |H | Short_Literal 0xb 00f3 e212 | | Load 0x1,0x12 00f4 01d5 | | Execute Vector,Field_Reference 00f5 4803 |H | Short_Literal 0x3 00f6 801a | | Call 0x0,0x1a 00f7 00d1 | | Pop_Control Pop_Count_1 00f8 4801 |H | Short_Literal 0x1 00f9 a210 | | Store_Unchecked 0x1,0x10 00fa 4800 |H | Short_Literal 0x0 00fb 00d9 | | Load_Top At_Offset_1 00fc 170d | | Execute Task,Entry_Call,Field_Number 0xd 00fd 00bc | | Action Signal_Activated 00fe 00bb | | Action Signal_Completion 00ff 0000 | | .XXX[0x1] 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 0103 | | .CONST 0x0103 ; Address of begin 0101 0004 | | .CONST 0x0004 ; Address of exception handler 0102 0001 | | .CONST 0x0001 ; Number of locals 0103 BODY_0100: 0103 INIT_0100: 0103 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0104 0000 0000 | | .BLANK 0000[0x4] 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 010b | | .CONST 0x010b ; Address of begin 0109 0004 | | .CONST 0x0004 ; Address of exception handler 010a 0001 | | .CONST 0x0001 ; Number of locals 010b BODY_0108: 010b INIT_0108: 010b 00d1 | | Pop_Control Pop_Count_1 010c 00da | | Load_Top At_Offset_2 010d 01d8 | | Execute Vector,Element_Type 010e 02ff | | Declare_Variable Variant_Record 010f 00d8 | | Load_Top At_Offset_0 0110 1c00 | | Execute_Immediate Run_Utility,0x0 0111 00db | | Load_Top At_Offset_3 0112 01dc | | Execute Vector,Last 0113 e5ff | | Load 0x2,-0x1 0114 01dd | | Execute Vector,First 0115 0263 | c | Execute Discrete,Above_Bound 0116 7006 |p | Jump_Nonzero 0x11d 0117 00da | | Load_Top At_Offset_2 0118 00d9 | | Load_Top At_Offset_1 0119 e5ff | | Load 0x2,-0x1 011a 01d6 | | Execute Vector,Field_Write 011b 0a01 | | Execute_Immediate Plus,0x1 011c 7ff8 | | Jump 0x115 011d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 011e 0000 0000 | | .XXX[0x2] 0120 ; -------------------------------------------------------------------------------------- 0120 ; SUBPROGRAM 0120 ; -------------------------------------------------------------------------------------- 0120 012a | * | .CONST 0x012a ; Address of begin 0121 0004 | | .CONST 0x0004 ; Address of exception handler 0122 000e | | .CONST 0x000e ; Number of locals 0123 INIT_0120: 0123 4800 |H | Short_Literal 0x0 0124 02cb | | Declare_Variable Entry 0125 00bf | | Action Accept_Activation 0126 480d |H | Short_Literal 0xd 0127 0299 0143 | C| Declare_Subprogram INIT_0140,For_Accept 0129 00bc | | Action Signal_Activated 012a BODY_0120: 012a 1d0e | | Execute_Immediate Reference_Lex_1,0xe 012b 1d0d | | Execute_Immediate Reference_Lex_1,0xd 012c 0137 | 7 | Execute Entry,Rendezvous 012d 00cf | | Action Mark_Auxiliary 012e e001 | | Load 0x0,0x1 012f e002 | | Load 0x0,0x2 0130 01d5 | | Execute Vector,Field_Reference 0131 8003 | | Call 0x0,0x3 0132 8004 | | Call 0x0,0x4 0133 e001 | | Load 0x0,0x1 0134 0a01 | | Execute_Immediate Plus,0x1 0135 c001 | | Store 0x0,0x1 0136 e001 | | Load 0x0,0x1 0137 0c0c | | Execute_Immediate Greater_Equal,0xc 0138 6801 |h | Jump_Zero 0x13a 0139 7802 |x | Jump 0x13c 013a 00c9 | | Action Pop_Auxiliary_Loop 013b 7ff2 | | Jump 0x12e 013c 00ce | | Action Pop_Auxiliary 013d 00bb | | Action Signal_Completion 013e 0000 0000 | | .XXX[0x2] 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 0143 | C | .CONST 0x0143 ; Address of begin 0141 0004 | | .CONST 0x0004 ; Address of exception handler 0142 0001 | | .CONST 0x0001 ; Number of locals 0143 BODY_0140: 0143 INIT_0140: 0143 4100 |A | End_Rendezvous 0x0 0144 0000 0000 | | .BLANK 0000[0x4] 0148 ; -------------------------------------------------------------------------------------- 0148 ; Debug Table 0148 ; -------------------------------------------------------------------------------------- 0148 0004 0009 | | .DEBUG4 0x0004,0x0009,0x85c9,0x0000,0x0001,0x0007 014e 000b 016a | j| .DBG4T 0x000b,0x016a,0xc000,0x0000 0152 000e 016d | m| .DBG4T 0x000e,0x016d,0xc000,0x8000 0156 0103 01ad | | .DBG4T 0x0103,0x01ad,0x1001,0x0000 015a 010b 0000 | | .DBG4T 0x010b,0x0000,0x1005,0x0000 015e 0123 01b0 | # | .DBG4T 0x0123,0x01b0,0x0000,0x0000 0162 0126 01b3 | & | .DBG4T 0x0126,0x01b3,0x0000,0x4000 0166 0143 0000 | C | .DBG4T 0x0143,0x0000,0x0003,0x0000 016a ; -------------------------------------------------------------------------------------- 016a ; Debug chain 016a ; -------------------------------------------------------------------------------------- 016a 0001 0000 | | .DBGLEN 0x0001,0x0000 016c 000b | | .DBGLNO 0x000b 016d ; -------------------------------------------------------------------------------------- 016d ; Debug chain 016d ; -------------------------------------------------------------------------------------- 016d 0011 001c | | .DBGLEN 0x0011,0x001c 016f 000e 000f | | .DBGLNO 0x000e,0x000f,0x0016,0x001a,0x001e,0x0020,0x0022,0x0026,0x002a,0x002e,0x0032,0x0034,0x0038,0x003a,0x003c,0x003e,0x0044,0x004c,0x0050,0x0058,0x005e,0x0064,0x0067,0x006b,0x006f,0x007b,0x007e,0x0086,0x008a,0x008e,0x0093,0x0098,0x009e,0x00a4,0x00ad,0x00b6,0x00bf,0x00c8,0x00d1,0x00da,0x00e3,0x00ec,0x00f2,0x00f8,0x00fa 019c 0003 0004 | | .XXX[0x11] 019e 0005 0006 | | 01a0 0007 0008 | | 01a2 0009 000a | | 01a4 000b 000c | | 01a6 000d 000e | | 01a8 000f 0010 | | 01aa 0011 0012 | | 01ac 0013 | | 01ad ; -------------------------------------------------------------------------------------- 01ad ; Debug chain 01ad ; -------------------------------------------------------------------------------------- 01ad 0000 0001 | | .DBGLEN 0x0000,0x0001 01af 0103 | | .DBGLNO 0x0103 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; Debug chain 01b0 ; -------------------------------------------------------------------------------------- 01b0 0001 0000 | | .DBGLEN 0x0001,0x0000 01b2 0123 | # | .DBGLNO 0x0123 01b3 ; -------------------------------------------------------------------------------------- 01b3 ; Debug chain 01b3 ; -------------------------------------------------------------------------------------- 01b3 0000 0005 | | .DBGLEN 0x0000,0x0005 01b5 012a 012e | * .| .DBGLNO 0x012a,0x012e,0x0133,0x0136,0x0139 01ba 0001 0003 | | .XXX[0x5] 01bc 0004 0005 | | 01be 0006 | | 01bf 0000 0000 | | .BLANK 0000[0x41]