|
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 001b | | .CONST 0x001b ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0007 | | .CONST 0x0007 ; 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 e039 | 9 | Load 0x0,0x39 0010 0322 | " | Declare_Variable Record 0011 e7ff | | Load 0x3,-0x1 0012 8085 | | Call 0x0,0x85 0013 00e3 | | Load_Encached Natural_Cache 0014 03f1 | | Declare_Variable Discrete,With_Value 0015 e7ff | | Load 0x3,-0x1 0016 8086 | | Call 0x0,0x86 0017 e7ff | | Load 0x3,-0x1 0018 8087 | | Call 0x0,0x87 0019 e7ff | | Load 0x3,-0x1 001a 8088 | | Call 0x0,0x88 001b BODY_0008: 001b 8064 | d | Call 0x0,0x64 001c e603 | | Load 0x3,0x3 001d 017d | } | Execute Record,Structure_Write 001e 00cf | | Action Mark_Auxiliary 001f 7823 |x# | Jump 0x43 0020 e603 | | Load 0x3,0x3 0021 8078 | x | Call 0x0,0x78 0022 e604 | | Load 0x3,0x4 0023 027f | | Execute Discrete,Equal 0024 4800 |H | Short_Literal 0x0 0025 e605 | | Load 0x3,0x5 0026 e603 | | Load 0x3,0x3 0027 8079 | y | Call 0x0,0x79 0028 8089 | | Call 0x0,0x89 0029 0279 | y | Execute Discrete,And 002a 4800 |H | Short_Literal 0x0 002b e606 | | Load 0x3,0x6 002c e603 | | Load 0x3,0x3 002d 807a | z | Call 0x0,0x7a 002e 8089 | | Call 0x0,0x89 002f 0279 | y | Execute Discrete,And 0030 4800 |H | Short_Literal 0x0 0031 00db | | Load_Top At_Offset_3 0032 e603 | | Load 0x3,0x3 0033 807b | { | Call 0x0,0x7b 0034 8089 | | Call 0x0,0x89 0035 0279 | y | Execute Discrete,And 0036 6807 |h | Jump_Zero 0x3e 0037 e604 | | Load 0x3,0x4 0038 e603 | | Load 0x3,0x3 0039 807c | | | Call 0x0,0x7c 003a e606 | | Load 0x3,0x6 003b e607 | | Load 0x3,0x7 003c e605 | | Load 0x3,0x5 003d 808a | | Call 0x0,0x8a 003e e603 | | Load 0x3,0x3 003f 8065 | e | Call 0x0,0x65 0040 e603 | | Load 0x3,0x3 0041 017d | } | Execute Record,Structure_Write 0042 00c9 | | Action Pop_Auxiliary_Loop 0043 e603 | | Load 0x3,0x3 0044 8066 | f | Call 0x0,0x66 0045 6fda |o | Jump_Zero 0x20 0046 00ce | | Action Pop_Auxiliary 0047 e7ff | | Load 0x3,-0x1 0048 e602 | | Load 0x3,0x2 0049 017d | } | Execute Record,Structure_Write 004a e602 | | Load 0x3,0x2 004b 4805 |H | Short_Literal 0x5 004c 8017 | | Call 0x0,0x17 004d 00d1 | | Pop_Control Pop_Count_1 004e e7ff | | Load 0x3,-0x1 004f 8007 | | Call 0x0,0x7 0050 e602 | | Load 0x3,0x2 0051 8214 | | Call 0x1,0x14 0052 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0053 0000 0000 | | .BLANK 0000[0x5] 0058 ; -------------------------------------------------------------------------------------- 0058 ; Debug Table 0058 ; -------------------------------------------------------------------------------------- 0058 0004 0002 | | .DEBUG4 0x0004,0x0002,0xd1d5,0x0000,0x0001,0x0000 005e dab5 8e61 | a| .XXX[0x1a2] 0060 2b10 2000 |+ | 0062 0000 4000 | @ | 0064 0032 d970 | 2 p| 0066 42c1 b56b |B k| 0068 ab02 5636 | V6| 006a 4000 0000 |@ | 006c 8000 0065 | e| 006e b2e0 8583 | | 0070 6ad8 da84 |j | 0072 ad74 8000 | t | 0074 0006 0000 | | 0076 00cb 65c1 | e | 0078 0b06 d5b9 | | 007a c609 5b41 | [A| 007c 0000 0002 | | 007e 0000 0196 | | 0080 cb82 160d | | 0082 ab78 ae12 | x | 0084 b732 0000 | 2 | 0086 0004 0000 | | 0088 032d 9704 | - | 008a 2c1b 56fb |, V | 008c e025 6fc4 | %o | 008e 0000 0008 | | 0090 0000 065b | [| 0092 2e08 5836 |. X6| 0094 ae12 084a | J| 0096 e248 0000 | H | 0098 0010 0000 | | 009a 0cb6 5c10 | \ | 009c b06d 5c4c | m\L| 009e 2095 ca10 | | 00a0 0000 0020 | | 00a2 0000 196c | l| 00a4 b821 60da | !` | 00a6 b8f6 612b | a+| 00a8 c020 0000 | | 00aa 0100 0000 | | 00ac 32d9 7042 |2 pB| 00ae c1b5 7365 | se| 00b0 0257 9640 | W @| 00b2 0000 0080 | | 00b4 0000 65b2 | e | 00b6 e085 836a | j| 00b8 e802 84af | | 00ba 5880 0000 |X | 00bc 0100 0000 | | 00be cb65 c10b | e | 00c0 06d5 d306 | | 00c2 095f 0900 | _ | 00c4 0000 0200 | | 00c6 0001 96cb | | 00c8 8216 0dab | | 00ca ac2e 12be | . | 00cc c200 0000 | | 00ce 0400 0003 | | 00d0 2d97 042c |- ,| 00d2 1b57 6460 | Wd`| 00d4 257e e400 |%~ | 00d6 0000 0800 | | 00d8 0006 5b2e | [.| 00da 0858 36ae | X6 | 00dc f7c8 4b6e | Kn| 00de 8800 0002 | | 00e0 9000 000c | | 00e2 b65c 10b0 | \ | 00e4 6d64 68a0 |mdh | 00e6 96ed 9000 | | 00e8 0000 6000 | ` | 00ea 0019 6cb8 | l | 00ec 2160 dac9 |!` | 00ee 7661 3022 |va0"| 00f0 2000 000d | | 00f2 4000 0032 |@ 2| 00f4 d970 42c1 | pB | 00f6 b5a6 8302 | | 00f8 605a 4000 |`Z@ | 00fa 0000 8000 | | 00fc 0065 b2e0 | e | 00fe 8583 6b4d | kM| 0100 fe84 c0e0 | | 0102 8000 0001 | | 0104 0000 00cb | | 0106 65c1 0b06 |e | 0108 d6a0 0609 | | 010a 8219 0000 | | 010c 0002 0000 | | 010e 0196 cb82 | | 0110 160d ad48 | H| 0112 5e13 04e2 |^ | 0114 0000 0004 | | 0116 0000 032d | -| 0118 9704 2c1b | , | 011a 5aa0 2026 |Z &| 011c 0b24 0000 | $ | 011e 0008 0000 | | 0120 065b 2e08 | [. | 0122 5836 b570 |X6 p| 0124 c84c 2148 | L!H| 0126 0000 0040 | @| 0128 0000 0cb6 | | 012a 5c10 b06d |\ m| 012c 6b42 a098 |kB | 012e 4810 0000 |H | 0130 0020 0000 | | 0132 196c b821 | l !| 0134 60da d73b |` ;| 0136 6130 9b20 |a0 | 0138 0000 0040 | @| 013a 0000 32d9 | 2 | 013c 7042 c1b5 |pB | 013e aff3 0261 | a| 0140 4c40 0000 |L@ | 0142 0080 0000 | | 0144 65b2 e085 |e | 0146 836b 611a | ka | 0148 84c2 c480 | | 014a 0000 0100 | | 014c 0000 cb65 | e| 014e c10b 06d6 | | 0150 c556 0985 | V | 0152 e100 0000 | | 0154 0200 0001 | | 0156 96cb 8216 | | 0158 0dad 919e | | 015a 130c 7200 | r | 015c 0000 0400 | | 015e 0003 2d97 | - | 0160 042c 1b5b | , [| 0162 2f60 261a |/`& | 0164 4400 0000 |D | 0166 0800 0006 | | 0168 5b2e 0858 |[. X| 016a 36b6 6d48 |6 mH| 016c 4c37 4800 |L7H | 016e 0000 1000 | | 0170 000c b65c | \| 0172 10b0 6d6d | mm| 0174 0aa0 9874 | t| 0176 1000 0000 | | 0178 2000 0019 | | 017a 6cb8 2160 |l !`| 017c dada 7961 | ya| 017e 3161 2000 |1a | 0180 0002 c000 | | 0182 0032 d970 | 2 p| 0184 42c1 b5b8 |B | 0186 4302 62d8 |C b | 0188 4000 0000 |@ | 018a 8000 0065 | e| 018c b2e0 8583 | | 018e 6b71 f684 |kq | 0190 c5dc 8000 | | 0192 0001 0000 | | 0194 00cb 65c1 | e | 0196 0b06 d6e6 | | 0198 5609 8c11 |V | 019a 0000 0002 | | 019c 0000 0196 | | 019e cb82 160d | | 01a0 add1 de13 | | 01a2 18d2 0000 | | 01a4 0004 0000 | | 01a6 032d 9704 | - | 01a8 2c1b 5bb0 |, [ | 01aa 2026 3724 | &7$| 01ac 0000 0020 | | 01ae 0000 065b | [| 01b0 2e08 5836 |. X6| 01b2 b78e 484c | HL| 01b4 7108 0000 |q | 01b6 0010 0000 | | 01b8 0cb6 5c10 | \ | 01ba b06d 6f4d | moM| 01bc 2098 e790 | | 01be 0000 0020 | | 01c0 0000 196c | l| 01c2 b821 60da | !` | 01c4 dee5 6131 | a1| 01c6 da20 0000 | | 01c8 0040 0000 | @ | 01ca 32d9 7042 |2 pB| 01cc c1b5 be75 | u| 01ce 0263 ca40 | c @| 01d0 0000 0080 | | 01d2 0000 65b2 | e | 01d4 e085 836b | k| 01d6 7e1e 84c7 |~ | 01d8 c080 0000 | | 01da 0100 0000 | | 01dc cb65 c10b | e | 01de 06d6 fec6 | | 01e0 098f d900 | | 01e2 0000 0200 | | 01e4 0001 96cb | | 01e6 8216 0dae | | 01e8 02fe 1320 | | 01ea 6200 0000 |b | 01ec 0400 0003 | | 01ee 2d97 042c |- ,| 01f0 1b5c 11a0 | \ | 01f2 2642 2400 |&B$ | 01f4 0000 0800 | | 01f6 0006 5b2e | [.| 01f8 0858 36b8 | X6 | 01fa 3788 4c87 |7 L | 01fc 0800 0000 | | 01fe 1000 000c | |