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

⟦54bc040cd⟧

    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 00a0       |    |		.CONST	0x00a0								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0098       |    |		.CONST	0x0098								; 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 0069       | i  |		.CONST	0x0069								; 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 783b       |x;  |		Jump	0x62
0027 4800       |H   |		Short_Literal	0x0
0028 606b       |`k  |		Indirect_Literal	Discrete,0x94,{0x003b250b, 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 6061       |`a  |		Indirect_Literal	Discrete,0x90,{0x00000000, 0x0036d004}
002f e002       |    |		Load	0x0,0x2
0030 e001       |    |		Load	0x0,0x1
0031 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0032 6059       |`Y  |		Indirect_Literal	Discrete,0x8c,{0x00000000, 0x000ca804}
0033 e002       |    |		Load	0x0,0x2
0034 e001       |    |		Load	0x0,0x1
0035 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0036 6051       |`Q  |		Indirect_Literal	Discrete,0x88,{0x00000000, 0x001a9404}
0037 e002       |    |		Load	0x0,0x2
0038 e001       |    |		Load	0x0,0x1
0039 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
003a 6049       |`I  |		Indirect_Literal	Discrete,0x84,{0x00000000, 0x0036c804}
003b e002       |    |		Load	0x0,0x2
003c e001       |    |		Load	0x0,0x1
003d 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
003e 6041       |`A  |		Indirect_Literal	Discrete,0x80,{0x00000000, 0x003b6804}
003f e002       |    |		Load	0x0,0x2
0040 e001       |    |		Load	0x0,0x1
0041 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0042 6039       |`9  |		Indirect_Literal	Discrete,0x7c,{0x00000000, 0x000e4804}
0043 e002       |    |		Load	0x0,0x2
0044 e001       |    |		Load	0x0,0x1
0045 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0046 6031       |`1  |		Indirect_Literal	Discrete,0x78,{0x00000000, 0x000e3804}
0047 e002       |    |		Load	0x0,0x2
0048 e001       |    |		Load	0x0,0x1
0049 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
004a 6029       |`)  |		Indirect_Literal	Discrete,0x74,{0x00000000, 0x000e1804}
004b e002       |    |		Load	0x0,0x2
004c e001       |    |		Load	0x0,0x1
004d 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
004e 4801       |H   |		Short_Literal	0x1
004f 4800       |H   |		Short_Literal	0x0
0050 00e5       |    |		Load_Encached	Long_Integer_Cache
0051 02a0       |    |		Declare_Subprogram	Null_Subprogram
0052 4801       |H   |		Short_Literal	0x1
0053 035d       | ]  |		Declare_Type	Array,Defined
0054 0337       | 7  |		Declare_Variable	Array
0055 e606       |    |		Load	0x3,0x6
0056 e60b       |    |		Load	0x3,0xb
0057 e60a       |    |		Load	0x3,0xa
0058 e609       |    |		Load	0x3,0x9
0059 e604       |    |		Load	0x3,0x4
005a e607       |    |		Load	0x3,0x7
005b e608       |    |		Load	0x3,0x8
005c 4808       |H   |		Short_Literal	0x8
005d e602       |    |		Load	0x3,0x2
005e 020e       |    |		Execute	Module,Augment_Imports
005f e602       |    |		Load	0x3,0x2
0060 020f       |    |		Execute	Module,Activate
0061 7807       |x   |		Jump	BODY_0020
0062 600d       |`   |		Indirect_Literal	Discrete,0x70,{0x00000000, 0x00001f40}
0063 6008       |`   |		Indirect_Literal	Discrete,0x6c,{0x00000000, 0x00190c04}
0064 e002       |    |		Load	0x0,0x2
0065 e001       |    |		Load	0x0,0x1
0066 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
0067 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0068 7fbe       |    |		Jump	0x27
0069			BODY_0020:
0069 e5ff       |    |		Load	0x2,-0x1
006a 8603       |    |		Call	0x3,0x3
006b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
006c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00190c04}
0070 0000 0000  |    |		.LITERAL	{0x00000000, 0x00001f40}
0074 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e1804}
0078 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e3804}
007c 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e4804}
0080 0000 0000  |    |		.LITERAL	{0x00000000, 0x003b6804}
0084 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036c804}
0088 0000 0000  |    |		.LITERAL	{0x00000000, 0x001a9404}
008c 0000 0000  |    |		.LITERAL	{0x00000000, 0x000ca804}
0090 0000 0000  |    |		.LITERAL	{0x00000000, 0x0036d004}
0094 003b 250b  | ;% |		.LITERAL	{0x003b250b, 0x000000b0}
0098 ; --------------------------------------------------------------------------------------
0098 ; Segment Table
0098 ; --------------------------------------------------------------------------------------
0098 0028       | (  |		.XXX[0x1]
0099 0000 0000  |    |		.BLANK	0000[0x7]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; Debug Table
00a0 ; --------------------------------------------------------------------------------------
00a0 0004 0010  |    |		.DEBUG4	0x0004,0x0010,0xd814,0x0000,0x0001,0x0000
00a6 d1a1 94a5  |    |		.XXX[0x15a]
00a8 4c80 c8c8  |L   |
00aa 81e0 a199  |    |
00ac d5b9 8dd1  |    |
00ae a5bd b9cc  |    |
00b0 a54c 80c8  | L  |
00b2 c881 e0a1  |    |
00b4 9195 70c0  |  p |
00b6 c4d1 b995  |    |
00b8 90a5 4c80  |  L |
00ba c8c8 81e0  |    |
00bc 28a1 89e4  |(   |
00be a54c 80c8  | L  |
00c0 c881 e0a1  |    |
00c2 d1a1 a5cc  |    |
00c4 a54c 80c8  | L  |
00c6 c481 e0a1  |    |
00c8 cdd1 85b9  |    |
00ca 9185 c990  |    |
00cc b0a5 4c80  |  L |
00ce c8c8 81e0  |    |
00d0 a1dd a195  |    |
00d2 b995 d995  |    |
00d4 c8a5 4c80  |  L |
00d6 c8c4 81e0  |    |
00d8 a1d1 a194  |    |
00da a54c 80c8  | L  |
00dc c881 e028  |   (|
00de a1b5 85e1  |    |
00e0 a5b5 d5b4  |    |
00e2 a54c 80c8  | L  |
00e4 c481 e0a1  |    |
00e6 c995 b185  |    |
00e8 d1a5 d994  |    |
00ea a54c 80c8  | L  |
00ec c481 e0a1  |    |
00ee 95c9 c9bd  |    |
00f0 c8a5 4c80  |  L |
00f2 d4c0 81e4  |    |
00f4 80cc c0c0  |    |
00f6 8160 a1c9  | `  |
00f8 95c5 d5a5  |    |
00fa c995 b595  |    |
00fc b9d1 cca5  |    |
00fe 4c80 28c4  |L ( |
0100 d481 e0a1  |    |
0102 c195 c9b5  |    |
0104 a5d0 a54c  |   L|
0106 80c4 d481  |    |
0108 e0a1 84a5  |    |
010a 4c80 c4d4  |L   |
010c 81e0 a1c9  |    |
010e 95cd d5b1  |    |
0110 d0a5 4c80  |  L |
0112 c4d8 81e0  |    |
0114 a1dd a1bd  |    |
0116 cd94 a54c  |   L|
0118 80c4 d481  |    |
011a e0a1 8589  |    |
011c cdbd b1d5  |    |
011e d194 a54c  |   L|
0120 8028 c4d4  | (  |
0122 81e0 a1d9  |    |
0124 85b1 d594  |    |
0126 a54c 80c4  | L  |
0128 d881 e0a1  |    |
012a a5cc a54c  |   L|
012c 80c4 d881  |    |
012e e0a1 b195  |    |
0130 cdcc a54c  |   L|
0132 80c4 d881  |    |
0134 e0a1 d1a1  |    |
0136 85b8 a54c  |   L|
0138 80c4 d881  |    |
013a e081 18d0  |    |
013c e0a1 1931  |   1|
013e 3d05 517d  |= Q}|
0140 5165 4114  |QeA |
0142 a54c 28a1  | L( |
0144 70c0 c4d5  |p   |
0146 4d05 1915  |M   |
0148 7d4d 3505  |}M5 |
014a 3130 a54c  |10 L|
014c 80c4 c481  |    |
014e e081 18d8  |    |
0150 a185 b990  |    |
0152 a54c 80c4  | L  |
0154 d481 e0a1  |    |
0156 84a5 4c80  |  L |
0158 c4d4 81e0  |    |
015a a1c1 c995  |    |
015c cd8d c9a5  |    |
015e 8995 90a5  |    |
0160 4c80 c4d8  |L   |
0162 81e0 28a1  |  ( |
0164 c995 cdd5  |    |
0166 b1d0 a54c  |   L|
0168 80d4 c081  |    |
016a e480 ccc0  |    |
016c c081 60a1  |  ` |
016e a5cc a54c  |   L|
0170 80c8 c081  |    |
0172 e0a1 b9bd  |    |
0174 d0a5 4c80  |  L |
0176 c8c0 81e0  |    |
0178 a1cd d1a5  |    |
017a c1d5 b185  |    |
017c d195 90b0  |    |
017e a54c 80c8  | L  |
0180 c481 e0a1  |    |
0182 d1a1 94a5  |    |
0184 4c28 c8c0  |L(  |
0186 81e0 a1a5  |    |
0188 b5c1 b195  |    |
018a b595 b9d1  |    |
018c 85d1 a5bd  |    |
018e b8a5 4c80  |  L |
0190 c8c0 81e0  |    |
0192 a1b5 85e4  |    |
0194 a54c 80dc  | L  |
0196 c8d8 8164  |   d|
0198 80cc e0cc  |    |
019a 8160 a170  | ` p|
019c a0c5 70a4  |  p |
019e a54c 80cc  | L  |
01a0 d481 e0a1  |    |
01a2 e5a5 95b1  |    |
01a4 90a5 4c80  |  L |
01a6 28c4 dc81  |(   |
01a8 e0a1 85b9  |    |
01aa e4a5 4c80  |  L |
01ac c4d8 81e0  |    |
01ae a1c9 95cd  |    |
01b0 d5b1 d0a5  |    |
01b2 4c80 c4d8  |L   |
01b4 81e0 a1c1  |    |
01b6 95c9 b5a5  |    |
01b8 d1d1 9590  |    |
01ba a54c 80c4  | L  |
01bc d881 e0a1  |    |
01be 89e4 a54c  |   L|
01c0 80c4 dc81  |    |
01c2 e0a1 d1a1  |    |
01c4 94a5 4c80  |  L |
01c6 c4dc 81e0  |    |
01c8 28a1 b585  |(   |
01ca e1a5 b5d5  |    |
01cc b4a5 4c80  |  L |
01ce c4dc 81e0  |    |
01d0 a1c9 95b1  |    |
01d2 85d1 a5d9  |    |
01d4 94a5 4c80  |  L |
01d6 c4d8 81e0  |    |
01d8 a195 c9c9  |    |
01da bdc8 a54c  |   L|
01dc 80c4 dc81  |    |
01de e0a1 c995  |    |
01e0 c5d5 a5c9  |    |
01e2 95b5 95b9  |    |
01e4 d1cc eca5  |    |
01e6 4c80 d8cc  |L   |
01e8 81e4 8028  |   (|
01ea cce0 cc81  |    |
01ec 60a1 70a0  |` p |
01ee c970 a4a5  | p  |
01f0 4c80 ccd4  |L   |
01f2 81e0 a1e5  |    |
01f4 a595 b190  |    |
01f6 a54c 80c8  | L  |
01f8 e081 e0a1  |    |
01fa 85b9 e4a5  |    |
01fc 4c80 c8e0  |L   |
01fe 81e0 a1b9  |    |