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

⟦3f8ca606a⟧

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

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 0068       | h  |		.CONST	0x0068								; 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 00da       |    |		Load_Top	At_Offset_2
001c 01db       |    |		Execute	Vector,Length
001d 7007       |p   |		Jump_Nonzero	0x25
001e 0092 0044  |   D|		Action	Push_String_Extended,0x44					; "<PROFILE>"
0020 0092 0045  |   E|		Action	Push_String_Extended,0x45					; "$$[D_@]"
0022 e001       |    |		Load	0x0,0x1
0023 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0024 7808       |x   |		Jump	0x2d
0025 0092 0044  |   D|		Action	Push_String_Extended,0x44					; "<PROFILE>"
0027 0092 0046  |   F|		Action	Push_String_Extended,0x46					; "!Machine.Release.Environment."
0029 e5ff       |    |		Load	0x2,-0x1
002a 01cc       |    |		Execute	Vector,Catenate
002b e001       |    |		Load	0x0,0x1
002c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
002d 6012       |`   |		Indirect_Literal	Discrete,0x40,{0x00000000, 0x00004000}
002e e002       |    |		Load	0x0,0x2
002f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0030 e003       |    |		Load	0x0,0x3
0031 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0032 e004       |    |		Load	0x0,0x4
0033 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0034 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0035 0092 0047  |   G|		Action	Push_String_Extended,0x47					; "$$"
0037 e004       |    |		Load	0x0,0x4
0038 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0039 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
003a e004       |    |		Load	0x0,0x4
003b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
003c 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
003d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
003e 0000 0000  |    |		.XXX[0x2]
0040 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0044 ; --------------------------------------------------------------------------------------
0044 ; STRING TABLE
0044 ; --------------------------------------------------------------------------------------
0044 000a       |    |		.STRTAB	0x000a->0x0049							; "<PROFILE>"
0045 0011       |    |		.STRTAB	0x0011->0x004d							; "$$[D_@]"
0046 0016       |    |		.STRTAB	0x0016->0x0051							; "!Machine.Release.Environment."
0047 0031       | 1  |		.STRTAB	0x0031->0x005f							; "$$"
0048 0031       | 1  |		.STREND 0x0031->0x0060
0049 3c50 524f  |<PRO|		.STRTAB_STRINGS
0061 0000 0000  |    |		.BLANK	0000[0x7]
0068 ; --------------------------------------------------------------------------------------
0068 ; Debug Table
0068 ; --------------------------------------------------------------------------------------
0068 0004 000d  |    |		.DEBUG4	0x0004,0x000d,0x9718,0x0000,0x0001,0x0000
006e 70cc c8c1  |p   |		.XXX[0x192]
0070 bdc8 a54c  |   L|
0072 80c4 d881  |    |
0074 e0a1 85b8  |    |
0076 a54c 80c4  | L  |
0078 d481 e0a1  |    |
007a bdd9 95c9  |    |
007c 70c0 c4d5  |p   |
007e bddc a54c  |   L|
0080 80c4 d881  |    |
0082 e0a1 70a1  |  p |
0084 bdc8 a54c  |   L|
0086 80c4 d881  |    |
0088 e0a1 bdd1  |    |
008a a195 c8a5  |    |
008c 4c80 d4c0  |L   |
008e 81e4 8028  |   (|
0090 ccc8 dc81  |    |
0092 60a1 95e1  |`   |
0094 8d95 c1d1  |    |
0096 a5bd b985  |    |
0098 b0a5 4c80  |  L |
009a c4e0 81e0  |    |
009c a18d bdb9  |    |
009e 91a5 d1a5  |    |
00a0 bdb9 70a4  |  p |
00a2 a54c 80c4  | L  |
00a4 dc81 e0a1  |    |
00a6 d1a1 85d0  |    |
00a8 a54c 80c4  | L  |
00aa dc81 e0a1  |    |
00ac c1c9 95cd  |    |
00ae 859d 95cc  |    |
00b0 a54c 28c4  | L( |
00b2 dc81 e0a1  |    |
00b4 bdd9 95c9  |    |
00b6 70c0 c4d5  |p   |
00b8 bddc a54c  |   L|
00ba 80c4 dc81  |    |
00bc e0a1 a5b8  |    |
00be a54c 80c4  | L  |
00c0 dc81 e0a1  |    |
00c2 d1a1 94a5  |    |
00c4 4c80 c4dc  |L   |
00c6 81e0 a170  |   p|
00c8 c0c4 d1b9  |    |
00ca 85b0 a54c  |   L|
00cc 80c4 dc81  |    |
00ce e0a1 c995  |    |
00d0 cdd5 b1d0  |    |
00d2 b0a5 4c28  |  L(|
00d4 c4e0 81e0  |    |
00d6 a195 d995  |    |
00d8 b8a5 4c80  |  L |
00da c4dc 81e0  |    |
00dc a1d1 a1bd  |    |
00de d59d a0a5  |    |
00e0 4c80 c4dc  |L   |
00e2 81e0 a1a5  |    |
00e4 d0a5 4c80  |  L |
00e6 c4dc 81e0  |    |
00e8 a1b5 85e4  |    |
00ea a54c 80c4  | L  |
00ec dc81 e0a1  |    |
00ee bd8d 8dd5  |    |
00f0 c8a5 4c80  |  L |
00f2 c4dc 81e0  |    |
00f4 28a1 dd95  |(   |
00f6 b1b0 a54c  |   L|
00f8 80c4 dc81  |    |
00fa e0a1 8995  |    |
00fc 99bd c994  |    |
00fe a54c 80c4  | L  |
0100 dc81 e0a1  |    |
0102 d1a1 94a5  |    |
0104 4c80 c4dc  |L   |
0106 81e0 a170  |   p|
0108 c0c4 d1b9  |    |
010a 85b0 a54c  |   L|
010c 80d4 c081  |    |
010e e480 ccc8  |    |
0110 dc81 60a1  |  ` |
0112 cdd1 95c0  |    |
0114 a54c 8028  | L (|
0116 c4d4 81e0  |    |
0118 a1a5 b8a5  |    |
011a 4c80 c4d4  |L   |
011c 81e0 a1d1  |    |
011e a194 a54c  |   L|
0120 80c4 d881  |    |
0122 e0a1 c1c9  |    |
0124 bd8d 95cd  |    |
0126 cca5 4c80  |  L |
0128 c4d8 81e0  |    |
012a a1bd 98a5  |    |
012c 4c80 c4d8  |L   |
012e 81e0 a1bd  |    |
0130 89d1 85a5  |    |
0132 b9a5 b99c  |    |
0134 a54c 80c4  | L  |
0136 d481 e028  |   (|
0138 a1d1 a185  |    |
013a d0a5 4c80  |  L |
013c c4d4 81e0  |    |
013e a1c9 95cd  |    |
0140 d5b1 d0b8  |    |
0142 a54c 80c8  | L  |
0144 cc81 e0a1  |    |
0146 51a1 94a5  |Q   |
0148 4c80 c4d8  |L   |
014a 81e0 a1b1  |    |
014c 85d1 d195  |    |
014e c8a5 4c80  |  L |
0150 c4d4 81e0  |    |
0152 a1d1 958d  |    |
0154 a1b9 a5c5  |    |
0156 d594 a54c  |   L|
0158 8028 c4d4  | (  |
015a 81e0 a195  |    |
015c b9d1 85a5  |    |
015e b1cc a54c  |   L|
0160 80c4 d481  |    |
0162 e0a1 84a5  |    |
0164 4c80 c4d4  |L   |
0166 81e0 a1b5  |    |
0168 bdc9 94a5  |    |
016a 4c80 c4d4  |L   |
016c 81e0 a1cd  |    |
016e bdc1 a1a5  |    |
0170 cdd1 a58d  |    |
0172 85d1 9590  |    |
0174 a54c 80c4  | L  |
0176 d881 e028  |   (|
0178 a185 b985  |    |
017a b1e5 cda5  |    |
017c cca5 4c80  |  L |
017e c4d8 81e0  |    |
0180 a1bd b8a5  |    |
0182 4c80 c4d4  |L   |
0184 81e0 a1d1  |    |
0186 a194 a54c  |   L|
0188 80c4 d481  |    |
018a e0a1 c185  |    |
018c c9d0 a54c  |   L|
018e 80d4 c081  |    |
0190 e480 ccc8  |    |
0192 dc81 60a1  |  ` |
0194 bd98 a54c  |   L|
0196 80c4 d481  |    |
0198 e028 a1d1  | (  |
019a a194 a54c  |   L|
019c 80c4 d881  |    |
019e e0a1 a5b5  |    |
01a0 c1b1 95b5  |    |
01a2 95b9 d1bd  |    |
01a4 c8b0 a54c  |   L|
01a6 80c4 d881  |    |
01a8 e0a1 dda1  |    |
01aa bca5 4c80  |  L |
01ac c4d4 81e0  |    |
01ae a1b5 d5cd  |    |
01b0 d0a5 4c80  |  L |
01b2 c4d8 81e0  |    |
01b4 a189 94a5  |    |
01b6 4c80 c4d8  |L   |
01b8 81e0 28a1  |  ( |
01ba 8d95 c9d1  |    |
01bc 85a5 b8a5  |    |
01be 4c80 c4d8  |L   |
01c0 81e0 a1d1  |    |
01c2 a185 d0a5  |    |
01c4 4c80 c4d8  |L   |
01c6 81e0 a195  |    |
01c8 e1d1 c995  |    |
01ca b594 a54c  |   L|
01cc 80c4 d881  |    |
01ce e0a1 85c8  |    |
01d0 a54c 80b4  | L  |
01d2 c481 e0a1  |    |
01d4 9dd5 b595  |    |
01d6 b9d1 cca5  |    |
01d8 4c80 c4d8  |L   |
01da 81e0 28a1  |  ( |
01dc 91bc a54c  |   L|
01de 80c4 d881  |    |
01e0 e0a1 b9bd  |    |
01e2 d0a5 4c80  |  L |
01e4 c4d8 81e0  |    |
01e6 a1d9 a5bd  |    |
01e8 b185 d194  |    |
01ea a54c 80c4  | L  |
01ec d881 e0a1  |    |
01ee cdbd b594  |    |
01f0 a54c 80c4  | L  |
01f2 d881 e0a1  |    |
01f4 a5b5 c1b1  |    |
01f6 a58d a5d0  |    |
01f8 a54c 80c4  | L  |
01fa d881 e028  |   (|
01fc a185 cdcd  |    |
01fe d5b5 c1d1  |    |