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

⟦856fc419a⟧

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

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 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 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 0028       | (  |		.CONST	0x0028								; 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 e001       |    |		Load	0x0,0x1
001d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
001e a5fe       |    |		Store_Unchecked	0x2,-0x2
001f 00da       |    |		Load_Top	At_Offset_2
0020 e001       |    |		Load	0x0,0x1
0021 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0022 a5fd       |    |		Store_Unchecked	0x2,-0x3
0023 00da       |    |		Load_Top	At_Offset_2
0024 e001       |    |		Load	0x0,0x1
0025 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0026 a5fc       |    |		Store_Unchecked	0x2,-0x4
0027 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0028			TRAP_0018:
0028 010e       |    |		Execute	Exception,Is_Constraint_Error
0029 6807       |h   |		Jump_Zero	0x31
002a 4800       |H   |		Short_Literal	0x0
002b a5fe       |    |		Store_Unchecked	0x2,-0x2
002c 4800       |H   |		Short_Literal	0x0
002d a5fd       |    |		Store_Unchecked	0x2,-0x3
002e 4800       |H   |		Short_Literal	0x0
002f a5fc       |    |		Store_Unchecked	0x2,-0x4
0030 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0031 0100       |    |		Execute	Exception,Raise
0032 0000 0000  |    |		.BLANK	0000[0x6]
0038 ; --------------------------------------------------------------------------------------
0038 ; Debug Table
0038 ; --------------------------------------------------------------------------------------
0038 0004 0003  |    |		.DEBUG4	0x0004,0x0003,0xbf0a,0x0000,0x0001,0x0000
003e bb36 a065  | 6 e|		.XXX[0xb]
0040 e371 fc89  | q  |
0042 4000 0150  |@  P|
0044 32f1 c781  |2   |
0046 d440 0000  | @  |
0048 a000       |    |
0049 0000 0000  |    |		.BLANK	0000[0xc]
0055 0203 0802  |    |		.XXX[0x19]
0057 2091 8000  |    |
0059 0000 0000  |    |
005b 2a26 2140  |*&!@|
005d 0000 1008  |    |
005f 1978 dc7f  | x  |
0061 6600 0000  |f   |
0063 5000 0000  |P   |
0065 9000 067a  |   z|
0067 e000 0000  |    |
0069 2000 0000  |    |
006b 2001 80c6  |    |
006d 0088       |    |
006e 0000 0000  |    |		.BLANK	0000[0x7]
0075 0206 5e37  |  ^7|		.XXX[0x24]
0077 1fd9 8000  |    |
0079 0014 0000  |    |
007b 0024 0001  | $  |
007d 9eb8 0000  |    |
007f 0008 0000  |    |
0081 0008 0000  |    |
0083 0018 0002  |    |
0085 bb80 015b  |   [|
0087 1d70 0000  | p  |
0089 0000 015b  |   [|
008b 696c 00ad  |il  |
008d a404 0001  |    |
008f 4ad0 a06a  |J  j|
0091 e05e 441a  | ^D |
0093 4000 0410  |@   |
0095 3648 2c3c  |6H,<|
0097 39e0 0002  |9   |
0099 0000 0000  |    |		.BLANK	0000[0xc]
00a5 0002 1e00  |    |		.XXX[0x3]
00a7 e800       |    |
00a8 0000 0000  |    |		.BLANK	0000[0x4]
00ac 4f66 2160  |Of!`|		.XXX[0x12]
00ae 0000 1008  |    |
00b0 1ab8 178f  |    |
00b2 e140 0001  | @  |
00b4 0000 0000  |    |
00b6 9000 06f9  |    |
00b8 8000 0000  |    |
00ba 2000 0000  |    |
00bc 6081 8026  |`  &|
00be 0000 0000  |    |		.BLANK	0000[0x8]
00c6 0206 ae05  |    |		.XXX[0x13]
00c8 e3f8 5000  |  P |
00ca 0040 0000  | @  |
00cc 0024 0001  | $  |
00ce be60 0000  | `  |
00d0 0008 0000  |    |
00d2 0018 0000  |    |
00d4 0018 0002  |    |
00d6 db08 015b  |   [|
00d8 45f0       |E   |
00d9 0000 0000  |    |		.BLANK	0000[0x4]
00dd 00ad b844  |   D|		.XXX[0xe]
00df 0000 5d77  |  ]w|
00e1 9ee6 2032  |   2|
00e3 4000 0000  |@   |
00e5 010f 75d1  |  u |
00e7 f340 0000  | @  |
00e9 0000 8000  |    |
00eb 0000 0000  |    |		.BLANK	0000[0xc]
00f7 2600       |&   |		.XXX[0x1]
00f8 0000 0000  |    |		.BLANK	0000[0x5]
00fd 1e90 a000  |    |		.XXX[0x11]
00ff 0000 1007  |    |
0101 b988 0c90  |    |
0103 0000 0000  |    |
0105 4000 0000  |@   |
0107 9000 00e1  |    |
0109 e000 0000  |    |
010b 2000 0000  |    |
010d 4000       |@   |
010e 0000 0000  |    |		.BLANK	0000[0xa]
0118 041c 2000  |    |		.XXX[0x2]
011a 0000 0000  |    |		.BLANK	0000[0x7]
0121 0008 0000  |    |		.XXX[0x9]
0123 0000 0000  |    |
0125 0018 0000  |    |
0127 44e8 015b  |D  [|
0129 6e70       |np  |
012a 0000 0000  |    |		.BLANK	0000[0x4]
012e 00ad cc84  |    |		.XXX[0xe]
0130 0000 419a  |  A |
0132 9f1e 4f64  |  Od|
0134 a000 0000  |    |
0136 0050 316f  | P1o|
0138 4885 da20  |H   |
013a 0000 8000  |    |
013c 0000 0000  |    |		.BLANK	0000[0x4]
0140 3c70 8080  |<p  |		.XXX[0x17]
0142 0000 4000  |  @ |
0144 3c72 8080  |<r  |
0146 0000 4000  |  @ |
0148 0203 1824  |   $|
014a 6008 8000  |`   |
014c 0000 0000  |    |
014e 0f1c a020  |    |
0150 0000 1007  |    |
0152 c793 d928  |   (|
0154 0000 0000  |    |
0156 1000       |    |
0157 0000 0000  |    |		.BLANK	0000[0x5]
015c 2000 0000  |    |		.XXX[0x5]
015e 0000 80c6  |    |
0160 0918       |    |
0161 0000 0000  |    |		.BLANK	0000[0x7]
0168 01f1 e4f6  |    |		.XXX[0x5]
016a 4a00 0000  |J   |
016c 0004       |    |
016d 0000 0000  |    |		.BLANK	0000[0x5]
0172 0008 0000  |    |		.XXX[0x1a]
0174 0000 0000  |    |
0176 0018 0000  |    |
0178 c308 015b  |   [|
017a 96f0 015b  |   [|
017c 91e8 015b  |   [|
017e e2e8 00ad  |    |
0180 e0c4 0000  |    |
0182 7991 1f68  |y  h|
0184 6369 f3b8  |ci  |
0186 4000 0050  |@  P|
0188 35cf b936  |5  6|
018a f1c0 0002  |    |
018c 0000 0000  |    |		.BLANK	0000[0x5]
0191 f630 8000  | 0  |		.XXX[0xa]
0193 0000 4000  |  @ |
0195 f632 8000  | 2  |
0197 0000 4000  |  @ |
0199 0200 8800  |    |
019b 0000 0000  |    |		.BLANK	0000[0x4]
019f 3d8c a000  |=   |		.XXX[0x12]
01a1 0000 1007  |    |
01a3 da24 0af5  | $  |
01a5 8280 0000  |    |
01a7 a000 0000  |    |
01a9 9000 0026  |   &|
01ab 0000 0000  |    |
01ad 2000 0000  |    |
01af 4008 8000  |@   |
01b1 0000 0000  |    |		.BLANK	0000[0x8]
01b9 01f6 8902  |    |		.XXX[0x13]
01bb bd60 a000  | `  |
01bd 0028 0000  | (  |
01bf 0024 0000  | $  |
01c1 0980 0000  |    |
01c3 0008 0000  |    |
01c5 0010 0000  |    |
01c7 0018 0000  |    |
01c9 e290 015b  |   [|
01cb bf70       | p  |
01cc 0000 0000  |    |		.BLANK	0000[0x4]
01d0 00ad f504  |    |		.XXX[0xd]
01d2 0000 310a  |  1 |
01d4 a057 19ee  | W  |
01d6 6ff8 c000  |o   |
01d8 0410 2b8c  |  + |
01da f73f 1480  | ?  |
01dc 0002       |    |
01dd 0000 0000  |    |		.BLANK	0000[0x5]
01e2 2d36 8580  |-6  |		.XXX[0x9]
01e4 0000 4000  |  @ |
01e6 2d3a 8580  |-:  |
01e8 0000 4000  |  @ |
01ea 2600       |&   |
01eb 0000 0000  |    |		.BLANK	0000[0x5]
01f0 0b4e a160  | N `|		.XXX[0x10]
01f2 0000 1008  |    |
01f4 15c6 7b9f  |  { |
01f6 8a40 0001  | @  |
01f8 0000 0000  |    |
01fa 9000 0558  |   X|
01fc 2000 0000  |    |
01fe 2000 0000  |    |