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

⟦0c75c57e2⟧

    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 0060       | `  |		.CONST	0x0060								; 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 0029       | )  |		.CONST	0x0029								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0011       |    |		.CONST	0x0011								; Number of locals
000b			INIT_0008:
000b 029a 0033  |   3|		Declare_Subprogram	INIT_0030,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x008a,0x8000,0x0000,0x0056,0xb9d5,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
													; Debug Table 0x0.0x1 = 0xb,0xfffe
													; Debug Table 0x0.0x2 = 0xb,0xfffd
000d 029a 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0xd,0xfffc
000f 00bf       |    |		Action	Accept_Activation
0010 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1 = .DEBUG	0x0010,0x0094,0x8000,0x0000,0x0056,0xbde5,0x0000,0x0003
													; Debug Table 0x1.0x0 = 0x10,0xffff
0011 4800       |H   |		Short_Literal	0x0
0012 029f 0043  |   C|		Declare_Subprogram	INIT_0040,For_Call
0014 03fd       |    |		Declare_Type	Discrete,Defined
0015 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x1 = 0x15,0xfffe
0016 0266       | f  |		Execute	Discrete,Bounds
0017 00e1       |    |		Load_Encached	Boolean_Cache
0018 02a0       |    |		Declare_Subprogram	Null_Subprogram
0019 4801       |H   |		Short_Literal	0x1
001a 035d       | ]  |		Declare_Type	Array,Defined
001b 00d8       |    |		Load_Top	At_Offset_0
001c 0337       | 7  |		Declare_Variable	Array
001d 00d8       |    |		Load_Top	At_Offset_0
001e 0337       | 7  |		Declare_Variable	Array
001f 4800       |H   |		Short_Literal	0x0
0020 4800       |H   |		Short_Literal	0x0
0021 00da       |    |		Load_Top	At_Offset_2
0022 01d6       |    |		Execute	Vector,Field_Write
0023 00d9       |    |		Load_Top	At_Offset_1
0024 01d4       |    |		Execute	Vector,Structure_Write
0025 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x2 = 0x25,0xfffd
0026 00c7       |    |		Action	Elaborate_Subprogram
0027 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x3 = 0x27,0xfffc
0028 00c7       |    |		Action	Elaborate_Subprogram
0029			BODY_0008:
0029 00bc       |    |		Action	Signal_Activated
002a 00bb       |    |		Action	Signal_Completion
002b 0000 0000  |    |		.BLANK	0000[0x5]
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 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2 = .DEBUG	0x0033,0x009e,0x0002,0x0000,0x0056,0xb9d5,0x0000,0x0013
													; Debug Table 0x2.0x0 = 0x33,0x1
0034 e211       |    |		Load	0x1,0x11
0035 01d7       |    |		Execute	Vector,Field_Read
0036 00ca       |    |		Action	Exit_Nullary_Function
0037 0000       |    |		.XXX[0x1]
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x003b,0x00a2,0x0001,0x0000,0x0056,0xb9d5,0x0000,0x0018
													; Debug Table 0x3.0x0 = 0x3b,0x1
003c 4800       |H   |		Short_Literal	0x0
003d e211       |    |		Load	0x1,0x11
003e 01d6       |    |		Execute	Vector,Field_Write
003f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0043       | C  |		.CONST	0x0043								; Address of begin
0041 0004       |    |		.CONST	0x0004								; Address of exception handler
0042 0001       |    |		.CONST	0x0001								; Number of locals
0043			BODY_0040:
0043			INIT_0040:
0043 4603       |F   |		Jump_Case	0x4							; Debug Table 0x4 = .DEBUG	0x0043,0x00a6,0x0005,0x0000,0x0056,0xbde5,0x0000,0x0004
0044 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0045 7802       |x   |		Jump	0x48								; case 0x1
0046 7805       |x   |		Jump	0x4c								; case 0x2
0047 7809       |x   |		Jump	0x51								; case 0x3
0048 00da       |    |		Load_Top	At_Offset_2
0049 0091 0055  |   U|		Action	Push_String_Extended_Indexed,0x55				; "NO_DEPENDENCIES"
004b 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
004c 00db       |    |		Load_Top	At_Offset_3
004d 00db       |    |		Load_Top	At_Offset_3
004e 00e0       |    |		Load_Encached	Standard_Cache
004f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0050 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0051 00da       |    |		Load_Top	At_Offset_2
0052 00e0       |    |		Load_Encached	Standard_Cache
0053 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0054 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0055 ; --------------------------------------------------------------------------------------
0055 ; STRING TABLE
0055 ; --------------------------------------------------------------------------------------
0055 0004       |    |		.STRTAB	0x0004->0x0057							; "NO_DEPENDENCIES"
0056 0011       |    |		.STREND 0x0011->0x005e
0057 4e4f 5f44  |NO_D|		.STRTAB_STRINGS
005f 0000       |    |		.XXX[0x1]
0060 ; --------------------------------------------------------------------------------------
0060 ; Debug Table
0060 ; --------------------------------------------------------------------------------------
0060 0003 0005  |    |		.CONST	0x0003,0x0005
0062 000b 008a  |    |		.DEBUG	0x000b,0x008a,0x8000,0x0000,0x0056,0xb9d5,0x0000,0x0005
006a 0010 0094  |    |		.DEBUG	0x0010,0x0094,0x8000,0x0000,0x0056,0xbde5,0x0000,0x0003
0072 0033 009e  | 3  |		.DEBUG	0x0033,0x009e,0x0002,0x0000,0x0056,0xb9d5,0x0000,0x0013
007a 003b 00a2  | ;  |		.DEBUG	0x003b,0x00a2,0x0001,0x0000,0x0056,0xb9d5,0x0000,0x0018
0082 0043 00a6  | C  |		.DEBUG	0x0043,0x00a6,0x0005,0x0000,0x0056,0xbde5,0x0000,0x0004
008a ; --------------------------------------------------------------------------------------
008a ; Debug3 Subtable 0x0
008a ; --------------------------------------------------------------------------------------
008a 0004 0000  |    |		.DBG3TAB	0x0004,0x0000
008c 000b ffff  |    |		.CONST	0x000b,0xffff
008e 000b fffe  |    |		.CONST	0x000b,0xfffe
0090 000b fffd  |    |		.CONST	0x000b,0xfffd
0092 000d fffc  |    |		.CONST	0x000d,0xfffc
0094 ; --------------------------------------------------------------------------------------
0094 ; Debug3 Subtable 0x1
0094 ; --------------------------------------------------------------------------------------
0094 0004 0000  |    |		.DBG3TAB	0x0004,0x0000
0096 0010 ffff  |    |		.CONST	0x0010,0xffff
0098 0015 fffe  |    |		.CONST	0x0015,0xfffe
009a 0025 fffd  | %  |		.CONST	0x0025,0xfffd
009c 0027 fffc  | '  |		.CONST	0x0027,0xfffc
009e ; --------------------------------------------------------------------------------------
009e ; Debug3 Subtable 0x2
009e ; --------------------------------------------------------------------------------------
009e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
00a0 0033 0001  | 3  |		.CONST	0x0033,0x0001
00a2 ; --------------------------------------------------------------------------------------
00a2 ; Debug3 Subtable 0x3
00a2 ; --------------------------------------------------------------------------------------
00a2 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
00a4 003b 0001  | ;  |		.CONST	0x003b,0x0001
00a6 ; --------------------------------------------------------------------------------------
00a6 ; Debug3 Subtable 0x4
00a6 ; --------------------------------------------------------------------------------------
00a6 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
00a8 0000 0000  |    |		.BLANK	0000[0x158]