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

⟦df1322ce1⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦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 0050       | P  |		.CONST	0x0050								; 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 002a       | *  |		.CONST	0x002a								; Address of begin
0019 004c       | L  |		.CONST	0x004c								; Address of exception handler
001a 0002       |    |		.CONST	0x0002								; Number of locals
001b			INIT_0018:
001b e002       |    |		Load	0x0,0x2
001c 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
001d 0337       | 7  |		Declare_Variable	Array
001e 00d8       |    |		Load_Top	At_Offset_0
001f 0335       | 5  |		Declare_Variable	Array,Duplicate
0020 00cd       |    |		Action	Spare6_Action
0021 480b       |H   |		Short_Literal	0xb
0022 4800       |H   |		Short_Literal	0x0
0023 4800       |H   |		Short_Literal	0x0
0024 00d9       |    |		Load_Top	At_Offset_1
0025 e403       |    |		Load	0x2,0x3
0026 01d6       |    |		Execute	Vector,Field_Write
0027 3ffb       |?   |		Loop_Increasing	0x23
0028 00d9       |    |		Load_Top	At_Offset_1
0029 01d4       |    |		Execute	Vector,Structure_Write
002a			BODY_0018:
002a e002       |    |		Load	0x0,0x2
002b 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
002c e002       |    |		Load	0x0,0x2
002d 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
002e e002       |    |		Load	0x0,0x2
002f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0030 e002       |    |		Load	0x0,0x2
0031 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0032 e002       |    |		Load	0x0,0x2
0033 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0034 e002       |    |		Load	0x0,0x2
0035 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
0036 e002       |    |		Load	0x0,0x2
0037 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0038 e002       |    |		Load	0x0,0x2
0039 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
003a e402       |    |		Load	0x2,0x2
003b 4801       |H   |		Short_Literal	0x1
003c e002       |    |		Load	0x0,0x2
003d 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
003e e002       |    |		Load	0x0,0x2
003f 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
0040 e5f9       |    |		Load	0x2,-0x7
0041 e5fa       |    |		Load	0x2,-0x6
0042 e5fb       |    |		Load	0x2,-0x5
0043 00ea       |    |		Load_Encached	Null_String_Cache
0044 e5fc       |    |		Load	0x2,-0x4
0045 e5fd       |    |		Load	0x2,-0x3
0046 e5fe       |    |		Load	0x2,-0x2
0047 e5ff       |    |		Load	0x2,-0x1
0048 e003       |    |		Load	0x0,0x3
0049 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
004a 4801       |H   |		Short_Literal	0x1
004b 4407       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x7
004c			TRAP_0018:
004c 0007       |    |		Action	Break_Optional
004d 4800       |H   |		Short_Literal	0x0
004e 4407       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x7
004f 0000       |    |		.XXX[0x1]
0050 ; --------------------------------------------------------------------------------------
0050 ; Debug Table
0050 ; --------------------------------------------------------------------------------------
0050 0004 0006  |    |		.DEBUG4	0x0004,0x0006,0x3edd,0x0000,0x0001,0x0000
0056 0240 4000  | @@ |		.XXX[0x1aa]
0058 61ff fff6  |a   |
005a 0e48 4000  | H@ |
005c 6768 1882  |gh  |
005e 0202 4000  |  @ |
0060 344a 0000  |4J  |
0062 9404 0000  |    |
0064 0378 1880  | x  |
0066 2379 2f84  |#y/ |
0068 e202 2f80  |  / |
006a 080a 0000  |    |
006c 8004 0000  |    |
006e 0388 1880  |    |
0070 1388 3180  |  1 |
0072 5202 3180  |R 1 |
0074 108a 0000  |    |
0076 13e8 1880  |    |
0078 2042 0000  | B  |
007a 0fe8 1881  |    |
007c 63e8 1d81  |c   |
007e 63e8 1d80  |c   |
0080 1054 001b  | T  |
0082 9750 0a8c  | P  |
0084 4240 4000  |B@@ |
0086 7648 4080  |vH@ |
0088 0100 0ab7  |    |
008a ce58 1eff  | X  |
008c e3d0 1eff  |    |
008e e300 8e81  |    |
0090 83d0 8e81  |    |
0092 7340 1880  |s@  |
0094 2248 4080  |"H@ |
0096 0650 4080  | P@ |
0098 f258 4080  | X@ |
009a 0660 4080  | `@ |
009c 0500 099e  |    |
009e aa68 4080  | h@ |
00a0 03d8 1880  |    |
00a2 23c0 1880  |#   |
00a4 23c1 3884  |# 8 |
00a6 e2c0 38ff  |  8 |
00a8 f7c0 bb84  |    |
00aa e100 061b  |    |
00ac ea40 4000  | @@ |
00ae 6607 1f80  |f   |
00b0 2207 a000  |"   |
00b2 0277 8efe  | w  |
00b4 8340 1880  | @  |
00b6 2341 2884  |#A( |
00b8 e202 2880  |  ( |
00ba 040a 0000  |    |
00bc 6404 0000  |d   |
00be 0351 3882  | Q8 |
00c0 3202 4000  |2 @ |
00c2 284a 0000  |(J  |
00c4 5404 0000  |T   |
00c6 0358 1880  | X  |
00c8 2359 2b82  |#Y+ |
00ca c202 4000  |  @ |
00cc 2c4a 0000  |,J  |
00ce 4004 0000  |@   |
00d0 0368 1882  | h  |
00d2 0202 4000  |  @ |
00d4 34ca 0000  |4   |
00d6 1e50 4080  | P@ |
00d8 0740 1880  | @  |
00da 2250 4080  |"P@ |
00dc 0100 02ea  |    |
00de a648 4080  | H@ |
00e0 0650 4080  | P@ |
00e2 0648 4000  | H@ |
00e4 65ff ffd8  |e   |
00e6 4a40 4000  |J@@ |
00e8 61ff fff4  |a   |
00ea 8a40 4000  | @@ |
00ec 6207 1f80  |b   |
00ee 2207 a000  |"   |
00f0 0277 8efe  | w  |
00f2 8340 1880  | @  |
00f4 2341 2884  |#A( |
00f6 e202 2880  |  ( |
00f8 040a 0000  |    |
00fa 4c04 0000  |L   |
00fc 0350 1882  | P  |
00fe 0202 4000  |  @ |
0100 288a 0000  |(   |
0102 2778 1880  |'x  |
0104 23e8 1882  |#   |
0106 03e8 1d80  |    |
0108 23e9 3d82  |# = |
010a 4602 4000  |F @ |
010c 744a 0000  |tJ  |
010e 2404 0000  |$   |
0110 0378 1880  | x  |
0112 2379 2f82  |#y/ |
0114 c202 4000  |  @ |
0116 3c4a 0000  |<J  |
0118 1248 4080  | H@ |
011a 05ff fff7  |    |
011c 4640 4000  |F@@ |
011e 6207 1f80  |b   |
0120 2207 a000  |"   |
0122 0277 8efd  | w  |
0124 e340 1882  | @  |
0126 7340 0800  |s@  |
0128 0202 8880  |    |
012a 088a 0000  |    |
012c 7bc8 1881  |{   |
012e f350 1880  | P  |
0130 1350 2a80  | P* |
0132 5202 2a80  |R * |
0134 108a 0000  |    |
0136 13e8 1880  |    |
0138 2042 0000  | B  |
013a 0fe8 1881  |    |
013c 63e8 1d81  |c   |
013e 63e8 1d80  |c   |
0140 12a0 1eff  |    |
0142 9298 1eff  |    |
0144 a290 1eff  |    |
0146 b390 8e81  |    |
0148 7398 8e81  |s   |
014a 83a0 8e81  |    |
014c 9348 1882  | H  |
014e 7240 4000  |r@@ |
0150 7748 0900  |wH  |
0152 0260 1eff  | `  |
0154 d250 1eff  | P  |
0156 f268 1eff  | h  |
0158 c100 0afc  |    |
015a 1258 1eff  | X  |
015c e3b0 1eff  |    |
015e c3b0 d882  |    |
0160 4bb8 1eff  |K   |
0162 b042 0000  | B  |
0164 57b8 d882  |W   |
0166 53c8 3980  |S 9 |
0168 4a02 9980  |J   |
016a 10ca 0000  |    |
016c 4300 d882  |C   |
016e 4bd8 5881  |K X |
0170 cbe0 5881  |  X |
0172 ea02 9b00  |    |
0174 70a2 0000  |p   |
0176 0fe8 5881  |  X |
0178 ebe8 5881  |  X |
017a cb50 5880  | PX |
017c b254 aa80  | T  |
017e 06e8 1d00  |    |
0180 2aec bd80  |*   |
0182 42ec dd80  |B   |
0184 43e8 d882  |C   |
0186 5042 0000  |PB  |
0188 0fe8 d882  |    |
018a 4b00 d882  |K   |
018c 5207 1f80  |R   |
018e 2207 a000  |"   |
0190 0277 8eff  | w  |
0192 0340 1881  | @  |
0194 f340 2880  | @( |
0196 4a02 8880  |J   |
0198 088a 0000  |    |
019a 3778 1882  |7x  |
019c 0350 1881  | P  |
019e f350 2a80  | P* |
01a0 4a02 8a80  |J   |
01a2 0c8a 0000  |    |
01a4 2378 1882  |#x  |
01a6 0360 1881  | `  |
01a8 f360 2c80  | `, |
01aa 4a02 8c80  |J   |
01ac 10ca 0000  |    |
01ae 8b00 d882  |    |
01b0 4378 1882  |Cx  |
01b2 0202 4000  |  @ |
01b4 3c8a 0000  |<   |
01b6 7b00 d882  |{   |
01b8 43b0 1881  |C   |
01ba f3b0 5680  |  V |
01bc 1b90 5880  |  X |
01be bb98 5880  |  X |
01c0 83a8 5880  |  X |
01c2 b3c8 5882  |  X |
01c4 4a98 9300  |J   |
01c6 4a98 9300  |J   |
01c8 56b0 9300  |V   |
01ca 5ab0 9600  |Z   |
01cc 67b0 d882  |g   |
01ce 3b50 1881  |;P  |
01d0 f350 4a80  | PJ |
01d2 1340 5880  | @X |
01d4 b348 5880  | HX |
01d6 bb78 5880  | xX |
01d8 8b88 5882  |  X |
01da 5248 0900  |RH  |
01dc 2250 0900  |"P  |
01de 2a54 aa80  |*T  |
01e0 4254 ca80  |BT  |
01e2 426c aa80  |Bl  |
01e4 0678 8f00  | x  |
01e6 3678 8f00  |6x  |
01e8 467c cf80  |F|  |
01ea 0650 0a00  | P  |
01ec 3c42 0000  |<B  |
01ee 0f50 d882  | P  |
01f0 4300 d882  |C   |
01f2 3a07 1f80  |:   |
01f4 2207 a000  |"   |
01f6 0277 8efe  | w  |
01f8 8350 1881  | P  |
01fa f2cc b980  |    |
01fc 6350 2a80  |cP* |
01fe 4ad4 ba80  |J   |