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

⟦c617a79d5⟧

    Length: 1024 (0x400)
    Notes: 00_class, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df

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 5811       |X   |		.CONST	0x5811								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0068       | h  |		.CONST	0x0068								; 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 0000       |    |		.CONST	0x0000								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0030       | 0  |		.CONST	0x0030								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0012       |    |		.CONST	0x0012								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x008a,0x8000,0x0000,0x0037,0x5484,0x0000,0x0007
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 4801       |H   |		Short_Literal	0x1							; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 480a       |H   |		Short_Literal	0xa
000f 00e8       |    |		Load_Encached	Character_Cache
0010 02a0       |    |		Declare_Subprogram	Null_Subprogram
0011 4801       |H   |		Short_Literal	0x1
0012 035e       | ^  |		Declare_Type	Array,Defined,Visible
0013 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x3 = 0x13,0xfffc
0014 0336       | 6  |		Declare_Variable	Array,Visible
0015 00d9       |    |		Load_Top	At_Offset_1
0016 0337       | 7  |		Declare_Variable	Array
0017 480a       |H   |		Short_Literal	0xa
0018 4801       |H   |		Short_Literal	0x1
0019 4820       |H   |		Short_Literal	0x20
001a 00d9       |    |		Load_Top	At_Offset_1
001b e20f       |    |		Load	0x1,0xf
001c 01d6       |    |		Execute	Vector,Field_Write
001d 3ffb       |?   |		Loop_Increasing	0x19
001e 00d9       |    |		Load_Top	At_Offset_1
001f 01d4       |    |		Execute	Vector,Structure_Write
0020 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x0.0x4 = 0x20,0xfffb
0021 0129       | )  |		Execute	Any,Make_Visible
0022 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x5 = 0x22,0xfffa
0023 0336       | 6  |		Declare_Variable	Array,Visible
0024 00da       |    |		Load_Top	At_Offset_2
0025 00d9       |    |		Load_Top	At_Offset_1
0026 01d4       |    |		Execute	Vector,Structure_Write
0027 029a 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x27,0xfff9
0029 029a 0053  |   S|		Declare_Subprogram	INIT_0050,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x29,0xfff8
002b 00bf       |    |		Action	Accept_Activation
002c 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1 = .DEBUG	0x002c,0x009c,0x8000,0x0000,0x0037,0x54d4,0x0000,0x0005
													; Debug Table 0x1.0x0 = 0x2c,0xffff
002d 00c7       |    |		Action	Elaborate_Subprogram
002e 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x1 = 0x2e,0xfffe
002f 00c7       |    |		Action	Elaborate_Subprogram
0030			BODY_0008:
0030 00bc       |    |		Action	Signal_Activated
0031 00bb       |    |		Action	Signal_Completion
0032 0000 0000  |    |		.BLANK	0000[0x6]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 0040       | @  |		.CONST	0x0040								; Address of begin
0039 0004       |    |		.CONST	0x0004								; Address of exception handler
003a 0002       |    |		.CONST	0x0002								; Number of locals
003b			INIT_0038:
003b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2 = .DEBUG	0x003b,0x00a2,0x0001,0x0000,0x0037,0x5484,0x0000,0x0033
													; Debug Table 0x2.0x0 = 0x3b,0xffff
003c 01da       |    |		Execute	Vector,Bounds
003d 00e9       |    |		Load_Encached	String_Cache
003e 035b       | [  |		Declare_Type	Array,Constrained
003f 0337       | 7  |		Declare_Variable	Array
0040			BODY_0038:
0040 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2.0x1 = 0x40,0x1
0041 01d9       |    |		Execute	Vector,Reverse_Bounds
0042 0007       |    |		Action	Break_Optional
0043 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x2 = 0x43,0x2
0044 e5fe       |    |		Load	0x2,-0x2
0045 01d7       |    |		Execute	Vector,Field_Read
0046 00d9       |    |		Load_Top	At_Offset_1
0047 e402       |    |		Load	0x2,0x2
0048 01d6       |    |		Execute	Vector,Field_Write
0049 3ff9       |?   |		Loop_Increasing	0x43
004a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x3 = 0x4a,0x3
004b e5ff       |    |		Load	0x2,-0x1
004c e001       |    |		Load	0x0,0x1
004d 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
004e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
004f 0000       |    |		.XXX[0x1]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 005d       | ]  |		.CONST	0x005d								; Address of begin
0051 0004       |    |		.CONST	0x0004								; Address of exception handler
0052 0002       |    |		.CONST	0x0002								; Number of locals
0053			INIT_0050:
0053 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3 = .DEBUG	0x0053,0x00ac,0x0001,0x0000,0x0037,0x5484,0x0000,0x0041
													; Debug Table 0x3.0x0 = 0x53,0xffff
