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

⟦889095c2a⟧

    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 00ca       |    |		Action	Exit_Nullary_Function
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,{0x003b410b, 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 1911       |    |		Execute	Package,Field_Reference,Field_Number 0x11
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 00ca       |    |		Action	Exit_Nullary_Function
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 003b 410b  | ;A |		.LITERAL	{0x003b410b, 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 0010  |    |		.DEBUG4	0x0004,0x0010,0x0993,0x0000,0x0001,0x0000
0166 dbdb 5b58  |  [X|		.XXX[0x9a]
0168 5b99 1ccb  |[   |
016a 9058 989c  | X  |
016c 995d 9a58  | ] X|
016e 5d1a 5bdb  |] [ |
0170 9ccb 9399  |    |
0172 5959 0000  |YY  |
0174 000b c000  |    |
0176 0006 885d  |   ]|
0178 1bdb db1c  |    |
017a cb9c 1c9b  |    |
017c d99a 5b19  |  [ |
017e 4b9b 9bd7  |K   |
0180 dc1c 9959  |   Y|
0182 9a5e 195c  | ^ \|
0184 c000 0000  |    |
0186 8000 0017  |    |
0188 8000 000d  |    |
018a 10aa 37b7  |  7 |
018c b639 9728  | 9 (|
018e 3937 b334  |97 4|
0190 b632 9727  | 2 '|
0192 37af a839  |7  9|
0194 32b3 34bc  |2 4 |
0196 32b9 8000  |2   |
0198 0004 8000  |    |
019a 0013 10ba  |    |
019c 37b7 b639  |7  9|
019e 9737 32ba  | 72 |
01a0 3bb7 b935  |;  5|
01a2 b4b7 3397  |  3 |
01a4 34b7 3a32  |4 :2|
01a6 b931 b430  | 1 0|
01a8 b733 b2af  | 3  |
01aa b232 b339  | 2 9|
01ac 9711 1591  |    |
01ae 0000 0001  |    |
01b0 0000 0009  |    |
01b2 0000 0026  |   &|
01b4 2154 6f6f  |!Too|
01b6 6c73 2e4e  |ls.N|
01b8 6574 776f  |etwo|
01ba 726b 696e  |rkin|
01bc 672e 496e  |g.In|
01be 7465 7263  |terc|
01c0 6861 6e67  |hang|
01c2 655f 4465  |e_De|
01c4 6673 2e22  |fs."|
01c6 2b22 0000  |+"  |
01c8 0009 0000  |    |
01ca 0026 2174  | &!t|
01cc 6f6f 6c73  |ools|
01ce 2e6e 6574  |.net|
01d0 776f 726b  |work|
01d2 696e 672e  |ing.|
01d4 6674 705f  |ftp_|
01d6 6465 6673  |defs|
01d8 2e73 7461  |.sta|
01da 7475 735f  |tus_|
01dc 636f 6465  |code|
01de 0000 0002  |    |
01e0 0000 0012  |    |
01e2 0000 004c  |   L|
01e4 42a8 dede  |B   |
01e6 d8e6 5c9c  |  \ |
01e8 cae8 eede  |    |
01ea e4d6 d2dc  |    |
01ec ce5c 8ce8  | \  |
01ee e0be 88ca  |    |
01f0 cce6 5ca6  |  \ |
01f2 e8c2 e8ea  |    |
01f4 e6be 86de  |    |
01f6 c8ca 0000  |    |
01f8 0012 0000  |    |
01fa 0024 42e8  | $B |
01fc dede d8e6  |    |
01fe 5cda c2e0  |\   |