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

⟦095e19c72⟧

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

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦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 0060       | `  |		.CONST	0x0060								; 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 001d       |    |		.CONST	0x001d								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0013       |    |		.CONST	0x0013								; Number of locals
000b			INIT_0008:
000b 00c4       |    |		Action	Make_Default
000c 00c4       |    |		Action	Make_Default
000d 00c4       |    |		Action	Make_Default
000e 00c4       |    |		Action	Make_Default
000f 00c4       |    |		Action	Make_Default
0010 00c4       |    |		Action	Make_Default
0011 00c4       |    |		Action	Make_Default
0012 029a 0023  |   #|		Declare_Subprogram	INIT_0020,For_Outer_Call,Visible,Unelaborated
0014 c212       |    |		Store	0x1,0x12
0015 029a 004b  |   K|		Declare_Subprogram	INIT_0048,For_Outer_Call,Visible,Unelaborated
0017 c213       |    |		Store	0x1,0x13
0018 00bf       |    |		Action	Accept_Activation
0019 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
001a 00c7       |    |		Action	Elaborate_Subprogram
001b 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
001c 00c7       |    |		Action	Elaborate_Subprogram
001d			BODY_0008:
001d 00bc       |    |		Action	Signal_Activated
001e 00bb       |    |		Action	Signal_Completion
001f 0000       |    |		.XXX[0x1]
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 002d       | -  |		.CONST	0x002d								; Address of begin
0021 0004       |    |		.CONST	0x0004								; Address of exception handler
0022 0002       |    |		.CONST	0x0002								; Number of locals
0023			INIT_0020:
0023 e001       |    |		Load	0x0,0x1
0024 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0025 0322       | "  |		Declare_Variable	Record
0026 00db       |    |		Load_Top	At_Offset_3
0027 e002       |    |		Load	0x0,0x2
0028 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0029 e002       |    |		Load	0x0,0x2
002a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
002b 00d9       |    |		Load_Top	At_Offset_1
002c 017d       | }  |		Execute	Record,Structure_Write
002d			BODY_0020:
002d 00d8       |    |		Load_Top	At_Offset_0
002e e5ff       |    |		Load	0x2,-0x1
002f e001       |    |		Load	0x0,0x1
0030 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0031 00db       |    |		Load_Top	At_Offset_3
0032 e003       |    |		Load	0x0,0x3
0033 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0034 e5f4       |    |		Load	0x2,-0xc
0035 00d9       |    |		Load_Top	At_Offset_1
0036 e5ff       |    |		Load	0x2,-0x1
0037 e5f5       |    |		Load	0x2,-0xb
0038 e5f6       |    |		Load	0x2,-0xa
0039 e5f7       |    |		Load	0x2,-0x9
003a e5f8       |    |		Load	0x2,-0x8
003b e5f9       |    |		Load	0x2,-0x7
003c e5fa       |    |		Load	0x2,-0x6
003d e5fb       |    |		Load	0x2,-0x5
003e e5fc       |    |		Load	0x2,-0x4
003f e5fd       |    |		Load	0x2,-0x3
0040 e5fe       |    |		Load	0x2,-0x2
0041 8004       |    |		Call	0x0,0x4
0042 450d       |E   |		Exit_Suprogram	New_Top_Offset 0xd
0043 0000 0000  |    |		.BLANK	0000[0x5]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004f       | O  |		.CONST	0x004f								; Address of begin
0049 0059       | Y  |		.CONST	0x0059								; Address of exception handler
004a 0002       |    |		.CONST	0x0002								; Number of locals
004b			INIT_0048:
004b 4820       |H   |		Short_Literal	0x20
004c 00db       |    |		Load_Top	At_Offset_3
004d e005       |    |		Load	0x0,0x5
004e 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
004f			BODY_0048:
004f 00d8       |    |		Load_Top	At_Offset_0
0050 e001       |    |		Load	0x0,0x1
0051 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0052 e006       |    |		Load	0x0,0x6
0053 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0054 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0055 00d8       |    |		Load_Top	At_Offset_0
0056 e001       |    |		Load	0x0,0x1
0057 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0058 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0059			TRAP_0048:
0059 0007       |    |		Action	Break_Optional
005a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
005b 0000 0000  |    |		.BLANK	0000[0x5]
0060 ; --------------------------------------------------------------------------------------
0060 ; Debug Table
0060 ; --------------------------------------------------------------------------------------
0060 0004 000d  |    |		.DEBUG4	0x0004,0x000d,0xa600,0x0000,0x0001,0x0000
0066 0000 0000  |    |		.BLANK	0000[0x14]
007a 0003 c845  |   E|		.XXX[0x7]
007c 2160 16e7  |!`  |
007e 17c0 0000  |    |
0080 0700       |    |
0081 0000 0000  |    |		.BLANK	0000[0x5]
0086 0080 0000  |    |		.XXX[0xdc]
0088 0000 079a  |    |
008a 2a80 0000  |*   |
008c 0040 0000  | @  |
008e 0040 0000  | @  |
0090 0080 0000  |    |
0092 0080 0173  |   s|
0094 7200 0000  |r   |
0096 0100 0000  |    |
0098 0400 0000  |    |
009a 0000 3cd3  |  < |
009c 8e00 0000  |    |
009e 0200 0000  |    |
00a0 0200 0000  |    |
00a2 0400 0000  |    |
00a4 0400 0b9b  |    |
00a6 9000 0000  |    |
00a8 0800 0000  |    |
00aa 2000 0000  |    |
00ac 0001 e6ae  |    |
00ae 4000 0000  |@   |
00b0 1000 0000  |    |
00b2 1000 0000  |    |
00b4 2000 0000  |    |
00b6 2000 5cdc  |  \ |
00b8 8000 0000  |    |
00ba 4000 0001  |@   |
00bc 0000 0000  |    |
00be 000f 3600  |  6 |
00c0 8000 0000  |    |
00c2 8000 0000  |    |
00c4 8000 000a  |    |
00c6 0000 0001  |    |
00c8 0002 f0de  |    |
00ca 0000 0002  |    |
00cc 0000 0008  |    |
00ce 0000 0000  |    |
00d0 0079 b478  | y x|
00d2 0000 0004  |    |
00d4 0000 0004  |    |
00d6 0000 0030  |   0|
00d8 0000 0008  |    |
00da 0017 f870  |   p|
00dc 0000 0010  |    |
00de 0000 0040  |   @|
00e0 0000 0000  |    |
00e2 03cd c760  |   `|
00e4 0000 0020  |    |
00e6 0000 0020  |    |
00e8 0000 00c0  |    |
00ea 0000 0040  |   @|
00ec 00bb 4d00  |  M |
00ee 0000 0080  |    |
00f0 0000 0200  |    |
00f2 0000 0000  |    |
00f4 1e6f 5800  | oX |
00f6 0000 0100  |    |
00f8 0000 0100  |    |
00fa 0000 0200  |    |
00fc 0000 0200  |    |
00fe 05da 6000  |  ` |
0100 0000 0400  |    |
0102 0000 1000  |    |
0104 0000 0000  |    |
0106 f383 a800  |    |
0108 0000 0800  |    |
010a 0000 0800  |    |
010c 0000 1000  |    |
010e 0000 1000  |    |
0110 2ed4 6000  |. ` |
0112 0000 2000  |    |
0114 0000 8000  |    |
0116 0000 0007  |    |
0118 9c64 8000  | d  |
011a 0000 4000  |  @ |
011c 0000 4000  |  @ |
011e 0001 0000  |    |
0120 0000 8001  |    |
0122 7696 0000  |v   |
0124 0001 0000  |    |
0126 0004 0000  |    |
0128 0000 003c  |   <|
012a e55e 0000  | ^  |
012c 0002 0000  |    |
012e 0002 0000  |    |
0130 0004 0000  |    |
0132 0004 000b  |    |
0134 bc28 0000  | (  |
0136 0008 0000  |    |
0138 00e0 0000  |    |
013a 0080 0f10  |    |
013c 23c8 4521  |# E!|
013e 6017 2560  |` %`|
0140 e00f 1023  |   #|
0142 c845 2160  | E!`|
0144 1725 60e3  | %` |
0146 dcb3 2160  |  !`|
0148 0000 1000  |    |
014a 0000 0000  |    |
014c 03d7 0540  |   @|
014e 0000 0060  |   `|
0150 004f 7040  | Op@|
0152 0000 0040  |   @|
0154 1e20 7d60  |  }`|
0156 0000 0500  |    |
0158 0000 0a00  |    |
015a 0000 2000  |    |
015c 0003 d600  |    |
015e 0000 0080  |    |
0160 0000 0a00  |    |
0162 0000 0000  |    |		.BLANK	0000[0x5]
0167 4e00       |N   |		.XXX[0x1]
0168 0000 0000  |    |		.BLANK	0000[0x5]
016d 003d cb32  | = 2|		.XXX[0x78]
016f 1600 0060  |   `|
0171 8000 0001  |    |
0173 107b 9664  | { d|
0175 2c00 02bb  |,   |
0177 b000 0002  |    |
0179 18f7 2cc8  |  , |
017b 5800 00c0  |X   |
017d 5000 0004  |P   |
017f 71ee 5990  |q Y |
0181 b000 01ed  |    |
0183 6000 0008  |`   |
0185 e3dc b321  |   !|
0187 6000 177c  |`  ||
0189 8000 0011  |    |
018b 87b9 6642  |  fB|
018d c000 5a5a  |  ZZ|
018f 8000 0023  |   #|
0191 8f72 cc85  | r  |
0193 8000 69f5  |  i |
0195 0000 0043  |   C|
0197 1ee5 990b  |    |
0199 0000 d0a0  |    |
019b 0000 0088  |    |
019d 3dcb 3216  |= 2 |
019f 0001 2f7c  |  /||
01a1 0000 0110  |    |
01a3 7b96 642c  |{ d,|
01a5 0000 b3f8  |    |
01a7 0000 0220  |    |
01a9 f72c c858  | , X|
01ab 0005 5cd0  |  \ |
01ad 0000 0431  |   1|
01af ee59 90b0  | Y  |
01b1 000c 2f00  |  / |
01b3 0000 08c3  |    |
01b5 dcb3 2160  |  !`|
01b7 000c a000  |    |
01b9 0000 1187  |    |
01bb b966 42c0  | fB |
01bd 0068 2c80  | h, |
01bf 0000 238f  |  # |
01c1 72cc 8580  |r   |
01c3 0034 5100  | 4Q |
01c5 0000 471e  |  G |
01c7 e599 0b00  |    |
01c9 0011 4e00  |  N |
01cb 0000 8e3d  |   =|
01cd cb32 1600  | 2  |
01cf 02e7 8000  |    |
01d1 0001 1c7b  |   {|
01d3 9664 2c00  | d, |
01d5 00d9 7000  |  p |
01d7 0002 3c00  |  < |
01d9 0000 f800  |    |
01db 0001 f000  |    |
01dd 0004 0000  |    |
01df 00bc 1000  |    |
01e1 0000 1000  |    |
01e3 0001 f000  |    |
01e5 0000 0000  |    |		.BLANK	0000[0x4]
01e9 0009 c000  |    |		.XXX[0x2]
01eb 0000 0000  |    |		.BLANK	0000[0x5]
01f0 07b9 6642  |  fB|		.XXX[0x10]
01f2 c000 0c10  |    |
01f4 0000 0022  |   "|
01f6 0f72 cc85  | r  |
01f8 8000 5776  |  Wv|
01fa 0000 0043  |   C|
01fc 1ee5 990b  |    |
01fe 0000 180a  |    |