0054 01da       |    |		Execute	Vector,Bounds
0055 00e9       |    |		Load_Encached	String_Cache
0056 035b       | [  |		Declare_Type	Array,Constrained
0057 0337       | 7  |		Declare_Variable	Array
0058 00db       |    |		Load_Top	At_Offset_3
0059 e001       |    |		Load	0x0,0x1
005a 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
005b 00d9       |    |		Load_Top	At_Offset_1
005c 01d4       |    |		Execute	Vector,Structure_Write
005d			BODY_0050:
005d e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0x1 = 0x5d,0x1
005e 01d9       |    |		Execute	Vector,Reverse_Bounds
005f 0007       |    |		Action	Break_Optional
0060 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x2 = 0x60,0x2
0061 00db       |    |		Load_Top	At_Offset_3
0062 01d7       |    |		Execute	Vector,Field_Read
0063 00d9       |    |		Load_Top	At_Offset_1
0064 e5fe       |    |		Load	0x2,-0x2
0065 01d6       |    |		Execute	Vector,Field_Write
0066 3ff9       |?   |		Loop_Increasing	0x60
0067 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0068 ; --------------------------------------------------------------------------------------
0068 ; Debug Table
0068 ; --------------------------------------------------------------------------------------
0068 0003 0004  |    |		.CONST	0x0003,0x0004
006a 000b 008a  |    |		.DEBUG	0x000b,0x008a,0x8000,0x0000,0x0037,0x5484,0x0000,0x0007
0072 002c 009c  | ,  |		.DEBUG	0x002c,0x009c,0x8000,0x0000,0x0037,0x54d4,0x0000,0x0005
007a 003b 00a2  | ;  |		.DEBUG	0x003b,0x00a2,0x0001,0x0000,0x0037,0x5484,0x0000,0x0033
0082 0053 00ac  | S  |		.DEBUG	0x0053,0x00ac,0x0001,0x0000,0x0037,0x5484,0x0000,0x0041
008a ; --------------------------------------------------------------------------------------
008a ; Debug3 Subtable 0x0
008a ; --------------------------------------------------------------------------------------
008a 0008 0000  |    |		.DBG3TAB	0x0008,0x0000
008c 000b ffff  |    |		.CONST	0x000b,0xffff
008e 000c fffe  |    |		.CONST	0x000c,0xfffe
0090 000d fffd  |    |		.CONST	0x000d,0xfffd
0092 0013 fffc  |    |		.CONST	0x0013,0xfffc
0094 0020 fffb  |    |		.CONST	0x0020,0xfffb
0096 0022 fffa  | "  |		.CONST	0x0022,0xfffa
0098 0027 fff9  | '  |		.CONST	0x0027,0xfff9
009a 0029 fff8  | )  |		.CONST	0x0029,0xfff8
009c ; --------------------------------------------------------------------------------------
009c ; Debug3 Subtable 0x1
009c ; --------------------------------------------------------------------------------------
009c 0002 0000  |    |		.DBG3TAB	0x0002,0x0000
009e 002c ffff  | ,  |		.CONST	0x002c,0xffff
00a0 002e fffe  | .  |		.CONST	0x002e,0xfffe
00a2 ; --------------------------------------------------------------------------------------
00a2 ; Debug3 Subtable 0x2
00a2 ; --------------------------------------------------------------------------------------
00a2 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
00a4 003b ffff  | ;  |		.CONST	0x003b,0xffff
00a6 0040 0001  | @  |		.CONST	0x0040,0x0001
00a8 0043 0002  | C  |		.CONST	0x0043,0x0002
00aa 004a 0003  | J  |		.CONST	0x004a,0x0003
00ac ; --------------------------------------------------------------------------------------
00ac ; Debug3 Subtable 0x3
00ac ; --------------------------------------------------------------------------------------
00ac 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
00ae 0053 ffff  | S  |		.CONST	0x0053,0xffff
00b0 005d 0001  | ]  |		.CONST	0x005d,0x0001
00b2 0060 0002  | `  |		.CONST	0x0060,0x0002
00b4 0000 0000  |    |		.BLANK	0000[0x14c]