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

⟦936dc27f6⟧

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

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 0160       | `  |		.CONST	0x0160								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0158       | X  |		.CONST	0x0158								; 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 4501       |E   |		Exit_Suprogram	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 00df       |    |		.CONST	0x00df								; Address of begin
0021 0004       |    |		.CONST	0x0004								; Address of exception handler
0022 0018       |    |		.CONST	0x0018								; Number of locals
0023			INIT_0020:
0023 7801       |x   |		Jump	0x25
0024 0002       |    |		.XXX[0x1]
0025 006f       | o  |		Action	Break_Unconditional
0026 78b1       |x   |		Jump	0xd8
0027 4800       |H   |		Short_Literal	0x0
0028 612b       |a+  |		Indirect_Literal	Discrete,0x154,{0x003d910b, 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 4800       |H   |		Short_Literal	0x0
002f 6120       |a   |		Indirect_Literal	Discrete,0x150,{0x003a410b, 0x000000b0}
0030 02a0       |    |		Declare_Subprogram	Null_Subprogram
0031 038e       |    |		Declare_Type	Package,Defined
0032 4801       |H   |		Short_Literal	0x1
0033 4808       |H   |		Short_Literal	0x8
0034 00e5       |    |		Load_Encached	Long_Integer_Cache
0035 02a0       |    |		Declare_Subprogram	Null_Subprogram
0036 4801       |H   |		Short_Literal	0x1
0037 035d       | ]  |		Declare_Type	Array,Defined
0038 0337       | 7  |		Declare_Variable	Array
0039 4809       |H   |		Short_Literal	0x9
003a 4801       |H   |		Short_Literal	0x1
003b 00da       |    |		Load_Top	At_Offset_2
003c 01d6       |    |		Execute	Vector,Field_Write
003d 610e       |a   |		Indirect_Literal	Discrete,0x14c,{0x003a390b, 0x000000b0}
003e 4802       |H   |		Short_Literal	0x2
003f 00da       |    |		Load_Top	At_Offset_2
0040 01d6       |    |		Execute	Vector,Field_Write
0041 4809       |H   |		Short_Literal	0x9
0042 4803       |H   |		Short_Literal	0x3
0043 00da       |    |		Load_Top	At_Offset_2
0044 01d6       |    |		Execute	Vector,Field_Write
0045 6102       |a   |		Indirect_Literal	Discrete,0x148,{0x003a310b, 0x000000b0}
0046 4804       |H   |		Short_Literal	0x4
0047 00da       |    |		Load_Top	At_Offset_2
0048 01d6       |    |		Execute	Vector,Field_Write
0049 4809       |H   |		Short_Literal	0x9
004a 4805       |H   |		Short_Literal	0x5
004b 00da       |    |		Load_Top	At_Offset_2
004c 01d6       |    |		Execute	Vector,Field_Write
004d 60f6       |`   |		Indirect_Literal	Discrete,0x144,{0x003a3d0b, 0x000000b0}
004e 4806       |H   |		Short_Literal	0x6
004f 00da       |    |		Load_Top	At_Offset_2
0050 01d6       |    |		Execute	Vector,Field_Write
0051 4809       |H   |		Short_Literal	0x9
0052 4807       |H   |		Short_Literal	0x7
0053 00da       |    |		Load_Top	At_Offset_2
0054 01d6       |    |		Execute	Vector,Field_Write
0055 60ea       |`   |		Indirect_Literal	Discrete,0x140,{0x003a350b, 0x000000b0}
0056 4808       |H   |		Short_Literal	0x8
0057 00da       |    |		Load_Top	At_Offset_2
0058 01d6       |    |		Execute	Vector,Field_Write
0059 4801       |H   |		Short_Literal	0x1
005a e604       |    |		Load	0x3,0x4
005b 020e       |    |		Execute	Module,Augment_Imports
005c 0387       |    |		Declare_Variable	Package
005d 60de       |`   |		Indirect_Literal	Discrete,0x13c,{0x00000000, 0x0004b404}
005e e002       |    |		Load	0x0,0x2
005f e001       |    |		Load	0x0,0x1
0060 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0061 60d6       |`   |		Indirect_Literal	Discrete,0x138,{0x00000000, 0x001f5804}
0062 e002       |    |		Load	0x0,0x2
0063 e001       |    |		Load	0x0,0x1
0064 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0065 60ce       |`   |		Indirect_Literal	Discrete,0x134,{0x00000000, 0x003d7004}
0066 e002       |    |		Load	0x0,0x2
0067 e001       |    |		Load	0x0,0x1
0068 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0069 60c6       |`   |		Indirect_Literal	Discrete,0x130,{0x00000000, 0x000e3404}
006a e002       |    |		Load	0x0,0x2
006b e001       |    |		Load	0x0,0x1
006c 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
006d 60be       |`   |		Indirect_Literal	Discrete,0x12c,{0x00000000, 0x0036c804}
006e e002       |    |		Load	0x0,0x2
006f e001       |    |		Load	0x0,0x1
0070 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0071 60b6       |`   |		Indirect_Literal	Discrete,0x128,{0x00000000, 0x0036d804}
0072 e002       |    |		Load	0x0,0x2
0073 e001       |    |		Load	0x0,0x1
0074 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0075 60ae       |`   |		Indirect_Literal	Discrete,0x124,{0x00000000, 0x000cb004}
0076 e002       |    |		Load	0x0,0x2
0077 e001       |    |		Load	0x0,0x1
0078 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0079 60a6       |`   |		Indirect_Literal	Discrete,0x120,{0x00000000, 0x00324804}
007a e002       |    |		Load	0x0,0x2
007b e001       |    |		Load	0x0,0x1
007c 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
007d 609e       |`   |		Indirect_Literal	Discrete,0x11c,{0x00000000, 0x003e1404}
007e e002       |    |		Load	0x0,0x2
007f e001       |    |		Load	0x0,0x1
0080 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0081 6096       |`   |		Indirect_Literal	Discrete,0x118,{0x00000000, 0x000ca804}
0082 e002       |    |		Load	0x0,0x2
0083 e001       |    |		Load	0x0,0x1
0084 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0085 608e       |`   |		Indirect_Literal	Discrete,0x114,{0x00000000, 0x00065804}
0086 e002       |    |		Load	0x0,0x2
0087 e001       |    |		Load	0x0,0x1
0088 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0089 6086       |`   |		Indirect_Literal	Discrete,0x110,{0x00000000, 0x003b6804}
008a e002       |    |		Load	0x0,0x2
008b e001       |    |		Load	0x0,0x1
008c 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
008d 607e       |`~  |		Indirect_Literal	Discrete,0x10c,{0x00000000, 0x0001b004}
008e e002       |    |		Load	0x0,0x2
008f e001       |    |		Load	0x0,0x1
0090 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0091 6076       |`v  |		Indirect_Literal	Discrete,0x108,{0x00000000, 0x003d5804}
0092 e002       |    |		Load	0x0,0x2
0093 e001       |    |		Load	0x0,0x1
0094 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0095 606e       |`n  |		Indirect_Literal	Discrete,0x104,{0x00000000, 0x0037b404}
0096 e002       |    |		Load	0x0,0x2
0097 e001       |    |		Load	0x0,0x1
0098 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0099 6066       |`f  |		Indirect_Literal	Discrete,0x100,{0x00000000, 0x00324c04}
009a e002       |    |		Load	0x0,0x2
009b e001       |    |		Load	0x0,0x1
009c 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
009d 605e       |`^  |		Indirect_Literal	Discrete,0xfc,{0x00000000, 0x0004bc04}
009e e002       |    |		Load	0x0,0x2
009f e001       |    |		Load	0x0,0x1
00a0 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00a1 6056       |`V  |		Indirect_Literal	Discrete,0xf8,{0x00000000, 0x000ca404}
00a2 e002       |    |		Load	0x0,0x2
00a3 e001       |    |		Load	0x0,0x1
00a4 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00a5 604e       |`N  |		Indirect_Literal	Discrete,0xf4,{0x00000000, 0x00408804}
00a6 e002       |    |		Load	0x0,0x2
00a7 e001       |    |		Load	0x0,0x1
00a8 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00a9 6046       |`F  |		Indirect_Literal	Discrete,0xf0,{0x00000000, 0x000e3804}
00aa e002       |    |		Load	0x0,0x2
00ab e001       |    |		Load	0x0,0x1
00ac 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00ad e616       |    |		Load	0x3,0x16
00ae e60c       |    |		Load	0x3,0xc
00af e614       |    |		Load	0x3,0x14
00b0 e618       |    |		Load	0x3,0x18
00b1 e60a       |    |		Load	0x3,0xa
00b2 e60e       |    |		Load	0x3,0xe
00b3 e615       |    |		Load	0x3,0x15
00b4 e60d       |    |		Load	0x3,0xd
00b5 e60b       |    |		Load	0x3,0xb
00b6 6035       |`5  |		Indirect_Literal	Discrete,0xec,{0x00000001, 0x0010d539}
00b7 4802       |H   |		Short_Literal	0x2
00b8 e60f       |    |		Load	0x3,0xf
00b9 e608       |    |		Load	0x3,0x8
00ba 6031       |`1  |		Indirect_Literal	Discrete,0xec,{0x00000001, 0x0010d539}
00bb 4801       |H   |		Short_Literal	0x1
00bc e607       |    |		Load	0x3,0x7
00bd e617       |    |		Load	0x3,0x17
00be e613       |    |		Load	0x3,0x13
00bf e609       |    |		Load	0x3,0x9
00c0 e610       |    |		Load	0x3,0x10
00c1 e611       |    |		Load	0x3,0x11
00c2 e605       |    |		Load	0x3,0x5
00c3 e606       |    |		Load	0x3,0x6
00c4 4817       |H   |		Short_Literal	0x17
00c5 e604       |    |		Load	0x3,0x4
00c6 020e       |    |		Execute	Module,Augment_Imports
00c7 e604       |    |		Load	0x3,0x4
00c8 020f       |    |		Execute	Module,Activate
00c9 4801       |H   |		Short_Literal	0x1
00ca 4800       |H   |		Short_Literal	0x0
00cb 00e5       |    |		Load_Encached	Long_Integer_Cache
00cc 02a0       |    |		Declare_Subprogram	Null_Subprogram
00cd 4801       |H   |		Short_Literal	0x1
00ce 035d       | ]  |		Declare_Type	Array,Defined
00cf 0337       | 7  |		Declare_Variable	Array
00d0 e604       |    |		Load	0x3,0x4
00d1 191e       |    |		Execute	Package,Field_Reference,Field_Number 0x1e
00d2 4802       |H   |		Short_Literal	0x2
00d3 e602       |    |		Load	0x3,0x2
00d4 020e       |    |		Execute	Module,Augment_Imports
00d5 e602       |    |		Load	0x3,0x2
00d6 020f       |    |		Execute	Module,Activate
00d7 7807       |x   |		Jump	BODY_0020
00d8 600f       |`   |		Indirect_Literal	Discrete,0xe8,{0x00000000, 0x00001f40}
00d9 600a       |`   |		Indirect_Literal	Discrete,0xe4,{0x00000000, 0x00190c04}
00da e002       |    |		Load	0x0,0x2
00db e001       |    |		Load	0x0,0x1
00dc 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00dd 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00de 7f48       | H  |		Jump	0x27
00df			BODY_0020:
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, 0x0010d539}
00f0 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e3804}
00f4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00408804}
00f8 0000 0000  |    |		.LITERAL	{0x00000000, 0x000ca404}
00fc 0000 0000  |    |		.LITERAL	{0x00000000, 0x0004bc04}
0100 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324c04}
0104 0000 0000  |    |		.LITERAL	{0x00000000, 0x0037b404}
0108 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d5804}
010c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0001b004}
0110 0000 0000  |    |		.LITERAL	{0x00000000, 0x003b6804}
0114 0000 0000  |    |		.LITERAL	{0x00000000, 0x00065804}
0118 0000 0000  |    |		.LITERAL	{0x00000000, 0x000ca804}
011c 0000 0000  |    |		.LITERAL	{0x00000000, 0x003e1404}
0120 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324804}
0124 0000 0000  |    |		.LITERAL	{0x00000000, 0x000cb004}
0128 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036d804}
012c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036c804}
0130 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e3404}
0134 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d7004}
0138 0000 0000  |    |		.LITERAL	{0x00000000, 0x001f5804}
013c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0004b404}
0140 003a 350b  | :5 |		.LITERAL	{0x003a350b, 0x000000b0}
0144 003a 3d0b  | := |		.LITERAL	{0x003a3d0b, 0x000000b0}
0148 003a 310b  | :1 |		.LITERAL	{0x003a310b, 0x000000b0}
014c 003a 390b  | :9 |		.LITERAL	{0x003a390b, 0x000000b0}
0150 003a 410b  | :A |		.LITERAL	{0x003a410b, 0x000000b0}
0154 003d 910b  | =  |		.LITERAL	{0x003d910b, 0x000000b0}
0158 ; --------------------------------------------------------------------------------------
0158 ; Segment Table
0158 ; --------------------------------------------------------------------------------------
0158 0028 002f  | ( /|		.XXX[0x8]
015a 003d 0045  | = E|
015c 004d 0055  | M U|
015e 0000 0000  |    |
0160 ; --------------------------------------------------------------------------------------
0160 ; Debug Table
0160 ; --------------------------------------------------------------------------------------
0160 0004 0011  |    |		.DEBUG4	0x0004,0x0011,0x3036,0x0000,0x0001,0x0000
0166 95c9 ccb8  |    |		.XXX[0x9a]
0168 28bd 49d5  |( I |
016a b931 95b9  | 1  |
016c 9dd1 a151  |   Q|
016e bd49 85cd  | I  |
0170 d195 c9cc  |    |
0172 81ec 2880  |  ( |
0174 8094 80b8  |    |
0176 b8b9 b9bd  |    |
0178 d081 91bd  |    |
017a b994 81e5  |    |
017c 95d0 b8b8  |    |
017e b829 f481  | )  |
0180 8991 9598  |    |
0182 2880 2894  |( ( |
0184 2894 8081  |(   |
0186 51a1 95cd  |Q   |
0188 9481 c1c9  |    |
018a bd8d 9591  |    |
018c d5c9 95cc  |    |
018e 81a1 85b9  |    |
0190 91b1 9481  |    |
0192 89a5 d1b5  |    |
0194 85c0 81c1  |    |
0196 c9bd 8d95  |    |
0198 cdcd a5b9  |    |
019a 9cb8 2894  |  ( |
019c 2894 8080  |(   |
019e f189 a5d1  |    |
01a0 b585 c081  |    |
01a2 8dbd b1d5  |    |
01a4 b5b9 ccf8  |    |
01a6 80f1 89a5  |    |
01a8 d1b5 85c0  |    |
01aa 81c9 bddd  |    |
01ac ccf8 80f1  |    |
01ae 89a5 d1b5  |    |
01b0 85c0 81c1  |    |
01b2 a5e0 bda5  |    |
01b4 b98d a0f8  |    |
01b6 80f1 b585  |    |
01b8 9db9 a599  |    |
01ba a58d 85d1  |    |
01bc a5bd b8f8  |    |
01be 8109 3589  |  5 |
01c0 959c 2894  |  ( |
01c2 28bd 0935  |(  5|
01c4 8995 9c81  |    |
01c6 ec28 8080  | (  |
01c8 bd09 35b5  |  5 |
01ca 859d b9a5  |    |
01cc 99a5 8d85  |    |
01ce d1a5 bdb8  |    |
01d0 81e1 9195  |    |
01d2 9828 8080  | (  |
01d4 bd09 35c9  |  5 |
01d6 95cd bdb1  |    |
01d8 d5d1 a5bd  |    |
01da b881 e191  |    |
01dc 9598 2880  |  ( |
01de 80bd 0935  |   5|
01e0 c9bd ddcc  |    |
01e2 81e1 9195  |    |
01e4 9828 8080  | (  |
01e6 bd09 358d  |  5 |
01e8 bdb1 cc81  |    |
01ea e191 9598  |    |
01ec 2828 8080  |((  |
01ee bd09 358d  |  5 |
01f0 d5c9 c995  |    |
01f2 b9d1 c9bd  |    |
01f4 dc80 c081  |    |
01f6 9195 9828  |   (|
01f8 8081 9dcd  |    |
01fa 85d9 9428  |   (|
01fc 8080 8080  |    |
01fe c0b8 c081  |    |