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

⟦b506777a3⟧

    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 00a8       |    |		.CONST	0x00a8								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 00a4       |    |		.CONST	0x00a4								; 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 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
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 006f       | o  |		.CONST	0x006f								; Address of begin
0021 0004       |    |		.CONST	0x0004								; Address of exception handler
0022 000b       |    |		.CONST	0x000b								; Number of locals
0023			INIT_0020:
0023 7801       |x   |		Jump	0x25
0024 0002       |    |		.XXX[0x1]
0025 006f       | o  |		Action	Break_Unconditional
0026 7841       |xA  |		Jump	0x68
0027 4800       |H   |		Short_Literal	0x0
0028 6077       |`w  |		Indirect_Literal	Discrete,0xa0,{0x003d690b, 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 606d       |`m  |		Indirect_Literal	Discrete,0x9c,{0x00000000, 0x0036c804}
002f e002       |    |		Load	0x0,0x2
0030 e001       |    |		Load	0x0,0x1
0031 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0032 6065       |`e  |		Indirect_Literal	Discrete,0x98,{0x00000000, 0x00065c04}
0033 e002       |    |		Load	0x0,0x2
0034 e001       |    |		Load	0x0,0x1
0035 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0036 605d       |`]  |		Indirect_Literal	Discrete,0x94,{0x00000000, 0x000e3404}
0037 e002       |    |		Load	0x0,0x2
0038 e001       |    |		Load	0x0,0x1
0039 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
003a 6055       |`U  |		Indirect_Literal	Discrete,0x90,{0x00000000, 0x0001ac04}
003b e002       |    |		Load	0x0,0x2
003c e001       |    |		Load	0x0,0x1
003d 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
003e 604d       |`M  |		Indirect_Literal	Discrete,0x8c,{0x00000000, 0x0004bc04}
003f e002       |    |		Load	0x0,0x2
0040 e001       |    |		Load	0x0,0x1
0041 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0042 6045       |`E  |		Indirect_Literal	Discrete,0x88,{0x00000000, 0x00010804}
0043 e002       |    |		Load	0x0,0x2
0044 e001       |    |		Load	0x0,0x1
0045 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0046 603d       |`=  |		Indirect_Literal	Discrete,0x84,{0x00000000, 0x00324404}
0047 e002       |    |		Load	0x0,0x2
0048 e001       |    |		Load	0x0,0x1
0049 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
004a 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
004b 6034       |`4  |		Indirect_Literal	Discrete,0x80,{0x00000000, 0x000e4c04}
004c e002       |    |		Load	0x0,0x2
004d e001       |    |		Load	0x0,0x1
004e 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
004f 4801       |H   |		Short_Literal	0x1
0050 4800       |H   |		Short_Literal	0x0
0051 00e5       |    |		Load_Encached	Long_Integer_Cache
0052 02a0       |    |		Declare_Subprogram	Null_Subprogram
0053 4801       |H   |		Short_Literal	0x1
0054 035d       | ]  |		Declare_Type	Array,Defined
0055 0337       | 7  |		Declare_Variable	Array
0056 6025       |`%  |		Indirect_Literal	Discrete,0x7c,{0x00000001, 0x0010d850}
0057 4802       |H   |		Short_Literal	0x2
0058 e60a       |    |		Load	0x3,0xa
0059 6022       |`"  |		Indirect_Literal	Discrete,0x7c,{0x00000001, 0x0010d850}
005a 4801       |H   |		Short_Literal	0x1
005b e606       |    |		Load	0x3,0x6
005c e604       |    |		Load	0x3,0x4
005d e609       |    |		Load	0x3,0x9
005e e605       |    |		Load	0x3,0x5
005f e608       |    |		Load	0x3,0x8
0060 e607       |    |		Load	0x3,0x7
0061 e60b       |    |		Load	0x3,0xb
0062 480d       |H   |		Short_Literal	0xd
0063 e602       |    |		Load	0x3,0x2
0064 020e       |    |		Execute	Module,Augment_Imports
0065 e602       |    |		Load	0x3,0x2
0066 020f       |    |		Execute	Module,Activate
0067 7807       |x   |		Jump	BODY_0020
0068 600f       |`   |		Indirect_Literal	Discrete,0x78,{0x00000000, 0x00001f40}
0069 600a       |`   |		Indirect_Literal	Discrete,0x74,{0x00000000, 0x00190c04}
006a e002       |    |		Load	0x0,0x2
006b e001       |    |		Load	0x0,0x1
006c 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
006d 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
006e 7fb8       |    |		Jump	0x27
006f			BODY_0020:
006f e5ff       |    |		Load	0x2,-0x1
0070 8603       |    |		Call	0x3,0x3
0071 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0072 0000 0000  |    |		.XXX[0x2]
0074 0000 0000  |    |		.LITERAL	{0x00000000, 0x00190c04}
0078 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001f40}
007c 0000 0001  |    |		.LITERAL	{0x00000001, 0x0010d850}
0080 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e4c04}
0084 0000 0000  |    |		.LITERAL	{0x00000000, 0x00324404}
0088 0000 0000  |    |		.LITERAL	{0x00000000, 0x00010804}
008c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0004bc04}
0090 0000 0000  |    |		.LITERAL	{0x00000000, 0x0001ac04}
0094 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e3404}
0098 0000 0000  |    |		.LITERAL	{0x00000000, 0x00065c04}
009c 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036c804}
00a0 003d 690b  | =i |		.LITERAL	{0x003d690b, 0x000000b0}
00a4 ; --------------------------------------------------------------------------------------
00a4 ; Segment Table
00a4 ; --------------------------------------------------------------------------------------
00a4 0028 0000  | (  |		.XXX[0x4]
00a6 0000 0000  |    |
00a8 ; --------------------------------------------------------------------------------------
00a8 ; Debug Table
00a8 ; --------------------------------------------------------------------------------------
00a8 0004 0010  |    |		.DEBUG4	0x0004,0x0010,0xd850,0x0000,0x0001,0x0000
00ae 49a0 0007  |I   |		.XXX[0xe]
00b0 3203 8000  |2   |
00b2 c908 882b  |   +|
00b4 e928 8cc2  | (  |
00b6 e001 4989  |  I |
00b8 2a88 aa48  |*  H|
00ba 298b e666  |)  f|
00bc 0000 0000  |    |		.BLANK	0000[0x5]
00c1 0003 8000  |    |		.XXX[0x42]
00c3 0000 4000  |  @ |
00c5 001f 4006  |  @ |
00c7 5194 d310  |Q   |
00c9 5091 5314  |P S |
00cb cb90 5491  |  T |
00cd 5057 d111  |PW  |
00cf 54d0 d492  |T   |
00d1 5415 1253  |T  S|
00d3 d38e e65c  |   \|
00d5 8e64 0700  | d  |
00d7 0311 9254  |   T|
00d9 94d5 17d4  |    |
00db d150 d513  | P  |
00dd d499 85c0  |    |
00df 0610 9054  |   T|
00e1 d155 1654  | U T|
00e3 114b 94d1  | K  |
00e5 50d5 13d4  |P   |
00e7 97d4 13d4  |    |
00e9 d255 1253  | U S|
00eb d380 000e  |    |
00ed 6407 0002  |d   |
00ef d310 54d5  |  T |
00f1 17d4 d150  |   P|
00f3 d513 d499  |    |
00f5 85c0 0610  |    |
00f7 9054 d155  | T U|
00f9 1654 114b  | T K|
00fb 94d1 50d5  |  P |
00fd 13d4 97d4  |    |
00ff 13d4 d255  |   U|
0101 1253 d380  | S  |
0103 0000 0000  |    |		.BLANK	0000[0x5]
0108 0100 0000  |    |		.XXX[0x43]
010a 0080 0000  |    |
010c 3f80 0923  |?  #|
010e 29a6 20a1  |)   |
0110 22a6 2997  |" ) |
0112 2223 29af  |"#) |
0114 a620 a122  |   "|
0116 a61d ccb9  |    |
0118 1cc8 0e00  |    |
011a 0723 27a9  | #' |
011c 26a0 aa2f  |&  /|
011e a820 aa2a  |   *|
0120 22a9 2733  |" '3|
0122 0b80 0422  |   "|
0124 2329 972b  |#) +|
0126 a7a9 2200  |  " |
0128 001c c80e  |    |
012a 0004 a329  |   )|
012c 22a2 afa4  |"   |
012e 22a0 a233  |"  3|
0130 0b80 0422  |   "|
0132 2329 972b  |#) +|
0134 a7a9 2200  |  " |
0136 001c c80e  |    |
0138 0004 a224  |   $|
013a a922 a1aa  | "  |
013c 27a9 2cb3  |' , |
013e 0b80 0aa3  |    |
0140 29a6 20a1  |)   |
0142 22a6 2997  |" ) |
0144 2224 a92f  |"$ /|
0146 a827 a4a7  | '  |
0148 2a22 a929  |*" )|
014a 8000       |    |
014b 0000 0000  |    |		.BLANK	0000[0x4]
014f 000c 0000  |    |		.XXX[0x48]
0151 0001 0000  |    |
0153 0089 0012  |    |
0155 4653 4c41  |FSLA|
0157 4245 4c53  |BELS|
0159 2e44 4653  |.DFS|
015b 5f4c 4142  |_LAB|
015d 454c 3b99  |EL; |
015f 7239 901c  |r9  |
0161 000e 464f  |  FO|
0163 524d 4154  |RMAT|
0165 5f50 4154  |_PAT|
0167 5445 524e  |TERN|
0169 6617 000d  |f   |
016b 4241 5345  |BASE|
016d 5459 5045  |TYPE|
016f 2e57 4f52  |.WOR|
0171 4400 0039  |D  9|
0173 901c 0009  |    |
0175 4652 4545  |FREE|
0177 5f48 4541  |_HEA|
0179 4466 1700  |Df  |
017b 0d42 4153  | BAS|
017d 4554 5950  |ETYP|
017f 452e 574f  |E.WO|
0181 5244 0000  |RD  |
0183 3990 1c00  |9   |
0185 0944 4952  | DIR|
0187 4543 544f  |ECTO|
0189 5259 6617  |RYf |
018b 0015 4653  |  FS|
018d 4c41 4245  |LABE|
018f 4c53 2e44  |LS.D|
0191 4952 5f50  |IR_P|
0193 4f49 4e54  |OINT|
0195 4552 5300  |ERS |
0197 0000 0000  |    |		.BLANK	0000[0x5]
019c 0e00 0000  |    |		.XXX[0x64]
019e 0200 0004  |    |
01a0 1e00 2a8c  |  * |
01a2 a698 8284  |    |
01a4 8a98 a65c  |   \|
01a6 a690 82a4  |    |
01a8 8a88 be98  |    |
01aa 8284 8a98  |    |
01ac 7732 e473  |w2 s|
01ae 2038 000c  | 8  |
01b0 8c92 9898  |    |
01b2 8aa4 cc2e  |   .|
01b4 001a 8482  |    |
01b6 a68a a8b2  |    |
01b8 a08a 5cae  |  \ |
01ba 9ea4 8800  |    |
01bc 0073 2038  | s 8|
01be 001c 8c9e  |    |
01c0 a49a 82a8  |    |
01c2 bea0 82a8  |    |
01c4 a88a a49c  |    |
01c6 cc2e 001a  | .  |
01c8 8482 a68a  |    |
01ca a8b2 a08a  |    |
01cc 5cae 9ea4  |\   |
01ce 8800 0073  |   s|
01d0 2038 002a  | 8 *|
01d2 a690 82a4  |    |
01d4 8a88 be98  |    |
01d6 8284 8a98  |    |
01d8 beac 8aa4  |    |
01da 92a6 929e  |    |
01dc 9ccc 2e00  |  . |
01de 1a84 82a6  |    |
01e0 8aa8 b2a0  |    |
01e2 8a5c ae9e  | \  |
01e4 a488 0000  |    |
01e6 7320 3800  |s 8 |
01e8 2284 8288  |"   |
01ea be84 989e  |    |
01ec 8696 beac  |    |
01ee 8aa4 a692  |    |
01f0 9e9c cc2e  |   .|
01f2 001a 8482  |    |
01f4 a68a a8b2  |    |
01f6 a08a 5cae  |  \ |
01f8 9ea4 8800  |    |
01fa 0073 2038  | s 8|
01fc 0008 a692  |    |
01fe b48a cc2e  |   .|