|
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_6a18da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 0078 | x | .CONST 0x0078 ; 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 0027 | ' | .CONST 0x0027 ; Address of begin 0009 0070 | p | .CONST 0x0070 ; Address of exception handler 000a 0007 | | .CONST 0x0007 ; Number of locals 000b INIT_0008: 000b e017 | | Load 0x0,0x17 000c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 000d 02ff | | Declare_Variable Variant_Record 000e 00d8 | | Load_Top At_Offset_0 000f 1c00 | | Execute_Immediate Run_Utility,0x0 0010 e017 | | Load 0x0,0x17 0011 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0012 02ff | | Declare_Variable Variant_Record 0013 00d8 | | Load_Top At_Offset_0 0014 1c00 | | Execute_Immediate Run_Utility,0x0 0015 e017 | | Load 0x0,0x17 0016 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0017 02ff | | Declare_Variable Variant_Record 0018 00d8 | | Load_Top At_Offset_0 0019 1c00 | | Execute_Immediate Run_Utility,0x0 001a e018 | | Load 0x0,0x18 001b 1b13 | | Execute Package,Field_Read,Field_Number 0x13 001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001d 02c7 | | Declare_Variable Any 001e 00d8 | | Load_Top At_Offset_0 001f 1c00 | | Execute_Immediate Run_Utility,0x0 0020 e018 | | Load 0x0,0x18 0021 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0022 02ff | | Declare_Variable Variant_Record 0023 00d8 | | Load_Top At_Offset_0 0024 1c00 | | Execute_Immediate Run_Utility,0x0 0025 e019 | | Load 0x0,0x19 0026 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0027 BODY_0008: 0027 e5ff | | Load 0x2,-0x1 0028 e006 | | Load 0x0,0x6 0029 1811 | | Execute Package,Field_Execute,Field_Number 0x11 002a 6802 |h | Jump_Zero 0x2d 002b 00ec | | Load_Encached Diana_Tree_Cache 002c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 002d e5ff | | Load 0x2,-0x1 002e e006 | | Load 0x0,0x6 002f 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40 0030 180d | | Execute Package,Field_Execute,Field_Number 0xd 0031 e402 | | Load 0x2,0x2 0032 016d | m | Execute Variant_Record,Structure_Write 0033 e019 | | Load 0x0,0x19 0034 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0035 e403 | | Load 0x2,0x3 0036 e5fe | | Load 0x2,-0x2 0037 e402 | | Load 0x2,0x2 0038 e017 | | Load 0x0,0x17 0039 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 003a 00d1 | | Pop_Control Pop_Count_1 003b 0059 | Y | Store_Top Discrete,At_Offset_1 003c 00d8 | | Load_Top At_Offset_0 003d 6802 |h | Jump_Zero 0x40 003e 00ec | | Load_Encached Diana_Tree_Cache 003f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0040 e019 | | Load 0x0,0x19 0041 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0042 e404 | | Load 0x2,0x4 0043 e01a | | Load 0x0,0x1a 0044 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0045 602e |`. | Indirect_Literal Discrete,0x74,{0x00000000, 0x00028000} 0046 4800 |H | Short_Literal 0x0 0047 e403 | | Load 0x2,0x3 0048 e017 | | Load 0x0,0x17 0049 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 004a 00d1 | | Pop_Control Pop_Count_1 004b 0059 | Y | Store_Top Discrete,At_Offset_1 004c 00d8 | | Load_Top At_Offset_0 004d 6801 |h | Jump_Zero 0x4f 004e 0887 | | Execute_Immediate Raise,0x87 004f 00db | | Load_Top At_Offset_3 0050 e018 | | Load 0x0,0x18 0051 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0052 0162 | b | Execute Variant_Record,Check_In_Type 0053 00da | | Load_Top At_Offset_2 0054 016d | m | Execute Variant_Record,Structure_Write 0055 e019 | | Load 0x0,0x19 0056 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0057 00db | | Load_Top At_Offset_3 0058 0120 | | Execute Any,Is_Value 0059 6804 |h | Jump_Zero 0x5e 005a e018 | | Load 0x0,0x18 005b 1b13 | | Execute Package,Field_Read,Field_Number 0x13 005c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 005d 7801 |x | Jump 0x5f 005e 00db | | Load_Top At_Offset_3 005f e01a | | Load 0x0,0x1a 0060 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0061 4800 |H | Short_Literal 0x0 0062 4800 |H | Short_Literal 0x0 0063 e406 | | Load 0x2,0x6 0064 e018 | | Load 0x0,0x18 0065 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0066 c405 | | Store 0x2,0x5 0067 0059 | Y | Store_Top Discrete,At_Offset_1 0068 00d8 | | Load_Top At_Offset_0 0069 6801 |h | Jump_Zero 0x6b 006a 0887 | | Execute_Immediate Raise,0x87 006b 00da | | Load_Top At_Offset_2 006c e018 | | Load 0x0,0x18 006d 1b13 | | Execute Package,Field_Read,Field_Number 0x13 006e 1815 | | Execute Package,Field_Execute,Field_Number 0x15 006f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0070 TRAP_0008: 0070 0007 | | Action Break_Optional 0071 00ec | | Load_Encached Diana_Tree_Cache 0072 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0073 0000 | | .XXX[0x1] 0074 0000 0000 | | .LITERAL {0x00000000, 0x00028000} 0078 ; -------------------------------------------------------------------------------------- 0078 ; Debug Table 0078 ; -------------------------------------------------------------------------------------- 0078 0004 000c | | .DEBUG4 0x0004,0x000c,0x000e,0x0000,0x0001,0x0000 007e 2a32 0aaa |*2 | .XXX[0x182] 0080 62a2 faa2 |b | 0082 0a92 3a2a | :*| 0084 a2fa 720a | r | 0086 6a29 ebd4 |j) | 0088 a3f4 8118 | | 008a 001a 5a2a | Z*| 008c c8b8 014a | J| 008e a20a 923a | :| 0090 2aa2 fa22 |* "| 0092 2a82 2a72 |* *r| 0094 222a 72a2 |"*r | 0096 fa1a 420a | B | 0098 920a 1aa2 | | 009a 2a92 4a9a |* J | 009c a24a 1a99 | J | 009e 725a 2aca |rZ* | 00a0 fa22 0aa2 | " | 00a2 0803 f481 | | 00a4 1800 5232 | R2| 00a6 7a92 fa7a |z z| 00a8 1252 2a1a | R* | 00aa a0b8 0082 | | 00ac 224a 922a |"J *| 00ae 1aa2 7a92 | z | 00b0 c972 7a12 | rz | 00b2 522a 1aa0 |R* | 00b4 03f4 8118 | | 00b6 006a 9a2a | j *| 00b8 924a 0a62 | J b| 00ba fa72 aa6a | r j| 00bc 122a 90b8 | * | 00be 008a 9aa2 | | 00c0 0a72 220a | r" | 00c2 9221 7282 | !r | 00c4 7a9a 4aa2 |z J | 00c6 4ab2 2800 |J ( | 00c8 b800 7a9a | z | 00ca a20a 7222 | r"| 00cc 0a92 2172 | !r| 00ce 9aa2 924a | J| 00d0 7238 0000 |r8 | 00d2 0b0a 8800 | | 00d4 0001 a000 | | 00d6 0000 1000 | | 00d8 0007 f003 | | 00da 2544 1524 |%D $| 00dc 7455 45f4 |tUE | 00de 4455 0454 |DU T| 00e0 e444 54e5 | DT | 00e2 45f4 3484 |E 4 | 00e4 1524 1435 | $ 5| 00e6 4455 2495 |DU$ | 00e8 3544 9435 |5D 5| 00ea 32e4 34f4 |2 4 | 00ec d4d4 14e4 | | 00ee 45f5 3455 |E 4U| 00f0 0415 2415 | $ | 00f2 44f5 23d7 |D # | 00f4 a947 e902 | G | 00f6 3000 34b4 |0 4 | 00f8 5591 7002 |U p | 00fa 9544 1524 | D $| 00fc 7455 45f4 |tUE | 00fe 4455 0454 |DU T| 0100 e444 54e5 | DT | 0102 45f4 3484 |E 4 | 0104 1524 1435 | $ 5| 0106 4455 2495 |DU$ | 0108 3544 9435 |5D 5| 010a 32e4 b455 |2 U| 010c 95f4 4415 | D | 010e 4410 0170 |D p| 0110 00f5 3544 | 5D| 0112 14e4 4415 | D | 0114 2442 e535 |$B 5| 0116 4524 94e4 |E$ | 0118 7000 0000 |p | 011a 0000 0000 | | 011c 0700 0000 | | 011e 0020 0000 | | 0120 1320 068a | | 0122 882a 48e8 | *H | 0124 aa8b e888 | | 0126 aa08 a9c8 | | 0128 88a9 ca8b | | 012a e869 082a | i *| 012c 4828 6a88 |H(j | 012e aa49 2a6a | I*j| 0130 8928 6a65 | (je| 0132 c869 e9aa | i | 0134 0929 88aa | ) | 0136 4bea 0a49 |K I| 0138 ea08 aa4a | J| 013a 8928 aa67 | ( g| 013c af52 8fd2 | R | 013e 0460 0188 | ` | 0140 c9ea 4be8 | K | 0142 69e9 aa09 |i | 0144 2988 aa42 |) B| 0146 e006 0a88 | | 0148 2a48 e8aa |*H | 014a 8be8 88aa | | 014c 08a9 c888 | | 014e a9ca 8be8 | | 0150 6908 2a48 |i *H| 0152 286a 88aa |(j | 0154 492a 6a89 |I*j | 0156 286a 65ca |(je | 0158 882a 48e8 | *H | 015a aa8b e869 | i| 015c e9aa 0929 | )| 015e 88aa 4002 | @ | 0160 e002 e869 | i| 0162 e9aa 0929 | )| 0164 88aa 4bea | K | 0166 0a49 ea08 | I | 0168 aa4a 8b2b | J +| 016a e82a 4a48 | *JH| 016c 2b20 0000 |+ | 016e 0000 0000 | | 0170 001b 8000 | | 0172 0000 4000 | @ | 0174 0017 000b | | 0176 d510 5491 | T | 0178 d155 17d1 | U | 017a 1154 1153 | T S| 017c 9111 5395 | S | 017e 17d0 d210 | | 0180 5490 50d5 |T P | 0182 1154 9254 | T T| 0184 d512 50d4 | P | 0186 cb95 1054 | T| 0188 91d1 5517 | U | 018a d350 50d2 | PP | 018c 1253 914e | S N| 018e e65b 8c40 | [ @| 0190 01d5 9056 | V| 0192 17d5 9354 | T| 0194 cc40 0294 | @ | 0196 94cd 8c0c | | 0198 0c17 d052 | R| 019a 560c 4003 |V @ | 019c 53d5 1211 |S | 019e 5497 d350 |T P| 01a0 50d2 1253 |P S| 01a2 9140 0000 | @ | 01a4 5c51 8000 |\Q | 01a6 0001 8000 | | 01a8 0000 8000 | | 01aa 004d 8014 | M | 01ac 2a20 a923 |* #| 01ae a2aa 2fa2 | / | 01b0 22a8 22a7 |" " | 01b2 2222 a72a |"" *| 01b4 2fa1 a420 |/ | 01b6 a920 a1aa | | 01b8 22a9 24a9 |" $ | 01ba aa24 a1a9 | $ | 01bc 9721 a7a7 | ! | 01be 2b22 a92a |+" *| 01c0 1ebd 4a3f | J?| 01c2 4811 8004 |H | 01c4 21a7 a6a8 |! | 01c6 24a6 22a9 |$ " | 01c8 0b80 182a | *| 01ca 20a9 23a2 | # | 01cc aa2f a222 | / "| 01ce a822 a722 | " "| 01d0 22a7 2a2f |" */| 01d2 a1a4 20a9 | | 01d4 20a1 aa22 | "| 01d6 a924 a9aa | $ | 01d8 24a1 a997 |$ | 01da 2a20 a923 |* #| 01dc a2aa 2fa1 | / | 01de a7a6 a824 | $| 01e0 a622 a900 | " | 01e2 0b80 14aa | | 01e4 20a9 23a2 | # | 01e6 aa2f a222 | / "| 01e8 a822 a722 | " "| 01ea 22a7 2a2f |" */| 01ec a1a4 20a9 | | 01ee 20a1 aa22 | "| 01f0 a924 a9aa | $ | 01f2 24a1 a997 |$ | 01f4 25a2 acaf |% | 01f6 a220 aa20 | | 01f8 8000 0000 | | 01fa 0000 0000 | | 01fc 0900 0000 | | 01fe 0100 0000 | |