|
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_03c8f4
└─⟦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 0058 | X | .CONST 0x0058 ; 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 0013 | | .CONST 0x0013 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0005 | | .CONST 0x0005 ; Number of locals 000b INIT_0008: 000b e00e | | Load 0x0,0xe 000c 0322 | " | Declare_Variable Record 000d 00d8 | | Load_Top At_Offset_0 000e 1c00 | | Execute_Immediate Run_Utility,0x0 000f 00e3 | | Load_Encached Natural_Cache 0010 00e3 | | Load_Encached Natural_Cache 0011 029f 0043 | C| Declare_Subprogram INIT_0040,For_Call 0013 BODY_0008: 0013 e7ff | | Load 0x3,-0x1 0014 804d | M | Call 0x0,0x4d 0015 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0016 e7ff | | Load 0x3,-0x1 0017 804f | O | Call 0x0,0x4f 0018 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0019 e7ff | | Load 0x3,-0x1 001a e602 | | Load 0x3,0x2 001b 017d | } | Execute Record,Structure_Write 001c 00da | | Load_Top At_Offset_2 001d 00da | | Load_Top At_Offset_2 001e 027e | ~ | Execute Discrete,Not_Equal 001f 6815 |h | Jump_Zero 0x35 0020 00da | | Load_Top At_Offset_2 0021 8036 | 6 | Call 0x0,0x36 0022 6812 |h | Jump_Zero 0x35 0023 00d9 | | Load_Top At_Offset_1 0024 8036 | 6 | Call 0x0,0x36 0025 680f |h | Jump_Zero 0x35 0026 00da | | Load_Top At_Offset_2 0027 8018 | | Call 0x0,0x18 0028 700c |p | Jump_Nonzero 0x35 0029 00d9 | | Load_Top At_Offset_1 002a 00db | | Load_Top At_Offset_3 002b 8605 | | Call 0x3,0x5 002c 7008 |p | Jump_Nonzero 0x35 002d 00d9 | | Load_Top At_Offset_1 002e 00db | | Load_Top At_Offset_3 002f 8050 | P | Call 0x0,0x50 0030 00db | | Load_Top At_Offset_3 0031 4805 |H | Short_Literal 0x5 0032 8017 | | Call 0x0,0x17 0033 00d1 | | Pop_Control Pop_Count_1 0034 7804 |x | Jump 0x39 0035 00db | | Load_Top At_Offset_3 0036 4803 |H | Short_Literal 0x3 0037 8017 | | Call 0x0,0x17 0038 00d1 | | Pop_Control Pop_Count_1 0039 e7ff | | Load 0x3,-0x1 003a 8007 | | Call 0x0,0x7 003b e602 | | Load 0x3,0x2 003c 8214 | | Call 0x1,0x14 003d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 003e 0000 0000 | | .XXX[0x2] 0040 ; -------------------------------------------------------------------------------------- 0040 ; SUBPROGRAM 0040 ; -------------------------------------------------------------------------------------- 0040 0044 | D | .CONST 0x0044 ; Address of begin 0041 0004 | | .CONST 0x0004 ; Address of exception handler 0042 0002 | | .CONST 0x0002 ; Number of locals 0043 INIT_0040: 0043 00e3 | | Load_Encached Natural_Cache 0044 BODY_0040: 0044 e9fe | | Load 0x4,-0x2 0045 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0046 00cf | | Action Mark_Auxiliary 0047 780a |x | Jump 0x52 0048 00d9 | | Load_Top At_Offset_1 0049 8019 | | Call 0x0,0x19 004a 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 004b 00d9 | | Load_Top At_Offset_1 004c e9ff | | Load 0x4,-0x1 004d 027f | | Execute Discrete,Equal 004e 6802 |h | Jump_Zero 0x51 004f 4801 |H | Short_Literal 0x1 0050 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0051 00c9 | | Action Pop_Auxiliary_Loop 0052 00d9 | | Load_Top At_Offset_1 0053 8018 | | Call 0x0,0x18 0054 77f3 |w | Jump_Nonzero 0x48 0055 00ce | | Action Pop_Auxiliary 0056 4800 |H | Short_Literal 0x0 0057 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0058 ; -------------------------------------------------------------------------------------- 0058 ; Debug Table 0058 ; -------------------------------------------------------------------------------------- 0058 0004 0002 | | .DEBUG4 0x0004,0x0002,0xd1d9,0x0000,0x0001,0x0000 005e 0004 | | .XXX[0x1] 005f 0000 0000 | | .BLANK 0000[0x7] 0066 1070 8000 | p | .XXX[0x2] 0068 0000 0000 | | .BLANK 0000[0x7] 006f 0020 0000 | | .XXX[0x1a] 0071 0000 0000 | | 0073 0020 0116 | | 0075 3ec0 3a44 |> :D| 0077 6540 3a44 |e@:D| 0079 5120 3a45 |Q :E| 007b 75a0 1d22 |u "| 007d 7ff0 0039 | 9| 007f 7408 865a |t Z| 0081 6582 8569 |e i| 0083 0001 3843 | 8C| 0085 2d32 c32e |-2 .| 0087 9180 009c | | 0089 0000 0000 | | .BLANK 0000[0x4] 008d 0133 eb72 | 3 r| .XXX[0x1a] 008f 1600 0001 | | 0091 0133 eb82 | 3 | 0093 1600 0001 | | 0095 0040 0000 | @ | 0097 0026 7d70 | &}p| 0099 42c0 0000 |B | 009b 2010 cb4c | L| 009d b0cb a460 | `| 009f 0027 0000 | ' | 00a1 0001 2000 | | 00a3 9334 4000 | 4@ | 00a5 0000 4000 | @ | 00a7 0000 0000 | | .BLANK 0000[0x8] 00af 041c 2000 | | .XXX[0x2] 00b1 0000 0000 | | .BLANK 0000[0x7] 00b8 0008 0000 | | .XXX[0x9] 00ba 0000 0000 | | 00bc 0008 0046 | F| 00be 0dd0 0e91 | | 00c0 3de0 |= | 00c1 0000 0000 | | .BLANK 0000[0x4] 00c5 0748 b244 | H D| .XXX[0x2d] 00c7 000b b2ac | | 00c9 2196 5050 |! PP| 00cb dd66 4000 | f@ | 00cd 4d90 fe63 |M c| 00cf 2110 19a0 |! | 00d1 0000 2000 | | 00d3 0000 0000 | | 00d5 0000 0046 | F| 00d7 4ccc 8500 |L | 00d9 0000 4046 | @F| 00db 4cd4 8500 |L | 00dd 0000 4000 | @ | 00df 0048 df78 | H x| 00e1 c99a 90a0 | | 00e3 0000 0804 | | 00e5 32d8 08f9 |2 | 00e7 7d90 0009 |} | 00e9 9800 0000 | | 00eb 4800 22fb |H " | 00ed b000 0000 | | 00ef 1000 0002 | | 00f1 d000 | | 00f2 0000 0000 | | .BLANK 0000[0x6] 00f8 0107 0800 | | .XXX[0x2] 00fa 0000 0000 | | .BLANK 0000[0x7] 0101 0002 0000 | | .XXX[0x38] 0103 0000 0000 | | 0105 0002 0011 | | 0107 9338 03a4 | 8 | 0109 589c 03a4 |X | 010b 4e36 03a4 |N6 | 010d 72c6 01d2 |r | 010f 3123 0004 |1# | 0111 a604 4865 | He| 0113 b4de d5d9 | | 0115 9000 13f4 | | 0117 32dc 664f |2 fO| 0119 0928 0009 | ( | 011b 7100 0000 |q | 011d 0000 0000 | | 011f 0013 5fb8 | _ | 0121 2160 0000 |!` | 0123 1013 5fb9 | _ | 0125 2160 0000 |!` | 0127 1004 0000 | | 0129 0002 6bf7 | k | 012b 242c 0000 |$, | 012d 0201 0cb6 | | 012f 9bde d40a | | 0131 0002 7e00 | ~ | 0133 0000 1200 | | 0135 08ed f800 | | 0137 0000 0400 | | 0139 0000 0000 | | .BLANK 0000[0x8] 0141 0041 c200 | A | .XXX[0x2] 0143 0000 0000 | | .BLANK 0000[0x8] 014b 8000 0000 | | .XXX[0x8] 014d 0000 0000 | | 014f 8004 68bf | h | 0151 00e9 1870 | p| 0153 0000 0000 | | .BLANK 0000[0x4] 0157 0074 8d6d | t m| .XXX[0x2d] 0159 4001 0e5b |@ [| 015b c219 6d2f | m/| 015d 2518 0400 |% | 015f 04fd 0fe6 | | 0161 31d9 8c48 |1 H| 0163 0000 0200 | | 0165 0000 0000 | | 0167 0000 0004 | | 0169 696f e850 |io P| 016b 0000 0404 | | 016d 6970 6850 |iphP| 016f 0000 0400 | | 0171 0004 9398 | | 0173 8d2e 0d0a | . | 0175 0000 0080 | | 0177 432d c553 |C- S| 0179 73c2 8000 |s | 017b 9700 0000 | | 017d 0480 023a | :| 017f 5e00 0000 |^ | 0181 0100 0000 | | 0183 0500 | | 0184 0000 0000 | | .BLANK 0000[0x6] 018a 0010 7080 | p | .XXX[0x2] 018c 0000 0000 | | .BLANK 0000[0x8] 0194 2000 0000 | | .XXX[0x39] 0196 0000 0000 | | 0198 2001 1aad | | 019a e03a 46ae | :F | 019c 403a 469a |@:F | 019e 203a 4850 | :HP| 01a0 f01d 23a4 | # | 01a2 7000 4a4a |p JJ| 01a4 b486 5e66 | ^f| 01a6 40cb cf00 |@ | 01a8 0180 43f9 | C | 01aa 8c22 37fe | "7 | 01ac 0000 0080 | | 01ae 0000 0000 | | 01b0 0000 0001 | | 01b2 3767 0a16 |7g | 01b4 0000 0101 | | 01b6 3767 1216 |7g | 01b8 0000 0100 | | 01ba 0001 2569 | %i| 01bc a6ec e242 | B| 01be c000 0020 | | 01c0 10cb ccc8 | | 01c2 85c1 2000 | | 01c4 3000 0000 |0 | 01c6 0120 00a1 | | 01c8 4c00 0000 |L | 01ca 0040 0000 | @ | 01cc 0040 | @ | 01cd 0000 0000 | | .BLANK 0000[0x6] 01d3 0004 1c20 | | .XXX[0x2] 01d5 0000 0000 | | .BLANK 0000[0x8] 01dd 0800 0000 | | .XXX[0x1a] 01df 0000 0000 | | 01e1 0800 46ea | F | 01e3 880e 91d0 | | 01e5 2000 0000 | | 01e7 0000 0000 | | 01e9 0007 48fb | H | 01eb 6400 0e0c |d | 01ed b8a1 979c | | 01ef cd34 6880 | 4h | 01f1 0060 10fe | ` | 01f3 62ee 3d58 |b =X| 01f5 c000 0020 | | 01f7 0000 0000 | | .BLANK 0000[0x4] 01fb 46ff c285 |F | .XXX[0x5] 01fd 0000 0040 | @| 01ff 46ff |F |