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

⟦a46c1a25c⟧

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

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 0038       | 8  |		.CONST	0x0038								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 8000       |    |		.CONST	0x8000								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010       |    |		.CONST	0x0010								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0001       |    |		.CONST	0x0001								; Number of locals
000b			INIT_0008:
000b 029a 001b  |    |		Declare_Subprogram	INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf       |    |		Action	Accept_Activation
000e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
000f 00c7       |    |		Action	Elaborate_Subprogram
0010			BODY_0008:
0010 00bc       |    |		Action	Signal_Activated
0011 00bb       |    |		Action	Signal_Completion
0012 0000 0000  |    |		.BLANK	0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 001b       |    |		.CONST	0x001b								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0001       |    |		.CONST	0x0001								; Number of locals
001b			BODY_0018:
001b			INIT_0018:
001b e5fd       |    |		Load	0x2,-0x3
001c 6806       |h   |		Jump_Zero	0x23
001d 0092 002c  |   ,|		Action	Push_String_Extended,0x2c					; "<PROFILE>"
001f 4800       |H   |		Short_Literal	0x0
0020 4800       |H   |		Short_Literal	0x0
0021 e001       |    |		Load	0x0,0x1
0022 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0023 4800       |H   |		Short_Literal	0x0
0024 0092 002c  |   ,|		Action	Push_String_Extended,0x2c					; "<PROFILE>"
0026 4801       |H   |		Short_Literal	0x1
0027 e5fe       |    |		Load	0x2,-0x2
0028 e5ff       |    |		Load	0x2,-0x1
0029 e001       |    |		Load	0x0,0x1
002a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
002b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
002c ; --------------------------------------------------------------------------------------
002c ; STRING TABLE
002c ; --------------------------------------------------------------------------------------
002c 0004       |    |		.STRTAB	0x0004->0x002e							; "<PROFILE>"
002d 000b       |    |		.STREND 0x000b->0x0032
002e 3c50 524f  |<PRO|		.STRTAB_STRINGS
0033 0000 0000  |    |		.BLANK	0000[0x5]
0038 ; --------------------------------------------------------------------------------------
0038 ; Debug Table
0038 ; --------------------------------------------------------------------------------------
0038 0004 0011  |    |		.DEBUG4	0x0004,0x0011,0x6ab7,0x0000,0x0001,0x0000
003e c114 c0c0  |    |		.XXX[0x1c2]
0040 80c5 0cc1  |    |
0042 14c0 c028  |   (|
0044 80c5 0cc1  |    |
0046 14c0 c080  |    |
0048 c50c c114  |    |
004a c8c0 80c5  |    |
004c 0cc1 14dc  |    |
004e c080 c50c  |    |
0050 c114 dcc0  |    |
0052 80dd 18c0  |    |
0054 dd14 c081  |    |
0056 1918 e0dd  |    |
0058 14c0 80dd  |    |
005a 18c0 cd0c  |    |
005c c0f8 2941  |  )A|
005e 6131 0c81  |a1  |
0060 4940 28d0  |I@( |
0062 c4d0 80dc  |    |
0064 e4e4 8161  |   a|
0066 6481 18d4  |d   |
0068 cca1 4925  |  I%|
006a 0ca5 4c29  |  L)|
006c 6140 80bd  |a@  |
006e 18d4 cc80  |    |
0070 e4d4 80c8  |    |
0072 c880 c880  |    |
0074 b4d0 80c4  |    |
0076 e480 b4c4  |    |
0078 80cc 80c8  |    |
007a d080 c028  |   (|
007c f119 1919  |    |
007e 18e0 c081  |    |
0080 1919 1918  |    |
0082 e0c0 8119  |    |
0084 1919 18e0  |    |
0086 c0f8 2941  |  )A|
0088 6131 0c81  |a1  |
008a 4940 28d0  |I@( |
008c e0c0 80dc  |    |
008e e4e4 8161  |   a|
0090 6481 18d4  |d   |
0092 cca1 7d41  |  }A|
0094 4924 a54c  |I$ L|
0096 2961 4080  |)a@ |
0098 bd18 d4cc  |    |
009a 80dc dc80  |    |
009c c8c8 80c4  |    |
009e 80c0 80c8  |    |
00a0 c080 c8d4  |    |
00a2 80c8 d480  |    |
00a4 c8d0 80c0  |    |
00a6 28f1 190c  |(   |
00a8 c0dd 14c0  |    |
00aa 8119 14c1  |    |
00ac 1914 c081  |    |
00ae 1914 c119  |    |
00b0 14c0 80cd  |    |
00b2 04c1 08e0  |    |
00b4 c080 cd08  |    |
00b6 c508 e0c0  |    |
00b8 80cd 08c5  |    |
00ba 08e0 c080  |    |
00bc cd08 c508  |    |
00be e0c0 80cd  |    |
00c0 08c5 08e0  |    |
00c2 c080 cd08  |    |
00c4 c508 e0c0  |    |
00c6 2880 cd09  |(   |
00c8 0908 e0c0  |    |
00ca 80cc e508  |    |
00cc cce0 c080  |    |
00ce cce5 08cc  |    |
00d0 e0c0 80cc  |    |
00d2 e508 cce0  |    |
00d4 c080 cce5  |    |
00d6 08cc e0c0  |    |
00d8 80cc e518  |    |
00da cce0 c080  |    |
00dc cce1 14cc  |    |
00de e0c0 80cc  |    |
00e0 e114 cce0  |    |
00e2 c080 cce0  |    |
00e4 c0cc e0c0  |    |
00e6 2880 cce0  |(   |
00e8 c0cc e0c0  |    |
00ea 80cc e0c0  |    |
00ec cce0 c080  |    |
00ee cce0 c0cc  |    |
00f0 e0c0 80cc  |    |
00f2 e0c0 cce0  |    |
00f4 c081 1914  |    |
00f6 c119 14c0  |    |
00f8 8119 14c1  |    |
00fa 1914 c081  |    |
00fc 1914 c119  |    |
00fe 14c0 f829  |   )|
0100 4161 310c  |Aa1 |
0102 8149 4028  | I@(|
0104 d4d8 dc80  |    |
0106 dce4 e481  |    |
0108 6164 8118  |ad  |
010a d4cc a135  |   5|
010c 24a5 4c29  |$ L)|
010e 6140 80bd  |a@  |
0110 18d4 cc80  |    |
0112 e0d0 80c8  |    |
0114 c880 c480  |    |
0116 c080 c8c0  |    |
0118 80c8 d480  |    |
011a c8d4 80c8  |    |
011c d080 c028  |   (|
011e f0dd 1919  |    |
0120 1914 c081  |    |
0122 1919 1919  |    |
0124 14c0 8119  |    |
0126 1919 1914  |    |
0128 c081 14c1  |    |
012a 14c1 14c0  |    |
012c 8114 c114  |    |
012e c114 c081  |    |
0130 14c1 14c1  |    |
0132 14c0 8114  |    |
0134 c114 c114  |    |
0136 c080 c0c1  |    |
0138 14c0 c0c0  |    |
013a 80c0 c114  |    |
013c c0c0 c028  |   (|
013e 80c0 c114  |    |
0140 c0c0 c080  |    |
0142 c0c1 14c0  |    |
0144 c0c0 80c0  |    |
0146 c114 c0c0  |    |
0148 c080 c0c1  |    |
014a 14c0 c0c0  |    |
014c 80c0 c114  |    |
014e c0c0 c080  |    |
0150 c0c1 14c0  |    |
0152 c0c0 80c0  |    |
0154 c114 c0c0  |    |
0156 c080 c0c1  |    |
0158 14c0 c0c0  |    |
015a 80c0 c114  |    |
015c c0c0 c028  |   (|
015e 80c0 c114  |    |
0160 c0c0 c080  |    |
0162 c0c1 14c0  |    |
0164 c0c0 80c0  |    |
0166 c114 c0c0  |    |
0168 c080 c0c1  |    |
016a 14c0 c0c0  |    |
016c 80c0 dd19  |    |
016e 0cc0 c080  |    |
0170 c119 1914  |    |
0172 c0c0 80c0  |    |
0174 dd19 0cc0  |    |
0176 c0f8 2941  |  )A|
0178 6131 0c81  |a1  |
017a 4940 28d8  |I@( |
017c c4c0 80dc  |    |
017e e4e4 8161  |   a|
0180 6481 18d4  |d   |
0182 cca1 5124  |  Q$|
0184 a54c 2961  | L)a|
0186 4080 bd18  |@   |
0188 d4cc 80e0  |    |
018a d880 c8c8  |    |
018c 80c4 80c0  |    |
018e 80c8 c080  |    |
0190 c8d4 80c8  |    |
0192 d480 c8d0  |    |
0194 80c0 28f1  |  ( |
0196 1914 c119  |    |
0198 14c0 8119  |    |
019a 18c5 1914  |    |
019c c081 1914  |    |
019e c119 14c0  |    |
01a0 80cc e0c0  |    |
01a2 cce0 c080  |    |
01a4 c50c c0dc  |    |
01a6 c0c0 80c5  |    |
01a8 0cc0 dcc0  |    |
01aa c080 c50c  |    |
01ac c0dc c0c0  |    |
01ae 80c5 0cc0  |    |
01b0 dcc0 c080  |    |
01b2 c114 c114  |    |
01b4 c0c0 2880  |  ( |
01b6 c114 c114  |    |
01b8 c0c0 80c1  |    |
01ba 14c1 14c0  |    |
01bc c080 c114  |    |
01be c114 c0c0  |    |
01c0 80c0 d8c1  |    |
01c2 0cc0 c080  |    |
01c4 c0dc c50c  |    |
01c6 c0c0 80c0  |    |
01c8 dcc5 0cc0  |    |
01ca c080 c0dc  |    |
01cc c50c c0c0  |    |
01ce 80c0 dcc5  |    |
01d0 0cc0 c080  |    |
01d2 c0cc c4e0  |    |
01d4 c0c0 2880  |  ( |
01d6 c0cd 08e0  |    |
01d8 c0c0 80c0  |    |
01da cd08 e0c0  |    |
01dc c080 c0cd  |    |
01de 08e0 c0c0  |    |
01e0 80c0 c508  |    |
01e2 c0c0 c080  |    |
01e4 c0c5 18c0  |    |
01e6 c0c0 80c0  |    |
01e8 c518 c0c0  |    |
01ea c080 c0c1  |    |
01ec 14c0 c0c0  |    |
01ee f829 4161  | )Aa|
01f0 310c 8149  |1  I|
01f2 4028 d8d4  |@(  |
01f4 d080 dce4  |    |
01f6 e481 6164  |  ad|
01f8 8118 d4cc  |    |
01fa a159 157c  | Y ||
01fc a54c 2961  | L)a|
01fe 4080 bd18  |@   |