|
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_03bcfe
└─⟦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 0040 | @ | .CONST 0x0040 ; 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 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 001c | | .CONST 0x001c ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0002 | | .CONST 0x0002 ; Number of locals 001b INIT_0018: 001b 8002 | | Call 0x0,0x2 001c BODY_0018: 001c 00d8 | | Load_Top At_Offset_0 001d 01db | | Execute Vector,Length 001e 7005 |p | Jump_Nonzero 0x24 001f 0092 002b | +| Action Push_String_Extended,0x2b ; "Site has not been set." 0021 e003 | | Load 0x0,0x3 0022 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0023 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0024 0092 002c | ,| Action Push_String_Extended,0x2c ; "Site = " 0026 e402 | | Load 0x2,0x2 0027 01cc | | Execute Vector,Catenate 0028 e003 | | Load 0x0,0x3 0029 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 002a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 002b ; -------------------------------------------------------------------------------------- 002b ; STRING TABLE 002b ; -------------------------------------------------------------------------------------- 002b 0006 | | .STRTAB 0x0006->0x002e ; "Site has not been set." 002c 001a | | .STRTAB 0x001a->0x0039 ; "Site = " 002d 001f | | .STREND 0x001f->0x003c 002e 5369 7465 |Site| .STRTAB_STRINGS 003d 0000 0000 | | .XXX[0x3] 003f 0000 | | 0040 ; -------------------------------------------------------------------------------------- 0040 ; Debug Table 0040 ; -------------------------------------------------------------------------------------- 0040 0004 0010 | | .DEBUG4 0x0004,0x0010,0xd820,0x0000,0x0001,0x0000 0046 0000 0000 | | .BLANK 0000[0x9] 004f 41c2 |A | .XXX[0x1] 0050 0000 0000 | | .BLANK 0000[0x8] 0058 0080 0000 | | .XXX[0x1a] 005a 0000 0000 | | 005c 0080 00b7 | | 005e 2d00 4bb0 |- K | 0060 dc00 4bb0 | K | 0062 8b80 4bb5 | K | 0064 1d80 25d9 | % | 0066 a340 0008 | @ | 0068 22fa 0855 |" U| 006a cad9 bf48 | H| 006c 0000 4904 | I | 006e 2ae5 8974 |* t| 0070 4e00 0024 |N $| 0072 0000 0000 | | .BLANK 0000[0x4] 0076 0095 7c28 | |(| .XXX[0x19] 0078 5000 0004 |P | 007a 0095 7c68 | |h| 007c 5000 0004 |P | 007e 0100 0000 | | 0080 0012 af8d | | 0082 0a00 0000 | | 0084 8041 0ab9 | A | 0086 625d 1380 |b] | 0088 0009 0000 | | 008a 0004 8000 | | 008c 28fc 0000 |( | 008e 0001 | | 008f 0000 0000 | | .BLANK 0000[0x9] 0098 1070 8000 | p | .XXX[0x2] 009a 0000 0000 | | .BLANK 0000[0x7] 00a1 0020 0000 | | .XXX[0x9] 00a3 0000 0000 | | 00a5 0020 002e | .| 00a7 4960 12ec |I` | 00a9 c940 | @ | 00aa 0000 0000 | | .BLANK 0000[0x4] 00ae 0976 b1f0 | v | .XXX[0xd] 00b0 001f def6 | | 00b2 8224 6395 | $c | 00b4 6412 0000 |d | 00b6 1241 14af | A | 00b8 d1f1 1c80 | | 00ba 0009 | | 00bb 0000 0000 | | .BLANK 0000[0x4] 00bf 002d 1a82 | - | .XXX[0x1c] 00c1 1600 0001 | | 00c3 002d 1b6a | - j| 00c5 1600 0001 | | 00c7 0000 0000 | | 00c9 0005 a350 | P| 00cb 42c0 0000 |B | 00cd 2010 448c | D | 00cf 737d a100 |s} | 00d1 0002 4000 | @ | 00d3 0001 2000 | | 00d5 21d0 0000 |! | 00d7 0000 4000 | @ | 00d9 0000 4000 | @ | 00db 0000 0000 | | .BLANK 0000[0x5] 00e0 0208 918e | | .XXX[0x44] 00e2 5922 d400 |Y" | 00e4 0048 0000 | H | 00e6 0024 0004 | $ | 00e8 3a00 0000 |: | 00ea 0008 0000 | | 00ec 0008 0000 | | 00ee 0008 000c | | 00f0 ae20 04bb | | 00f2 56e0 04bb |V | 00f4 2d48 04bb |-H | 00f6 bf88 025d | ]| 00f8 bec4 000a | | 00fa 497d a060 |I} `| 00fc 160f c000 | | 00fe 0000 0690 | | 0100 300b 07e0 |0 | 0102 0000 0003 | | 0104 4000 0000 |@ | 0106 0000 0000 | | 0108 000c 15f8 | | 010a 8580 0000 | | 010c 400c 15fa |@ | 010e 8580 0000 | | 0110 4000 0000 |@ | 0112 0001 82bf | | 0114 50b0 0000 |P | 0116 0804 0c02 | | 0118 c1f8 0000 | | 011a 0000 d000 | | 011c 0000 4800 | H | 011e 0917 8000 | | 0120 0000 1000 | | 0122 0000 1000 | | 0124 0000 0000 | | .BLANK 0000[0x5] 0129 0082 2f62 | /b| .XXX[0x13] 012b d499 8a00 | | 012d 001a 0000 | | 012f 0009 0001 | | 0131 22f0 0000 |" | 0133 0002 0000 | | 0135 0002 0000 | | 0137 0002 0003 | | 0139 62b6 012e |b .| 013b dedc | | 013c 0000 0000 | | .BLANK 0000[0x4] 0140 0097 7443 | tC| .XXX[0x2d] 0142 0003 37b0 | 7 | 0144 6823 9537 |h# 7| 0146 827c 9000 | | | 0148 03d4 1528 | (| 014a 995e 0100 | ^ | 014c 0000 0900 | | 014e 0000 0000 | | 0150 0000 0003 | | 0152 4046 2140 |@F!@| 0154 0000 1003 | | 0156 4048 a140 |@H @| 0158 0000 1000 | | 015a 0004 5f3c | _<| 015c 6809 1428 |h (| 015e 0000 0201 | | 0160 047a 8a62 | z b| 0162 3ca4 0000 |< | 0164 2400 0000 |$ | 0166 1200 0273 | s| 0168 2000 0000 | | 016a 0400 0000 | | 016c 0c00 | | 016d 0000 0000 | | .BLANK 0000[0x6] 0173 0041 c200 | A | .XXX[0x2] 0175 0000 0000 | | .BLANK 0000[0x8] 017d 8000 0000 | | .XXX[0x1a] 017f 0000 0000 | | 0181 8000 ee5b | [| 0183 004b ba00 | K | 0185 004b b9af | K | 0187 804b be41 | K A| 0189 8025 de35 | % 5| 018b 4000 bdde |@ | 018d 9a08 fd16 | | 018f 14bc 3400 | 4 | 0191 0125 047e | % ~| 0193 8b0c 46b8 | F | 0195 0000 9200 | | 0197 0000 0000 | | .BLANK 0000[0x4] 019b d22e 8850 | . P| .XXX[0x19] 019d 0000 0400 | | 019f d22e c850 | . P| 01a1 0000 0401 | | 01a3 0000 0000 | | 01a5 1a45 d90a | E | 01a7 0000 0080 | | 01a9 411f a2c3 |A | 01ab 11ae 0000 | | 01ad 2480 0000 |$ | 01af 0480 0076 | v| 01b1 2200 0000 |" | 01b3 0100 | | 01b4 0000 0000 | | .BLANK 0000[0x8] 01bc 0010 7080 | p | .XXX[0x2] 01be 0000 0000 | | .BLANK 0000[0x8] 01c6 2000 0000 | | .XXX[0x1a] 01c8 0000 0000 | | 01ca 2000 3c14 | < | 01cc e012 ef12 | | 01ce 4000 0000 |@ | 01d0 0018 7fc9 | | 01d2 b009 77d6 | w | 01d4 7000 0044 |p D| 01d6 9480 0757 | W| 01d8 3ebe 2800 |> ( | 01da 0001 4003 | @ | 01dc ab9f 6bd1 | k | 01de 0000 0080 | | 01e0 0000 0000 | | .BLANK 0000[0x4] 01e4 008b 3a08 | : | .XXX[0x1c] 01e6 0000 0100 | | 01e8 008b 4208 | B | 01ea 0000 0100 | | 01ec 2000 0000 | | 01ee 0011 6841 | hA| 01f0 0000 0020 | | 01f2 1000 eae7 | | 01f4 daf4 4000 | @ | 01f6 0020 0000 | | 01f8 0120 0006 | | 01fa 42c0 0000 |B | 01fc 0040 0000 | @ | 01fe 0000 0000 | |