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

⟦13ffa4e98⟧

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

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 0178       | x  |		.CONST	0x0178								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 016c       | l  |		.CONST	0x016c								; 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 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
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 00dc       |    |		.CONST	0x00dc								; Address of begin
0021 0004       |    |		.CONST	0x0004								; Address of exception handler
0022 001f       |    |		.CONST	0x001f								; Number of locals
0023			INIT_0020:
0023 7801       |x   |		Jump	0x25
0024 0002       |    |		.XXX[0x1]
0025 006f       | o  |		Action	Break_Unconditional
0026 78ae       |x   |		Jump	0xd5
0027 4800       |H   |		Short_Literal	0x0
0028 613f       |a?  |		Indirect_Literal	Discrete,0x168,{0x0037790a, 0x000000b0}
0029 02a0       |    |		Declare_Subprogram	Null_Subprogram
002a 038e       |    |		Declare_Type	Package,Defined
002b 0387       |    |		Declare_Variable	Package
002c 00d8       |    |		Load_Top	At_Offset_0
002d 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
002e 6135       |a5  |		Indirect_Literal	Discrete,0x164,{0x00000000, 0x0036c804}
002f e002       |    |		Load	0x0,0x2
0030 e001       |    |		Load	0x0,0x1
0031 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0032 612d       |a-  |		Indirect_Literal	Discrete,0x160,{0x00000000, 0x0004bc04}
0033 e002       |    |		Load	0x0,0x2
0034 e001       |    |		Load	0x0,0x1
0035 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0036 4800       |H   |		Short_Literal	0x0
0037 6124       |a$  |		Indirect_Literal	Discrete,0x15c,{0x00377d0a, 0x000000b0}
0038 02a0       |    |		Declare_Subprogram	Null_Subprogram
0039 038e       |    |		Declare_Type	Package,Defined
003a 611d       |a   |		Indirect_Literal	Discrete,0x158,{0x0037810a, 0x000000b0}
003b 4801       |H   |		Short_Literal	0x1
003c 00da       |    |		Load_Top	At_Offset_2
003d 020e       |    |		Execute	Module,Augment_Imports
003e 0387       |    |		Declare_Variable	Package
003f 6114       |a   |		Indirect_Literal	Discrete,0x154,{0x00000000, 0x003d7004}
0040 e002       |    |		Load	0x0,0x2
0041 e001       |    |		Load	0x0,0x1
0042 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0043 610c       |a   |		Indirect_Literal	Discrete,0x150,{0x00000000, 0x000e3404}
0044 e002       |    |		Load	0x0,0x2
0045 e001       |    |		Load	0x0,0x1
0046 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0047 6104       |a   |		Indirect_Literal	Discrete,0x14c,{0x00000000, 0x0004b404}
0048 e002       |    |		Load	0x0,0x2
0049 e001       |    |		Load	0x0,0x1
004a 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
004b 60fc       |`   |		Indirect_Literal	Discrete,0x148,{0x00000000, 0x001f5804}
004c e002       |    |		Load	0x0,0x2
004d e001       |    |		Load	0x0,0x1
004e 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
004f 6114       |a   |		Indirect_Literal	Discrete,0x164,{0x00000000, 0x0036c804}
0050 e002       |    |		Load	0x0,0x2
0051 e001       |    |		Load	0x0,0x1
0052 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0053 60f0       |`   |		Indirect_Literal	Discrete,0x144,{0x00000000, 0x0036d804}
0054 e002       |    |		Load	0x0,0x2
0055 e001       |    |		Load	0x0,0x1
0056 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0057 60e8       |`   |		Indirect_Literal	Discrete,0x140,{0x00000000, 0x000cb004}
0058 e002       |    |		Load	0x0,0x2
0059 e001       |    |		Load	0x0,0x1
005a 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
005b 60e0       |`   |		Indirect_Literal	Discrete,0x13c,{0x00000000, 0x00324804}
005c e002       |    |		Load	0x0,0x2
005d e001       |    |		Load	0x0,0x1
005e 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
005f 60d8       |`   |		Indirect_Literal	Discrete,0x138,{0x00000000, 0x003e1404}
0060 e002       |    |		Load	0x0,0x2
0061 e001       |    |		Load	0x0,0x1
0062 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0063 60d0       |`   |		Indirect_Literal	Discrete,0x134,{0x00000000, 0x000ca804}
0064 e002       |    |		Load	0x0,0x2
0065 e001       |    |		Load	0x0,0x1
0066 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0067 60c8       |`   |		Indirect_Literal	Discrete,0x130,{0x00000000, 0x00065804}
0068 e002       |    |		Load	0x0,0x2
0069 e001       |    |		Load	0x0,0x1
006a 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
006b 60c0       |`   |		Indirect_Literal	Discrete,0x12c,{0x00000000, 0x003b6804}
006c e002       |    |		Load	0x0,0x2
006d e001       |    |		Load	0x0,0x1
006e 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
006f 60b8       |`   |		Indirect_Literal	Discrete,0x128,{0x00000000, 0x0001b004}
0070 e002       |    |		Load	0x0,0x2
0071 e001       |    |		Load	0x0,0x1
0072 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0073 60b0       |`   |		Indirect_Literal	Discrete,0x124,{0x00000000, 0x003d5804}
0074 e002       |    |		Load	0x0,0x2
0075 e001       |    |		Load	0x0,0x1
0076 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0077 60a8       |`   |		Indirect_Literal	Discrete,0x120,{0x00000000, 0x0037b404}
0078 e002       |    |		Load	0x0,0x2
0079 e001       |    |		Load	0x0,0x1
007a 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
007b 60a0       |`   |		Indirect_Literal	Discrete,0x11c,{0x00000000, 0x00324c04}
007c e002       |    |		Load	0x0,0x2
007d e001       |    |		Load	0x0,0x1
007e 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
007f 60e0       |`   |		Indirect_Literal	Discrete,0x160,{0x00000000, 0x0004bc04}
0080 e002       |    |		Load	0x0,0x2
0081 e001       |    |		Load	0x0,0x1
0082 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0083 6094       |`   |		Indirect_Literal	Discrete,0x118,{0x00000000, 0x000ca404}
0084 e002       |    |		Load	0x0,0x2
0085 e001       |    |		Load	0x0,0x1
0086 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0087 608c       |`   |		Indirect_Literal	Discrete,0x114,{0x00000000, 0x00408804}
0088 e002       |    |		Load	0x0,0x2
0089 e001       |    |		Load	0x0,0x1
008a 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
008b 6084       |`   |		Indirect_Literal	Discrete,0x110,{0x00000000, 0x000e3804}
008c e002       |    |		Load	0x0,0x2
008d e001       |    |		Load	0x0,0x1
008e 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
008f e616       |    |		Load	0x3,0x16
0090 607b       |`{  |		Indirect_Literal	Discrete,0x10c,{0x0037850a, 0x000000b0}
0091 6076       |`v  |		Indirect_Literal	Discrete,0x108,{0x0037890a, 0x000000b0}
0092 6071       |`q  |		Indirect_Literal	Discrete,0x104,{0x00378d0a, 0x000000b0}
0093 e617       |    |		Load	0x3,0x17
0094 e618       |    |		Load	0x3,0x18
0095 e60e       |    |		Load	0x3,0xe
0096 6069       |`i  |		Indirect_Literal	Discrete,0x100,{0x0000ca19, 0x85050081}
0097 e61a       |    |		Load	0x3,0x1a
0098 e60c       |    |		Load	0x3,0xc
0099 e610       |    |		Load	0x3,0x10
009a e60f       |    |		Load	0x3,0xf
009b e60d       |    |		Load	0x3,0xd
009c 605f       |`_  |		Indirect_Literal	Discrete,0xfc,{0x00000001, 0x000eceeb}
009d 4802       |H   |		Short_Literal	0x2
009e e611       |    |		Load	0x3,0x11
009f e608       |    |		Load	0x3,0x8
00a0 605b       |`[  |		Indirect_Literal	Discrete,0xfc,{0x00000001, 0x000eceeb}
00a1 4801       |H   |		Short_Literal	0x1
00a2 e607       |    |		Load	0x3,0x7
00a3 e619       |    |		Load	0x3,0x19
00a4 e615       |    |		Load	0x3,0x15
00a5 6052       |`R  |		Indirect_Literal	Discrete,0xf8,{0x0000ca1b, 0x6d050081}
00a6 e60b       |    |		Load	0x3,0xb
00a7 e612       |    |		Load	0x3,0x12
00a8 e613       |    |		Load	0x3,0x13
00a9 e609       |    |		Load	0x3,0x9
00aa e60a       |    |		Load	0x3,0xa
00ab 481c       |H   |		Short_Literal	0x1c
00ac e606       |    |		Load	0x3,0x6
00ad 020e       |    |		Execute	Module,Augment_Imports
00ae e606       |    |		Load	0x3,0x6
00af 020f       |    |		Execute	Module,Activate
00b0 608b       |`   |		Indirect_Literal	Discrete,0x13c,{0x00000000, 0x00324804}
00b1 e002       |    |		Load	0x0,0x2
00b2 e001       |    |		Load	0x0,0x1
00b3 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00b4 6067       |`g  |		Indirect_Literal	Discrete,0x11c,{0x00000000, 0x00324c04}
00b5 e002       |    |		Load	0x0,0x2
00b6 e001       |    |		Load	0x0,0x1
00b7 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00b8 603b       |`;  |		Indirect_Literal	Discrete,0xf4,{0x00000000, 0x003d8004}
00b9 e002       |    |		Load	0x0,0x2
00ba e001       |    |		Load	0x0,0x1
00bb 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00bc 6033       |`3  |		Indirect_Literal	Discrete,0xf0,{0x00000000, 0x00372004}
00bd e002       |    |		Load	0x0,0x2
00be e001       |    |		Load	0x0,0x1
00bf 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00c0 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
00c1 6052       |`R  |		Indirect_Literal	Discrete,0x114,{0x00000000, 0x00408804}
00c2 e002       |    |		Load	0x0,0x2
00c3 e001       |    |		Load	0x0,0x1
00c4 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00c5 6026       |`&  |		Indirect_Literal	Discrete,0xec,{0x00000001, 0x0004e49e}
00c6 4801       |H   |		Short_Literal	0x1
00c7 00db       |    |		Load_Top	At_Offset_3
00c8 00db       |    |		Load_Top	At_Offset_3
00c9 e61d       |    |		Load	0x3,0x1d
00ca e61c       |    |		Load	0x3,0x1c
00cb e61b       |    |		Load	0x3,0x1b
00cc e604       |    |		Load	0x3,0x4
00cd e605       |    |		Load	0x3,0x5
00ce e606       |    |		Load	0x3,0x6
00cf 480a       |H   |		Short_Literal	0xa
00d0 e602       |    |		Load	0x3,0x2
00d1 020e       |    |		Execute	Module,Augment_Imports
00d2 e602       |    |		Load	0x3,0x2
00d3 020f       |    |		Execute	Module,Activate
00d4 7807       |x   |		Jump	BODY_0020
00d5 6012       |`   |		Indirect_Literal	Discrete,0xe8,{0x00000000, 0x00001f40}
00d6 600d       |`   |		Indirect_Literal	Discrete,0xe4,{0x00000000, 0x00190c04}
00d7 e002       |    |		Load	0x0,0x2
00d8 e001       |    |		Load	0x0,0x1
00d9 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00da 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00db 7f4b       | K  |		Jump	0x27
00dc			BODY_0020:
00dc e5fd       |    |		Load	0x2,-0x3
00dd e5fe       |    |		Load	0x2,-0x2
00de e5ff       |    |		Load	0x2,-0x1
00df 8603       |    |		Call	0x3,0x3
00e0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00e1 0000 0000  |    |		.XXX[0x3]
00e3 0000       |    |
00e4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00190c04}
00e8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001f40}
00ec 0000 0001  |    |		.LITERAL	{0x00000001, 0x0004e49e}
00f0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00372004}
00f4 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d8004}
00f8 0000 ca1b  |    |		.LITERAL	{0x0000ca1b, 0x6d050081}
00fc 0000 0001  |    |		.LITERAL	{0x00000001, 0x000eceeb}
0100 0000 ca19  |    |		.LITERAL	{0x0000ca19, 0x85050081}
0104 0037 8d0a  | 7  |		.LITERAL	{0x00378d0a, 0x000000b0}
0108 0037 890a  | 7  |		.LITERAL	{0x0037890a, 0x000000b0}
010c 0037 850a  | 7  |		.LITERAL	{0x0037850a, 0x000000b0}
0110 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e3804}
0114 0000 0000  |    |		.LITERAL	{0x00000000, 0x00408804}
0118 0000 0000  |    |		.LITERAL	{0x00000000, 0x000ca404}
011c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324c04}
0120 0000 0000  |    |		.LITERAL	{0x00000000, 0x0037b404}
0124 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d5804}
0128 0000 0000  |    |		.LITERAL	{0x00000000, 0x0001b004}
012c 0000 0000  |    |		.LITERAL	{0x00000000, 0x003b6804}
0130 0000 0000  |    |		.LITERAL	{0x00000000, 0x00065804}
0134 0000 0000  |    |		.LITERAL	{0x00000000, 0x000ca804}
0138 0000 0000  |    |		.LITERAL	{0x00000000, 0x003e1404}
013c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324804}
0140 0000 0000  |    |		.LITERAL	{0x00000000, 0x000cb004}
0144 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036d804}
0148 0000 0000  |    |		.LITERAL	{0x00000000, 0x001f5804}
014c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0004b404}
0150 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e3404}
0154 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d7004}
0158 0037 810a  | 7  |		.LITERAL	{0x0037810a, 0x000000b0}
015c 0037 7d0a  | 7} |		.LITERAL	{0x00377d0a, 0x000000b0}
0160 0000 0000  |    |		.LITERAL	{0x00000000, 0x0004bc04}
0164 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036c804}
0168 0037 790a  | 7y |		.LITERAL	{0x0037790a, 0x000000b0}
016c ; --------------------------------------------------------------------------------------
016c ; Segment Table
016c ; --------------------------------------------------------------------------------------
016c 0028 0037  | ( 7|		.XXX[0x6]
016e 003a 0090  | :  |
0170 0091 0092  |    |
0172 0000 0000  |    |		.BLANK	0000[0x6]
0178 ; --------------------------------------------------------------------------------------
0178 ; Debug Table
0178 ; --------------------------------------------------------------------------------------
0178 0004 0004  |    |		.DEBUG4	0x0004,0x0004,0xe49e,0x0000,0x0001,0x0000
017e 1115 482f  |  H/|		.XXX[0x82]
0180 04c4 55a9  |  U |
0182 1ed5 2582  |  % |
0184 d5ad 1438  |   8|
0186 407d 0309  |@}  |
0188 fa6e b9e6  | n  |
018a e540 0bae  | @  |
018c bf54 2c5b  | T,[|
018e b04b 4386  | KC |
0190 a064 0800  | d  |
0192 6642 02e5  |fB  |
0194 e3d3 cbe7  |    |
0196 68ff 68f6  |h h |
0198 fbd5 300c  |  0 |
019a 2a68 0086  |*h  |
019c 7f3b dec4  | ;  |
019e a7e2 0510  |    |
01a0 39f8 5ae5  |9 Z |
01a2 283e 42f7  |(>B |
01a4 03c9 3005  |  0 |
01a6 7239 66cc  |r9f |
01a8 7834 3407  |x44 |
01aa cb02 5d7e  |  ]~|
01ac f230 5db1  | 0] |
01ae b508 bc61  |   a|
01b0 8d6b 0108  | k  |
01b2 7f6c d182  | l  |
01b4 ce74 27ca  | t' |
01b6 b03a 8e00  | :  |
01b8 7e40 63da  |~@c |
01ba 6378 dfa1  |cx  |
01bc eabc 001f  |    |
01be b6f4 6fa7  |  o |
01c0 e27a 7ba0  | z{ |
01c2 ef06 cfbf  |    |
01c4 edd2 96be  |    |
01c6 53f2 3b17  |S ; |
01c8 1001 fd1e  |    |
01ca 4221 ebcc  |B!  |
01cc a3a9 7dfb  |  } |
01ce 25d6 a25c  |%  \|
01d0 dbc0 0804  |    |
01d2 30b3 be0f  |0   |
01d4 c22a 63ec  | *c |
01d6 9cbf 4c81  |  L |
01d8 003c e1ce  | <  |
01da 5f9c 954e  |_  N|
01dc 90d1 ffad  |    |
01de 8d30 3563  | 05c|
01e0 cd0b ebdf  |    |
01e2 52a8 8a15  |R   |
01e4 18e0 4ab8  |  J |
01e6 99af 8179  |   y|
01e8 378c 000b  |7   |
01ea 881c 4224  |  B$|
01ec 73e2 0123  |s  #|
01ee 11d6 ac0c  |    |
01f0 6003 3957  |` 9W|
01f2 f988 0403  |    |
01f4 bdc3 81c7  |    |
01f6 b27b 99b5  | {  |
01f8 046e 2d86  | n- |
01fa 0543 5033  | CP3|
01fc 88d1 d002  |    |
01fe fd68 fa94  | h  |