|
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 0774 0388 | t | .XXX[0x4f] 0060 0fc4 036c | l| 0062 0770 0388 | p | 0064 0fc5 2007 | | 0066 9ffc 076c | l| 0068 0360 0388 | ` | 006a 0981 c004 | | 006c 2004 03a4 | | 006e 0d6c 0cdc | l | 0070 0388 0389 | | 0072 2000 014b | K| 0074 9808 0144 | D| 0076 033d e058 | = X| 0078 0367 9ffc | g | 007a 075c 3c6d | \<m| 007c a010 0364 | d| 007e 2810 0169 |( i| 0080 e044 0368 | D h| 0082 2804 016c |( l| 0084 0367 9ffc | g | 0086 075c 036f | \ o| 0088 9810 0758 | X| 008a 0364 2804 | d( | 008c 0168 0324 | h $| 008e 0367 980c | g | 0090 09e9 df98 | | 0092 0325 e034 | % 4| 0094 0368 2804 | h( | 0096 016c 0367 | l g| 0098 9ffc 075c | \| 009a 036f 9810 | o | 009c 0758 0364 | X d| 009e 2804 0168 |( h| 00a0 0324 0367 | $ g| 00a2 980c 09e9 | | 00a4 dfbc 0339 | 9| 00a6 2004 036b | k| 00a8 9810 073c | <| 00aa 03a4 0719 | | 00ac 1004 | | 00ad 0000 0000 | | .BLANK 0000[0x5] 00b2 0e74 0010 | t | .XXX[0x44] 00b4 0014 0368 | h| 00b6 0774 0388 | t | 00b8 0fc4 036c | l| 00ba 0770 0388 | p | 00bc 0fc4 038c | | 00be 0fa5 2007 | | 00c0 9ffc 0248 | H| 00c2 2b77 8070 |+w p| 00c4 6074 0148 |`t H| 00c6 0365 a035 | e 5| 00c8 2007 9ffc | | 00ca 0248 2b7b | H+{| 00cc 8070 6074 | p`t| 00ce 0144 0360 | D `| 00d0 0368 09f5 | h | 00d2 a009 2006 | | 00d4 9021 2007 | ! | 00d6 9ffc 0248 | H| 00d8 2b7f 8070 |+ p| 00da 6074 0148 |`t H| 00dc 0365 a038 | e 8| 00de 0364 3c05 | d< | 00e0 a013 9ffe | | 00e2 1046 1041 | F A| 00e4 e030 0364 | 0 d| 00e6 036f 9ffc | o | 00e8 073e 1046 | > F| 00ea 1041 e017 | A | 00ec 900d 2003 | | 00ee 9ffe 004c | L| 00f0 0347 900d | G | 00f2 2000 03aa | | 00f4 004d 1408 | M | 00f6 0000 0000 | | .BLANK 0000[0x4] 00fa 0f94 0010 | | .XXX[0x3a] 00fc 0014 0368 | h| 00fe 0774 0388 | t | 0100 0fc4 036c | l| 0102 0770 0388 | p | 0104 0fc4 038c | | 0106 0fa4 0368 | h| 0108 2bfb 9808 |+ | 010a 09f5 a00c | | 010c 0368 2bf8 | h+ | 010e 016d 2007 | m | 0110 9ffc 0248 | H| 0112 2b83 8070 |+ p| 0114 6074 0148 |`t H| 0116 0365 a048 | e H| 0118 0364 3c05 | d< | 011a a01b 900d | | 011c 2003 9ffe | | 011e 004c 0345 | L E| 0120 e03b 900d | ; | 0122 2000 036f | o| 0124 980f 9ffc | | 0126 073e 004c | > L| 0128 0345 e017 | E | 012a 900d 2003 | | 012c 9ffe 004c | L| 012e 0347 900d | G | 0130 2000 03aa | | 0132 004d 1408 | M | 0134 0000 0000 | | .BLANK 0000[0x6] 013a 1094 0010 | | .XXX[0x63] 013c 0014 0368 | h| 013e 0774 0388 | t | 0140 0fc4 036c | l| 0142 0770 0388 | p | 0144 0fc4 038c | | 0146 0fa4 0368 | h| 0148 2bff 9808 |+ | 014a 09f5 a00c | | 014c 0368 2bfc | h+ | 014e 016d 2007 | m | 0150 9ffc 0248 | H| 0152 2b87 8070 |+ p| 0154 6074 0148 |`t H| 0156 0365 a048 | e H| 0158 0364 3c05 | d< | 015a a01b 900d | | 015c 2003 9ffe | | 015e 004c 0345 | L E| 0160 e0df 900d | | 0162 2000 036f | o| 0164 980f 9ffc | | 0166 073e 004c | > L| 0168 0345 e0b9 | E | 016a 2007 9ffc | | 016c 0248 2b8b | H+ | 016e 8070 6074 | p`t| 0170 0148 0365 | H e| 0172 a048 0364 | H d| 0174 3c05 a01b |< | 0176 900d 2003 | | 0178 9ffe 004c | L| 017a 0345 e073 | E s| 017c 900d 2000 | | 017e 036f 980f | o | 0180 9ffc 073e | >| 0182 004c 0345 | L E| 0184 e04c 0368 | L h| 0186 2b63 9808 |+c | 0188 09f5 a010 | | 018a 0368 2b60 | h+`| 018c 0169 e008 | i | 018e 036c 016b | l k| 0190 900d 2000 | | 0192 036f 980f | o | 0194 9ffc 073e | >| 0196 004c 0347 | L G| 0198 900d 2000 | | 019a 03aa 004d | M| 019c 1408 | | 019d 0000 0000 | | .BLANK 0000[0x5] 01a2 124c 0010 | L | .XXX[0x5e] 01a4 0021 2001 | ! | 01a6 200c 0a7c | || 01a8 27cc 0ff5 |' | 01aa 2005 8248 | H| 01ac 03a4 0d6c | l| 01ae 0cdc 0388 | | 01b0 0388 038b | | 01b2 9808 1800 | | 01b4 0389 2006 | | 01b6 9811 2006 | | 01b8 9817 9ff8 | | 01ba 0144 033c | D <| 01bc 0367 9ffc | g | 01be 075e 9818 | ^ | 01c0 0369 180d | i | 01c2 e06d e0c1 | m | 01c4 e10d e000 | | 01c6 036c 3cc9 | l< | 01c8 a00f 9816 | | 01ca 9811 e03c | <| 01cc 036e 0075 | n u| 01ce a030 036c | 0 l| 01d0 0360 03a0 | ` | 01d2 0981 c004 | | 01d4 2007 9813 | | 01d6 980c 075b | [| 01d8 9810 2807 | ( | 01da 1811 2000 | | 01dc 014d e104 | M | 01de 036c 3c35 | l<5| 01e0 a00d 2004 | | 01e2 014d e0ec | M | 01e4 036e 0075 | n u| 01e6 a0e0 036c | l| 01e8 0360 03a0 | ` | 01ea 0981 c004 | | 01ec 2007 9813 | | 01ee 980c 075b | [| 01f0 9810 2807 | ( | 01f2 1811 e0ac | | 01f4 036c 3c6d | l<m| 01f6 a009 2008 | | 01f8 014c 036c | L l| 01fa 3c29 a08d |<) | 01fc 202b 9813 | + | 01fe 980c 075b | [|