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

⟦3d9e4367f⟧

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

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 001b       |    |		.CONST	0x001b								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0010       |    |		.CONST	0x0010								; Number of locals
000b			INIT_0008:
000b e001       |    |		Load	0x0,0x1
000c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
000d 0129       | )  |		Execute	Any,Make_Visible
000e 029a 0023  |   #|		Declare_Subprogram	INIT_0020,For_Outer_Call,Visible,Unelaborated
0010 029a 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Outer_Call,Visible,Unelaborated
0012 029a 0053  |   S|		Declare_Subprogram	INIT_0050,For_Outer_Call,Visible,Unelaborated
0014 00bf       |    |		Action	Accept_Activation
0015 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0016 00c7       |    |		Action	Elaborate_Subprogram
0017 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0018 00c7       |    |		Action	Elaborate_Subprogram
0019 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
001a 00c7       |    |		Action	Elaborate_Subprogram
001b			BODY_0008:
001b 00bc       |    |		Action	Signal_Activated
001c 00bb       |    |		Action	Signal_Completion
001d 0000 0000  |    |		.XXX[0x3]
001f 0000       |    |
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 0023       | #  |		.CONST	0x0023								; Address of begin
0021 0004       |    |		.CONST	0x0004								; Address of exception handler
0022 0001       |    |		.CONST	0x0001								; Number of locals
0023			BODY_0020:
0023			INIT_0020:
0023 4802       |H   |		Short_Literal	0x2
0024 e001       |    |		Load	0x0,0x1
0025 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0026 e5ff       |    |		Load	0x2,-0x1
0027 e5fe       |    |		Load	0x2,-0x2
0028 e001       |    |		Load	0x0,0x1
0029 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
002a 4801       |H   |		Short_Literal	0x1
002b e5fe       |    |		Load	0x2,-0x2
002c e001       |    |		Load	0x0,0x1
002d 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
002e 4800       |H   |		Short_Literal	0x0
002f 4800       |H   |		Short_Literal	0x0
0030 4800       |H   |		Short_Literal	0x0
0031 e5fe       |    |		Load	0x2,-0x2
0032 e001       |    |		Load	0x0,0x1
0033 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0034 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0035 0000 0000  |    |		.XXX[0x3]
0037 0000       |    |
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003b       | ;  |		.CONST	0x003b								; Address of begin
0039 0004       |    |		.CONST	0x0004								; Address of exception handler
003a 0001       |    |		.CONST	0x0001								; Number of locals
003b			BODY_0038:
003b			INIT_0038:
003b 4802       |H   |		Short_Literal	0x2
003c e001       |    |		Load	0x0,0x1
003d 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
003e e5ff       |    |		Load	0x2,-0x1
003f e5fe       |    |		Load	0x2,-0x2
0040 e001       |    |		Load	0x0,0x1
0041 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0042 4800       |H   |		Short_Literal	0x0
0043 4800       |H   |		Short_Literal	0x0
0044 4800       |H   |		Short_Literal	0x0
0045 e5fe       |    |		Load	0x2,-0x2
0046 e001       |    |		Load	0x0,0x1
0047 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0048 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0049 0000 0000  |    |		.BLANK	0000[0x7]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053       | S  |		.CONST	0x0053								; Address of begin
0051 0004       |    |		.CONST	0x0004								; Address of exception handler
0052 0001       |    |		.CONST	0x0001								; Number of locals
0053			BODY_0050:
0053			INIT_0050:
0053 00da       |    |		Load_Top	At_Offset_2
0054 e001       |    |		Load	0x0,0x1
0055 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0056 6804       |h   |		Jump_Zero	0x5b
0057 00da       |    |		Load_Top	At_Offset_2
0058 e001       |    |		Load	0x0,0x1
0059 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
005a c5ff       |    |		Store	0x2,-0x1
005b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
005c 0000 0000  |    |		.BLANK	0000[0x4]
0060 ; --------------------------------------------------------------------------------------
0060 ; Debug Table
0060 ; --------------------------------------------------------------------------------------
0060 0004 000a  |    |		.DEBUG4	0x0004,0x000a,0xf529,0x0000,0x0001,0x0000
0066 02c8 4080  |  @ |		.XXX[0x19a]
0068 02c8 1900  |    |
006a 7758 1900  |wX  |
006c 0202 4000  |  @ |
006e 2c0a 0000  |,   |
0070 2404 0000  |$   |
0072 0100 0398  |    |
0074 5740 1900  |W@  |
0076 02c8 1980  |    |
0078 1358 1900  | X  |
007a 0202 4000  |  @ |
007c 2c4a ffff  |,J  |
007e ec04 0000  |    |
0080 0100 064b  |   K|
0082 d640 4000  | @@ |
0084 7607 1f80  |v   |
0086 2207 a000  |"   |
0088 0277 8efe  | w  |
008a 83e8 1a80  |    |
008c 1240 4080  | @@ |
008e 1340 9b00  | @  |
0090 004c 002a  | L *|
0092 5648 4983  |VHI |
0094 a348 9b80  | H  |
0096 104c 0026  | L &|
0098 be48 4988  | HI |
009a b9ff ffe7  |    |
009c 8a40 4000  | @@ |
009e 7602 4000  |v @ |
00a0 208a 0000  |    |
00a2 184c 0026  | L &|
00a4 bc5c 002a  | \ *|
00a6 5650 4080  |VP@ |
00a8 0442 0000  | B  |
00aa bf50 8b83  | P  |
00ac a248 4988  | HI |
00ae d9ff ffe7  |    |
00b0 6240 4000  |b@@ |
00b2 7602 4000  |v @ |
00b4 208a 0000  |    |
00b6 184c 0026  | L &|
00b8 bc6c 002a  | l *|
00ba 5660 4080  |V`@ |
00bc 0842 0000  | B  |
00be 9760 8d83  | `  |
00c0 a248 4988  | HI |
00c2 f9ff ffe7  |    |
00c4 3a40 4000  |:@@ |
00c6 7602 4000  |v @ |
00c8 208a 0000  |    |
00ca 184c 0026  | L &|
00cc bc84 002a  |   *|
00ce 5678 4080  |Vx@ |
00d0 0c42 0000  | B  |
00d2 6f78 9083  |ox  |
00d4 a248 4989  | HI |
00d6 19ff ffe7  |    |
00d8 1240 4000  | @@ |
00da 7602 4000  |v @ |
00dc 208a 0000  |    |
00de 184c 0026  | L &|
00e0 bc94 002a  |   *|
00e2 5688 4080  |V @ |
00e4 1042 0000  | B  |
00e6 4788 9283  |G   |
00e8 a248 4989  | HI |
00ea 39ff ffe6  |9   |
00ec ea40 4000  | @@ |
00ee 7602 4000  |v @ |
00f0 208a 0000  |    |
00f2 1b00 9b00  |    |
00f4 00a4 002a  |   *|
00f6 5698 4080  |V @ |
00f8 1442 0000  | B  |
00fa 1f98 9483  |    |
00fc a300 9b80  |    |
00fe 1340 1a80  | @  |
0100 104c 0026  | L &|
0102 bd00 066e  |   n|
0104 1a48 4989  | HI |
0106 5a07 1f80  |Z   |
0108 2207 a000  |"   |
010a 0277 8efe  | w  |
010c 83e8 1a80  |    |
010e 1240 4080  | @@ |
0110 0740 9b00  | @  |
0112 004c 002a  | L *|
0114 5648 4983  |VHI |
0116 b348 9b80  | H  |
0118 104c 0026  | L &|
011a be48 4989  | HI |
011c 89ff ffe6  |    |
011e 8640 4000  | @@ |
0120 7602 4000  |v @ |
0122 208a 0000  |    |
0124 144c 0026  | L &|
0126 bc54 002a  | T *|
0128 5442 0000  |TB  |
012a 6f00 aa83  |o   |
012c b248 4989  | HI |
012e b9ff ffe6  |    |
0130 6240 4000  |b@@ |
0132 7602 4000  |v @ |
0134 208a 0000  |    |
0136 184c 0026  | L &|
0138 bc64 002a  | d *|
013a 5658 4080  |VX@ |
013c 0442 0000  | B  |
013e 4758 ac83  |GX  |
0140 b248 4989  | HI |
0142 e9ff ffe6  |    |
0144 3a40 4000  |:@@ |
0146 7602 4000  |v @ |
0148 208a 0000  |    |
014a 1b00 9b00  |    |
014c 007c 002a  | | *|
014e 5668 4080  |Vh@ |
0150 0842 0000  | B  |
0152 1f68 af83  | h  |
0154 b300 9b80  |    |
0156 1340 1a80  | @  |
0158 104c 0026  | L &|
015a bd00 066d  |   m|
015c 6a48 498a  |jHI |
015e 1607 1f80  |    |
0160 2207 a000  |"   |
0162 0277 8efe  | w  |
0164 83e8 1a80  |    |
0166 1240 4080  | @@ |
0168 0740 9b00  | @  |
016a 004c 002a  | L *|
016c 5648 4983  |VHI |
016e c348 9b80  | H  |
0170 104c 0026  | L &|
0172 be48 498a  | HI |
0174 49ff ffe5  |I   |
0176 d640 4000  | @@ |
0178 7602 4000  |v @ |
017a 208a 0000  |    |
017c 144c 0026  | L &|
017e bc54 002a  | T *|
0180 5442 0000  |TB  |
0182 e300 aa83  |    |
0184 c248 498a  | HI |
0186 8dff ffe5  |    |
0188 b240 4000  | @@ |
018a 7602 4000  |v @ |
018c 208a 0000  |    |
018e 144c 0026  | L &|
0190 bc5c 002a  | \ *|
0192 5442 0000  |TB  |
0194 bf00 ab83  |    |
0196 c248 498a  | HI |
0198 cdff ffe5  |    |
019a 8e40 4000  | @@ |
019c 7602 4000  |v @ |
019e 208a 0000  |    |
01a0 184c 0026  | L &|
01a2 bc6c 002a  | l *|
01a4 5660 4080  |V`@ |
01a6 0442 0000  | B  |
01a8 9760 ad83  | `  |
01aa c248 498b  | HI |
01ac 31ff ffe5  |1   |
01ae 6640 4000  |f@@ |
01b0 7602 4000  |v @ |
01b2 208a 0000  |    |
01b4 184c 0026  | L &|
01b6 bc84 002a  |   *|
01b8 5678 4080  |Vx@ |
01ba 0842 0000  | B  |
01bc 6f78 b083  |ox  |
01be c248 498b  | HI |
01c0 a9ff ffe5  |    |
01c2 3e40 4000  |>@@ |
01c4 7602 4000  |v @ |
01c6 208a 0000  |    |
01c8 184c 0026  | L &|
01ca bc94 002a  |   *|
01cc 5688 4080  |V @ |
01ce 0442 0000  | B  |
01d0 4788 b283  |G   |
01d2 c248 498c  | HI |
01d4 2dff ffe5  |-   |
01d6 1640 4000  | @@ |
01d8 7602 4000  |v @ |
01da 208a 0000  |    |
01dc 1b00 9b00  |    |
01de 00a4 002a  |   *|
01e0 5698 4080  |V @ |
01e2 0c42 0000  | B  |
01e4 1f98 b483  |    |
01e6 c300 9b80  |    |
01e8 1340 1a80  | @  |
01ea 104c 0026  | L &|
01ec bd00 066c  |   l|
01ee 4648 498c  |FHI |
01f0 7e07 1f80  |~   |
01f2 2207 a000  |"   |
01f4 0277 8efe  | w  |
01f6 83e8 1a80  |    |
01f8 1240 4080  | @@ |
01fa 0740 9b00  | @  |
01fc 004c 002a  | L *|
01fe 5648 4983  |VHI |