|
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_0a70f4
└─⟦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 0088 | | .CONST 0x0088 ; 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 002a | * | .CONST 0x002a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000e | | .CONST 0x000e ; Number of locals 000b INIT_0008: 000b e214 | | Load 0x1,0x14 000c 1b13 | | Execute Package,Field_Read,Field_Number 0x13 000d e214 | | Load 0x1,0x14 000e 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 000f e214 | | Load 0x1,0x14 0010 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0011 00e1 | | Load_Encached Boolean_Cache 0012 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0013 0007 | | Action Break_Optional 0014 0007 | | Action Break_Optional 0015 029f 0053 | S| Declare_Subprogram INIT_0050,For_Call 0017 029f 005b | [| Declare_Subprogram INIT_0058,For_Call 0019 e013 | | Load 0x0,0x13 001a 1916 | | Execute Package,Field_Reference,Field_Number 0x16 001b 00c6 | | Action Check_Subprogram_Elaborated 001c 4806 |H | Short_Literal 0x6 001d 4802 |H | Short_Literal 0x2 001e 0099 | | Action Reference_Dynamic 001f 4807 |H | Short_Literal 0x7 0020 4802 |H | Short_Literal 0x2 0021 0099 | | Action Reference_Dynamic 0022 e019 | | Load 0x0,0x19 0023 e01a | | Load 0x0,0x1a 0024 480c |H | Short_Literal 0xc 0025 0007 | | Action Break_Optional 0026 e01b | | Load 0x0,0x1b 0027 02ab | | Declare_Subprogram For_Call,With_Address 0028 e01c | | Load 0x0,0x1c 0029 02ab | | Declare_Subprogram For_Call,With_Address 002a BODY_0008: 002a e214 | | Load 0x1,0x14 002b 1b12 | | Execute Package,Field_Read,Field_Number 0x12 002c 1b12 | | Execute Package,Field_Read,Field_Number 0x12 002d e011 | | Load 0x0,0x11 002e 1811 | | Execute Package,Field_Execute,Field_Number 0x11 002f e018 | | Load 0x0,0x18 0030 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0031 e214 | | Load 0x1,0x14 0032 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0033 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0034 c402 | | Store 0x2,0x2 0035 e214 | | Load 0x1,0x14 0036 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 0037 e214 | | Load 0x1,0x14 0038 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27 0039 c403 | | Store 0x2,0x3 003a e5ff | | Load 0x2,-0x1 003b 840d | | Call 0x2,0xd 003c e214 | | Load 0x1,0x14 003d 1b13 | | Execute Package,Field_Read,Field_Number 0x13 003e e403 | | Load 0x2,0x3 003f e214 | | Load 0x1,0x14 0040 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29 0041 c404 | | Store 0x2,0x4 0042 e5fb | | Load 0x2,-0x5 0043 e5fc | | Load 0x2,-0x4 0044 e5fd | | Load 0x2,-0x3 0045 e5fe | | Load 0x2,-0x2 0046 e404 | | Load 0x2,0x4 0047 840e | | Call 0x2,0xe 0048 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0049 0000 0000 | | .BLANK 0000[0x7] 0050 ; -------------------------------------------------------------------------------------- 0050 ; SUBPROGRAM 0050 ; -------------------------------------------------------------------------------------- 0050 0053 | S | .CONST 0x0053 ; Address of begin 0051 0004 | | .CONST 0x0004 ; Address of exception handler 0052 0001 | | .CONST 0x0001 ; Number of locals 0053 BODY_0050: 0053 INIT_0050: 0053 00da | | Load_Top At_Offset_2 0054 e402 | | Load 0x2,0x2 0055 e214 | | Load 0x1,0x14 0056 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0057 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 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 00da | | Load_Top At_Offset_2 005c 8213 | | Call 0x1,0x13 005d e405 | | Load 0x2,0x5 005e 6811 |h | Jump_Zero 0x70 005f e00e | | Load 0x0,0xe 0060 180e | | Execute Package,Field_Execute,Field_Number 0xe 0061 4800 |H | Short_Literal 0x0 0062 e7fe | | Load 0x3,-0x2 0063 e008 | | Load 0x0,0x8 0064 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0065 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0066 0092 007b | {| Action Push_String_Extended,0x7b ; " depends upon " 0068 01cc | | Execute Vector,Catenate 0069 e7ff | | Load 0x3,-0x1 006a e008 | | Load 0x0,0x8 006b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 006c 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 006d 01cc | | Execute Vector,Catenate 006e e00f | | Load 0x0,0xf 006f 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0070 00db | | Load_Top At_Offset_3 0071 00db | | Load_Top At_Offset_3 0072 e403 | | Load 0x2,0x3 0073 e214 | | Load 0x1,0x14 0074 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0075 e402 | | Load 0x2,0x2 0076 00db | | Load_Top At_Offset_3 0077 e214 | | Load 0x1,0x14 0078 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0079 c402 | | Store 0x2,0x2 007a 4504 |E | Exit_Suprogram New_Top_Offset 0x4 007b ; -------------------------------------------------------------------------------------- 007b ; STRING TABLE 007b ; -------------------------------------------------------------------------------------- 007b 0004 | | .STRTAB 0x0004->0x007d ; " depends upon " 007c 0010 | | .STREND 0x0010->0x0084 007d 2064 6570 | dep| .STRTAB_STRINGS 0084 0000 0000 | | .BLANK 0000[0x4] 0088 ; -------------------------------------------------------------------------------------- 0088 ; Debug Table 0088 ; -------------------------------------------------------------------------------------- 0088 0004 0004 | | .DEBUG4 0x0004,0x0004,0x706b,0x0000,0x0001,0x0000 008e d17d 5da5 | }] | .XXX[0x172] 0090 b991 bddd | | 0092 7d05 d1d1 |} | 0094 c9a5 89d5 | | 0096 d195 cd7d | }| 0098 4995 c5d5 |I | 009a 95cd d09d | | 009c 4da5 e994 |M | 009e 80bc f480 | | 00a0 ccc8 80a8 | | 00a2 80c8 81d1 | | 00a4 a195 b880 | | 00a6 8028 8080 | ( | 00a8 8080 8080 | | 00aa 8081 c985 | | 00ac a5cd 9481 | | 00ae 617d 31a5 |a}1 | 00b0 89c9 85c9 | | 00b2 e57d 0dbd | } | 00b4 b999 d5cd | | 00b6 a5bd b8ec | | 00b8 8080 2880 | ( | 00ba 8080 8195 | | 00bc b990 81a5 | | 00be 98ec 8080 | | 00c0 2880 8080 |( | 00c2 81a5 9881 | | 00c4 61b1 89d1 |a | 00c6 7d49 95c5 |}I | 00c8 d595 cdd0 | | 00ca ccb9 617d | a}| 00cc 1dc9 8589 | | 00ce 7d09 d5d1 |} | 00d0 d1bd b97d | }| 00d2 4995 c5d5 |I | 00d4 95cd d09d | | 00d6 4da5 e994 |M | 00d8 80bc f480 | | 00da ccc8 80a8 | | 00dc 80d8 81d1 | | 00de a195 b880 | | 00e0 8028 8080 | ( | 00e2 8080 8080 | | 00e4 8081 c985 | | 00e6 a5cd 9481 | | 00e8 617d 31a5 |a}1 | 00ea 89c9 85c9 | | 00ec e57d 0dbd | } | 00ee b999 d5cd | | 00f0 a5bd b8ec | | 00f2 8080 2880 | ( | 00f4 8080 8195 | | 00f6 b990 81a5 | | 00f8 98ec 8080 | | 00fa 2880 8080 |( | 00fc 81a5 9881 | | 00fe 61b1 89d1 |a | 0100 7d49 95c5 |}I | 0102 d595 cdd0 | | 0104 ccb9 617d | a}| 0106 1dc9 8589 | | 0108 7d2d 95e5 |}- | 010a 7d49 95c5 |}I | 010c d595 cdd0 | | 010e 9d4d a5e9 | M | 0110 9480 bcf4 | | 0112 80cc c880 | | 0114 a880 d081 | | 0116 d1a1 95b8 | | 0118 8080 2880 | ( | 011a 8080 8080 | | 011c 8080 81c9 | | 011e 85a5 cd94 | | 0120 8161 7d31 | a}1| 0122 a589 c985 | | 0124 c9e5 7d0d | } | 0126 bdb9 99d5 | | 0128 cda5 bdb8 | | 012a ec80 8028 | (| 012c 8080 8081 | | 012e 95b9 9081 | | 0130 a598 ec80 | | 0132 8028 8080 | ( | 0134 8081 a598 | | 0136 8161 b189 | a | 0138 d17d 4995 | }I | 013a c5d5 95cd | | 013c d0cc b961 | a| 013e 7d1d c985 |} | 0140 897d 2d95 | }- | 0142 e589 bd85 | | 0144 c991 7d49 | }I| 0146 95c5 d595 | | 0148 cdd0 9d4d | M| 014a a5e9 9480 | | 014c bcf4 80cc | | 014e c880 a880 | | 0150 d081 d1a1 | | 0152 95b8 8080 | | 0154 2880 8080 |( | 0156 8080 8080 | | 0158 81c9 85a5 | | 015a cd94 8161 | a| 015c 7d31 a589 |}1 | 015e c985 c9e5 | | 0160 7d0d bdb9 |} | 0162 99d5 cda5 | | 0164 bdb8 ec80 | | 0166 8028 8080 | ( | 0168 8081 95b9 | | 016a 9081 a598 | | 016c ec80 8028 | (| 016e 8080 8081 | | 0170 a598 8161 | a| 0172 b189 d17d | }| 0174 4995 c5d5 |I | 0176 95cd d0cc | | 0178 b961 7d1d | a} | 017a c985 897d | }| 017c 41bd a5b9 |A | 017e d195 c97d | }| 0180 4995 c5d5 |I | 0182 95cd d09d | | 0184 4da5 e994 |M | 0186 80bc f480 | | 0188 ccc8 80a8 | | 018a 80d8 81d1 | | 018c a195 b880 | | 018e 8028 8080 | ( | 0190 8080 8080 | | 0192 8081 c985 | | 0194 a5cd 9481 | | 0196 617d 31a5 |a}1 | 0198 89c9 85c9 | | 019a e57d 0dbd | } | 019c b999 d5cd | | 019e a5bd b8ec | | 01a0 8080 2880 | ( | 01a2 8080 8195 | | 01a4 b990 81a5 | | 01a6 98ec 8080 | | 01a8 2880 8080 |( | 01aa 81a5 9881 | | 01ac 61b1 89d1 |a | 01ae 7d49 95c5 |}I | 01b0 d595 cdd0 | | 01b2 ccb9 617d | a}| 01b4 1dc9 8589 | | 01b6 7d4d 95c9 |}M | 01b8 d995 c97d | }| 01ba 4995 c5d5 |I | 01bc 95cd d09d | | 01be 4da5 e994 |M | 01c0 80bc f480 | | 01c2 ccc8 80a8 | | 01c4 80c4 81d1 | | 01c6 a195 b880 | | 01c8 8028 8080 | ( | 01ca 8080 8080 | | 01cc 8081 c985 | | 01ce a5cd 9481 | | 01d0 617d 31a5 |a}1 | 01d2 89c9 85c9 | | 01d4 e57d 0dbd | } | 01d6 b999 d5cd | | 01d8 a5bd b8ec | | 01da 8080 2880 | ( | 01dc 8080 8195 | | 01de b990 81a5 | | 01e0 98ec 8080 | | 01e2 2880 8080 |( | 01e4 81a5 9881 | | 01e6 61b1 89d1 |a | 01e8 7d49 95c5 |}I | 01ea d595 cdd0 | | 01ec ccb9 617d | a}| 01ee 25b5 859d |% | 01f0 957d 5195 | }Q | 01f2 e1d0 c4d9 | | 01f4 7d49 95c5 |}I | 01f6 d595 cdd0 | | 01f8 9d4d a5e9 | M | 01fa 9480 bcf4 | | 01fc 80cc c880 | | 01fe a880 d081 | |