|
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_5e40f2
└─⟦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 0090 | | .CONST 0x0090 ; 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 000b | | .CONST 0x000b ; Number of locals 000b INIT_0008: 000b 029f 0033 | 3| Declare_Subprogram INIT_0030,For_Call 000d e013 | | Load 0x0,0x13 000e 1917 | | Execute Package,Field_Reference,Field_Number 0x17 000f 00c6 | | Action Check_Subprogram_Elaborated 0010 4802 |H | Short_Literal 0x2 0011 4803 |H | Short_Literal 0x3 0012 0099 | | Action Reference_Dynamic 0013 e024 | $ | Load 0x0,0x24 0014 e025 | % | Load 0x0,0x25 0015 4806 |H | Short_Literal 0x6 0016 0007 | | Action Break_Optional 0017 029f 005b | [| Declare_Subprogram INIT_0058,For_Call 0019 1d0f | | Execute_Immediate Reference_Lex_1,0xf 001a 00c6 | | Action Check_Subprogram_Elaborated 001b 4807 |H | Short_Literal 0x7 001c 4803 |H | Short_Literal 0x3 001d 0099 | | Action Reference_Dynamic 001e e026 | & | Load 0x0,0x26 001f e027 | ' | Load 0x0,0x27 0020 480b |H | Short_Literal 0xb 0021 0007 | | Action Break_Optional 0022 BODY_0008: 0022 e7ff | | Load 0x3,-0x1 0023 4808 |H | Short_Literal 0x8 0024 4803 |H | Short_Literal 0x3 0025 0099 | | Action Reference_Dynamic 0026 4809 |H | Short_Literal 0x9 0027 4803 |H | Short_Literal 0x3 0028 0099 | | Action Reference_Dynamic 0029 820f | | Call 0x1,0xf 002a 4502 |E | Exit_Suprogram New_Top_Offset 0x2 002b 0000 0000 | | .BLANK 0000[0x5] 0030 ; -------------------------------------------------------------------------------------- 0030 ; SUBPROGRAM 0030 ; -------------------------------------------------------------------------------------- 0030 0035 | 5 | .CONST 0x0035 ; Address of begin 0031 0004 | | .CONST 0x0004 ; Address of exception handler 0032 0002 | | .CONST 0x0002 ; Number of locals 0033 INIT_0030: 0033 029f 006b | k| Declare_Subprogram INIT_0068,For_Call 0035 BODY_0030: 0035 00db | | Load_Top At_Offset_3 0036 8802 | | Call 0x4,0x2 0037 701a |p | Jump_Nonzero 0x52 0038 00db | | Load_Top At_Offset_3 0039 8219 | | Call 0x1,0x19 003a 6817 |h | Jump_Zero 0x52 003b e008 | | Load 0x0,0x8 003c 1810 | | Execute Package,Field_Execute,Field_Number 0x10 003d e9ff | | Load 0x4,-0x1 003e 8218 | | Call 0x1,0x18 003f e406 | | Load 0x2,0x6 0040 e214 | | Load 0x1,0x14 0041 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0042 e9fe | | Load 0x4,-0x2 0043 e013 | | Load 0x0,0x13 0044 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0045 e9ff | | Load 0x4,-0x1 0046 8218 | | Call 0x1,0x18 0047 480b |H | Short_Literal 0xb 0048 4802 |H | Short_Literal 0x2 0049 0099 | | Action Reference_Dynamic 004a 480c |H | Short_Literal 0xc 004b 4802 |H | Short_Literal 0x2 004c 0099 | | Action Reference_Dynamic 004d 480d |H | Short_Literal 0xd 004e 4802 |H | Short_Literal 0x2 004f 0099 | | Action Reference_Dynamic 0050 e013 | | Load 0x0,0x13 0051 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0052 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0053 0000 0000 | | .BLANK 0000[0x5] 0058 ; -------------------------------------------------------------------------------------- 0058 ; SUBPROGRAM 0058 ; -------------------------------------------------------------------------------------- 0058 005b | [ | .CONST 0x005b ; Address of begin 0059 0004 | | .CONST 0x0004 ; Address of exception handler 005a 0001 | | .CONST 0x0001 ; Number of locals 005b BODY_0058: 005b INIT_0058: 005b 00ea | | Load_Encached Null_String_Cache 005c e9fc | | Load 0x4,-0x4 005d e9fd | | Load 0x4,-0x3 005e 4803 |H | Short_Literal 0x3 005f 4803 |H | Short_Literal 0x3 0060 0099 | | Action Reference_Dynamic 0061 4804 |H | Short_Literal 0x4 0062 4803 |H | Short_Literal 0x3 0063 0099 | | Action Reference_Dynamic 0064 e013 | | Load 0x0,0x13 0065 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0066 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0067 0000 | | .XXX[0x1] 0068 ; -------------------------------------------------------------------------------------- 0068 ; SUBPROGRAM 0068 ; -------------------------------------------------------------------------------------- 0068 0072 | r | .CONST 0x0072 ; Address of begin 0069 0004 | | .CONST 0x0004 ; Address of exception handler 006a 0003 | | .CONST 0x0003 ; Number of locals 006b INIT_0068: 006b e008 | | Load 0x0,0x8 006c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 006d 02ff | | Declare_Variable Variant_Record 006e 00d8 | | Load_Top At_Offset_0 006f 1c00 | | Execute_Immediate Run_Utility,0x0 0070 e008 | | Load 0x0,0x8 0071 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0072 BODY_0068: 0072 e008 | | Load 0x0,0x8 0073 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0074 00da | | Load_Top At_Offset_2 0075 6012 |` | Indirect_Literal Discrete,0x88,{0x00000000, 0x00004000} 0076 e010 | | Load 0x0,0x10 0077 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0078 4800 |H | Short_Literal 0x0 0079 e9ff | | Load 0x4,-0x1 007a e008 | | Load 0x0,0x8 007b 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 007c 181a | | Execute Package,Field_Execute,Field_Number 0x1a 007d 00d1 | | Pop_Control Pop_Count_1 007e 0059 | Y | Store_Top Discrete,At_Offset_1 007f 00d9 | | Load_Top At_Offset_1 0080 e008 | | Load 0x0,0x8 0081 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0082 7003 |p | Jump_Nonzero 0x86 0083 00d8 | | Load_Top At_Offset_0 0084 0f08 | | Execute_Immediate Equal,0x8 0085 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0086 4801 |H | Short_Literal 0x1 0087 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0088 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 008c 0000 0000 | | .BLANK 0000[0x4] 0090 ; -------------------------------------------------------------------------------------- 0090 ; Debug Table 0090 ; -------------------------------------------------------------------------------------- 0090 0004 000d | | .DEBUG4 0x0004,0x000d,0x96c4,0x0000,0x0001,0x0000 0096 0000 0000 | | .BLANK 0000[0x19] 00af 0002 0000 | | .XXX[0x78] 00b1 0038 0000 | 8 | 00b3 0000 0001 | | 00b5 0000 0000 | | 00b7 0100 0000 | | 00b9 02c0 0000 | | 00bb 0004 0000 | | 00bd 0038 bce8 | 8 | 00bf c4c8 d0dc | | 00c1 d4d0 c4c8 | | 00c3 b94d 151c | M | 00c5 003d 604c | =`L| 00c7 0000 07c0 | | 00c9 0400 02ec | | 00cb 0000 0004 | | 00cd 014c 0010 | L | 00cf 005f 8004 | _ | 00d1 6c4c 6c34 |lLl4| 00d3 04a4 0a68 | h| 00d5 016c 0a68 | l h| 00d7 01ac 0a68 | h| 00d9 024c 02fd | L | 00db 8675 2018 | u | 00dd 0248 06e1 | H | 00df 2003 8008 | | 00e1 6c80 0e1c |l | 00e3 0360 083f | ` ?| 00e5 8004 6c4c | lL| 00e7 6c34 0a80 |l4 | 00e9 0eb4 0a74 | t| 00eb 02ec 0a74 | t| 00ed 032c 0a74 | , t| 00ef 03ad 8621 | !| 00f1 27c7 8004 |' | 00f3 6c4c 6c37 |lLl7| 00f5 8848 744c | HtL| 00f7 7450 7454 |tPtT| 00f9 0248 06e5 | H | 00fb 200f 8844 | D| 00fd 6c4c 0e1c |lL | 00ff 0360 083d | ` =| 0101 85dd 2801 | ( | 0103 2130 0248 |!0 H| 0105 06eb 8004 | | 0107 6c4c 6c3b |lLl;| 0109 8008 6477 | dw| 010b 8008 647b | d{| 010d 8858 6c58 | XlX| 010f 0e1c 0360 | `| 0111 083c 7438 | <t8| 0113 031c 743c | t<| 0115 031c 7440 | t@| 0117 031c 02f0 | | 0119 02ec 0000 | | 011b 0000 0000 | | 011d 016c 0010 | l | 011f 0005 8553 | S| 0121 800c 6c3b | l;| 0123 97ff 885c | \| 0125 6051 1004 |`Q | 0127 0000 0000 | | .BLANK 0000[0x6] 012d 01bc 0010 | | .XXX[0x22] 012f 0008 036c | l| 0131 076c 038c | l | 0133 0fb0 0360 | `| 0135 3201 a009 |2 | 0137 21fc 0145 |! E| 0139 84ef 800c | | 013b 6c3b 97f8 |l; | 013d 0777 97f8 | w | 013f 0777 9008 | w | 0141 09cc 2bfc | + | 0143 0923 97f8 | # | 0145 073f 97fe | ? | 0147 083b 8004 | ; | 0149 6c4c 6047 |lL`G| 014b 97ff 885c | \| 014d 6055 140c |`U | 014f 0000 0000 | | .BLANK 0000[0x6] 0155 025c 0010 | \ | .XXX[0x22] 0157 0008 036c | l| 0159 076c 038c | l | 015b 0fb0 0360 | `| 015d 3201 a009 |2 | 015f 21fc 0145 |! E| 0161 844f 800c | O | 0163 6c3b 97f8 |l; | 0165 0777 97f8 | w | 0167 0777 9008 | w | 0169 09cc 2bfc | + | 016b 0923 97f8 | # | 016d 073f 97fe | ? | 016f 083b 8004 | ; | 0171 6c4c 6043 |lL`C| 0173 97ff 885c | \| 0175 6055 140c |`U | 0177 0000 0000 | | .BLANK 0000[0x6] 017d 02f4 0010 | | .XXX[0xb] 017f 0008 0a7c | || 0181 04ec 0248 | H| 0183 06ed 2006 | | 0185 1008 0731 | 1| 0187 1004 | | 0188 0000 0000 | | .BLANK 0000[0x5] 018d 034c 0380 | L | .XXX[0x1c] 018f 0014 0368 | h| 0191 0774 038c | t | 0193 0fb0 038c | | 0195 03a0 0a7c | || 0197 058c 036f | o| 0199 97fc 075c | \| 019b 38a1 a00f |8 | 019d 8008 6c50 | lP| 019f 095c 036c | \ l| 01a1 2807 100a |( | 01a3 1015 1004 | | 01a5 001f 8008 | | 01a7 6c50 095c |lP \| 01a9 0000 0000 | | .BLANK 0000[0x4] 01ad 03cc 0010 | | .XXX[0x4b] 01af 0014 0368 | h| 01b1 0774 038c | t | 01b3 0fb0 038c | | 01b5 0384 1800 | | 01b7 03a0 036f | o| 01b9 97fc 075c | \| 01bb 38a1 a00c |8 | 01bd 0248 06f1 | H | 01bf 1004 036c | l| 01c1 2807 1008 |( | 01c3 033f 900b | ? | 01c5 97fc 0770 | p| 01c7 09fd c093 | | 01c9 900b 97fc | | 01cb 075c 0148 | \ H| 01cd 0369 a030 | i 0| 01cf 0364 3c81 | d< | 01d1 c018 0364 | d| 01d3 3cb1 c00c |< | 01d5 0364 3ca5 | d< | 01d7 a041 2000 | A | 01d9 014d e034 | M 4| 01db 0364 3881 | d8 | 01dd a028 0364 | ( d| 01df 38b1 a01c |8 | 01e1 0364 38a5 | d8 | 01e3 a011 2004 | | 01e5 014f 900a | O | 01e7 900f 9008 | | 01e9 2807 1008 |( | 01eb 0325 ff5c | % \| 01ed 0338 036f | 8 o| 01ef 97fc 075c | \| 01f1 38a5 a00c |8 | 01f3 0248 06f5 | H | 01f5 1004 03a9 | | 01f7 1004 | | 01f8 0000 0000 | | .BLANK 0000[0x5] 01fd 0500 0010 | | .XXX[0x3] 01ff 0008 | |