|
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 0048 | H | .CONST 0x0048 ; 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 0024 | $ | .CONST 0x0024 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0003 | | .CONST 0x0003 ; Number of locals
001b INIT_0018:
001b e002 | | Load 0x0,0x2
001c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
001d 1b18 | | Execute Package,Field_Read,Field_Number 0x18
001e 02c7 | | Declare_Variable Any
001f 00d8 | | Load_Top At_Offset_0
0020 1c00 | | Execute_Immediate Run_Utility,0x0
0021 e002 | | Load 0x0,0x2
0022 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0023 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0024 BODY_0018:
0024 e002 | | Load 0x0,0x2
0025 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0026 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0027 00da | | Load_Top At_Offset_2
0028 601b |` | Indirect_Literal Discrete,0x44,{0x00000000, 0x00004000}
0029 e003 | | Load 0x0,0x3
002a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
002b e004 | | Load 0x0,0x4
002c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
002d e005 | | Load 0x0,0x5
002e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
002f 4801 |H | Short_Literal 0x1
0030 4800 |H | Short_Literal 0x0
0031 e004 | | Load 0x0,0x4
0032 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0033 e002 | | Load 0x0,0x2
0034 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0035 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0036 e5ff | | Load 0x2,-0x1
0037 e002 | | Load 0x0,0x2
0038 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0039 181b | | Execute Package,Field_Execute,Field_Number 0x1b
003a c402 | | Store 0x2,0x2
003b 0059 | Y | Store_Top Discrete,At_Offset_1
003c 00d8 | | Load_Top At_Offset_0
003d 0f00 | | Execute_Immediate Equal,0x0
003e 00d9 | | Load_Top At_Offset_1
003f 0f06 | | Execute_Immediate Equal,0x6
0040 0278 | x | Execute Discrete,Or
0041 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0042 0000 0000 | | .XXX[0x2]
0044 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0048 ; --------------------------------------------------------------------------------------
0048 ; Debug Table
0048 ; --------------------------------------------------------------------------------------
0048 0004 0002 | | .DEBUG4 0x0004,0x0002,0x0b8a,0x0000,0x0001,0x0000
004e 0460 d581 | ` | .XXX[0x40]
0050 5f80 0b80 |_ |
0052 0460 d581 | ` |
0054 3f80 0b80 |? |
0056 0460 d581 | ` |
0058 1f80 0b80 | |
005a 0460 d580 | ` |
005c ff80 0b80 | |
005e 0460 d520 | ` |
0060 0520 0003 | |
0062 940a 8120 | |
0064 040d 740c | t |
0066 dd80 c120 | |
0068 1f98 2398 | # |
006a 1580 b120 | |
006c 1b98 1d80 | |
006e a520 1580 | |
0070 9d20 1180 | |
0072 9520 0d80 | |
0074 8d20 0980 | |
0076 8520 0798 | |
0078 3798 2798 |7 ' |
007a 2f98 2b98 |/ + |
007c 1920 5f98 | _ |
007e 0808 3b98 | ; |
0080 0808 3de0 | = |
0082 1d80 4180 | A |
0084 2f80 0b80 |/ |
0086 0460 d460 | ` `|
0088 35fe 9797 |5 |
008a fb97 fe18 | |
008c 0d14 0400 | |
008e 0000 0000 | | .BLANK 0000[0x4]
0092 6430 1000 |d0 | .XXX[0x37]
0094 0000 0000 | |
0096 007d 0000 | } |
0098 0000 0400 | |
009a 081b 6c00 | l |
009c 0000 0000 | |
009e f550 1000 | P |
00a0 0000 0000 | |
00a2 fb40 1000 | @ |
00a4 0000 0000 | |
00a6 f850 1000 | P |
00a8 0000 0000 | |
00aa 0420 1000 | |
00ac 0000 0000 | |
00ae 12f0 1000 | |
00b0 0000 0000 | |
00b2 2d80 1000 |- |
00b4 0000 0000 | |
00b6 dc80 1000 | |
00b8 0000 0000 | |
00ba f560 1000 | ` |
00bc 0000 0000 | |
00be db20 1000 | |
00c0 0000 0000 | |
00c2 7eb0 1000 |~ |
00c4 9404 2c00 | , |
00c6 0002 c000 | |
00c8 a000 | |
00c9 0000 0000 | | .BLANK 0000[0x7]
00d0 1000 081b | | .XXX[0x38]
00d2 6c00 0000 |l |
00d4 0400 0000 | |
00d6 0000 04c0 | |
00d8 0000 0084 | |
00da 0000 0008 | |
00dc 0004 0004 | |
00de 0094 342c | 4,|
00e0 0000 0044 | D|
00e2 0400 0000 | |
00e4 2c00 0000 |, |
00e6 c800 0000 | |
00e8 1800 0000 | |
00ea 0000 0000 | |
00ec 10dc d510 | |
00ee dc00 0000 | |
00f0 18c8 d4c0 | |
00f2 e4c1 0800 | |
00f4 0007 b000 | |
00f6 3d60 0000 |=` |
00f8 0003 c004 | |
00fa 0002 ec00 | |
00fc 0000 0000 | |
00fe 4000 1000 |@ |
0100 040a 6800 | h |
0102 6c02 fc74 |l t|
0104 3403 1c02 |4 |
0106 f002 ec00 | |
0108 0000 0000 | | .BLANK 0000[0x6]
010e b801 4400 | D | .XXX[0xd2]
0110 2402 4801 |$ H |
0112 a802 4801 | H |
0114 ac02 4801 | H |
0116 b002 4801 | H |
0118 b402 4801 | H |
011a bb80 086c | l|
011c 3780 086c |7 l|
011e 380b 1c03 |8 |
0120 6070 000a |`p |
0122 7c01 8f90 || |
0124 1780 0c60 | `|
0126 39a0 7803 |9 x |
0128 6780 086c |g l|
012a 3402 4801 |4 H |
012c bc03 a920 | |
012e 0002 4801 | H |
0130 c120 0210 | |
0132 2780 0860 |' `|
0134 4710 1f10 |G |
0136 2003 6780 | g |
0138 0860 49c0 | `I |
013a 2c03 6780 |, g |
013c 1060 6120 | `a |
013e 0802 4801 | H |
0140 c780 1460 | `|
0142 4390 1b80 |C |
0144 1460 4514 | `E |
0146 0400 1d20 | |
0148 0520 0780 | |
014a 1860 5520 | `U |
014c 0802 4801 | H |
014e cb80 1460 | `|
0150 4390 1b80 |C |
0152 1460 4514 | `E |
0154 0400 0001 | |
0156 8c00 1000 | |
0158 0790 0803 | |
015a ab90 1390 | |
015c 0f80 0860 | `|
015e 5403 2800 |T ( |
0160 5000 cc01 |P |
0162 8001 c402 | |
0164 0402 c802 | |
0166 e402 e003 | |
0168 7803 bc85 |x |
016a 3585 8da1 |5 |
016c a5b9 94b9 | |
016e 4995 b195 |I |
0170 85cd 94b9 | |
0172 0dd5 c9c9 | |
0174 95b9 d0b9 | |
0176 058d d1a5 | |
0178 d9a5 d1e4 | |
017a 8551 bdbd | Q |
017c b1cc b911 | |
017e 95cd a59d | |
0180 b8b9 4991 | I |
0182 997d 5195 | }Q |
0184 85b5 ddbd | |
0186 c9ad 7d25 | }%|
0188 b9d1 959d | |
018a c985 d1a5 | |
018c bdb8 b951 | Q|
018e 9585 b5dd | |
0190 bdc9 ad25 | %|
0192 b9a5 d1a5 | |
0194 85b1 a5e9 | |
0196 957d 5195 | }Q |
0198 85b5 ddbd | |
019a c9ad 5195 | Q |
019c 85b5 ddbd | |
019e c9ad 7d25 | }%|
01a0 b9d1 95c9 | |
01a2 9985 8d94 | |
01a4 8535 858d | 5 |
01a6 a1a5 b994 | |
01a8 b925 b9a5 | % |
01aa d1a5 85b1 | |
01ac a5e9 85d1 | |
01ae a5bd b8b9 | |
01b0 4985 d1a5 |I |
01b2 bdb9 85b0 | |
01b4 b951 9585 | Q |
01b6 b5dd bdc9 | |
01b8 ad7d 25b9 | }% |
01ba d195 c999 | |
01bc 858d 94f1 | |
01be 4149 3d19 |AI= |
01c0 2531 14f8 |%1 |
01c2 9155 b985 | U |
01c4 89b1 9481 | |
01c6 d1bc 81a5 | |
01c8 b9a5 d1a5 | |
01ca 85b1 a5e9 | |
01cc 9481 5195 | Q |
01ce 85b5 ddbd | |
01d0 c9ad 7d25 | }%|
01d2 b9d1 95c9 | |
01d4 9985 8d94 | |
01d6 8155 3921 | U9!|
01d8 0539 1131 | 9 1|
01da 1510 8115 | |
01dc 610d 1541 |a A|
01de 5125 3d38 |Q%=8|
01e0 0000 0000 | | .BLANK 0000[0x6]
01e6 1000 081b | | .XXX[0x1a]
01e8 6800 0000 |h |
01ea 0400 0000 | |
01ec 0000 10dc | |
01ee d510 e000 | |
01f0 0000 18c8 | |
01f2 d4c1 10c1 | |
01f4 0800 0004 | |
01f6 7000 3d60 |p =`|
01f8 0000 0002 | |
01fa 2004 0002 | |
01fc ec02 0000 | |
01fe 0000 3800 | 8 |