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

⟦3c2c06241⟧

    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 0048       | H  |		.CONST	0x0048								; 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 001d       |    |		.CONST	0x001d								; 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,0x006a,0x0000,0x0000,0x0056,0xba95,0x0000,0x0c51
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 0033  |   3|		Declare_Subprogram	INIT_0030,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 00bf       |    |		Action	Accept_Activation
0010 0092 003b  |   ;|		Action	Push_String_Extended,0x3b					; "CD_IMPL_SIZE"
													; Debug Table 0x1 = .DEBUG	0x0010,0x0070,0x0000,0x0000,0x0056,0xbac5,0x0000,0x0004
													; Debug Table 0x1.0x0 = 0x10,0xffff
													; Debug Table 0x1.0x1 = 0x10,0xfffe
0012 4973       |Is  |		Short_Literal	0x173
0013 00eb       |    |		Load_Encached	Diana_Cache
0014 0098       |    |		Execute	Package,Field_Read_Dynamic
0015 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0016 00eb       |    |		Load_Encached	Diana_Cache
0017 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0018 03f1       |    |		Declare_Variable	Discrete,With_Value
0019 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x2 = 0x19,0xfffd
001a 00c7       |    |		Action	Elaborate_Subprogram
001b 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x3 = 0x1b,0xfffc
001c 00c7       |    |		Action	Elaborate_Subprogram
001d			BODY_0008:
001d 00bc       |    |		Action	Signal_Activated
001e 00bb       |    |		Action	Signal_Completion
001f 0000       |    |		.XXX[0x1]
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 e20f       |    |		Load	0x1,0xf								; Debug Table 0x2 = .DEBUG	0x0023,0x007a,0x0002,0x0000,0x0056,0xba95,0x0000,0x0c52
													; Debug Table 0x2.0x0 = 0x23,0x1
0024 00db       |    |		Load_Top	At_Offset_3
0025 4973       |Is  |		Short_Literal	0x173
0026 00eb       |    |		Load_Encached	Diana_Cache
0027 0098       |    |		Execute	Package,Field_Read_Dynamic
0028 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0029 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
002a 0000 0000  |    |		.BLANK	0000[0x6]
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 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3 = .DEBUG	0x0033,0x007e,0x0001,0x0000,0x0056,0xba95,0x0000,0x0c5b
													; Debug Table 0x3.0x0 = 0x33,0x1
0034 e20f       |    |		Load	0x1,0xf
0035 00dc       |    |		Load_Top	At_Offset_4
0036 4973       |Is  |		Short_Literal	0x173
0037 00eb       |    |		Load_Encached	Diana_Cache
0038 0098       |    |		Execute	Package,Field_Read_Dynamic
0039 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
003a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
003b ; --------------------------------------------------------------------------------------
003b ; STRING TABLE
003b ; --------------------------------------------------------------------------------------
003b 0004       |    |		.STRTAB	0x0004->0x003d							; "CD_IMPL_SIZE"
003c 000e       |    |		.STREND 0x000e->0x0043
003d 4344 5f49  |CD_I|		.STRTAB_STRINGS
0043 0000 0000  |    |		.BLANK	0000[0x5]
0048 ; --------------------------------------------------------------------------------------
0048 ; Debug Table
0048 ; --------------------------------------------------------------------------------------
0048 0003 0004  |    |		.CONST	0x0003,0x0004
004a 000b 006a  |   j|		.DEBUG	0x000b,0x006a,0x0000,0x0000,0x0056,0xba95,0x0000,0x0c51
0052 0010 0070  |   p|		.DEBUG	0x0010,0x0070,0x0000,0x0000,0x0056,0xbac5,0x0000,0x0004
005a 0023 007a  | # z|		.DEBUG	0x0023,0x007a,0x0002,0x0000,0x0056,0xba95,0x0000,0x0c52
0062 0033 007e  | 3 ~|		.DEBUG	0x0033,0x007e,0x0001,0x0000,0x0056,0xba95,0x0000,0x0c5b
006a ; --------------------------------------------------------------------------------------
006a ; Debug3 Subtable 0x0
006a ; --------------------------------------------------------------------------------------
006a 0002 0000  |    |		.DBG3TAB	0x0002,0x0000
006c 000b ffff  |    |		.CONST	0x000b,0xffff
006e 000d fffe  |    |		.CONST	0x000d,0xfffe
0070 ; --------------------------------------------------------------------------------------
0070 ; Debug3 Subtable 0x1
0070 ; --------------------------------------------------------------------------------------
0070 0004 0000  |    |		.DBG3TAB	0x0004,0x0000
0072 0010 ffff  |    |		.CONST	0x0010,0xffff
0074 0010 fffe  |    |		.CONST	0x0010,0xfffe
0076 0019 fffd  |    |		.CONST	0x0019,0xfffd
0078 001b fffc  |    |		.CONST	0x001b,0xfffc
007a ; --------------------------------------------------------------------------------------
007a ; Debug3 Subtable 0x2
007a ; --------------------------------------------------------------------------------------
007a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
007c 0023 0001  | #  |		.CONST	0x0023,0x0001
007e ; --------------------------------------------------------------------------------------
007e ; Debug3 Subtable 0x3
007e ; --------------------------------------------------------------------------------------
007e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0080 0033 0001  | 3  |		.CONST	0x0033,0x0001
0082 0000 0000  |    |		.BLANK	0000[0x17e]