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

⟦598bf227c⟧

    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 0040  |   @|		.XXX[0x2]
0040 0000 0000  |    |		.BLANK	0000[0x4]
0044 ffff ffff  |    |		.XXX[0x10]
0046 8000 0000  |    |
0048 0009 5c62  |  \b|
004a 0000 7116  |  q |
004c 005e d00e  | ^  |
004e 0001 b734  |   4|
0050 0009 5c62  |  \b|
0052 8000 0300  |    |
0054 0000 0000  |    |		.BLANK	0000[0xb]
005f 0001 0038  |   8|		.XXX[0x9]
0061 e804 0800  |    |
0063 02b8 8204  |    |
0065 0040 0000  | @  |
0067 0040       | @  |
0068 0000 0000  |    |		.BLANK	0000[0x4]
006c ffff ffff  |    |		.XXX[0x3]
006e 8000       |    |
006f 0000 0000  |    |		.BLANK	0000[0x4]
0073 0076       | v  |		.XXX[0x1]
0074 0000 0000  |    |		.BLANK	0000[0x4]
0078 0009 5c62  |  \b|		.XXX[0x1c]
007a c000 0816  |    |
007c 0000 1040  |   @|
007e 0000 0040  |   @|
0080 0009 6c62  |  lb|
0082 8000 000d  |    |
0084 004a d80e  | J  |
0086 0000 a031  |   1|
0088 0009 7c62  |  |b|
008a 0000 0302  |    |
008c 0009 7062  |  pb|
008e 0009 6c62  |  lb|
0090 0000 0000  |    |
0092 0000 0076  |   v|
0094 0000 0000  |    |		.BLANK	0000[0x4]
0098 0009 5c62  |  \b|		.XXX[0x28]
009a c000 0a16  |    |
009c 0000 1040  |   @|
009e 0000 0040  |   @|
00a0 0009 8062  |   b|
00a2 8000 0012  |    |
00a4 004a d80e  | J  |
00a6 0000 80b1  |    |
00a8 0009 6862  |  hb|
00aa 0000 0882  |    |
00ac 0000 0000  |    |
00ae 0009 8062  |   b|
00b0 0001 0404  |    |
00b2 0000 0016  |    |
00b4 001d a009  |    |
00b6 0000 13b2  |    |
00b8 0001 0404  |    |
00ba 0800 0280  |    |
00bc 0000 000a  |    |
00be 0000 000a  |    |
00c0 0000 0000  |    |		.BLANK	0000[0x7]
00c7 03ff 0000  |    |		.XXX[0x5]
00c9 0000 0000  |    |
00cb 0076       | v  |
00cc 0000 0000  |    |		.BLANK	0000[0x4]
00d0 0009 5c62  |  \b|		.XXX[0xae]
00d2 8800 0d80  |    |
00d4 0000 0018  |    |
00d6 0000 0018  |    |
00d8 09cf c004  |    |
00da 0800 066c  |   l|
00dc 0009 5c62  |  \b|
00de 0000 827f  |    |
00e0 0009 5c62  |  \b|
00e2 0000 ca96  |    |
00e4 005e f80e  | ^  |
00e6 0000 3234  |  24|
00e8 0009 5c62  |  \b|
00ea 8000 0f00  |    |
00ec 0000 0000  |    |
00ee ffff ffff  |    |
00f0 0000 0000  |    |
00f2 7fff ffff  |    |
00f4 0000 0000  |    |
00f6 0000 0001  |    |
00f8 0038 e804  | 8  |
00fa 0800 02b8  |    |
00fc 8204 0040  |   @|
00fe 0000 0040  |   @|
0100 0801 a10f  |    |
0102 3a16 00cb  |:   |
0104 c100 0000  |    |
0106 0014 e010  |    |
0108 037d 5802  | }X |
010a 0071 6280  | qb |
010c 4033 2800  |@3( |
010e 0cb8 5207  |  R |
0110 5201 9b1d  |R   |
0112 8000 0000  |    |
0114 198b 7806  |  x |
0116 63cd 3b17  |c ; |
0118 00cc 3d80  |  = |
011a 0000 0013  |    |
011c e000 0000  |    |
011e 026a 1601  | j  |
0120 987b 0000  | {  |
0122 0000 2800  |  ( |
0124 4017 c988  |@   |
0126 0003 3a34  |  :4|
0128 8066 88e0  | f  |
012a 1987 b40e  |    |
012c a403 363b  |  6;|
012e 0000 0000  |    |
0130 3332 e00c  |32  |
0132 ce96 762e  |  v.|
0134 0199 5a80  |  Z |
0136 0000 0028  |   (|
0138 4000 0000  |@   |
013a 04e8 5803  |  X |
013c 32b5 0000  |2   |
013e 0000 0d00  |    |
0140 800b bbd0  |    |
0142 1001 7a46  |  zF|
0144 0100 cd81  |    |
0146 8033 2b58  | 3+X|
0148 1d48 066c  | H l|
014a 7600 0000  |v   |
014c 0066 9ea0  | f  |
014e 19ab 64ec  |  d |
0150 5c03 347c  |\ 4||
0152 0000 0000  |    |
0154 2b00 0000  |+   |
0156 0009 a858  |   X|
0158 0668 f800  | h  |
015a 0000 0006  |    |
015c 0100 5f26  |  _&|
015e 2000 0cf0  |    |
0160 9200 0000  |    |
0162 0066 8f90  | f  |
0164 8930 0ca8  | 0  |
0166 7c00 0000  ||   |
0168 00cb 77c0  |  w |
016a 0019 6a28  |  j(|
016c 066d ae00  | m  |
016e 00cb c100  |    |
0170 3371 4000  |3q@ |
0172 0663 cc01  | c  |
0174 9ba8 8000  |    |
0176 333a 500c  |3:P |
0178 de38 0001  | 8  |
017a 9ab6 0000  |    |
017c 0011 d8d0  |    |
017e 0000 0000  |    |		.BLANK	0000[0x5]
0183 3369 a98b  |3i  |		.XXX[0x7d]
0185 0800 0000  |    |
0187 019c ef00  |    |
0189 671c 0019  |g   |
018b caf8 0800  |    |
018d c21f 9704  |    |
018f 0067 0880  | g  |
0191 0000 0007  |    |
0193 8010 0184  |    |
0195 3ff7 2e08  |? . |
0197 00ce 1100  |    |
0199 0000 000f  |    |
019b 0020 0308  |    |
019d 7c2e 0200  ||.  |
019f 8200 0000  |    |
01a1 0000 32d4  |  2 |
01a3 598b 0800  |Y   |
01a5 0000 019d  |    |
01a7 e700 675a  |  gZ|
01a9 0019 da78  |   x|
01ab 0800 c21f  |    |
01ad 9704 0067  |   g|
01af 4680 0000  |F   |
01b1 0007 8010  |    |
01b3 0184 3ff7  |  ? |
01b5 2e08 00ce  |.   |
01b7 8d00 0000  |    |
01b9 000f 0020  |    |
01bb 0308 7c22  |  |"|
01bd 0200 8200  |    |
01bf 0000 0000  |    |
01c1 331e 698b  |3 i |
01c3 0800 0000  |    |
01c5 019e df00  |    |
01c7 6798 0019  |g   |
01c9 e9f8 0800  |    |
01cb c21f 9704  |    |
01cd 0067 8480  | g  |
01cf 0000 0007  |    |
01d1 8010 0184  |    |
01d3 3ff7 2e08  |? . |
01d5 00cf 0900  |    |
01d7 0000 000f  |    |
01d9 0020 0308  |    |
01db 7c26 0200  ||&  |
01dd 8200 0000  |    |
01df 0000 3356  |  3V|
01e1 c9a8 5806  |  X |
01e3 7d5c 0000  |}\  |
01e5 0000 2d00  |  - |
01e7 0000 0000  |    |
01e9 0000 0002  |    |
01eb 6624 0195  |f$  |
01ed 6180 0000  |a   |
01ef 0019 f0a0  |    |
01f1 0656 ce00  | V  |
01f3 0000 0000  |    |
01f5 0000 0004  |    |
01f7 196c 0000  | l  |
01f9 0000 0000  |    |
01fb 0034 0110  | 4  |
01fd 0d2e 2403  | .$ |
01ff 4d19       |M   |