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

⟦00cc31c18⟧

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

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 5813       |X   |		.CONST	0x5813								; 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 0018       |    |		.CONST	0x0018								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 000f       |    |		.CONST	0x000f								; Number of locals
000b			INIT_0008:
000b 029a 0023  |   #|		Declare_Subprogram	INIT_0020,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x0092,0x0000,0x0000,0x0057,0x26a5,0x0000,0x00ea
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 0053  |   S|		Declare_Subprogram	INIT_0050,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 005b  |   [|		Declare_Subprogram	INIT_0058,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 00bf       |    |		Action	Accept_Activation
0012 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1 = .DEBUG	0x0012,0x009a,0x0000,0x0000,0x0057,0x2865,0x0000,0x0004
													; Debug Table 0x1.0x0 = 0x12,0xffff
0013 00c7       |    |		Action	Elaborate_Subprogram
0014 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x1 = 0x14,0xfffe
0015 00c7       |    |		Action	Elaborate_Subprogram
0016 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x2 = 0x16,0xfffd
0017 00c7       |    |		Action	Elaborate_Subprogram
0018			BODY_0008:
0018 00bc       |    |		Action	Signal_Activated
0019 00bb       |    |		Action	Signal_Completion
001a 0000 0000  |    |		.BLANK	0000[0x6]
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 002e       | .  |		.CONST	0x002e								; Address of begin
0021 0004       |    |		.CONST	0x0004								; Address of exception handler
0022 0004       |    |		.CONST	0x0004								; Number of locals
0023			INIT_0020:
0023 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2 = .DEBUG	0x0023,0x00a2,0x0001,0x0000,0x0057,0x26a5,0x0000,0x00eb
													; Debug Table 0x2.0x0 = 0x23,0xffff
0024 00db       |    |		Load_Top	At_Offset_3
0025 00eb       |    |		Load_Encached	Diana_Cache
0026 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
0027 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0028 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2.0x1 = 0x28,0xfffe
0029 e5ff       |    |		Load	0x2,-0x1
002a 00eb       |    |		Load_Encached	Diana_Cache
002b 18c0       |    |		Execute	Package,Field_Execute,Field_Number 0xc0
002c 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
002d 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2.0x2 = 0x2d,0xfffd
002e			BODY_0020:
002e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x3 = 0x2e,0x1
002f 00eb       |    |		Load_Encached	Diana_Cache
0030 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0031 0b17       |    |		Execute_Immediate	Case_Compare,0x17
0032 7003       |p   |		Jump_Nonzero	0x36
0033 0b12       |    |		Execute_Immediate	Case_Compare,0x12
0034 7007       |p   |		Jump_Nonzero	0x3c
0035 7815       |x   |		Jump	0x4b								; Debug Table 0x2.0x4 = 0x35,0x8
0036 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x2.0x5 = 0x36,0x2
0037 e5fe       |    |		Load	0x2,-0x2
0038 e403       |    |		Load	0x2,0x3
0039 8001       |    |		Call	0x0,0x1
003a 00d2       |    |		Pop_Control	Pop_Count_2
003b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x2.0x6 = 0x3b,0x3
003c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x7 = 0x3c,0x4
003d 00eb       |    |		Load_Encached	Diana_Cache
003e 18c0       |    |		Execute	Package,Field_Execute,Field_Number 0xc0
003f 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0040 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x8 = 0x40,0x5
0041 00eb       |    |		Load_Encached	Diana_Cache
0042 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0043 0f17       |    |		Execute_Immediate	Equal,0x17
0044 6806       |h   |		Jump_Zero	0x4b
0045 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x2.0x9 = 0x45,0x6
0046 e5fe       |    |		Load	0x2,-0x2
0047 e403       |    |		Load	0x2,0x3
0048 8001       |    |		Call	0x0,0x1
0049 00d2       |    |		Pop_Control	Pop_Count_2
004a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x2.0xa = 0x4a,0x7
004b 00d1       |    |		Pop_Control	Pop_Count_1
004c 6013       |`   |		Indirect_Literal	Discrete,0x60,{0x00000000, 0x5726a501}		; Debug Table 0x2.0xb = 0x4c,0x9
004d 0257       | W  |		Execute	Discrete,Raise
004e 0000 0000  |    |		.XXX[0x2]
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 600c       |`   |		Indirect_Literal	Discrete,0x60,{0x00000000, 0x5726a501}		; Debug Table 0x3 = .DEBUG	0x0053,0x00bc,0x0001,0x0000,0x0057,0x26a5,0x0000,0x0101
													; Debug Table 0x3.0x0 = 0x53,0x1
0054 0257       | W  |		Execute	Discrete,Raise
0055 0000 0000  |    |		.XXX[0x3]
0057 0000       |    |
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b       | [  |		.CONST	0x005b								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0001       |    |		.CONST	0x0001								; Number of locals
005b			BODY_0058:
005b			INIT_0058:
005b 6004       |`   |		Indirect_Literal	Discrete,0x60,{0x00000000, 0x5726a501}		; Debug Table 0x4 = .DEBUG	0x005b,0x00c0,0x0001,0x0000,0x0057,0x26a5,0x0000,0x0117
													; Debug Table 0x4.0x0 = 0x5b,0x1
005c 0257       | W  |		Execute	Discrete,Raise
005d 0000 0000  |    |		.XXX[0x3]
005f 0000       |    |
0060 0000 0000  |    |		.LITERAL	{0x00000000, 0x5726a501}
0064 0000 0000  |    |		.BLANK	0000[0x4]
0068 ; --------------------------------------------------------------------------------------
0068 ; Debug Table
0068 ; --------------------------------------------------------------------------------------
0068 0003 0005  |    |		.CONST	0x0003,0x0005
006a 000b 0092  |    |		.DEBUG	0x000b,0x0092,0x0000,0x0000,0x0057,0x26a5,0x0000,0x00ea
0072 0012 009a  |    |		.DEBUG	0x0012,0x009a,0x0000,0x0000,0x0057,0x2865,0x0000,0x0004
007a 0023 00a2  | #  |		.DEBUG	0x0023,0x00a2,0x0001,0x0000,0x0057,0x26a5,0x0000,0x00eb
0082 0053 00bc  | S  |		.DEBUG	0x0053,0x00bc,0x0001,0x0000,0x0057,0x26a5,0x0000,0x0101
008a 005b 00c0  | [  |		.DEBUG	0x005b,0x00c0,0x0001,0x0000,0x0057,0x26a5,0x0000,0x0117
0092 ; --------------------------------------------------------------------------------------
0092 ; Debug3 Subtable 0x0
0092 ; --------------------------------------------------------------------------------------
0092 0003 0000  |    |		.DBG3TAB	0x0003,0x0000
0094 000b ffff  |    |		.CONST	0x000b,0xffff
0096 000d fffe  |    |		.CONST	0x000d,0xfffe
0098 000f fffd  |    |		.CONST	0x000f,0xfffd
009a ; --------------------------------------------------------------------------------------
009a ; Debug3 Subtable 0x1
009a ; --------------------------------------------------------------------------------------
009a 0003 0000  |    |		.DBG3TAB	0x0003,0x0000
009c 0012 ffff  |    |		.CONST	0x0012,0xffff
009e 0014 fffe  |    |		.CONST	0x0014,0xfffe
00a0 0016 fffd  |    |		.CONST	0x0016,0xfffd
00a2 ; --------------------------------------------------------------------------------------
00a2 ; Debug3 Subtable 0x2
00a2 ; --------------------------------------------------------------------------------------
00a2 0003 0009  |    |		.DBG3TAB	0x0003,0x0009
00a4 0023 ffff  | #  |		.CONST	0x0023,0xffff
00a6 0028 fffe  | (  |		.CONST	0x0028,0xfffe
00a8 002d fffd  | -  |		.CONST	0x002d,0xfffd
00aa 002e 0001  | .  |		.CONST	0x002e,0x0001
00ac 0035 0008  | 5  |		.CONST	0x0035,0x0008
00ae 0036 0002  | 6  |		.CONST	0x0036,0x0002
00b0 003b 0003  | ;  |		.CONST	0x003b,0x0003
00b2 003c 0004  | <  |		.CONST	0x003c,0x0004
00b4 0040 0005  | @  |		.CONST	0x0040,0x0005
00b6 0045 0006  | E  |		.CONST	0x0045,0x0006
00b8 004a 0007  | J  |		.CONST	0x004a,0x0007
00ba 004c 0009  | L  |		.CONST	0x004c,0x0009
00bc ; --------------------------------------------------------------------------------------
00bc ; Debug3 Subtable 0x3
00bc ; --------------------------------------------------------------------------------------
00bc 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
00be 0053 0001  | S  |		.CONST	0x0053,0x0001
00c0 ; --------------------------------------------------------------------------------------
00c0 ; Debug3 Subtable 0x4
00c0 ; --------------------------------------------------------------------------------------
00c0 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
00c2 005b 0001  | [  |		.CONST	0x005b,0x0001
00c4 0000 0000  |    |		.BLANK	0000[0x13c]