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

⟦e89c80c1a⟧

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

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 00b8       |    |		.CONST	0x00b8								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 00b0       |    |		.CONST	0x00b0								; Offset to segment table (only in elab segments)
0007 8000       |    |		.CONST	0x8000								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 000e       |    |		.CONST	0x000e								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0001       |    |		.CONST	0x0001								; Number of locals
000b			INIT_0008:
000b 029c 0013  |    |		Declare_Subprogram	INIT_0010,For_Outer_Call,Visible
000d 00bf       |    |		Action	Accept_Activation
000e			BODY_0008:
000e 00bc       |    |		Action	Signal_Activated
000f 00bb       |    |		Action	Signal_Completion
0010 ; --------------------------------------------------------------------------------------
0010 ; SUBPROGRAM
0010 ; --------------------------------------------------------------------------------------
0010 0015       |    |		.CONST	0x0015								; Address of begin
0011 001a       |    |		.CONST	0x001a								; Address of exception handler
0012 0002       |    |		.CONST	0x0002								; Number of locals
0013			INIT_0010:
0013 029f 0023  |   #|		Declare_Subprogram	INIT_0020,For_Call
0015			BODY_0010:
0015 8402       |    |		Call	0x2,0x2
0016 7801       |x   |		Jump	0x18
0017 0003       |    |		.XXX[0x1]
0018 006f       | o  |		Action	Break_Unconditional
0019 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
001a			TRAP_0010:
001a 7801       |x   |		Jump	0x1c
001b 0003       |    |		.XXX[0x1]
001c 006f       | o  |		Action	Break_Unconditional
001d 00d8       |    |		Load_Top	At_Offset_0
001e 0100       |    |		Execute	Exception,Raise
001f 0000       |    |		.XXX[0x1]
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 0074       | t  |		.CONST	0x0074								; Address of begin
0021 0004       |    |		.CONST	0x0004								; Address of exception handler
0022 000e       |    |		.CONST	0x000e								; Number of locals
0023			INIT_0020:
0023 7801       |x   |		Jump	0x25
0024 0002       |    |		.XXX[0x1]
0025 006f       | o  |		Action	Break_Unconditional
0026 7846       |xF  |		Jump	0x6d
0027 6084       |`   |		Indirect_Literal	Discrete,0xac,{0x00000000, 0x0040bc04}
0028 e002       |    |		Load	0x0,0x2
0029 e001       |    |		Load	0x0,0x1
002a 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
002b 4800       |H   |		Short_Literal	0x0
002c 607b       |`{  |		Indirect_Literal	Discrete,0xa8,{0x0063a10b, 0x000000b0}
002d 02a0       |    |		Declare_Subprogram	Null_Subprogram
002e 038e       |    |		Declare_Type	Package,Defined
002f 0387       |    |		Declare_Variable	Package
0030 00d8       |    |		Load_Top	At_Offset_0
0031 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
0032 4800       |H   |		Short_Literal	0x0
0033 6070       |`p  |		Indirect_Literal	Discrete,0xa4,{0x0063990b, 0x000000b0}
0034 02a0       |    |		Declare_Subprogram	Null_Subprogram
0035 038e       |    |		Declare_Type	Package,Defined
0036 0387       |    |		Declare_Variable	Package
0037 6068       |`h  |		Indirect_Literal	Discrete,0xa0,{0x00000000, 0x00324804}
0038 e002       |    |		Load	0x0,0x2
0039 e001       |    |		Load	0x0,0x1
003a 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
003b 6060       |``  |		Indirect_Literal	Discrete,0x9c,{0x00000000, 0x0040b804}
003c e002       |    |		Load	0x0,0x2
003d e001       |    |		Load	0x0,0x1
003e 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
003f 6058       |`X  |		Indirect_Literal	Discrete,0x98,{0x00000000, 0x0040c404}
0040 e002       |    |		Load	0x0,0x2
0041 e001       |    |		Load	0x0,0x1
0042 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0043 6050       |`P  |		Indirect_Literal	Discrete,0x94,{0x00000000, 0x0037b404}
0044 e002       |    |		Load	0x0,0x2
0045 e001       |    |		Load	0x0,0x1
0046 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0047 6048       |`H  |		Indirect_Literal	Discrete,0x90,{0x00000000, 0x00324c04}
0048 e002       |    |		Load	0x0,0x2
0049 e001       |    |		Load	0x0,0x1
004a 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
004b 6040       |`@  |		Indirect_Literal	Discrete,0x8c,{0x00000000, 0x0040a004}
004c e002       |    |		Load	0x0,0x2
004d e001       |    |		Load	0x0,0x1
004e 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
004f 6038       |`8  |		Indirect_Literal	Discrete,0x88,{0x00000000, 0x000ca804}
0050 e002       |    |		Load	0x0,0x2
0051 e001       |    |		Load	0x0,0x1
0052 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0053 6030       |`0  |		Indirect_Literal	Discrete,0x84,{0x00000000, 0x0004bc04}
0054 e002       |    |		Load	0x0,0x2
0055 e001       |    |		Load	0x0,0x1
0056 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0057 6028       |`(  |		Indirect_Literal	Discrete,0x80,{0x00000000, 0x00116c04}
0058 e002       |    |		Load	0x0,0x2
0059 e001       |    |		Load	0x0,0x1
005a 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
005b e60a       |    |		Load	0x3,0xa
005c e606       |    |		Load	0x3,0x6
005d e602       |    |		Load	0x3,0x2
005e 00db       |    |		Load_Top	At_Offset_3
005f e60d       |    |		Load	0x3,0xd
0060 e609       |    |		Load	0x3,0x9
0061 4806       |H   |		Short_Literal	0x6
0062 e605       |    |		Load	0x3,0x5
0063 020e       |    |		Execute	Module,Augment_Imports
0064 e605       |    |		Load	0x3,0x5
0065 020f       |    |		Execute	Module,Activate
0066 e605       |    |		Load	0x3,0x5
0067 4801       |H   |		Short_Literal	0x1
0068 e603       |    |		Load	0x3,0x3
0069 020e       |    |		Execute	Module,Augment_Imports
006a e603       |    |		Load	0x3,0x3
006b 020f       |    |		Execute	Module,Activate
006c 7807       |x   |		Jump	BODY_0020
006d 600e       |`   |		Indirect_Literal	Discrete,0x7c,{0x00000000, 0x00001f40}
006e 6009       |`   |		Indirect_Literal	Discrete,0x78,{0x00000000, 0x00190c04}
006f e002       |    |		Load	0x0,0x2
0070 e001       |    |		Load	0x0,0x1
0071 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0072 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0073 7fb3       |    |		Jump	0x27
0074			BODY_0020:
0074 e5ff       |    |		Load	0x2,-0x1
0075 8604       |    |		Call	0x3,0x4
0076 00ca       |    |		Action	Exit_Nullary_Function
0077 0000       |    |		.XXX[0x1]
0078 0000 0000  |    |		.LITERAL	{0x00000000, 0x00190c04}
007c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001f40}
0080 0000 0000  |    |		.LITERAL	{0x00000000, 0x00116c04}
0084 0000 0000  |    |		.LITERAL	{0x00000000, 0x0004bc04}
0088 0000 0000  |    |		.LITERAL	{0x00000000, 0x000ca804}
008c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0040a004}
0090 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324c04}
0094 0000 0000  |    |		.LITERAL	{0x00000000, 0x0037b404}
0098 0000 0000  |    |		.LITERAL	{0x00000000, 0x0040c404}
009c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0040b804}
00a0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324804}
00a4 0063 990b  | c  |		.LITERAL	{0x0063990b, 0x000000b0}
00a8 0063 a10b  | c  |		.LITERAL	{0x0063a10b, 0x000000b0}
00ac 0000 0000  |    |		.LITERAL	{0x00000000, 0x0040bc04}
00b0 ; --------------------------------------------------------------------------------------
00b0 ; Segment Table
00b0 ; --------------------------------------------------------------------------------------
00b0 002c 0033  | , 3|		.XXX[0x2]
00b2 0000 0000  |    |		.BLANK	0000[0x6]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; Debug Table
00b8 ; --------------------------------------------------------------------------------------
00b8 0004 000e  |    |		.DEBUG4	0x0004,0x000e,0xe6de,0x0000,0x0001,0x0000
00be 0000 0ec6  |    |		.XXX[0x15]
00c0 0000 0002  |    |
00c2 a56b d089  | k  |
00c4 0054 b2b4  | T  |
00c6 0000 0005  |    |
00c8 4aff 8000  |J   |
00ca 0004 18e4  |    |
00cc 0000 0000  |    |
00ce 0000 0152  |   R|
00d0 c330 54a9  | 0T |
00d2 f000       |    |
00d3 0000 0000  |    |		.BLANK	0000[0x6]
00d9 000a 96d8  |    |		.XXX[0x14]
00db 8001 52b5  |  R |
00dd e000 0002  |    |
00df 762e 0a97  |v.  |
00e1 3280 0000  |2   |
00e3 000a 0000  |    |
00e5 0000 0459  |   Y|
00e7 9815 3096  |  0 |
00e9 0000 0001  |    |
00eb 52de e000  |R   |
00ed 0000 0000  |    |		.BLANK	0000[0x7]
00f4 012d 3005  | -0 |		.XXX[0x1d]
00f6 4c07 0000  |L   |
00f8 0000 7680  |  v |
00fa 0054 b994  | T  |
00fc 0000 0007  |    |
00fe 6500 0000  |e   |
0100 0152 f478  | R x|
0102 4480 2a61  |D *a|
0104 2c00 0000  |,   |
0106 02a5 fce0  |    |
0108 0000 020c  |    |
010a 7200 0000  |r   |
010c 0000 0000  |    |
010e a980 e02a  |   *|
0110 5cca       |\   |
0111 0000 0000  |    |		.BLANK	0000[0x7]
0118 054c 6680  | Lf |		.XXX[0x13]
011a 00a9 7a38  |  z8|
011c 0000 013b  |   ;|
011e 1705 4c93  |  L |
0120 8000 0000  |    |
0122 0500 0000  |    |
0124 0002 2ccc  |  , |
0126 0a9a 3f80  |  ? |
0128 0000 00a9  |    |
012a 8eb8       |    |
012b 0000 0000  |    |		.BLANK	0000[0x8]
0133 9698 02a6  |    |		.XXX[0x1d]
0135 80a0 0000  |    |
0137 003b 5000  | ;P |
0139 2a64 9c00  |*d  |
013b 0000 03b3  |    |
013d 8000 0000  |    |
013f a999 8422  |   "|
0141 4015 347f  |@ 4 |
0143 0000 0001  |    |
0145 533d 0031  |S= 1|
0147 71bf 0639  |q  9|
0149 002b 5dc0  | +] |
014b 0000 0054  |   T|
014d d014 1532  |   2|
014f 4e00       |N   |
0150 0000 0000  |    |		.BLANK	0000[0x6]
0156 0002 a6b0  |    |		.XXX[0x13]
0158 6000 54cc  |` T |
015a c000 0000  |    |
015c 9d8b 82a6  |    |
015e c6e0 0000  |    |
0160 0002 8000  |    |
0162 0000 0116  |    |
0164 6605 4e1a  |f N |
0166 0000 0000  |    |
0168 54d7       |T   |
0169 0000 0000  |    |		.BLANK	0000[0x8]
0171 004b 4c01  | KL |		.XXX[0x1e]
0173 537e e000  |S~  |
0175 0000 1db0  |    |
0177 0015 3637  |  67|
0179 0000 0001  |    |
017b da40 0000  | @  |
017d 0054 dc66  | T f|
017f 1120 0a9c  |    |
0181 3400 0000  |4   |
0183 00a9 bdc8  |    |
0185 0000 0083  |    |
0187 1c80 0000  |    |
0189 0000 0000  |    |
018b 2a6f dc0a  |*o  |
018d 9b1b 8000  |    |
018f 0000 0000  |    |		.BLANK	0000[0x6]
0195 0153 96c0  | S  |		.XXX[0x13]
0197 002a 6e32  | *n2|
0199 0000 004e  |   N|
019b c5c1 53a2  |  S |
019d 0000 0000  |    |
019f 0140 0000  | @  |
01a1 0000 8b33  |   3|
01a3 02a7 8a20  |    |
01a5 0000 002a  |   *|
01a7 7352       |sR  |
01a8 0000 0000  |    |		.BLANK	0000[0x8]
01b0 25a6 00a9  |%   |		.XXX[0x37]
01b2 deb8 0000  |    |
01b4 000e dc00  |    |
01b6 0a9d 1000  |    |
01b8 0000 00ed  |    |
01ba 6000 0000  |`   |
01bc 2a76 0508  |*v  |
01be 9005 4f14  |  O |
01c0 4000 0000  |@   |
01c2 54ee 8800  |T   |
01c4 0000 418e  |  A |
01c6 4000 0000  |@   |
01c8 0000 0015  |    |
01ca 3bd7 054e  |;  N|
01cc 8800 0000  |    |
01ce 0000 0000  |    |
01d0 1407 8000  |    |
01d2 0000 0000  |    |
01d4 a9ea a800  |    |
01d6 153b 0200  | ;  |
01d8 0000 2762  |  'b|
01da e0a9 f048  |   H|
01dc 0000 0000  |    |
01de a000 0000  |    |
01e0 0045 9981  | E  |
01e2 5403 a000  |T   |
01e4 0000 153d  |   =|
01e6 9200       |    |
01e7 0000 0000  |    |		.BLANK	0000[0x7]
01ee 0012 d300  |    |		.XXX[0x12]
01f0 54ff 0000  |T   |
01f2 0000 0770  |   p|
01f4 0005 4f82  |  O |
01f6 4000 0000  |@   |
01f8 76d0 0000  |v   |
01fa 0015 3eeb  |  > |
01fc 8448 02a8  | H  |
01fe 0740 0000  | @  |