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

⟦54466f94b⟧

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

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 0038       | 8  |		.CONST	0x0038								; 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 000d       |    |		.CONST	0x000d								; 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 00db       |    |		Load_Top	At_Offset_3
001c 6804       |h   |		Jump_Zero	0x21
001d 7801       |x   |		Jump	0x1f
001e 0000       |    |		.XXX[0x1]
001f 006f       | o  |		Action	Break_Unconditional
0020 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0021 00da       |    |		Load_Top	At_Offset_2
0022 01db       |    |		Execute	Vector,Length
0023 6809       |h   |		Jump_Zero	0x2d
0024 4800       |H   |		Short_Literal	0x0
0025 00db       |    |		Load_Top	At_Offset_3
0026 e002       |    |		Load	0x0,0x2
0027 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
0028 8003       |    |		Call	0x0,0x3
0029 4803       |H   |		Short_Literal	0x3
002a e004       |    |		Load	0x0,0x4
002b e005       |    |		Load	0x0,0x5
002c 00ad       |    |		QQ_Action	Package,Field_Execute_Dynamic
002d 7801       |x   |		Jump	0x2f
002e 0008       |    |		.XXX[0x1]
002f 006f       | o  |		Action	Break_Unconditional
0030 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0031 0000 0000  |    |		.BLANK	0000[0x7]
0038 ; --------------------------------------------------------------------------------------
0038 ; Debug Table
0038 ; --------------------------------------------------------------------------------------
0038 0004 0007  |    |		.DEBUG4	0x0004,0x0007,0xc912,0x0000,0x0001,0x0000
003e 0000 13b2  |    |		.XXX[0xa]
0040 0001 0404  |    |
0042 0800 0280  |    |
0044 0000 0008  |    |
0046 0000 0008  |    |
0048 0000 0000  |    |		.BLANK	0000[0x7]
004f 00ff 0001  |    |		.XXX[0x11]
0051 0404 0000  |    |
0053 0016 001d  |    |
0055 a009 0000  |    |
0057 13b2 0001  |    |
0059 0404 0800  |    |
005b 0280 0000  |    |
005d 0010 0000  |    |
005f 0010       |    |
0060 0000 0000  |    |		.BLANK	0000[0x7]
0067 ffff 0000  |    |		.XXX[0x5]
0069 0000 0000  |    |
006b 0076       | v  |
006c 0000 0000  |    |		.BLANK	0000[0x4]
0070 000f 10fe  |    |		.XXX[0x16]
0072 c000 0796  |    |
0074 0000 0040  |   @|
0076 0000 0040  |   @|
0078 000f 14fe  |    |
007a 8000 0002  |    |
007c 004a 500e  | JP |
007e 0000 3731  |  71|
0080 000f 18fe  |    |
0082 8000 000a  |    |
0084 000f 14fe  |    |
0086 0000 0000  |    |		.BLANK	0000[0x5]
008b 0001 6540  |  e@|		.XXX[0x2]
008d 0000 0000  |    |		.BLANK	0000[0x6]
0093 4a20 0000  |J   |		.XXX[0x17]
0095 00f0 2000  |    |
0097 0004 4c80  |  L |
0099 0000 0000  |    |
009b 0000 003e  |   >|
009d 2800 0001  |(   |
009f 17a0 2140  |  !@|
00a1 0000 0000  |    |
00a3 000e 6400  |  d |
00a5 0000 0000  |    |
00a7 0000 0158  |   X|
00a9 4000       |@   |
00aa 0000 0000  |    |		.BLANK	0000[0x5]
00af 0045 6808  | Eh |		.XXX[0x15]
00b1 b001 0720  |    |
00b3 0000 047d  |   }|
00b5 8000 0000  |    |
00b7 0000 0000  |    |
00b9 3b78 0820  |;x  |
00bb 0000 0000  |    |
00bd 0005 dc00  |    |
00bf 0000 0000  |    |
00c1 0000 0044  |   D|
00c3 5008       |P   |
00c4 0000 0000  |    |		.BLANK	0000[0x8]
00cc 4d20       |M   |		.XXX[0x1]
00cd 0000 0000  |    |		.BLANK	0000[0xf]
00dc 0017 9000  |    |		.XXX[0x16]
00de 0000 0000  |    |
00e0 0000 00f5  |    |
00e2 8000 0004  |    |
00e4 1780 0000  |    |
00e6 0000 0000  |    |
00e8 005a 4000  | Z@ |
00ea 0000 fe80  |    |
00ec 2040 050f  | @  |
00ee 8000 0012  |    |
00f0 c202 0c00  |    |
00f2 0000 0000  |    |		.BLANK	0000[0x4]
00f6 0003 ea80  |    |		.XXX[0x2]
00f8 0000 0000  |    |		.BLANK	0000[0x5]
00fd 0001 4dc0  |  M |		.XXX[0x2]
00ff 0000 0000  |    |		.BLANK	0000[0x6]
0105 3a98       |:   |		.XXX[0x1]
0106 0000 0000  |    |		.BLANK	0000[0x6]
010c 1708 0000  |    |		.XXX[0xf]
010e 0000 0000  |    |
0110 0001 2a00  |  * |
0112 21c0 04bc  |!   |
0114 8084 0000  |    |
0116 0000 0000  |    |
0118 57c0 0000  |W   |
011a 0153       | S  |
011b 0000 0000  |    |		.BLANK	0000[0x4]
011f 16f6 0000  |    |		.XXX[0x8]
0121 004c 6000  | L` |
0123 0000 0000  |    |
0125 0000 0584  |    |
0127 0000 0000  |    |		.BLANK	0000[0x4]
012b 43d0 0000  |C   |		.XXX[0x7]
012d 00fc a022  |   "|
012f 0003 9c80  |    |
0131 8a00       |    |
0132 0000 0000  |    |		.BLANK	0000[0x7]
0139 05c9       |    |		.XXX[0x1]
013a 0000 0000  |    |		.BLANK	0000[0xf]
0149 0001 5160  |  Q`|		.XXX[0x9]
014b 0000 0000  |    |
014d 0000 0011  |    |
014f a600 0000  |    |
0151 3950       |9P  |
0152 0000 0000  |    |		.BLANK	0000[0xd]
015f 0489       |    |		.XXX[0x1]
0160 0000 0000  |    |		.BLANK	0000[0x4]
0164 5890       |X   |		.XXX[0x1]
0165 0000 0000  |    |		.BLANK	0000[0x6]
016b 15ac 0000  |    |		.XXX[0x4]
016d 0043 8000  | C  |
016f 0000 0000  |    |		.BLANK	0000[0x5]
0174 0011 c802  |    |		.XXX[0x8c]
0176 2400 4938  |$ I8|
0178 0000 0127  |   '|
017a 0000 0004  |    |
017c e180 0000  |    |
017e 13bc 0230  |   0|
0180 0051 f800  | Q  |
0182 0001 5040  |  P@|
0184 0000 0555  |   U|
0186 0000 0015  |    |
0188 c800 0000  |    |
018a 5d38 0000  |]8  |
018c 0180 2000  |    |
018e 0006 0600  |    |
0190 0000 1864  |   d|
0192 0000 b0a5  |    |
0194 4c80 c4e4  |L   |
0196 81e0 a128  |   (|
0198 b8a5 4c80  |  L |
019a c4d0 81e0  |    |
019c a11c b8a5  |    |
019e 4c80 c4d0  |L   |
01a0 81e0 a140  |   @|
01a2 b8a5 4c28  |  L(|
01a4 c4d0 81e0  |    |
01a6 a109 85c9  |    |
01a8 b995 ccb0  |    |
01aa a54c 80c4  | L  |
01ac e481 e0a1  |    |
01ae 5cb8 a54c  |\  L|
01b0 80c4 d081  |    |
01b2 e0a1 28b8  |  ( |
01b4 a54c 80c4  | L  |
01b6 d081 e0a1  |    |
01b8 0dbd 91e4  |    |
01ba b0a5 4c80  |  L |
01bc c4e4 81e0  |    |
01be a140 b8a5  | @  |
01c0 4c80 c4cc  |L   |
01c2 81e0 a134  |   4|
01c4 b8a5 4c28  |  L(|
01c6 c4cc 81e0  |    |
01c8 a10d bda1  |    |
01ca 95b8 b0a5  |    |
01cc 4c80 c4e4  |L   |
01ce 81e0 a14c  |   L|
01d0 b8a5 4c80  |  L |
01d2 c4d0 81e0  |    |
01d4 a11c b8a5  |    |
01d6 4c80 c4d0  |L   |
01d8 81e0 a10d  |    |
01da bda1 95b8  |    |
01dc b0a5 4c80  |  L |
01de c4e4 81e0  |    |
01e0 a12c b8a5  | ,  |
01e2 4c80 c4d0  |L   |
01e4 81e0 a15c  |   \|
01e6 b8a5 4c28  |  L(|
01e8 c4d0 81e0  |    |
01ea a111 c9a5  |    |
01ec d1e8 b0a5  |    |
01ee 4c80 d0e4  |L   |
01f0 81e4 80cc  |    |
01f2 c0c0 8160  |   `|
01f4 a108 b8a5  |    |
01f6 4c80 c4d0  |L   |
01f8 81e0 a119  |    |
01fa bdc9 90b0  |    |
01fc a54c 80cc  | L  |
01fe c481 e0a1  |    |