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

⟦995950a8b⟧

    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 0168       | h  |		.CONST	0x0168								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 015c       | \  |		.CONST	0x015c								; 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 4508       |E   |		Exit_Suprogram	New_Top_Offset 0x8
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 612f       |a/  |		Indirect_Literal	Discrete,0x158,{0x003a4d0b, 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 6124       |a$  |		Indirect_Literal	Discrete,0x154,{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 6112       |a   |		Indirect_Literal	Discrete,0x150,{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 6106       |a   |		Indirect_Literal	Discrete,0x14c,{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 60fa       |`   |		Indirect_Literal	Discrete,0x148,{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 60ee       |`   |		Indirect_Literal	Discrete,0x144,{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 60e2       |`   |		Indirect_Literal	Discrete,0x140,{0x00000000, 0x0004b404}
005e e002       |    |		Load	0x0,0x2
005f e001       |    |		Load	0x0,0x1
0060 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0061 60da       |`   |		Indirect_Literal	Discrete,0x13c,{0x00000000, 0x001f5804}
0062 e002       |    |		Load	0x0,0x2
0063 e001       |    |		Load	0x0,0x1
0064 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0065 60d2       |`   |		Indirect_Literal	Discrete,0x138,{0x00000000, 0x003d7004}
0066 e002       |    |		Load	0x0,0x2
0067 e001       |    |		Load	0x0,0x1
0068 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0069 60ca       |`   |		Indirect_Literal	Discrete,0x134,{0x00000000, 0x000e3404}
006a e002       |    |		Load	0x0,0x2
006b e001       |    |		Load	0x0,0x1
006c 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
006d 60c2       |`   |		Indirect_Literal	Discrete,0x130,{0x00000000, 0x0036c804}
006e e002       |    |		Load	0x0,0x2
006f e001       |    |		Load	0x0,0x1
0070 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0071 60ba       |`   |		Indirect_Literal	Discrete,0x12c,{0x00000000, 0x0036d804}
0072 e002       |    |		Load	0x0,0x2
0073 e001       |    |		Load	0x0,0x1
0074 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0075 60b2       |`   |		Indirect_Literal	Discrete,0x128,{0x00000000, 0x000cb004}
0076 e002       |    |		Load	0x0,0x2
0077 e001       |    |		Load	0x0,0x1
0078 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0079 60aa       |`   |		Indirect_Literal	Discrete,0x124,{0x00000000, 0x00324804}
007a e002       |    |		Load	0x0,0x2
007b e001       |    |		Load	0x0,0x1
007c 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
007d 60a2       |`   |		Indirect_Literal	Discrete,0x120,{0x00000000, 0x003e1404}
007e e002       |    |		Load	0x0,0x2
007f e001       |    |		Load	0x0,0x1
0080 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0081 609a       |`   |		Indirect_Literal	Discrete,0x11c,{0x00000000, 0x000ca804}
0082 e002       |    |		Load	0x0,0x2
0083 e001       |    |		Load	0x0,0x1
0084 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0085 6092       |`   |		Indirect_Literal	Discrete,0x118,{0x00000000, 0x00065804}
0086 e002       |    |		Load	0x0,0x2
0087 e001       |    |		Load	0x0,0x1
0088 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0089 608a       |`   |		Indirect_Literal	Discrete,0x114,{0x00000000, 0x003b6804}
008a e002       |    |		Load	0x0,0x2
008b e001       |    |		Load	0x0,0x1
008c 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
008d 6082       |`   |		Indirect_Literal	Discrete,0x110,{0x00000000, 0x0001b004}
008e e002       |    |		Load	0x0,0x2
008f e001       |    |		Load	0x0,0x1
0090 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0091 607a       |`z  |		Indirect_Literal	Discrete,0x10c,{0x00000000, 0x003d5804}
0092 e002       |    |		Load	0x0,0x2
0093 e001       |    |		Load	0x0,0x1
0094 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0095 6072       |`r  |		Indirect_Literal	Discrete,0x108,{0x00000000, 0x0037b404}
0096 e002       |    |		Load	0x0,0x2
0097 e001       |    |		Load	0x0,0x1
0098 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0099 606a       |`j  |		Indirect_Literal	Discrete,0x104,{0x00000000, 0x00324c04}
009a e002       |    |		Load	0x0,0x2
009b e001       |    |		Load	0x0,0x1
009c 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
009d 6062       |`b  |		Indirect_Literal	Discrete,0x100,{0x00000000, 0x0004bc04}
009e e002       |    |		Load	0x0,0x2
009f e001       |    |		Load	0x0,0x1
00a0 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00a1 605a       |`Z  |		Indirect_Literal	Discrete,0xfc,{0x00000000, 0x000ca404}
00a2 e002       |    |		Load	0x0,0x2
00a3 e001       |    |		Load	0x0,0x1
00a4 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00a5 6052       |`R  |		Indirect_Literal	Discrete,0xf8,{0x00000000, 0x00408804}
00a6 e002       |    |		Load	0x0,0x2
00a7 e001       |    |		Load	0x0,0x1
00a8 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
00a9 604a       |`J  |		Indirect_Literal	Discrete,0xf4,{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 6039       |`9  |		Indirect_Literal	Discrete,0xf0,{0x00000001, 0x0010d539}
00b7 4802       |H   |		Short_Literal	0x2
00b8 e60f       |    |		Load	0x3,0xf
00b9 e608       |    |		Load	0x3,0x8
00ba 6035       |`5  |		Indirect_Literal	Discrete,0xf0,{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 1914       |    |		Execute	Package,Field_Reference,Field_Number 0x14
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 6013       |`   |		Indirect_Literal	Discrete,0xec,{0x00000000, 0x00001f40}
00d9 600e       |`   |		Indirect_Literal	Discrete,0xe8,{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 e5f9       |    |		Load	0x2,-0x7
00e0 e5fa       |    |		Load	0x2,-0x6
00e1 e5fb       |    |		Load	0x2,-0x5
00e2 e5fc       |    |		Load	0x2,-0x4
00e3 e5fd       |    |		Load	0x2,-0x3
00e4 e5fe       |    |		Load	0x2,-0x2
00e5 e5ff       |    |		Load	0x2,-0x1
00e6 8603       |    |		Call	0x3,0x3
00e7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00e8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00190c04}
00ec 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001f40}
00f0 0000 0001  |    |		.LITERAL	{0x00000001, 0x0010d539}
00f4 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e3804}
00f8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00408804}
00fc 0000 0000  |    |		.LITERAL	{0x00000000, 0x000ca404}
0100 0000 0000  |    |		.LITERAL	{0x00000000, 0x0004bc04}
0104 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324c04}
0108 0000 0000  |    |		.LITERAL	{0x00000000, 0x0037b404}
010c 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d5804}
0110 0000 0000  |    |		.LITERAL	{0x00000000, 0x0001b004}
0114 0000 0000  |    |		.LITERAL	{0x00000000, 0x003b6804}
0118 0000 0000  |    |		.LITERAL	{0x00000000, 0x00065804}
011c 0000 0000  |    |		.LITERAL	{0x00000000, 0x000ca804}
0120 0000 0000  |    |		.LITERAL	{0x00000000, 0x003e1404}
0124 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324804}
0128 0000 0000  |    |		.LITERAL	{0x00000000, 0x000cb004}
012c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036d804}
0130 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036c804}
0134 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e3404}
0138 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d7004}
013c 0000 0000  |    |		.LITERAL	{0x00000000, 0x001f5804}
0140 0000 0000  |    |		.LITERAL	{0x00000000, 0x0004b404}
0144 003a 350b  | :5 |		.LITERAL	{0x003a350b, 0x000000b0}
0148 003a 3d0b  | := |		.LITERAL	{0x003a3d0b, 0x000000b0}
014c 003a 310b  | :1 |		.LITERAL	{0x003a310b, 0x000000b0}
0150 003a 390b  | :9 |		.LITERAL	{0x003a390b, 0x000000b0}
0154 003a 410b  | :A |		.LITERAL	{0x003a410b, 0x000000b0}
0158 003a 4d0b  | :M |		.LITERAL	{0x003a4d0b, 0x000000b0}
015c ; --------------------------------------------------------------------------------------
015c ; Segment Table
015c ; --------------------------------------------------------------------------------------
015c 0028 002f  | ( /|		.XXX[0x6]
015e 003d 0045  | = E|
0160 004d 0055  | M U|
0162 0000 0000  |    |		.BLANK	0000[0x6]
0168 ; --------------------------------------------------------------------------------------
0168 ; Debug Table
0168 ; --------------------------------------------------------------------------------------
0168 0004 0010  |    |		.DEBUG4	0x0004,0x0010,0x097d,0x0000,0x0001,0x0000
016e dc44 000b  | D  |		.XXX[0x30]
0170 2216 208f  |"   |
0172 5269 7344  |RisD|
0174 0000 0490  |    |
0176 47af 43d3  |G C |
0178 9ce0 0002  |    |
017a 4400 0000  |D   |
017c 0000 0000  |    |
017e 000d a65c  |   \|
0180 8580 0000  |    |
0182 400d a65e  |@  ^|
0184 8580 0000  |    |
0186 4005 c609  |@   |
0188 9800 0000  |    |
018a 0000 0000  |    |
018c 0003 6997  |  i |
018e a160 0000  | `  |
0190 1008 22b3  |  " |
0192 d56c 6f40  | lo@|
0194 0003 d000  |    |
0196 0000 9000  |    |
0198 140f a000  |    |
019a 0000 2000  |    |
019c 0000 2000  |    |
019e 0000 0000  |    |		.BLANK	0000[0xa]
01a8 041c 2000  |    |		.XXX[0x2]
01aa 0000 0000  |    |		.BLANK	0000[0x7]
01b1 0008 0000  |    |		.XXX[0x3e]
01b3 0000 0000  |    |
01b5 0018 0008  |    |
01b7 c128 01eb  | (  |
01b9 b670 01eb  | p  |
01bb 88e8 01ec  |    |
01bd 2ae8 00f5  |*   |
01bf f084 0000  |    |
01c1 22e0 a0ab  |"   |
01c3 6064 5f75  |`d_u|
01c5 0000 0490  |    |
01c7 55b0 3788  |U 7 |
01c9 5fe0 0002  |_   |
01cb 4400 0000  |D   |
01cd 0000 0000  |    |
01cf 000e 3722  |  7"|
01d1 8580 0000  |    |
01d3 400e 3724  |@ 7$|
01d5 8580 0000  |    |
01d7 4004 c600  |@   |
01d9 9800 0000  |    |
01db 0000 0000  |    |
01dd 0003 8dc9  |    |
01df 2160 0000  |!`  |
01e1 1008 2a65  |  *e|
01e3 922b 6a70  | +jp|
01e5 0001 2000  |    |
01e7 0000 9000  |    |
01e9 14ca 6000  |  ` |
01eb 0000 2000  |    |
01ed 0000 2000  |    |
01ef 0000 0000  |    |		.BLANK	0000[0xa]
01f9 041c 2000  |    |		.XXX[0x2]
01fb 0000 0000  |    |		.BLANK	0000[0x5]