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

⟦f1ad0404d⟧

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

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 0080       |    |		.CONST	0x0080								; 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 0004       |    |		.CONST	0x0004								; Number of locals
000b			INIT_0008:
000b 00e3       |    |		Load_Encached	Natural_Cache
000c 00e3       |    |		Load_Encached	Natural_Cache
000d 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
000e 029f 004b  |   K|		Declare_Subprogram	INIT_0048,For_Call
0010			BODY_0008:
0010 00cf       |    |		Action	Mark_Auxiliary
0011 00e3       |    |		Load_Encached	Natural_Cache
0012 e21a       |    |		Load	0x1,0x1a
0013 e004       |    |		Load	0x0,0x4
0014 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0015 e5ff       |    |		Load	0x2,-0x1
0016 e215       |    |		Load	0x1,0x15
0017 e003       |    |		Load	0x0,0x3
0018 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0019 c217       |    |		Store	0x1,0x17
001a 00d1       |    |		Pop_Control	Pop_Count_1
001b c402       |    |		Store	0x2,0x2
001c 00db       |    |		Load_Top	At_Offset_3
001d 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
001e 6808       |h   |		Jump_Zero	0x27
001f e213       |    |		Load	0x1,0x13
0020 e217       |    |		Load	0x1,0x17
0021 e007       |    |		Load	0x0,0x7
0022 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0023 8404       |    |		Call	0x2,0x4
0024 00db       |    |		Load_Top	At_Offset_3
0025 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0026 7819       |x   |		Jump	0x40
0027 e5fe       |    |		Load	0x2,-0x2
0028 6816       |h   |		Jump_Zero	0x3f
0029 e215       |    |		Load	0x1,0x15
002a e003       |    |		Load	0x0,0x3
002b 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
002c 6812       |h   |		Jump_Zero	0x3f
002d 4800       |H   |		Short_Literal	0x0
002e e211       |    |		Load	0x1,0x11
002f e001       |    |		Load	0x0,0x1
0030 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0031 0119       |    |		Execute	Any,Check_In_Formal_Type
0032 4806       |H   |		Short_Literal	0x6
0033 0092 0060  |   `|		Action	Push_String_Extended,0x60					; "Waiting for output from remote command; last data was "
0035 4801       |H   |		Short_Literal	0x1
0036 e403       |    |		Load	0x2,0x3
0037 e21a       |    |		Load	0x1,0x1a
0038 01cf       |    |		Execute	Vector,Slice_Read
0039 e00d       |    |		Load	0x0,0xd
003a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
003b 01cc       |    |		Execute	Vector,Catenate
003c e001       |    |		Load	0x0,0x1
003d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
003e 7801       |x   |		Jump	0x40
003f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0040 00c9       |    |		Action	Pop_Auxiliary_Loop
0041 7fcf       |    |		Jump	0x11
0042 0000 0000  |    |		.BLANK	0000[0x6]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 0052       | R  |		.CONST	0x0052								; Address of begin
0049 0004       |    |		.CONST	0x0004								; Address of exception handler
004a 0003       |    |		.CONST	0x0003								; Number of locals
004b			INIT_0048:
004b 4801       |H   |		Short_Literal	0x1
004c e402       |    |		Load	0x2,0x2
004d e21a       |    |		Load	0x1,0x1a
004e 01cf       |    |		Execute	Vector,Slice_Read
004f e00d       |    |		Load	0x0,0xd
0050 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0051 00e1       |    |		Load_Encached	Boolean_Cache
0052			BODY_0048:
0052 00e1       |    |		Load_Encached	Boolean_Cache
0053 e5fd       |    |		Load	0x2,-0x3
0054 e21d       |    |		Load	0x1,0x1d
0055 0227       | '  |		Execute	Access,All_Reference
0056 e602       |    |		Load	0x3,0x2
0057 e006       |    |		Load	0x0,0x6
0058 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0059 00d1       |    |		Pop_Control	Pop_Count_1
005a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
005b 00d8       |    |		Load_Top	At_Offset_0
005c 6802       |h   |		Jump_Zero	0x5f
005d 00cc       |    |		Action	Pop_Block
005e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
005f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0060 ; --------------------------------------------------------------------------------------
0060 ; STRING TABLE
0060 ; --------------------------------------------------------------------------------------
0060 0004       |    |		.STRTAB	0x0004->0x0062							; "Waiting for output from remote command; last data was "
0061 0038       | 8  |		.STREND 0x0038->0x007d
0062 5761 6974  |Wait|		.STRTAB_STRINGS
007d 0000 0000  |    |		.XXX[0x3]
007f 0000       |    |
0080 ; --------------------------------------------------------------------------------------
0080 ; Debug Table
0080 ; --------------------------------------------------------------------------------------
0080 0004 0001  |    |		.DEBUG4	0x0004,0x0001,0xc86c,0x0000,0x0001,0x0000
0086 7cee d0d2  ||   |		.XXX[0xa5]
0088 c6d0 40da  |  @ |
008a cac2 dce6  |    |
008c 40e8 d0c2  |@   |
008e e840 e8d0  | @  |
0090 ca40 deea  | @  |
0092 e8c6 deda  |    |
0094 ca40 decc  | @  |
0096 40e8 d0ca  |@   |
0098 40c8 c2e8  |@   |
009a c240 e8e4  | @  |
009c c2dc e6cc  |    |
009e cae4 40c6  |  @ |
00a0 deea d8c8  |    |
00a2 40dc dee8  |@   |
00a4 40c4 ca00  |@   |
00a6 0000 2000  |    |
00a8 0000 8040  |   @|
00aa 40ee d0d2  |@   |
00ac c6d0 40da  |  @ |
00ae cac2 dce6  |    |
00b0 40e8 d0c2  |@   |
00b2 e840 e8d0  | @  |
00b4 ca40 deea  | @  |
00b6 e8c6 deda  |    |
00b8 ca40 decc  | @  |
00ba 40e8 d0ca  |@   |
00bc 40c8 c2e8  |@   |
00be c240 e8e4  | @  |
00c0 c2dc e6cc  |    |
00c2 cae4 40c6  |  @ |
00c4 deea d8c8  |    |
00c6 40dc dee8  |@   |
00c8 40c4 ca00  |@   |
00ca 0000 2000  |    |
00cc 0000 8040  |   @|
00ce 40ee d0d2  |@   |
00d0 c6d0 40da  |  @ |
00d2 cac2 dce6  |    |
00d4 40e8 d0c2  |@   |
00d6 e840 e8d0  | @  |
00d8 ca40 deea  | @  |
00da e8c6 deda  |    |
00dc ca40 decc  | @  |
00de 40e8 d0ca  |@   |
00e0 40c8 c2e8  |@   |
00e2 c240 e8e4  | @  |
00e4 c2dc e6cc  |    |
00e6 cae4 40c6  |  @ |
00e8 deea d8c8  |    |
00ea 40dc dee8  |@   |
00ec 40c4 ca00  |@   |
00ee 0000 a600  |    |
00f0 0000 16c8  |    |
00f2 cae8 cae4  |    |
00f4 dad2 dcca  |    |
00f6 c85c 0000  | \  |
00f8 00a2 0000  |    |
00fa 001a 4040  |  @@|
00fc c8ca e8ca  |    |
00fe e4da d2dc  |    |
0100 cac8 5c00  |  \ |
0102 0000 a200  |    |
0104 0000 1a40  |   @|
0106 40c8 cae8  |@   |
0108 cae4 dad2  |    |
010a dcca c85c  |   \|
010c 0000 00c2  |    |
010e 0000 0014  |    |
0110 8cd2 d8ca  |    |
0112 be8a e4e4  |    |
0114 dee4 0000  |    |
0116 00be 0000  |    |
0118 0018 4040  |  @@|
011a 8cd2 d8ca  |    |
011c be8a e4e4  |    |
011e dee4 0000  |    |
0120 00be 0000  |    |
0122 0018 4040  |  @@|
0124 8cd2 d8ca  |    |
0126 be8a e4e4  |    |
0128 dee4 0000  |    |
012a 0002       |    |
012b 0000 0000  |    |		.BLANK	0000[0x5]
0130 00d8 0000  |    |		.XXX[0x94]
0132 0000 0000  |    |
0134 00d6 0000  |    |
0136 00de 0000  |    |
0138 007e 92dc  | ~  |
013a c8d2 c6c2  |    |
013c e8ca e640  |   @|
013e e8d0 c2e8  |    |
0140 40c2 40e8  |@ @ |
0142 e4c2 dce6  |    |
0144 ccca e440  |   @|
0146 ccc2 d2d8  |    |
0148 cac8 40c4  |  @ |
014a cac6 c2ea  |    |
014c e6ca 40de  |  @ |
014e cc40 c240  | @ @|
0150 d8de c6c2  |    |
0152 d840 ccd2  | @  |
0154 d8ca 40ca  |  @ |
0156 e4e4 dee4  |    |
0158 5c00 0000  |\   |
015a da00 0000  |    |
015c 8240 4092  | @@ |
015e dcc8 d2c6  |    |
0160 c2e8 cae6  |    |
0162 40e8 d0c2  |@   |
0164 e840 c240  | @ @|
0166 e8e4 c2dc  |    |
0168 e6cc cae4  |    |
016a 40cc c2d2  |@   |
016c d8ca c840  |   @|
016e c4ca c6c2  |    |
0170 eae6 ca40  |   @|
0172 decc 40c2  |  @ |
0174 40d8 dec6  |@   |
0176 c2d8 40cc  |  @ |
0178 d2d8 ca40  |   @|
017a cae4 e4de  |    |
017c e45c 0000  | \  |
017e 00da 0000  |    |
0180 0082 4040  |  @@|
0182 92dc c8d2  |    |
0184 c6c2 e8ca  |    |
0186 e640 e8d0  | @  |
0188 c2e8 40c2  |  @ |
018a 40e8 e4c2  |@   |
018c dce6 ccca  |    |
018e e440 ccc2  | @  |
0190 d2d8 cac8  |    |
0192 40c4 cac6  |@   |
0194 c2ea e6ca  |    |
0196 40de cc40  |@  @|
0198 c240 d8de  | @  |
019a c6c2 d840  |   @|
019c ccd2 d8ca  |    |
019e 40ca e4e4  |@   |
01a0 dee4 5c00  |  \ |
01a2 0000 6200  |  b |
01a4 0000 188c  |    |
01a6 d2d8 cadc  |    |
01a8 c2da cabe  |    |
01aa 84c2 c800  |    |
01ac 0000 5e00  |  ^ |
01ae 0000 1c40  |   @|
01b0 408c d2d8  |@   |
01b2 cadc c2da  |    |
01b4 cabe 84c2  |    |
01b6 c800 0000  |    |
01b8 5e00 0000  |^   |
01ba 1c40 408c  | @@ |
01bc d2d8 cadc  |    |
01be c2da cabe  |    |
01c0 84c2 c800  |    |
01c2 0000 0200  |    |
01c4 0000 0000  |    |		.BLANK	0000[0x5]
01c9 7c00 0000  ||   |		.XXX[0x37]
01cb 0000 0000  |    |
01cd 7a00 0000  |z   |
01cf 8200 0000  |    |
01d1 8092 dcc8  |    |
01d3 d2c6 c2e8  |    |
01d5 cae6 40e8  |  @ |
01d7 d0c2 e840  |   @|
01d9 e8d0 ca40  |   @|
01db ccd2 d8ca  |    |
01dd dcc2 daca  |    |
01df 40e6 e0ca  |@   |
01e1 c6d2 ccd2  |    |
01e3 cac8 40cc  |  @ |
01e5 dee4 40e8  |  @ |
01e7 d0ca 40e4  |  @ |
01e9 cada dee8  |    |
01eb ca40 dac2  | @  |
01ed c6d0 d2dc  |    |
01ef ca40 eec2  | @  |
01f1 e600 0000  |    |
01f3 7e00 0000  |~   |
01f5 8440 4092  | @@ |
01f7 dcc8 d2c6  |    |
01f9 c2e8 cae6  |    |
01fb 40e8 d0c2  |@   |
01fd e840 e8d0  | @  |
01ff ca40       | @  |