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

⟦02c485766⟧

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

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 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 0006  |    |		.DEBUG4	0x0004,0x0006,0x6552,0x0000,0x0001,0x0000
003e 0000 00e0  |    |		.XXX[0x41]
0040 0009 0000  |    |
0042 8000 2780  |  ' |
0044 0300 00a6  |    |
0046 0010 0003  |    |
0048 0000 5000  |  P |
004a 0d00 0180  |    |
004c 0036 0007  | 6  |
004e 0000 e800  |    |
0050 2000 03f0  |    |
0052 0090 0011  |    |
0054 2002 8000  |    |
0056 4680 0b00  |F   |
0058 0132 0030  | 2 0|
005a 003c 4000  | <@ |
005c d000 f320  |    |
005e 0380 03d1  |    |
0060 8000 8228  |   (|
0062 3380 0000  |3   |
0064 1800 0000  |    |
0066 e000 0000  |    |
0068 0000 05f2  |    |
006a c000 0004  |    |
006c 0000 000b  |    |
006e 0000 0000  |    |
0070 1000 0000  |    |
0072 e4e4 f444  |   D|
0074 55f5 3545  |U 5E|
0076 2554 3545  |%T5E|
0078 5524 5969  |U$Yi|
007a 8000 0000  |    |
007c 0034 1a00  | 4  |
007e 0d00       |    |
007f 0000 0000  |    |		.BLANK	0000[0x4]
0083 0822 8338  | " 8|		.XXX[0x1b]
0085 0000 0180  |    |
0087 0000 0700  |    |
0089 0000 0000  |    |
008b 0067 9400  | g  |
008d 0000 4000  |  @ |
008f 0000 7800  |  x |
0091 0000 0100  |    |
0093 0000 0754  |   T|
0095 4558 545f  |EXT_|
0097 494f 9698  |IO  |
0099 0000 0000  |    |
009b 0351 0000  | Q  |
009d e000       |    |
009e 0000 0000  |    |		.BLANK	0000[0x4]
00a2 8228 3380  | (3 |		.XXX[0x19]
00a4 0000 1800  |    |
00a6 0000 4000  |  @ |
00a8 0000 0000  |    |
00aa 0698 0000  |    |
00ac 0004 0000  |    |
00ae 0006 0000  |    |
00b0 0000 1000  |    |
00b2 0000 4525  |  E%|
00b4 54c4 5969  |T Yi|
00b6 8000 0000  |    |
00b8 0037 7d00  | 7} |
00ba 0f00       |    |
00bb 0000 0000  |    |		.BLANK	0000[0x5]
00c0 063b c000  | ;  |		.XXX[0x48]
00c2 0637 c000  | 7  |
00c4 0000 1000  |    |
00c6 0001 1000  |    |
00c8 0900 0080  |    |
00ca 0027 8003  | '  |
00cc 0000 a600  |    |
00ce 1000 0300  |    |
00d0 0050 000d  | P  |
00d2 0001 8000  |    |
00d4 3600 0700  |6   |
00d6 00e8 0020  |    |
00d8 0003 f000  |    |
00da 9000 1120  |    |
00dc 0280 0046  |   F|
00de 800b 0001  |    |
00e0 3200 3000  |2 0 |
00e2 3c40 00d0  |<@  |
00e4 00f3 2003  |    |
00e6 8003 d180  |    |
00e8 0f00 0f54  |   T|
00ea 0040 003d  | @ =|
00ec 8801 1000  |    |
00ee f700 0020  |    |
00f0 8a0c e000  |    |
00f2 0006 0000  |    |
00f4 0010 0001  |    |
00f6 7810 0001  |x   |
00f8 ad50 0000  | P  |
00fa 0100 0000  |    |
00fc 0180 0000  |    |
00fe 0004 0000  |    |
0100 0011 1561  |   a|
0102 414a 5a60  |AJZ`|
0104 0000 0000  |    |
0106 0e19 c004  |    |
0108 0000 0000  |    |		.BLANK	0000[0x4]
010c 0002 08a0  |    |		.XXX[0x3a]
010e ce00 0000  |    |
0110 6000 0001  |`   |
0112 0000 0000  |    |
0114 0000 1c0b  |    |
0116 8000 0010  |    |
0118 0000 0018  |    |
011a 0000 0000  |    |
011c 4000 0001  |@   |
011e 1353 d491  | S  |
0120 4000 0000  |@   |
0122 4001 955f  |@  _|
0124 8000 0000  |    |
0126 8000 54b0  |  T |
0128 0000 2632  |  &2|
012a 5000 0000  |P   |
012c 0000 0720  |    |
012e 2000 0000  |    |
0130 0000 0000  |    |
0132 1000 6557  |  eW|
0134 e000 0000  |    |
0136 2000 0000  |    |
0138 0000 0a04  |    |
013a 9400 0000  |    |
013c 0000 01cc  |    |
013e 1000 0000  |    |
0140 025a 6000  | Z` |
0142 0000 000e  |    |
0144 94c0 0440  |   @|
0146 0000 0000  |    |		.BLANK	0000[0x4]
014a 0208 a0ce  |    |		.XXX[0x1a]
014c 0000 0060  |   `|
014e 0000 0180  |    |
0150 0000 0000  |    |
0152 001d 0180  |    |
0154 0000 1000  |    |
0156 0000 1c00  |    |
0158 0000 0040  |   @|
015a 0000 0191  |    |
015c 9052 5311  | RS |
015e 5125 a600  |Q%  |
0160 0000 0000  |    |
0162 f404 0048  |   H|
0164 0000 0000  |    |		.BLANK	0000[0x5]
0169 001b 0d00  |    |		.XXX[0x80]
016b 001a fd00  |    |
016d 0000 0040  |   @|
016f 0000 0500  |    |
0171 0024 0002  | $  |
0173 0000 9e00  |    |
0175 0c00 0298  |    |
0177 0040 000c  | @  |
0179 0001 4000  |  @ |
017b 3400 0600  |4   |
017d 00d8 001c  |    |
017f 0003 a000  |    |
0181 8000 0fc0  |    |
0183 0240 0044  | @ D|
0185 800a 0001  |    |
0187 1a00 2c00  |  , |
0189 04c8 00c0  |    |
018b 00f1 0003  |    |
018d 4003 cc80  |@   |
018f 0e00 0f46  |   F|
0191 003c 003d  | < =|
0193 5001 0000  |P   |
0195 f620 0440  |   @|
0197 03dc 0012  |    |
0199 000f 8200  |    |
019b 4c00 3e48  |L >H|
019d 0140 00fa  | @  |
019f a000 208a  |    |
01a1 0ce0 0000  |    |
01a3 0600 0000  |    |
01a5 1400 0000  |    |
01a7 0000 01d7  |    |
01a9 a800 0001  |    |
01ab 0000 0001  |    |
01ad a000 0000  |    |
01af 0400 0000  |    |
01b1 1519 0531  |   1|
01b3 4d16 5a60  |M Z`|
01b5 0000 0000  |    |
01b7 0f7b c004  | {  |
01b9 c000 0000  |    |
01bb 0000 0000  |    |
01bd 0002 08a0  |    |
01bf ce00 0000  |    |
01c1 6000 0002  |`   |
01c3 4000 0000  |@   |
01c5 0000 1ecf  |    |
01c7 8000 0010  |    |
01c9 0000 0022  |   "|
01cb 0000 0000  |    |
01cd 4000 0002  |@   |
01cf 51d1 5517  |Q U |
01d1 d513 d2d1  |    |
01d3 5380 0000  |S   |
01d5 0040 0195  | @  |
01d7 7a00 0000  |z   |
01d9 0080 0000  |    |
01db 0000 003d  |   =|
01dd 9f40 0000  | @  |
01df 0000 0007  |    |
01e1 d3a0 0000  |    |
01e3 0009 6980  |  i |
01e5 0000 0000  |    |
01e7 3f6e 0014  |?n  |
01e9 0000 0000  |    |		.BLANK	0000[0x4]
01ed 0008 2283  |  " |		.XXX[0x13]
01ef 3800 0001  |8   |
01f1 8000 000a  |    |
01f3 0000 0000  |    |
01f5 0000 7e3c  |  ~<|
01f7 0000 0040  |   @|
01f9 0000 0090  |    |
01fb 0000 0001  |    |
01fd 0000 000a  |    |
01ff 4c5f       |L_  |