|
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_0bf8df
└─⟦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 5800 |X | .CONST 0x5800 ; 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 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 001b | | .CONST 0x001b ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0001 | | .CONST 0x0001 ; Number of locals 001b BODY_0018: 001b INIT_0018: 001b 4800 |H | Short_Literal 0x0 001c 4800 |H | Short_Literal 0x0 001d 4800 |H | Short_Literal 0x0 001e 4801 |H | Short_Literal 0x1 001f 4801 |H | Short_Literal 0x1 0020 4800 |H | Short_Literal 0x0 0021 4800 |H | Short_Literal 0x0 0022 4801 |H | Short_Literal 0x1 0023 4800 |H | Short_Literal 0x0 0024 4800 |H | Short_Literal 0x0 0025 4801 |H | Short_Literal 0x1 0026 4800 |H | Short_Literal 0x0 0027 e5ff | | Load 0x2,-0x1 0028 0092 0045 | E| Action Push_String_Extended,0x45 ; "_Errors" 002a 01cc | | Execute Vector,Catenate 002b e5ff | | Load 0x2,-0x1 002c e002 | | Load 0x0,0x2 002d 1815 | | Execute Package,Field_Execute,Field_Number 0x15 002e 4800 |H | Short_Literal 0x0 002f 4800 |H | Short_Literal 0x0 0030 4800 |H | Short_Literal 0x0 0031 4800 |H | Short_Literal 0x0 0032 4800 |H | Short_Literal 0x0 0033 4800 |H | Short_Literal 0x0 0034 4800 |H | Short_Literal 0x0 0035 4801 |H | Short_Literal 0x1 0036 4800 |H | Short_Literal 0x0 0037 4800 |H | Short_Literal 0x0 0038 4800 |H | Short_Literal 0x0 0039 4800 |H | Short_Literal 0x0 003a e5ff | | Load 0x2,-0x1 003b 0092 0046 | F| Action Push_String_Extended,0x46 ; "_Negatives" 003d 01cc | | Execute Vector,Catenate 003e e5ff | | Load 0x2,-0x1 003f 0092 0045 | E| Action Push_String_Extended,0x45 ; "_Errors" 0041 01cc | | Execute Vector,Catenate 0042 e002 | | Load 0x0,0x2 0043 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0044 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0045 ; -------------------------------------------------------------------------------------- 0045 ; STRING TABLE 0045 ; -------------------------------------------------------------------------------------- 0045 0006 | | .STRTAB 0x0006->0x0048 ; "_Errors" 0046 000b | | .STRTAB 0x000b->0x004b ; "_Negatives" 0047 0013 | | .STREND 0x0013->0x0050 0048 5f45 7272 |_Err| .STRTAB_STRINGS 0051 0000 0000 | | .BLANK 0000[0x7] 0058 ; -------------------------------------------------------------------------------------- 0058 ; Debug Table 0058 ; -------------------------------------------------------------------------------------- 0058 0004 0002 | | .DEBUG4 0x0004,0x0002,0x0b8c,0x0000,0x0001,0x0000 005e 10d0 c0e0 | | .XXX[0x16] 0060 e000 0000 | | 0062 18c4 c10c | | 0064 e4c1 0c00 | | 0066 0008 b000 | | 0068 3d60 0000 |=` | 006a 0004 4004 | @ | 006c 0002 ec00 | | 006e 0200 0000 | | 0070 8000 1000 | | 0072 3b88 380f |; 8 | 0074 600f 600f |` ` | .BLANK 600f[0x6] 007a 6003 8563 |` c| .XXX[0xf7] 007c cf88 380a | 8 | 007e fd63 b388 | c | 0080 380a fd63 |8 c| 0082 9788 380a | 8 | 0084 fd63 7b88 | c{ | 0086 380a ff97 |8 | 0088 f803 6388 | c | 008a 3808 d1c0 |8 | 008c 0420 0710 | | 008e 0b90 0b88 | | 0090 3808 c963 |8 c| 0092 3788 3808 |7 8 | 0094 cb80 2f88 | / | 0096 c002 5b10 | [ | 0098 1390 0808 | | 009a fb10 0b97 | | 009c fc03 6388 | c | 009e 3808 d1c0 |8 | 00a0 0420 0710 | | 00a2 0f90 0f88 | | 00a4 3808 c962 |8 b| 00a6 e788 3808 | 8 | 00a8 cb80 2f88 | / | 00aa c002 5b10 | [ | 00ac 1790 0c08 | | 00ae fb10 0f90 | | 00b0 0dc0 8390 | | 00b2 09c0 0b80 | | 00b4 1809 5f90 | _ | 00b6 1162 a009 | b | 00b8 1da0 3f90 | ? | 00ba 1788 3808 | 8 | 00bc c962 7b88 | b{ | 00be 3808 cb80 |8 | 00c0 2f88 c002 |/ | 00c2 5803 6388 |X c | 00c4 3808 d1c0 |8 | 00c6 0420 0510 | | 00c8 0b90 1562 | b| 00ca 3408 ec03 |4 | 00cc 6388 3808 |c 8 | 00ce d1c0 0420 | | 00d0 0510 0b90 | | 00d2 09c0 2790 | ' | 00d4 1561 f808 | a | 00d6 ec03 6388 | c | 00d8 3808 d1c0 |8 | 00da 0420 0510 | | 00dc 0b90 0b90 | | 00de 0c09 1da0 | | 00e0 5b90 1161 |[ a| 00e2 f409 1da0 | | 00e4 2790 1561 |' a| 00e6 a408 ec03 | | 00e8 6388 3808 |c 8 | 00ea d1c0 0420 | | 00ec 0510 0b90 | | 00ee 1561 7008 | ap | 00f0 ec03 6388 | c | 00f2 3808 d1c0 |8 | 00f4 0420 0510 | | 00f6 0b90 0b90 | | 00f8 0c09 11a0 | | 00fa 2520 0690 |% | 00fc 2b90 0b10 |+ | 00fe 1b90 0f10 | | 0100 0b90 1b10 | | 0102 0de0 0920 | | 0104 0290 2b88 | + | 0106 3803 6390 |8 c | 0108 0b88 3808 | 8 | 010a cb90 0f88 | | 010c 3808 ca09 |8 | 010e 5710 1f10 |W | 0110 2390 29c0 |# ) | 0112 4b90 1161 |K a| 0114 2c09 1da0 |, | 0116 1790 1f90 | | 0118 2008 f710 | | 011a 25e0 7961 |% ya| 011c 4f90 1c08 |O | 011e f161 2390 | a# | 0120 2008 f008 | | 0122 f710 25e0 | % | 0124 5790 1160 |W `| 0126 e409 1da0 | | 0128 2561 0b90 |%a | 012a 1c08 f160 | `| 012c df90 2008 | | 012e f008 f710 | | 0130 25e0 2160 |% !`| 0132 e790 1c08 | | 0134 f560 bb90 | ` | 0136 2008 f408 | | 0138 f710 2790 | ' | 013a 1788 3808 | 8 | 013c cb90 2788 | ' | 013e 3808 cb80 |8 | 0140 2f88 c002 |/ | 0142 5803 6388 |X c | 0144 3808 d1c0 |8 | 0146 0420 0510 | | 0148 0800 0000 | | 014a 0000 0100 | | 014c 0b65 f1fc | e | 014e cc87 48ff | H | 0150 a487 ed51 | Q| 0152 10b4 60ff | ` | 0154 e487 ed51 | Q| 0156 10b4 6100 | a | 0158 2487 ed51 |$ Q| 015a 10b4 6000 | ` | 015c 0000 0000 | | 015e 0000 00ff | | 0160 c000 0000 | | 0162 0000 00fc | | 0164 bdaa 2216 | " | 0166 8c23 4cfc | #L | 0168 bb54 442d | TD-| 016a 1846 98ff | F | 016c e484 0000 | | 016e 0000 0100 | | 0170 2486 |$ | 0171 0000 0000 | | .BLANK 0000[0x7] 0178 1000 523c | R<| .XXX[0x7d] 017a 4000 0000 |@ | 017c 0400 0000 | | 017e 0000 10d0 | | 0180 c0e0 e400 | | 0182 0000 18c4 | | 0184 c10d 10c1 | | 0186 0c00 0003 | | 0188 b000 3d60 | =`| 018a 0000 0001 | | 018c c004 0002 | | 018e ec00 0200 | | 0190 0000 5800 | X | 0192 1000 2388 | # | 0194 380f 6388 |8 c | 0196 380f 600f |8 ` | 0198 6161 5f88 |aa_ | 019a 380a fd61 |8 a| 019c 4388 380a |C 8 | 019e ff97 fdc0 | | 01a0 1397 ff88 | | 01a2 3808 c910 |8 | 01a4 0797 fc03 | | 01a6 6388 3808 |c 8 | 01a8 d1c0 0420 | | 01aa 0710 1390 | | 01ac 1008 fb10 | | 01ae 1403 6d60 | m`| 01b0 e009 1da0 | | 01b2 0423 8003 | # | 01b4 6d60 cc09 |m` | 01b6 15a0 0b80 | | 01b8 1809 5f90 | _ | 01ba 1005 29a0 | ) | 01bc 0d60 af10 | ` | 01be 0de0 0960 | `| 01c0 9310 0d60 | `| 01c2 7b90 1408 |{ | 01c4 ed60 8f90 | ` | 01c6 1408 f008 | | 01c8 e801 2c03 | , | 01ca 6b88 3808 |k 8 | 01cc ca09 3001 | 0 | 01ce 2f90 0d60 |/ `| 01d0 3008 ec03 |0 | 01d2 6c08 ef10 |l | 01d4 0b90 0803 | | 01d6 6388 3808 |c 8 | 01d8 d1c0 0420 | | 01da 0510 0400 | | 01dc 00ff 8000 | | 01de 0000 0000 | | 01e0 0100 0000 | | 01e2 0000 0000 | | 01e4 02ff c000 | | 01e6 0000 0000 | | 01e8 00ff c000 | | 01ea 0000 0000 | | 01ec 00ff d8b9 | | 01ee 0bfb e8e7 | | 01f0 bcff 98b9 | | 01f2 0bfb e8e7 | | 01f4 bc00 | | 01f5 0000 0000 | | .BLANK 0000[0x4] 01f9 1000 523c | R<| .XXX[0x7] 01fb 4400 0000 |D | 01fd 0400 0000 | | 01ff 0000 | |