DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦805c0acd6⟧

    Length: 1024 (0x400)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0220f2

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

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 e001       |    |		Load	0x0,0x1
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 e001       |    |		Load	0x0,0x1
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 000d  |    |		.DEBUG4	0x0004,0x000d,0x789a,0x0000,0x0001,0x0000
005e 78c2 6000  |x ` |		.XXX[0x15]
0060 0000 0000  |    |
0062 0000 2000  |    |
0064 0000 6a69  |  ji|
0066 aa00 0d78  |   x|
0068 05a0 0000  |    |
006a 7140 0000  |q@  |
006c 0000 1af1  |    |
006e bae0 0d78  |   x|
0070 2ca0 0000  |,   |
0072 7840       |x@  |
0073 0000 0000  |    |		.BLANK	0000[0x5]
0078 0120 0000  |    |		.XXX[0x5]
007a 26a0 0d77  |&  w|
007c 1ec0       |    |
007d 0000 0000  |    |		.BLANK	0000[0x4]
0081 06bc 84f0  |    |		.XXX[0x10]
0083 0003 1044  |   D|
0085 00d7 911e  |    |
0087 00d7 93c4  |    |
0089 0000 04fc  |    |
008b 002f ff28  | / (|
008d 0000 0000  |    |
008f 01af 2cd4  |  , |
0091 0000 0000  |    |		.BLANK	0000[0x5]
0096 0040 0400  | @  |		.XXX[0x11]
0098 0003 90b0  |    |
009a 0100 0001  |    |
009c c000 0071  |   q|
009e 0000 009f  |    |
00a0 8005 ffe5  |    |
00a2 0000 0000  |    |
00a4 0035 e61a  | 5  |
00a6 8000       |    |
00a7 0000 0000  |    |		.BLANK	0000[0x4]
00ab 0008 0080  |    |		.XXX[0x25]
00ad 0000 7216  |  r |
00af 0020 0000  |    |
00b1 3800 000e  |8   |
00b3 2003 5e5d  |  ^]|
00b5 b000 0000  |    |
00b7 0000 0000  |    |
00b9 1000 0000  |    |
00bb 0000 0000  |    |
00bd 0800 0000  |    |
00bf 8000 0000  |    |
00c1 0000 0000  |    |
00c3 0003 5e65  |  ^e|
00c5 b000 0000  |    |
00c7 0000 0000  |    |
00c9 1000 0000  |    |
00cb 0000 0000  |    |
00cd 0800 0000  |    |
00cf 8000       |    |
00d0 0000 0000  |    |		.BLANK	0000[0x5]
00d5 4800 0009  |H   |		.XXX[0x19]
00d7 f803 5e40  |  ^@|
00d9 6000 0000  |`   |
00db 0000 0000  |    |
00dd 0001 af38  |   8|
00df 6400 000a  |d   |
00e1 8e80 35e7  |  5 |
00e3 2c80 35e7  |, 5 |
00e5 d600 0001  |    |
00e7 4000 0bff  |@   |
00e9 ca00 0000  |    |
00eb 0000 6bd0  |  k |
00ed ff00       |    |
00ee 0000 0000  |    |		.BLANK	0000[0x5]
00f3 1201 0000  |    |		.XXX[0x8]
00f5 001a 2c00  |  , |
00f7 4000 0070  |@  p|
00f9 0000 0300  |    |
00fb 0000 0000  |    |		.BLANK	0000[0xe]
0109 2000 0000  |    |		.XXX[0x13]
010b 0000 0000  |    |
010d 000e 0000  |    |
010f 0000 00d7  |    |
0111 a300 0000  |    |
0113 0000 0000  |    |
0115 0004 0000  |    |
0117 0000 0000  |    |
0119 0002 0000  |    |
011b 0024       | $  |
011c 0000 0000  |    |		.BLANK	0000[0x5]
0121 0012 0000  |    |		.XXX[0x5]
0123 0280 00d7  |    |
0125 9bac       |    |
0126 0000 0000  |    |		.BLANK	0000[0x4]
012a 006b d2e3  | k  |		.XXX[0x11]
012c 0000 02a3  |    |
012e a00d 7a64  |  zd|
0130 600d 7a8e  |` z |
0132 c000 0050  |   P|
0134 400a a971  |@  q|
0136 4000 0000  |@   |
0138 001a f572  |   r|
013a 4000       |@   |
013b 0000 0000  |    |		.BLANK	0000[0x4]
013f 0005 0040  |   @|		.XXX[0x9]
0141 0000 068b  |    |
0143 0010 0000  |    |
0145 1c00 0000  |    |
0147 c000       |    |
0148 0000 0000  |    |		.BLANK	0000[0xd]
0155 0008       |    |		.XXX[0x1]
0156 0000 0000  |    |		.BLANK	0000[0x4]
015a 0380 0000  |    |		.XXX[0xf]
015c 0000 35eb  |  5 |
015e 2500 0000  |%   |
0160 0000 0000  |    |
0162 0100 0000  |    |
0164 0000 0000  |    |
0166 0080 0000  |    |
0168 0a00       |    |
0169 0000 0000  |    |		.BLANK	0000[0x5]
016e 0480 0000  |    |		.XXX[0x5]
0170 a080 35e9  |  5 |
0172 5000       |P   |
0173 0000 0000  |    |		.BLANK	0000[0x4]
0177 1af5 eb40  |   @|		.XXX[0x10]
0179 0000 a918  |    |
017b 035e bf68  | ^ h|
017d 035e ca00  | ^  |
017f 0000 14a0  |    |
0181 00bf fca0  |    |
0183 0000 0000  |    |
0185 06bd a930  |   0|
0187 0000 0000  |    |		.BLANK	0000[0x5]
018c 0260 1000  | `  |		.XXX[0x8]
018e 0002 42c0  |  B |
0190 0400 0007  |    |
0192 0000 0030  |   0|
0194 0000 0000  |    |		.BLANK	0000[0xe]
01a2 0200       |    |		.XXX[0x1]
01a3 0000 0000  |    |		.BLANK	0000[0x4]
01a7 e000 0000  |    |		.XXX[0xf]
01a9 000d 7b62  |  {b|
01ab 8000 0000  |    |
01ad 0000 0000  |    |
01af 4000 0000  |@   |
01b1 0000 0000  |    |
01b3 2000 0004  |    |
01b5 c000       |    |
01b6 0000 0000  |    |		.BLANK	0000[0x4]
01ba 0001 2000  |    |		.XXX[0x1a]
01bc 0029 400d  | )@ |
01be 7aed 4000  |z @ |
01c0 0000 0000  |    |
01c2 0000 0006  |    |
01c4 bdc7 7000  |  p |
01c6 002a 4600  | *F |
01c8 d7b9 6e00  |  n |
01ca d7bc 1400  |    |
01cc 0005 2c00  |  , |
01ce aa97 1400  |    |
01d0 0000 0001  |    |
01d2 af7d 7400  | }t |
01d4 0000 0000  |    |		.BLANK	0000[0x5]
01d9 a004 0000  |    |		.XXX[0x8]
01db 0090 b001  |    |
01dd 0000 01c0  |    |
01df 0000 0c00  |    |
01e1 0000 0000  |    |		.BLANK	0000[0xe]
01ef 8000 0000  |    |		.XXX[0x11]
01f1 0000 0000  |    |
01f3 0038 0000  | 8  |
01f5 0000 035e  |   ^|
01f7 fef0 0000  |    |
01f9 0000 0000  |    |
01fb 0010 0000  |    |
01fd 0000 0000  |    |
01ff 0008       |    |