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

⟦0e27510dd⟧

    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 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 0023       | #  |		.CONST	0x0023								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0003       |    |		.CONST	0x0003								; Number of locals
001b			INIT_0018:
001b e001       |    |		Load	0x0,0x1
001c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
001d 02c7       |    |		Declare_Variable	Any
001e 00d8       |    |		Load_Top	At_Offset_0
001f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0020 e001       |    |		Load	0x0,0x1
0021 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0022 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0023			BODY_0018:
0023 e001       |    |		Load	0x0,0x1
0024 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0025 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0026 00da       |    |		Load_Top	At_Offset_2
0027 0120       |    |		Execute	Any,Is_Value
0028 6803       |h   |		Jump_Zero	0x2c
0029 e001       |    |		Load	0x0,0x1
002a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
002b 7801       |x   |		Jump	0x2d
002c 00da       |    |		Load_Top	At_Offset_2
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 e001       |    |		Load	0x0,0x1
0033 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0034 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0035 e5ff       |    |		Load	0x2,-0x1
0036 e001       |    |		Load	0x0,0x1
0037 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0038 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0039 c402       |    |		Store	0x2,0x2
003a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
003b 00d8       |    |		Load_Top	At_Offset_0
003c 0f00       |    |		Execute_Immediate	Equal,0x0
003d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
003e 0000 0000  |    |		.XXX[0x2]
0040 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0044 0000 0000  |    |		.BLANK	0000[0x4]
0048 ; --------------------------------------------------------------------------------------
0048 ; Debug Table
0048 ; --------------------------------------------------------------------------------------
0048 0004 000d  |    |		.DEBUG4	0x0004,0x000d,0x9710,0x0000,0x0001,0x0000
004e 0000 b5a1  |    |		.XXX[0xe]
0050 0001 d2b5  |    |
0052 0000 0000  |    |
0054 000f 4b12  |  K |
0056 0001 4ae5  |  J |
0058 0001 a084  |    |
005a 0001 d2b5  |    |
005c 0000 0000  |    |		.BLANK	0000[0x7]
0063 0001 0000  |    |		.XXX[0x4]
0065 0100 8000  |    |
0067 0000 0000  |    |		.BLANK	0000[0x10]
0077 07e5 0000  |    |		.XXX[0x1e]
0079 001c 554e  |  UN|
007b 4954 532e  |ITS.|
007d 4449 5350  |DISP|
007f 4c41 595f  |LAY_|
0081 5349 474e  |SIGN|
0083 4154 5552  |ATUR|
0085 4527 5350  |E'SP|
0087 4543 0001  |EC  |
0089 e102 0001  |    |
008b d6fb 0001  |    |
008d dc61 0001  | a  |
008f f129 8000  | )  |
0091 a1e5 0000  |    |
0093 f151 8000  | Q  |
0095 0000 0000  |    |		.BLANK	0000[0x9]
009e 0007 a328  |   (|		.XXX[0x8]
00a0 0000 0000  |    |
00a2 0000 0778  |   x|
00a4 0003 cdd2  |    |
00a6 0000 0000  |    |		.BLANK	0000[0x5]
00ab 0004 0000  |    |		.XXX[0x3]
00ad 0048       | H  |
00ae 0000 0000  |    |		.BLANK	0000[0x5]
00b3 0120 0000  |    |		.XXX[0xb]
00b5 0000 0000  |    |
00b7 0040 0000  | @  |
00b9 0000 0000  |    |
00bb 0002 0005  |    |
00bd 479b       |G   |
00be 0000 0000  |    |		.BLANK	0000[0x11]
00cf 0656 2200  | V" |		.XXX[0x2]
00d1 0000 0000  |    |		.BLANK	0000[0x4]
00d5 000f ba00  |    |		.XXX[0x1a]
00d7 0000 48aa  |  H |
00d9 9c92 a8a6  |    |
00db 5c88 92a6  |\   |
00dd a098 82b2  |    |
00df bea6 928e  |    |
00e1 9c82 a8aa  |    |
00e3 a48a be8e  |    |
00e5 8a9c 8aa4  |    |
00e7 9286 4e84  |  N |
00e9 9e88 b200  |    |
00eb 03cd d200  |    |
00ed 03c5 4600  |  F |
00ef 0000 0000  |    |		.BLANK	0000[0x4]
00f3 01e9 2a00  |  * |		.XXX[0x28]
00f5 007e 3900  | ~9 |
00f7 01e2 a300  |    |
00f9 01e9 8a00  |    |
00fb 00c8 3900  |  9 |
00fd 01e2 a300  |    |
00ff 01e9 ea00  |    |
0101 000d 3f00  |  ? |
0103 01e2 a300  |    |
0105 01ea 4a00  |  J |
0107 002d af00  | -  |
0109 01e2 a300  |    |
010b 01ea aa00  |    |
010d 00ac 5500  |  U |
010f 01e2 a300  |    |
0111 0000 0000  |    |
0113 0157 8200  | W  |
0115 01e2 a300  |    |
0117 0000 0100  |    |
0119 0001 0010  |    |
011b 0000 0000  |    |		.BLANK	0000[0x10]
012b 01ee c900  |    |		.XXX[0xa]
012d 0f4b 1d00  | K  |
012f 0113 e900  |    |
0131 01ed 4a00  |  J |
0133 01e2 a300  |    |
0135 0000 0000  |    |		.BLANK	0000[0x8]
013d 0157 8200  | W  |		.XXX[0x2]
013f 0000 0000  |    |		.BLANK	0000[0x5]
0144 7b00       |{   |		.XXX[0x1]
0145 0000 0000  |    |		.BLANK	0000[0x6]
014b 02af 0400  |    |		.XXX[0x2]
014d 0000 0000  |    |		.BLANK	0000[0x8]
0155 1e96 3a00  |  : |		.XXX[0x8]
0157 0232 c000  | 2  |
0159 003a 6200  | :b |
015b 03c5 4600  |  F |
015d 0000 0000  |    |		.BLANK	0000[0x6]
0163 000f ba00  |    |		.XXX[0x2e]
0165 0000 48aa  |  H |
0167 9c92 a8a6  |    |
0169 5c88 92a6  |\   |
016b a098 82b2  |    |
016d bea6 928e  |    |
016f 9c82 a8aa  |    |
0171 a48a be8e  |    |
0173 8a9c 8aa4  |    |
0175 9286 4ea6  |  N |
0177 a08a 8600  |    |
0179 03df 9200  |    |
017b 0287 9400  |    |
017d 03d0 9200  |    |
017f 03f2 d000  |    |
0181 0000 0000  |    |
0183 009e 6300  |  c |
0185 0143 ca00  | C  |
0187 01f3 0a00  |    |
0189 0f4b 1d00  | K  |
018b 0113 e900  |    |
018d 01ed 4a00  |  J |
018f 01e2 a300  |    |
0191 0000 0000  |    |		.BLANK	0000[0x8]
0199 0f4b 1d00  | K  |		.XXX[0x8]
019b 0119 6000  |  ` |
019d 001d 3100  |  1 |
019f 01e2 a300  |    |
01a1 0000 0000  |    |		.BLANK	0000[0x6]
01a7 01c3 a800  |    |		.XXX[0x4]
01a9 01f4 0a00  |    |
01ab 0000 0000  |    |		.BLANK	0000[0xa]
01b5 0fcf 4800  |  H |		.XXX[0x8]
01b7 0000 0000  |    |
01b9 000e f000  |    |
01bb 07e1 4000  |  @ |
01bd 0000 0000  |    |		.BLANK	0000[0x5]
01c2 0800 0000  |    |		.XXX[0x3]
01c4 9000       |    |
01c5 0000 0000  |    |		.BLANK	0000[0x4]
01c9 0002 4000  |  @ |		.XXX[0xc]
01cb 0000 0000  |    |
01cd 0000 8000  |    |
01cf 0000 0000  |    |
01d1 0000 3000  |  0 |
01d3 0a91 3200  |  2 |
01d5 0000 0000  |    |		.BLANK	0000[0x10]
01e5 000c cad4  |    |		.XXX[0x2]
01e7 0000 0000  |    |		.BLANK	0000[0x5]
01ec 1f98 0000  |    |		.XXX[0x14]
01ee 006d 5539  | mU9|
01f0 2551 4cb9  |%QL |
01f2 3905 3525  |9 5%|
01f4 391d 7d55  |9 }U|
01f6 5125 3125  |Q%1%|
01f8 5125 154c  |Q% L|
01fa 9d09 3d11  |  = |
01fc 6400 07e1  |d   |
01fe 4000 07d0  |@   |