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

⟦8b2e15edc⟧

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

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 0040       | @  |		.CONST	0x0040								; 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 0021       | !  |		.CONST	0x0021								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0012       |    |		.CONST	0x0012								; Number of locals
000b			INIT_0008:
000b 00e3       |    |		Load_Encached	Natural_Cache
000c 0129       | )  |		Execute	Any,Make_Visible
000d 00c4       |    |		Action	Make_Default
000e 029a 002b  |   +|		Declare_Subprogram	INIT_0028,For_Outer_Call,Visible,Unelaborated
0010 029a 0033  |   3|		Declare_Subprogram	INIT_0030,For_Outer_Call,Visible,Unelaborated
0012 029a 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Outer_Call,Visible,Unelaborated
0014 02a0       |    |		Declare_Subprogram	Null_Subprogram
0015 4800       |H   |		Short_Literal	0x0
0016 032e       | .  |		Declare_Type	Record,Defined,Visible
0017 4800       |H   |		Short_Literal	0x0
0018 0129       | )  |		Execute	Any,Make_Visible
0019 c20e       |    |		Store	0x1,0xe
001a 00bf       |    |		Action	Accept_Activation
001b 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
001c 00c7       |    |		Action	Elaborate_Subprogram
001d 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
001e 00c7       |    |		Action	Elaborate_Subprogram
001f 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0020 00c7       |    |		Action	Elaborate_Subprogram
0021			BODY_0008:
0021 00bc       |    |		Action	Signal_Activated
0022 00bb       |    |		Action	Signal_Completion
0023 0000 0000  |    |		.BLANK	0000[0x5]
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 002d       | -  |		.CONST	0x002d								; Address of begin
0029 0004       |    |		.CONST	0x0004								; Address of exception handler
002a 0002       |    |		.CONST	0x0002								; Number of locals
002b			INIT_0028:
002b e212       |    |		Load	0x1,0x12
002c 0322       | "  |		Declare_Variable	Record
002d			BODY_0028:
002d 00d8       |    |		Load_Top	At_Offset_0
002e 00ca       |    |		Action	Exit_Nullary_Function
002f 0000       |    |		.XXX[0x1]
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 0033       | 3  |		.CONST	0x0033								; Address of begin
0031 0004       |    |		.CONST	0x0004								; Address of exception handler
0032 0001       |    |		.CONST	0x0001								; Number of locals
0033			BODY_0030:
0033			INIT_0030:
0033 0831       | 1  |		Execute_Immediate	Raise,0x31
0034 0000 0000  |    |		.BLANK	0000[0x4]
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 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
003c 0000 0000  |    |		.BLANK	0000[0x4]
0040 ; --------------------------------------------------------------------------------------
0040 ; Debug Table
0040 ; --------------------------------------------------------------------------------------
0040 0004 0005  |    |		.DEBUG4	0x0004,0x0005,0xd391,0x0000,0x0001,0x0000
0046 0000 0008  |    |		.XXX[0x2]
0048 0000 0000  |    |		.BLANK	0000[0x7]
004f 00ff 0001  |    |		.XXX[0x11]
0051 0404 0000  |    |
0053 0016 001d  |    |
0055 a009 0000  |    |
0057 13b2 0001  |    |
0059 0404 0800  |    |
005b 0280 0000  |    |
005d 0010 0000  |    |
005f 0010       |    |
0060 0000 0000  |    |		.BLANK	0000[0x7]
0067 ffff 0000  |    |		.XXX[0x5]
0069 0000 0000  |    |
006b 0076       | v  |
006c 0000 0000  |    |		.BLANK	0000[0x4]
0070 0014 08fe  |    |		.XXX[0x16]
0072 c000 0796  |    |
0074 0000 0040  |   @|
0076 0000 0040  |   @|
0078 0014 0cfe  |    |
007a 8000 0002  |    |
007c 004a 500e  | JP |
007e 0000 3731  |  71|
0080 0014 10fe  |    |
0082 8000 000a  |    |
0084 0014 0cfe  |    |
0086 0000 0000  |    |		.BLANK	0000[0x86]
010c 0e6e       | n  |		.XXX[0x1]
010d 0000 0000  |    |		.BLANK	0000[0x38]
0145 0e96       |    |		.XXX[0x1]
0146 0000 0000  |    |		.BLANK	0000[0xd]
0153 00ea a000  |    |		.XXX[0x2]
0155 0000 0000  |    |		.BLANK	0000[0x1f]
0174 0098 183d  |   =|		.XXX[0x57]
0176 e403 e28c  |    |
0178 1831 4975  | 1Iu|
017a 00eb 0098  |    |
017c 183d e404  | =  |
017e e28c 182f  |   /|
0180 4975 00eb  |Iu  |
0182 0098 183d  |   =|
0184 0031 00d8  | 1  |
0186 4401 0000  |D   |
0188 3392 0004  |3   |
018a 0005 e210  |    |
018c 0007 e210  |    |
018e 0007 00ec  |    |
0190 e210 0007  |    |
0192 e210 e210  |    |
0194 e5fe e5ff  |    |
0196 83d5 c402  |    |
0198 0033 00db  | 3  |
019a 0031 00cf  | 1  |
019c 7812 00db  |x   |
019e 00eb 1872  |   r|
01a0 0033 e402  | 3  |
01a2 00db 83d4  |    |
01a4 7005 00d9  |p   |
01a6 00db 00eb  |    |
01a8 1874 0032  | t 2|
01aa 00db 00eb  |    |
01ac 1873 a403  | s  |
01ae 00c9 00db  |    |
01b0 00eb 1871  |   q|
01b2 6fea 00ce  |o   |
01b4 00d8 4402  |  D |
01b6 0000 0000  |    |
01b8 33c5 0004  |3   |
01ba 0003 00ee  |    |
01bc 00eb 1857  |   W|
01be 0031 e210  | 1  |
01c0 e5ff 8270  |   p|
01c2 e28c 1822  |   "|
01c4 0031 00d9  | 1  |
01c6 00d9 8310  |    |
01c8 0031 00d8  | 1  |
01ca 4401       |D   |
01cb 0000 0000  |    |		.BLANK	0000[0x5]
01d0 33e3 0004  |3   |		.XXX[0x30]
01d2 0005 00ec  |    |
01d4 00db 00eb  |    |
01d6 18d4 0031  |   1|
01d8 00ec e5ff  |    |
01da 00eb 18d9  |    |
01dc 0031 00ee  | 1  |
01de 00d9 00eb  |    |
01e0 1888 0031  |   1|
01e2 00e1 00e1  |    |
01e4 00db 83d7  |    |
01e6 0059 00d8  | Y  |
01e8 6804 00d9  |h   |
01ea e402 83da  |    |
01ec 4401 00eb  |D   |
01ee 1870 4401  | pD |
01f0 3403 0004  |4   |
01f2 0007 00ec  |    |
01f4 00ec 00ec  |    |
01f6 039d 00ec  |    |
01f8 e5ff 00eb  |    |
01fa 18d4 0031  |   1|
01fc 00ee e5ff  |    |
01fe 00eb 18d9  |    |