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

⟦49c274844⟧

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

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 00e8       |    |		.CONST	0x00e8								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 00e0       |    |		.CONST	0x00e0								; 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 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
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 008a       |    |		.CONST	0x008a								; Address of begin
0021 0004       |    |		.CONST	0x0004								; Address of exception handler
0022 0011       |    |		.CONST	0x0011								; Number of locals
0023			INIT_0020:
0023 7801       |x   |		Jump	0x25
0024 0002       |    |		.XXX[0x1]
0025 006f       | o  |		Action	Break_Unconditional
0026 785c       |x\  |		Jump	0x83
0027 4800       |H   |		Short_Literal	0x0
0028 60b3       |`   |		Indirect_Literal	Discrete,0xdc,{0x0014450b, 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 60a9       |`   |		Indirect_Literal	Discrete,0xd8,{0x00000000, 0x00065804}
002f e002       |    |		Load	0x0,0x2
0030 e001       |    |		Load	0x0,0x1
0031 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0032 60a1       |`   |		Indirect_Literal	Discrete,0xd4,{0x00000000, 0x001a9404}
0033 e002       |    |		Load	0x0,0x2
0034 e001       |    |		Load	0x0,0x1
0035 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0036 6099       |`   |		Indirect_Literal	Discrete,0xd0,{0x00000000, 0x0036c804}
0037 e002       |    |		Load	0x0,0x2
0038 e001       |    |		Load	0x0,0x1
0039 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
003a 6091       |`   |		Indirect_Literal	Discrete,0xcc,{0x00000000, 0x003d4404}
003b e002       |    |		Load	0x0,0x2
003c e001       |    |		Load	0x0,0x1
003d 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
003e 6089       |`   |		Indirect_Literal	Discrete,0xc8,{0x00000000, 0x00372004}
003f e002       |    |		Load	0x0,0x2
0040 e001       |    |		Load	0x0,0x1
0041 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0042 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
0043 6080       |`   |		Indirect_Literal	Discrete,0xc4,{0x00000000, 0x000b6004}
0044 e002       |    |		Load	0x0,0x2
0045 e001       |    |		Load	0x0,0x1
0046 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0047 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
0048 6077       |`w  |		Indirect_Literal	Discrete,0xc0,{0x00000000, 0x003d4804}
0049 e002       |    |		Load	0x0,0x2
004a e001       |    |		Load	0x0,0x1
004b 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
004c 606f       |`o  |		Indirect_Literal	Discrete,0xbc,{0x00000000, 0x0004bc04}
004d e002       |    |		Load	0x0,0x2
004e e001       |    |		Load	0x0,0x1
004f 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0050 6067       |`g  |		Indirect_Literal	Discrete,0xb8,{0x00000000, 0x003e1004}
0051 e002       |    |		Load	0x0,0x2
0052 e001       |    |		Load	0x0,0x1
0053 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0054 605f       |`_  |		Indirect_Literal	Discrete,0xb4,{0x00000000, 0x00273404}
0055 e002       |    |		Load	0x0,0x2
0056 e001       |    |		Load	0x0,0x1
0057 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0058 6057       |`W  |		Indirect_Literal	Discrete,0xb0,{0x00000000, 0x00273004}
0059 e002       |    |		Load	0x0,0x2
005a e001       |    |		Load	0x0,0x1
005b 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
005c 604f       |`O  |		Indirect_Literal	Discrete,0xac,{0x00000000, 0x00373c04}
005d e002       |    |		Load	0x0,0x2
005e e001       |    |		Load	0x0,0x1
005f 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0060 6047       |`G  |		Indirect_Literal	Discrete,0xa8,{0x00000000, 0x000e3804}
0061 e002       |    |		Load	0x0,0x2
0062 e001       |    |		Load	0x0,0x1
0063 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0064 603f       |`?  |		Indirect_Literal	Discrete,0xa4,{0x00000000, 0x000e1804}
0065 e002       |    |		Load	0x0,0x2
0066 e001       |    |		Load	0x0,0x1
0067 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0068 e60d       |    |		Load	0x3,0xd
0069 6036       |`6  |		Indirect_Literal	Discrete,0xa0,{0x00000001, 0x000ea359}
006a 4804       |H   |		Short_Literal	0x4
006b e609       |    |		Load	0x3,0x9
006c 6033       |`3  |		Indirect_Literal	Discrete,0xa0,{0x00000001, 0x000ea359}
006d 4803       |H   |		Short_Literal	0x3
006e e608       |    |		Load	0x3,0x8
006f 6030       |`0  |		Indirect_Literal	Discrete,0xa0,{0x00000001, 0x000ea359}
0070 4802       |H   |		Short_Literal	0x2
0071 602e       |`.  |		Indirect_Literal	Discrete,0xa0,{0x00000001, 0x000ea359}
0072 4801       |H   |		Short_Literal	0x1
0073 e60a       |    |		Load	0x3,0xa
0074 e607       |    |		Load	0x3,0x7
0075 e606       |    |		Load	0x3,0x6
0076 e60b       |    |		Load	0x3,0xb
0077 e605       |    |		Load	0x3,0x5
0078 e611       |    |		Load	0x3,0x11
0079 e610       |    |		Load	0x3,0x10
007a e60f       |    |		Load	0x3,0xf
007b 6020       |`   |		Indirect_Literal	Discrete,0x9c,{0x0000af84, 0xcd030081}
007c e604       |    |		Load	0x3,0x4
007d 4815       |H   |		Short_Literal	0x15
007e e602       |    |		Load	0x3,0x2
007f 020e       |    |		Execute	Module,Augment_Imports
0080 e602       |    |		Load	0x3,0x2
0081 020f       |    |		Execute	Module,Activate
0082 7807       |x   |		Jump	BODY_0020
0083 6014       |`   |		Indirect_Literal	Discrete,0x98,{0x00000000, 0x00001f40}
0084 600f       |`   |		Indirect_Literal	Discrete,0x94,{0x00000000, 0x00190c04}
0085 e002       |    |		Load	0x0,0x2
0086 e001       |    |		Load	0x0,0x1
0087 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0088 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0089 7f9d       |    |		Jump	0x27
008a			BODY_0020:
008a e5fa       |    |		Load	0x2,-0x6
008b e5fb       |    |		Load	0x2,-0x5
008c e5fc       |    |		Load	0x2,-0x4
008d e5fd       |    |		Load	0x2,-0x3
008e e5fe       |    |		Load	0x2,-0x2
008f e5ff       |    |		Load	0x2,-0x1
0090 8603       |    |		Call	0x3,0x3
0091 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0092 0000 0000  |    |		.XXX[0x2]
0094 0000 0000  |    |		.LITERAL	{0x00000000, 0x00190c04}
0098 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001f40}
009c 0000 af84  |    |		.LITERAL	{0x0000af84, 0xcd030081}
00a0 0000 0001  |    |		.LITERAL	{0x00000001, 0x000ea359}
00a4 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e1804}
00a8 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e3804}
00ac 0000 0000  |    |		.LITERAL	{0x00000000, 0x00373c04}
00b0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00273004}
00b4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00273404}
00b8 0000 0000  |    |		.LITERAL	{0x00000000, 0x003e1004}
00bc 0000 0000  |    |		.LITERAL	{0x00000000, 0x0004bc04}
00c0 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d4804}
00c4 0000 0000  |    |		.LITERAL	{0x00000000, 0x000b6004}
00c8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00372004}
00cc 0000 0000  |    |		.LITERAL	{0x00000000, 0x003d4404}
00d0 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036c804}
00d4 0000 0000  |    |		.LITERAL	{0x00000000, 0x001a9404}
00d8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00065804}
00dc 0014 450b  |  E |		.LITERAL	{0x0014450b, 0x000000b0}
00e0 ; --------------------------------------------------------------------------------------
00e0 ; Segment Table
00e0 ; --------------------------------------------------------------------------------------
00e0 0028       | (  |		.XXX[0x1]
00e1 0000 0000  |    |		.BLANK	0000[0x7]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; Debug Table
00e8 ; --------------------------------------------------------------------------------------
00e8 0004 000e  |    |		.DEBUG4	0x0004,0x000e,0xa359,0x0000,0x0001,0x0000
00ee 3121 3d4d  |1!=M|		.XXX[0xbd]
00f0 517d 2511  |Q}% |
00f2 7d19 2531  |} %1|
00f4 1402 1864  |   d|
00f6 85b5 858d  |    |
00f8 a1a5 b994  |    |
00fa b995 d1a1  |    |
00fc 95c9 b995  |    |
00fe d17d a1bd  | }  |
0100 cdd1 7da5  |  } |
0102 9001 7435  |  t5|
0104 1551 2115  | Q! |
0106 497d 2511  |I}% |
0108 7d19 2531  |} %1|
010a 1401 cc35  |   5|
010c 554d 157d  |UM }|
010e 0d21 150d  | !  |
0110 2d4d 5535  |-MU5|
0112 4c00 6815  |L h |
0114 1905 314d  |  1M|
0116 1402 1c29  |   )|
0118 1125 051d  | %  |
011a 393d 4d51  |9=MQ|
011c 250c 0220  |%   |
011e 2d51 0d41  |-Q A|
0120 7d25 417d  |}%A}|
0122 093d 3d50  | ==P|
0124 01ec 217d  |  !}|
0126 0511 057c  |   ||
0128 c4cd 7c01  |  | |
012a e000 0224  |   $|
012c 2511 5535  |% U5|
012e 417d 1925  |A} %|
0130 3114 0148  |1  H|
0132 2d51 0d41  |-Q A|
0134 7d25 417d  |}%A}|
0136 1155 3540  | U5@|
0138 0228 217d  | (!}|
013a 0511 057c  |   ||
013c c4d1 7c00  |  | |
013e e439 5115  | 9Q |
0140 3139 1551  |19 Q|
0142 7d41 493d  |}AI=|
0144 1155 0d50  | U P|
0146 0048 217d  | H!}|
0148 0511 057c  |   ||
014a c4d5 7c02  |  | |
014c 2c39 5115  |,9Q |
014e 3139 1551  |19 Q|
0150 7d41 493d  |}AI=|
0152 1925 3114  | %1 |
0154 0230 217d  | 0!}|
0156 0511 057c  |   ||
0158 c4d9 7c01  |  | |
015a 0c41 5149  | AQI|
015c 0539 4d19  | 9M |
015e 1549 7d1d  | I} |
0160 1539 1549  | 9 I|
0162 250c 0234  |%  4|
0164 217d 0511  |!}  |
0166 057c c4dd  | |  |
0168 7c00 bc25  ||  %|
016a 5149 0539  |QI 9|
016c 4d41 3d49  |MA=I|
016e 5000 cc21  |P  !|
0170 7d05 1105  |}   |
0172 7cc4 e17c  ||  ||
0174 00e0 3951  |  9Q|
0176 4905 394d  |I 9M|
0178 413d 4951  |A=IQ|
017a 7d11 1519  |}   |
017c 4c02 3821  |L 8!|
017e 7d05 1105  |}   |
0180 7cc4 e57c  ||  ||
0182 00a8 5551  |  UQ|
0184 4905 394d  |I 9M|
0186 413d 4951  |A=IQ|
0188 7d25 3951  |}%9Q|
018a 1549 0d21  | I !|
018c 0539 1d14  | 9  |
018e 01c4 217d  |  !}|
0190 0511 057c  |   ||
0192 c505 7c01  |  | |
0194 0439 5149  | 9QI|
0196 0539 4d41  | 9MA|
0198 3d49 517d  |=IQ}|
019a 3905 3514  |9 5 |
019c 023c 217d  | <!}|
019e 0511 057c  |   ||
01a0 c509 7c01  |  | |
01a2 f841 5149  | AQI|
01a4 0539 4d41  | 9MA|
01a6 3d49 517d  |=IQ}|
01a8 4d15 4959  |M IY|
01aa 1548       | H  |
01ab 0000 0000  |    |		.BLANK	0000[0x55]