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

⟦be5a1210a⟧

    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 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
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,{0x003b6d0b, 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 1917       |    |		Execute	Package,Field_Reference,Field_Number 0x17
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 e5fc       |    |		Load	0x2,-0x4
00e0 e5fd       |    |		Load	0x2,-0x3
00e1 e5fe       |    |		Load	0x2,-0x2
00e2 e5ff       |    |		Load	0x2,-0x1
00e3 8603       |    |		Call	0x3,0x3
00e4 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00e5 0000 0000  |    |		.XXX[0x3]
00e7 0000       |    |
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 003b 6d0b  | ;m |		.LITERAL	{0x003b6d0b, 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,0x097f,0x0000,0x0001,0x0000
016e c745 f526  | E &|		.XXX[0x92]
0170 5616 3746  |V 7F|
0172 96f6 e000  |    |
0174 0004 2000  |    |
0176 0002 3215  |  2 |
0178 46f6 f6c7  |F   |
017a 32e5 0726  |2  &|
017c f666 96c6  | f  |
017e 52e5 3657  |R 6W|
0180 45f4 4656  |E FV|
0182 6617 56c7  |f V |
0184 45f5 0726  |E  &|
0186 5666 9786  |Vf  |
0188 5730 0000  |W0  |
018a 0360 0000  | `  |
018c 0232 1546  | 2 F|
018e f6f6 c732  |   2|
0190 e507 26f6  |  & |
0192 6696 c652  |f  R|
0194 e536 5745  | 6WE|
0196 f446 5666  | FVf|
0198 1756 c745  | V E|
019a f4c6 f675  |   u|
019c f466 96c6  | f  |
019e 5000 0002  |P   |
01a0 5000 0002  |P   |
01a2 1215 46f6  |  F |
01a4 f6c7 32e5  |  2 |
01a6 0726 f666  | & f|
01a8 96c6 52e5  |  R |
01aa 3657 45f4  |6WE |
01ac 4656 6617  |FVf |
01ae 56c7 45f4  |V E |
01b0 6696 c746  |f  F|
01b2 5720 0000  |W   |
01b4 0200 0000  |    |
01b6 0232 1546  | 2 F|
01b8 f6f6 c732  |   2|
01ba e507 26f6  |  & |
01bc 6696 c652  |f  R|
01be e536 5745  | 6WE|
01c0 f446 5666  | FVf|
01c2 1756 c745  | V E|
01c4 f416 3746  |  7F|
01c6 9766 9747  | f G|
01c8 9000 0007  |    |
01ca 8000 0001  |    |
01cc a215 46f6  |  F |
01ce f6c7 32e5  |  2 |
01d0 0726 f666  | & f|
01d2 96c6 52e5  |  R |
01d4 3657 45f4  |6WE |
01d6 4656 6617  |FVf |
01d8 56c7 4000  |V @ |
01da 0008 4000  |  @ |
01dc 0001 b215  |    |
01de 46f6 f6c7  |F   |
01e0 32e5 0726  |2  &|
01e2 f666 96c6  | f  |
01e4 52e5 3657  |R 6W|
01e6 45f4 1637  |E  7|
01e8 4697 6697  |F f |
01ea 4790 0000  |G   |
01ec 0730 0000  | 0  |
01ee 0122 1546  | " F|
01f0 f6f6 c732  |   2|
01f2 e507 26f6  |  & |
01f4 6696 c652  |f  R|
01f6 e536 5740  | 6W@|
01f8 0000 07d0  |    |
01fa 0000 01f2  |    |
01fc 1546 f6f6  | F  |
01fe c732 e507  | 2  |