|
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 0046 | F | .CONST 0x0046 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0010 | | .CONST 0x0010 ; Number of locals 000b INIT_0008: 000b e011 | | Load 0x0,0x11 000c e213 | | Load 0x1,0x13 000d 0098 | | Execute Package,Field_Read_Dynamic 000e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 000f e013 | | Load 0x0,0x13 0010 e213 | | Load 0x1,0x13 0011 0098 | | Execute Package,Field_Read_Dynamic 0012 0007 | | Action Break_Optional 0013 e011 | | Load 0x0,0x11 0014 e213 | | Load 0x1,0x13 0015 0098 | | Execute Package,Field_Read_Dynamic 0016 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0017 00e1 | | Load_Encached Boolean_Cache 0018 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0019 0093 0000 | | push_full_address 0x0 001b 6054 |`T | Indirect_Literal Discrete,0x70,{0x80000000, 0x00010000} 001c 0273 | s | Execute Discrete,Plus 001d 0007 | | Action Break_Optional 001e 029f 007b | {| Declare_Subprogram INIT_0078,For_Call 0020 029f 008b | | Declare_Subprogram INIT_0088,For_Call 0022 029f 00b3 | | Declare_Subprogram INIT_00b0,For_Call 0024 029f 00c3 | | Declare_Subprogram INIT_00c0,For_Call 0026 a014 | | Store_Unchecked 0x0,0x14 0027 00c6 | | Action Check_Subprogram_Elaborated 0028 4809 |H | Short_Literal 0x9 0029 4802 |H | Short_Literal 0x2 002a 0099 | | Action Reference_Dynamic 002b 480a |H | Short_Literal 0xa 002c 4802 |H | Short_Literal 0x2 002d 0099 | | Action Reference_Dynamic 002e 0093 0000 | | push_full_address 0x0 0030 603b |`; | Indirect_Literal Discrete,0x6c,{0x80000000, 0x00010000} 0031 0273 | s | Execute Discrete,Plus 0032 e002 | | Load 0x0,0x2 0033 0273 | s | Execute Discrete,Plus 0034 e015 | | Load 0x0,0x15 0035 0273 | s | Execute Discrete,Plus 0036 480e |H | Short_Literal 0xe 0037 0007 | | Action Break_Optional 0038 4805 |H | Short_Literal 0x5 0039 e001 | | Load 0x0,0x1 003a 01d7 | | Execute Vector,Field_Read 003b 0a01 | | Execute_Immediate Plus,0x1 003c e001 | | Load 0x0,0x1 003d 01d7 | | Execute Vector,Field_Read 003e 02ab | | Declare_Subprogram For_Call,With_Address 003f 4805 |H | Short_Literal 0x5 0040 e001 | | Load 0x0,0x1 0041 01d7 | | Execute Vector,Field_Read 0042 0a03 | | Execute_Immediate Plus,0x3 0043 e001 | | Load 0x0,0x1 0044 01d7 | | Execute Vector,Field_Read 0045 02ab | | Declare_Subprogram For_Call,With_Address 0046 BODY_0008: 0046 e011 | | Load 0x0,0x11 0047 e213 | | Load 0x1,0x13 0048 0098 | | Execute Package,Field_Read_Dynamic 0049 1b12 | | Execute Package,Field_Read,Field_Number 0x12 004a e00c | | Load 0x0,0xc 004b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 004c e00e | | Load 0x0,0xe 004d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 004e e011 | | Load 0x0,0x11 004f e213 | | Load 0x1,0x13 0050 0098 | | Execute Package,Field_Read_Dynamic 0051 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0052 c402 | | Store 0x2,0x2 0053 e013 | | Load 0x0,0x13 0054 e213 | | Load 0x1,0x13 0055 0098 | | Execute Package,Field_Read_Dynamic 0056 e016 | | Load 0x0,0x16 0057 e213 | | Load 0x1,0x13 0058 0096 | | Execute Package,Entry 0059 c403 | | Store 0x2,0x3 005a e5ff | | Load 0x2,-0x1 005b 840f | | Call 0x2,0xf 005c e011 | | Load 0x0,0x11 005d e213 | | Load 0x1,0x13 005e 0098 | | Execute Package,Field_Read_Dynamic 005f 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0060 e403 | | Load 0x2,0x3 0061 e017 | | Load 0x0,0x17 0062 e213 | | Load 0x1,0x13 0063 0096 | | Execute Package,Entry 0064 c404 | | Store 0x2,0x4 0065 e5fb | | Load 0x2,-0x5 0066 e5fc | | Load 0x2,-0x4 0067 e5fd | | Load 0x2,-0x3 0068 e5fe | | Load 0x2,-0x2 0069 e404 | | Load 0x2,0x4 006a 8410 | | Call 0x2,0x10 006b 4506 |E | Exit_Suprogram New_Top_Offset 0x6 006c 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0070 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0074 0000 0000 | | .BLANK 0000[0x4] 0078 ; -------------------------------------------------------------------------------------- 0078 ; SUBPROGRAM 0078 ; -------------------------------------------------------------------------------------- 0078 007b | { | .CONST 0x007b ; Address of begin 0079 0004 | | .CONST 0x0004 ; Address of exception handler 007a 0001 | | .CONST 0x0001 ; Number of locals 007b BODY_0078: 007b INIT_0078: 007b 00da | | Load_Top At_Offset_2 007c e402 | | Load 0x2,0x2 007d e011 | | Load 0x0,0x11 007e e213 | | Load 0x1,0x13 007f 0098 | | Execute Package,Field_Read_Dynamic 0080 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0081 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0082 0000 0000 | | .BLANK 0000[0x6] 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 8018 | | Call 0x0,0x18 008d e405 | | Load 0x2,0x5 008e 6811 |h | Jump_Zero 0xa0 008f e009 | | Load 0x0,0x9 0090 180e | | Execute Package,Field_Execute,Field_Number 0xe 0091 4800 |H | Short_Literal 0x0 0092 e7fe | | Load 0x3,-0x2 0093 e004 | | Load 0x0,0x4 0094 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0095 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0096 0092 00d1 | | Action Push_String_Extended,0xd1 ; " depends upon " 0098 01cc | | Execute Vector,Catenate 0099 e7ff | | Load 0x3,-0x1 009a e004 | | Load 0x0,0x4 009b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 009c 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 009d 01cc | | Execute Vector,Catenate 009e e00a | | Load 0x0,0xa 009f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00a0 00db | | Load_Top At_Offset_3 00a1 00db | | Load_Top At_Offset_3 00a2 e403 | | Load 0x2,0x3 00a3 e019 | | Load 0x0,0x19 00a4 e213 | | Load 0x1,0x13 00a5 0096 | | Execute Package,Entry 00a6 e402 | | Load 0x2,0x2 00a7 00db | | Load_Top At_Offset_3 00a8 e011 | | Load 0x0,0x11 00a9 e213 | | Load 0x1,0x13 00aa 0098 | | Execute Package,Field_Read_Dynamic 00ab 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00ac c402 | | Store 0x2,0x2 00ad 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00ae 0000 0000 | | .XXX[0x2] 00b0 ; -------------------------------------------------------------------------------------- 00b0 ; SUBPROGRAM 00b0 ; -------------------------------------------------------------------------------------- 00b0 00b3 | | .CONST 0x00b3 ; Address of begin 00b1 0004 | | .CONST 0x0004 ; Address of exception handler 00b2 0001 | | .CONST 0x0001 ; Number of locals 00b3 BODY_00b0: 00b3 INIT_00b0: 00b3 00db | | Load_Top At_Offset_3 00b4 e004 | | Load 0x0,0x4 00b5 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00b6 0119 | | Execute Any,Check_In_Formal_Type 00b7 00db | | Load_Top At_Offset_3 00b8 e004 | | Load 0x0,0x4 00b9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00ba 0119 | | Execute Any,Check_In_Formal_Type 00bb 8407 | | Call 0x2,0x7 00bc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00bd 0000 0000 | | .XXX[0x3] 00bf 0000 | | 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 e7fd | | Load 0x3,-0x3 00c4 e01a | | Load 0x0,0x1a 00c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00c6 0119 | | Execute Any,Check_In_Formal_Type 00c7 e7fe | | Load 0x3,-0x2 00c8 e004 | | Load 0x0,0x4 00c9 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00ca 0119 | | Execute Any,Check_In_Formal_Type 00cb e7ff | | Load 0x3,-0x1 00cc e004 | | Load 0x0,0x4 00cd 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00ce 0119 | | Execute Any,Check_In_Formal_Type 00cf 8408 | | Call 0x2,0x8 00d0 4504 |E | Exit_Suprogram New_Top_Offset 0x4 00d1 ; -------------------------------------------------------------------------------------- 00d1 ; STRING TABLE 00d1 ; -------------------------------------------------------------------------------------- 00d1 0004 | | .STRTAB 0x0004->0x00d3 ; " depends upon " 00d2 0010 | | .STREND 0x0010->0x00da 00d3 2064 6570 | dep| .STRTAB_STRINGS 00da 0000 0000 | | .BLANK 0000[0x6] 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; Debug Table 00e0 ; -------------------------------------------------------------------------------------- 00e0 0004 0002 | | .DEBUG4 0x0004,0x0002,0x0ba3,0x0000,0x0001,0x0000 00e6 8080 8080 | | .XXX[0x52] 00e8 8149 5538 | IU8| 00ea 8131 3d05 | 1= | 00ec 1080 b480 | | 00ee 8111 254d | %M| 00f0 2c81 5d05 |, ] | 00f2 2550 8131 |%P 1| 00f4 3d05 1080 |= | 00f6 b480 8081 | | 00f8 5d25 5121 |]%Q!| 00fa 2115 3110 |! 1 | 00fc 8131 3d05 | 1= | 00fe 1080 b480 | | 0100 80a8 a881 | | 0102 4995 9da5 |I | 0104 cdd1 95c8 | | 0106 8119 a5b1 | | 0108 9481 cdd1 | | 010a 85d1 9481 | | 010c b9bd d081 | | 010e 91d5 b5c1 | | 0110 9590 81d1 | | 0112 bc81 d1bd | | 0114 b589 cdd1 | | 0116 bdb9 9480 | | 0118 a8a9 1d40 | @| 011a a0a4 80f4 | | 011c f881 5151 | QQ| 011e 3d40 8105 |=@ | 0120 3910 8159 |9 Y| 0122 513d 4081 |Q=@ | 0124 2539 0d3d |%9 =| 0126 394d 254d |9M%M| 0128 5115 3951 |Q 9Q| 012a 4119 3505 |A 5 | 012c 4880 80f4 |H | 012e f881 513d | Q=| 0130 4080 8080 |@ | 0132 f4f8 8151 | Q| 0134 3d40 b480 |=@ | 0136 f4f8 8000 | | 0138 0000 0000 | | .BLANK 0000[0x5] 013d 0010 0049 | I| .XXX[0x23] 013f 6b80 0000 |k | 0141 0004 0000 | | 0143 0000 0010 | | 0145 e0c9 08e4 | | 0147 0000 0018 | | 0149 c8d0 d0c4 | | 014b c10c 0000 | | 014d 0e70 003d | p =| 014f 6400 0000 |d | 0151 0720 0400 | | 0153 02ec 0002 | | 0155 0004 0040 | @| 0157 0010 0004 | | 0159 0a68 006c | h l| 015b 02fc 7434 | t4| 015d 031c 02f0 | | 015f 02ec | | 0160 0000 0000 | | .BLANK 0000[0x6] 0166 0080 0010 | | .XXX[0x9a] 0168 0014 038b | | 016a 8008 0fa4 | | 016c 0a7c 050f | | | 016e 97f5 2000 | | 0170 0248 0551 | H Q| 0172 2003 97fc | | 0174 089c d058 | X| 0176 d060 0756 | ` V| 0178 000c 0732 | 2| 017a 0010 0347 | G| 017c 97f5 2000 | | 017e 0248 0555 | H U| 0180 2007 97fc | | 0182 089c d058 | X| 0184 d060 0756 | ` V| 0186 000c 0732 | 2| 0188 0010 0347 | G| 018a 97f5 2000 | | 018c 0248 0559 | H Y| 018e 200b 97fc | | 0190 089c d058 | X| 0192 d060 0756 | ` V| 0194 000c 0732 | 2| 0196 0010 0347 | G| 0198 97f5 2000 | | 019a 0248 055d | H ]| 019c 200f 97fc | | 019e 089c d058 | X| 01a0 d060 0756 | ` V| 01a2 000c 0732 | 2| 01a4 0010 0347 | G| 01a6 97f5 2000 | | 01a8 0248 0561 | H a| 01aa 2013 97fc | | 01ac 089c d058 | X| 01ae d060 0756 | ` V| 01b0 000c 0732 | 2| 01b2 0010 0347 | G| 01b4 97f5 2002 | | 01b6 0014 0344 | D| 01b8 033d 203d | = =| 01ba 2014 001f | | 01bc 97f5 2000 | | 01be 0248 0565 | H e| 01c0 20c1 2005 | | 01c2 2003 9022 | "| 01c4 0018 0730 | 0| 01c6 0248 0568 | H h| 01c8 0730 036f | 0 o| 01ca 97fc 089c | | 01cc d058 d060 | X `| 01ce 0756 000c | V | 01d0 0732 0010 | 2 | 01d2 0344 0320 | D | 01d4 ff9c 033b | ;| 01d6 97f5 2002 | | 01d8 0014 0347 | G| 01da 97fc 089c | | 01dc d018 f014 | | 01de 014f 97fc | O | 01e0 089c d014 | | 01e2 f014 014b | K| 01e4 97f5 2000 | | 01e6 0248 056d | H m| 01e8 20c1 2001 | | 01ea 2003 9012 | | 01ec 0018 0730 | 0| 01ee 0248 0570 | H p| 01f0 0731 20c1 | 1 | 01f2 2001 2003 | | 01f4 900e 0018 | | 01f6 0732 0010 | 2 | 01f8 0344 0368 | D h| 01fa 0368 09f9 | h | 01fc a01b 97f5 | | 01fe 2000 0248 | H|