DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 DFS Tapes

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 DFS Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦99b850c4e⟧ SEG

    Length: 1024 (0x400)
    Types: SEG
    Notes: 5811_R1K_CODE
    Names: »11283.SEG«

Derivation

└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
    └─ ⟦this⟧ »11283.SEG« 
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
    └─ ⟦this⟧ »11283.SEG« 
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
    └─ ⟦this⟧ »11283.SEG« 
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
    └─ ⟦this⟧ »11283.SEG« 
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
    └─ ⟦this⟧ »11283.SEG« 

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 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 0100       |    |		.CONST	0x0100								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 002d       | -  |		.CONST	0x002d								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 000f       |    |		.CONST	0x000f								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x0062,0x8000,0x0000,0x0035,0xdaf4,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 029a 0033  |   3|		Declare_Subprogram	INIT_0030,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xd,0xfffd
000f 00bf       |    |		Action	Accept_Activation
0010 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0010,0x006a,0x8000,0x0000,0x0035,0xdb34,0x0000,0x0009
													; Debug Table 0x1.0x0 = 0x10,0xffff
0011 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x11,0xfffe
0012 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x2 = 0x12,0xfffd
0013 4803       |H   |		Short_Literal	0x3
0014 e001       |    |		Load	0x0,0x1
0015 1b52       | R  |		Execute	Package,Field_Read,Field_Number 0x52
0016 02a0       |    |		Declare_Subprogram	Null_Subprogram
0017 4801       |H   |		Short_Literal	0x1
0018 035d       | ]  |		Declare_Type	Array,Defined
0019 00d8       |    |		Load_Top	At_Offset_0
001a 0337       | 7  |		Declare_Variable	Array
001b 00d8       |    |		Load_Top	At_Offset_0
001c 0337       | 7  |		Declare_Variable	Array
001d 4803       |H   |		Short_Literal	0x3
001e 4800       |H   |		Short_Literal	0x0
001f e001       |    |		Load	0x0,0x1
0020 1b52       | R  |		Execute	Package,Field_Read,Field_Number 0x52
0021 0322       | "  |		Declare_Variable	Record
0022 4fff       |O   |		Short_Literal	-0x1
0023 00d9       |    |		Load_Top	At_Offset_1
0024 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0025 00d9       |    |		Load_Top	At_Offset_1
0026 e210       |    |		Load	0x1,0x10
0027 01d6       |    |		Execute	Vector,Field_Write
0028 3ff6       |?   |		Loop_Increasing	0x1f
0029 00d9       |    |		Load_Top	At_Offset_1
002a 01d4       |    |		Execute	Vector,Structure_Write
002b 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x3 = 0x2b,0xfffc
002c 00c7       |    |		Action	Elaborate_Subprogram
002d			BODY_0008:
002d 00bc       |    |		Action	Signal_Activated
002e 00bb       |    |		Action	Signal_Completion
002f 0000       |    |		.XXX[0x1]
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 0034       | 4  |		.CONST	0x0034								; Address of begin
0031 0004       |    |		.CONST	0x0004								; Address of exception handler
0032 0002       |    |		.CONST	0x0002								; Number of locals
0033			INIT_0030:
0033 00e5       |    |		Load_Encached	Long_Integer_Cache					; Debug Table 0x2 = .DEBUG	0x0033,0x0074,0x0002,0x0000,0x0035,0xdaf4,0x0000,0x0013
													; Debug Table 0x2.0x0 = 0x33,0xffff
0034			BODY_0030:
0034 e002       |    |		Load	0x0,0x2								; Debug Table 0x2.0x1 = 0x34,0x1
0035 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0036 e20f       |    |		Load	0x1,0xf
0037 01d7       |    |		Execute	Vector,Field_Read
0038 00e5       |    |		Load_Encached	Long_Integer_Cache
0039 00d9       |    |		Load_Top	At_Offset_1
003a e001       |    |		Load	0x0,0x1
003b 1853       | S  |		Execute	Package,Field_Execute,Field_Number 0x53
003c 00d1       |    |		Pop_Control	Pop_Count_1
003d 005a       | Z  |		Store_Top	Discrete,At_Offset_2
003e 00d1       |    |		Pop_Control	Pop_Count_1
003f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x2 = 0x3f,0x2
0040 480f       |H   |		Short_Literal	0xf
0041 026e       | n  |		Execute	Discrete,Modulo
0042 00e3       |    |		Load_Encached	Natural_Cache
0043 025b       | [  |		Execute	Discrete,Check_In_Type
0044 00ca       |    |		Action	Exit_Nullary_Function
0045 0000 0000  |    |		.XXX[0x3]
0047 0000       |    |
0048 ; --------------------------------------------------------------------------------------
0048 ; Debug Table
0048 ; --------------------------------------------------------------------------------------
0048 0003 0003  |    |		.CONST	0x0003,0x0003
004a 000b 0062  |   b|		.DEBUG	0x000b,0x0062,0x8000,0x0000,0x0035,0xdaf4,0x0000,0x0005
0052 0010 006a  |   j|		.DEBUG	0x0010,0x006a,0x8000,0x0000,0x0035,0xdb34,0x0000,0x0009
005a 0033 0074  | 3 t|		.DEBUG	0x0033,0x0074,0x0002,0x0000,0x0035,0xdaf4,0x0000,0x0013
0062 ; --------------------------------------------------------------------------------------
0062 ; Debug3 Subtable 0x0
0062 ; --------------------------------------------------------------------------------------
0062 0003 0000  |    |		.DBG3TAB	0x0003,0x0000
0064 000b ffff  |    |		.CONST	0x000b,0xffff
0066 000c fffe  |    |		.CONST	0x000c,0xfffe
0068 000d fffd  |    |		.CONST	0x000d,0xfffd
006a ; --------------------------------------------------------------------------------------
006a ; Debug3 Subtable 0x1
006a ; --------------------------------------------------------------------------------------
006a 0004 0000  |    |		.DBG3TAB	0x0004,0x0000
006c 0010 ffff  |    |		.CONST	0x0010,0xffff
006e 0011 fffe  |    |		.CONST	0x0011,0xfffe
0070 0012 fffd  |    |		.CONST	0x0012,0xfffd
0072 002b fffc  | +  |		.CONST	0x002b,0xfffc
0074 ; --------------------------------------------------------------------------------------
0074 ; Debug3 Subtable 0x2
0074 ; --------------------------------------------------------------------------------------
0074 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0076 0033 ffff  | 3  |		.CONST	0x0033,0xffff
0078 0034 0001  | 4  |		.CONST	0x0034,0x0001
007a 003f 0002  | ?  |		.CONST	0x003f,0x0002
007c 0000 0000  |    |		.BLANK	0000[0x184]