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

⟦44f893d5a⟧

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

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 0050       | P  |		.CONST	0x0050								; 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 002a       | *  |		.CONST	0x002a								; Address of begin
0019 004c       | L  |		.CONST	0x004c								; Address of exception handler
001a 0002       |    |		.CONST	0x0002								; Number of locals
001b			INIT_0018:
001b e002       |    |		Load	0x0,0x2
001c 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
001d 0337       | 7  |		Declare_Variable	Array
001e 00d8       |    |		Load_Top	At_Offset_0
001f 0335       | 5  |		Declare_Variable	Array,Duplicate
0020 00cd       |    |		Action	Spare6_Action
0021 480b       |H   |		Short_Literal	0xb
0022 4800       |H   |		Short_Literal	0x0
0023 4800       |H   |		Short_Literal	0x0
0024 00d9       |    |		Load_Top	At_Offset_1
0025 e403       |    |		Load	0x2,0x3
0026 01d6       |    |		Execute	Vector,Field_Write
0027 3ffb       |?   |		Loop_Increasing	0x23
0028 00d9       |    |		Load_Top	At_Offset_1
0029 01d4       |    |		Execute	Vector,Structure_Write
002a			BODY_0018:
002a e002       |    |		Load	0x0,0x2
002b 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
002c e002       |    |		Load	0x0,0x2
002d 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
002e e002       |    |		Load	0x0,0x2
002f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0030 e002       |    |		Load	0x0,0x2
0031 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0032 e002       |    |		Load	0x0,0x2
0033 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0034 e002       |    |		Load	0x0,0x2
0035 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
0036 e002       |    |		Load	0x0,0x2
0037 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0038 e002       |    |		Load	0x0,0x2
0039 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
003a e402       |    |		Load	0x2,0x2
003b 4801       |H   |		Short_Literal	0x1
003c e002       |    |		Load	0x0,0x2
003d 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
003e e002       |    |		Load	0x0,0x2
003f 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
0040 e5f9       |    |		Load	0x2,-0x7
0041 e5fa       |    |		Load	0x2,-0x6
0042 e5fb       |    |		Load	0x2,-0x5
0043 00ea       |    |		Load_Encached	Null_String_Cache
0044 e5fc       |    |		Load	0x2,-0x4
0045 e5fd       |    |		Load	0x2,-0x3
0046 e5fe       |    |		Load	0x2,-0x2
0047 e5ff       |    |		Load	0x2,-0x1
0048 e003       |    |		Load	0x0,0x3
0049 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
004a 4801       |H   |		Short_Literal	0x1
004b 4407       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x7
004c			TRAP_0018:
004c 0007       |    |		Action	Break_Optional
004d 4800       |H   |		Short_Literal	0x0
004e 4407       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x7
004f 0000       |    |		.XXX[0x1]
0050 ; --------------------------------------------------------------------------------------
0050 ; Debug Table
0050 ; --------------------------------------------------------------------------------------
0050 0004 0006  |    |		.DEBUG4	0x0004,0x0006,0x44c0,0x0000,0x0001,0x0000
0056 8500 0000  |    |		.XXX[0x1d]
0058 4000 0209  |@   |
005a 1802 20d1  |    |
005c 8000 0000  |    |
005e 0008 34aa  |  4 |
0060 2140 0000  |!@  |
0062 1008 3a45  |  :E|
0064 58b5 b790  |X   |
0066 0008 b000  |    |
0068 0000 9000  |    |
006a 2742 6000  |'B` |
006c 0000 2000  |    |
006e 0000 4000  |  @ |
0070 8246 0088  | F  |
0072 3460       |4`  |
0073 0000 0000  |    |		.BLANK	0000[0x6]
0079 020e 9156  |   V|		.XXX[0x32]
007b 2d6d e400  |-m  |
007d 022c 0000  | ,  |
007f 0024 0009  | $  |
0081 d098 0000  |    |
0083 0008 0000  |    |
0085 0010 0000  |    |
0087 0018 0013  |    |
0089 fa58 0639  | X 9|
008b 1f70 0637  | p 7|
008d fee8 063a  |   :|
008f 86e8 031c  |    |
0091 a504 001c  |    |
0093 1a6c 9f1f  | l  |
0095 134d c000  | M  |
0097 0000 08d0  |    |
0099 ba6b 4cce  | kL |
009b 09c0 0000  |    |
009d 2400 0000  |$   |
009f 0000 0000  |    |
00a1 0003 6156  |  aV|
00a3 8000 0000  |    |
00a5 4003 615a  |@ aZ|
00a7 8000 0000  |    |
00a9 4000 2600  |@ & |
00ab 0000 0000  |    |		.BLANK	0000[0x5]
00b0 d856 a000  | V  |		.XXX[0x12]
00b2 0000 1007  |    |
00b4 c7c4 d370  |   p|
00b6 0000 0002  |    |
00b8 3000 0000  |0   |
00ba 9000 284c  |  (L|
00bc 6000 0000  |`   |
00be 2000 0000  |    |
00c0 4009 8000  |@   |
00c2 0000 0000  |    |		.BLANK	0000[0x8]
00ca 020f 05bc  |    |		.XXX[0x13]
00cc 7257 c000  |rW  |
00ce 008c 0000  |    |
00d0 0024 000a  | $  |
00d2 1318 0000  |    |
00d4 0008 0000  |    |
00d6 0010 0000  |    |
00d8 0018 0014  |    |
00da 19e0 0639  |   9|
00dc 47f0       |G   |
00dd 0000 0000  |    |		.BLANK	0000[0x4]
00e1 031c b944  |   D|		.XXX[0x1b]
00e3 0000 0b1a  |    |
00e5 20b3 1c67  |   g|
00e7 a000 0000  |    |
00e9 0050 598e  | PY |
00eb 33d0 0000  |3   |
00ed 0000 2000  |    |
00ef 0000 0000  |    |
00f1 0000 0021  |   !|
00f3 0b4c 8500  | L  |
00f5 0000 4021  |  @!|
00f7 0b50 8500  | P  |
00f9 0000 4000  |  @ |
00fb 2600       |&   |
00fc 0000 0000  |    |		.BLANK	0000[0x4]
0100 0008 42d4  |  B |		.XXX[0x13]
0102 2140 0000  |!@  |
0104 1008 2cc7  |  , |
0106 19e8 0000  |    |
0108 0000 1000  |    |
010a 0000 9000  |    |
010c 28a9 e000  |(   |
010e 0000 2000  |    |
0110 0000 4009  |  @ |
0112 8000       |    |
0113 0000 0000  |    |		.BLANK	0000[0x8]
011b 020f 0624  |   $|		.XXX[0x49]
011d 360b 8400  |6   |
011f 0004 0000  |    |
0121 0024 000a  | $  |
0123 2a78 0000  |*x  |
0125 0008 0000  |    |
0127 0010 0000  |    |
0129 0018 0014  |    |
012b 3968 0639  |9h 9|
012d 7070 0639  |pp 9|
012f 6b68 0639  |kh 9|
0131 bc68 031c  | h  |
0133 cd84 0000  |    |
0135 3cd2 a0f1  |<   |
0137 5458 783c  |TXx<|
0139 c000 0490  |    |
013b a410 6359  |  cY|
013d cac0 0004  |    |
013f 6400 0000  |d   |
0141 0000 0000  |    |
0143 0021 2ce0  | !, |
0145 8500 0000  |    |
0147 4021 51ac  |@!Q |
0149 8500 0000  |    |
014b 4002 6600  |@ f |
014d 9800 0000  |    |
014f 0000 0000  |    |
0151 0008 4b38  |  K8|
0153 2140 0000  |!@  |
0155 1008 3c57  |  <W|
0157 d21f 4530  |  E0|
0159 0001 2000  |    |
015b 0000 9000  |    |
015d 28c5 6000  |( ` |
015f 0000 2000  |    |
0161 0000 c099  |    |
0163 8026       | &  |
0164 0000 0000  |    |		.BLANK	0000[0x8]
016c 020f 15f4  |    |		.XXX[0x13]
016e 87d1 4c00  |  L |
0170 0048 0000  | H  |
0172 0024 000a  | $  |
0174 3158 0000  |1X  |
0176 0008 0000  |    |
0178 0030 0000  | 0  |
017a 0018 0014  |    |
017c 58f0 0639  |X  9|
017e 98f0       |    |
017f 0000 0000  |    |		.BLANK	0000[0x4]
0183 031c e1c4  |    |		.XXX[0x32]
0185 0001 1e71  |   q|
0187 1f43 9c39  | C 9|
0189 8000 0000  |    |
018b 0690 a410  |    |
018d 6e5b 2700  |n[' |
018f 0004 6400  |  d |
0191 0000 0000  |    |
0193 0000 0021  |   !|
0195 94bc 8500  |    |
0197 0000 4021  |  @!|
0199 94c0 8500  |    |
019b 0000 4002  |  @ |
019d 6600 9800  |f   |
019f 0000 0000  |    |
01a1 0000 0008  |    |
01a3 6530 2140  |e0!@|
01a5 0000 1007  |    |
01a7 d0e7 0e60  |   `|
01a9 0000 0001  |    |
01ab a000 0000  |    |
01ad 9000 29a5  |  ) |
01af 0000 0000  |    |
01b1 2000 0000  |    |
01b3 4099 8026  |@  &|
01b5 0000 0000  |    |		.BLANK	0000[0x8]
01bd 020f 4daa  |  M |		.XXX[0x43]
01bf 413d 8000  |A=  |
01c1 0068 0000  | h  |
01c3 0024 000a  | $  |
01c5 6940 0000  |i@  |
01c7 0008 0000  |    |
01c9 0010 0000  |    |
01cb 0018 0014  |    |
01cd b788 0639  |   9|
01cf c170 0639  | p 9|
01d1 93e8 063a  |   :|
01d3 35e8 031c  |5   |
01d5 f604 0001  |    |
01d7 c453 a118  | S  |
01d9 1e44 e924  | D $|
01db 8000 3d10  |  = |
01dd a410 981a  |    |
01df 7140 0004  |q@  |
01e1 6400 0000  |d   |
01e3 0000 0000  |    |
01e5 0026 c80e  | &  |
01e7 8500 0000  |    |
01e9 4026 c810  |@&  |
01eb 8500 0000  |    |
01ed 4005 4600  |@ F |
01ef 9800 0000  |    |
01f1 0000 0000  |    |
01f3 0009 b204  |    |
01f5 2140 0000  |!@  |
01f7 1008 4606  |  F |
01f9 7702 afb0  |w   |
01fb 000f 4000  |  @ |
01fd 0000 9000  |    |
01ff 2dd1       |-   |