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

⟦b84fc5a98⟧ SEG

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

Derivation

└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
    └─ ⟦this⟧ »994323.SEG« 
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
    └─ ⟦this⟧ »994323.SEG« 
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
    └─ ⟦this⟧ »994323.SEG« 
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
    └─ ⟦this⟧ »994323.SEG« 
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
    └─ ⟦this⟧ »994323.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 0088       |    |		.CONST	0x0088								; 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 001d       |    |		.CONST	0x001d								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 000e       |    |		.CONST	0x000e								; Number of locals
000b			INIT_0008:
000b 4806       |H   |		Short_Literal	0x6							; Debug Table 0x0 = .DEBUG	0x000b,0x00ca,0x8000,0x0000,0x0037,0x0694,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 6017       |`   |		Indirect_Literal	Discrete,0x24,{0x000f2c13, 0x00000330}		; 0xf2c13 = ARRAY_QUEUE_MANAGER
000d 02a0       |    |		Declare_Subprogram	Null_Subprogram
000e 038d       |    |		Declare_Type	Package,Defined,Visible,Not_Elaborated
000f e001       |    |		Load	0x0,0x1
0010 4801       |H   |		Short_Literal	0x1
0011 00da       |    |		Load_Top	At_Offset_2
0012 020e       |    |		Execute	Module,Augment_Imports
0013 0007       |    |		Action	Break_Optional
0014 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x1 = 0x14,0xfffe
0015 600a       |`   |		Indirect_Literal	Discrete,0x20,{0x000f2c13, 0x000002b0}		; 0xf2c13 = ARRAY_QUEUE_MANAGER
0016 02a0       |    |		Declare_Subprogram	Null_Subprogram
0017 037e       | ~  |		Declare_Type	Task,Defined,Visible
0018 036e       | n  |		Declare_Variable	Task,Visible
0019 00bf       |    |		Action	Accept_Activation
001a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1 = .DEBUG	0x001a,0x00d0,0x8000,0x0000,0x0037,0x14d4,0x0000,0x0003
													; Debug Table 0x1.0x0 = 0x1a,0xffff
001b 020d       |    |		Execute	Module,Elaborate
001c 0007       |    |		Action	Break_Optional
001d			BODY_0008:
001d 00be       |    |		Action	Activate_Tasks							; Debug Table 0x1.0x1 = 0x1d,0xfffe
001e 00bc       |    |		Action	Signal_Activated
001f 00bb       |    |		Action	Signal_Completion
0020 000f 2c13  |  , |		.LITERAL	{0x000f2c13, 0x000002b0}
0024 000f 2c13  |  , |		.LITERAL	{0x000f2c13, 0x00000330}
0028 002d 0004  | -  |		.XXX[0x3]
002a 000c       |    |
002b 00bf       |    |		Action	Accept_Activation						; Debug Table 0x2 = .DEBUG	0x002b,0x00d6,0x0000,0x0000,0x0037,0x0694,0x0000,0x0086
002c 00bc       |    |		Action	Signal_Activated						; Debug Table 0x3 = .DEBUG	0x002c,0x00d8,0x0000,0x0000,0x0037,0x14d4,0x0000,0x003e
002d 00bb       |    |		Action	Signal_Completion						; Debug Table 0x3.0x0 = 0x2d,0x1
002e 0000 0000  |    |		.XXX[0x5]
0030 005f 0004  | _  |
0032 001a       |    |
0033 6050       |`P  |		Indirect_Literal	Discrete,0x84,{0x00000000, 0x00370694}		; Debug Table 0x4 = .DEBUG	0x0033,0x00dc,0x4000,0x0000,0x0037,0x0694,0x0000,0x0006
													; Debug Table 0x4.0x0 = 0x33,0xffff
0034 4818       |H   |		Short_Literal	0x18
0035 e20f       |    |		Load	0x1,0xf
0036 e210       |    |		Load	0x1,0x10
0037 e20f       |    |		Load	0x1,0xf
0038 025b       | [  |		Execute	Discrete,Check_In_Type
0039 e211       |    |		Load	0x1,0x11
003a e212       |    |		Load	0x1,0x12
003b 00d8       |    |		Load_Top	At_Offset_0
003c 0120       |    |		Execute	Any,Is_Value
003d 7002       |p   |		Jump_Nonzero	0x40
003e 00d8       |    |		Load_Top	At_Offset_0
003f 011e       |    |		Execute	Any,Convert
0040 e211       |    |		Load	0x1,0x11
0041 0119       |    |		Execute	Any,Check_In_Formal_Type
0042 e001       |    |		Load	0x0,0x1
0043 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0044 0386       |    |		Declare_Variable	Package,Visible
0045 00d8       |    |		Load_Top	At_Offset_0
0046 020f       |    |		Execute	Module,Activate
0047 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x1 = 0x47,0xfffe
0048 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0049 0129       | )  |		Execute	Any,Make_Visible
004a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x2 = 0x4a,0xfffd
004b 1915       |    |		Execute	Package,Field_Reference,Field_Number 0x15
004c 0129       | )  |		Execute	Any,Make_Visible
004d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x3 = 0x4d,0xfffc
004e 1916       |    |		Execute	Package,Field_Reference,Field_Number 0x16
004f 0129       | )  |		Execute	Any,Make_Visible
0050 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x4 = 0x50,0xfffb
0051 1917       |    |		Execute	Package,Field_Reference,Field_Number 0x17
0052 0129       | )  |		Execute	Any,Make_Visible
0053 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x4.0x5 = 0x53,0xfffa
0055 029a 007b  |   {|		Declare_Subprogram	INIT_0078,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x4.0x6 = 0x55,0xfff9
0057 e213       |    |		Load	0x1,0x13							; Debug Table 0x4.0x7 = 0x57,0xfff8
0058 191a       |    |		Execute	Package,Field_Reference,Field_Number 0x1a
0059 0129       | )  |		Execute	Any,Make_Visible
005a 00bf       |    |		Action	Accept_Activation
005b 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x5 = .DEBUG	0x005b,0x00ee,0x4000,0x0000,0x0037,0x14d4,0x0000,0x0004
													; Debug Table 0x5.0x0 = 0x5b,0xffff
005c 00c7       |    |		Action	Elaborate_Subprogram
005d 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x5.0x1 = 0x5d,0xfffe
005e 00c7       |    |		Action	Elaborate_Subprogram
005f 00bc       |    |		Action	Signal_Activated
0060 00bb       |    |		Action	Signal_Completion
0061 0000 0000  |    |		.BLANK	0000[0x7]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b       | k  |		.CONST	0x006b								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0001       |    |		.CONST	0x0001								; Number of locals
006b			BODY_0068:
006b			INIT_0068:
006b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6 = .DEBUG	0x006b,0x00f4,0x1001,0x0000,0x0037,0x0694,0x0000,0x005f
													; Debug Table 0x6.0x0 = 0x6b,0x1
006c 4800       |H   |		Short_Literal	0x0
006d e5ff       |    |		Load	0x2,-0x1
006e e211       |    |		Load	0x1,0x11
006f 0119       |    |		Execute	Any,Check_In_Formal_Type
0070 e213       |    |		Load	0x1,0x13
0071 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0072 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0073 0000 0000  |    |		.BLANK	0000[0x5]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b       | {  |		.CONST	0x007b								; Address of begin
0079 0004       |    |		.CONST	0x0004								; Address of exception handler
007a 0001       |    |		.CONST	0x0001								; Number of locals
007b			BODY_0078:
007b			INIT_0078:
007b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7 = .DEBUG	0x007b,0x00f8,0x1001,0x0000,0x0037,0x0694,0x0000,0x006b
													; Debug Table 0x7.0x0 = 0x7b,0x1
007c 4801       |H   |		Short_Literal	0x1
007d e5ff       |    |		Load	0x2,-0x1
007e e211       |    |		Load	0x1,0x11
007f 0119       |    |		Execute	Any,Check_In_Formal_Type
0080 e213       |    |		Load	0x1,0x13
0081 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0082 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0083 0000       |    |		.XXX[0x1]
0084 0000 0000  |    |		.LITERAL	{0x00000000, 0x00370694}
0088 ; --------------------------------------------------------------------------------------
0088 ; Debug Table
0088 ; --------------------------------------------------------------------------------------
0088 0003 0008  |    |		.CONST	0x0003,0x0008
008a 000b 00ca  |    |		.DEBUG	0x000b,0x00ca,0x8000,0x0000,0x0037,0x0694,0x0000,0x0005
0092 001a 00d0  |    |		.DEBUG	0x001a,0x00d0,0x8000,0x0000,0x0037,0x14d4,0x0000,0x0003
009a 002b 00d6  | +  |		.DEBUG	0x002b,0x00d6,0x0000,0x0000,0x0037,0x0694,0x0000,0x0086
00a2 002c 00d8  | ,  |		.DEBUG	0x002c,0x00d8,0x0000,0x0000,0x0037,0x14d4,0x0000,0x003e
00aa 0033 00dc  | 3  |		.DEBUG	0x0033,0x00dc,0x4000,0x0000,0x0037,0x0694,0x0000,0x0006
00b2 005b 00ee  | [  |		.DEBUG	0x005b,0x00ee,0x4000,0x0000,0x0037,0x14d4,0x0000,0x0004
00ba 006b 00f4  | k  |		.DEBUG	0x006b,0x00f4,0x1001,0x0000,0x0037,0x0694,0x0000,0x005f
00c2 007b 00f8  | {  |		.DEBUG	0x007b,0x00f8,0x1001,0x0000,0x0037,0x0694,0x0000,0x006b
00ca ; --------------------------------------------------------------------------------------
00ca ; Debug3 Subtable 0x0
00ca ; --------------------------------------------------------------------------------------
00ca 0002 0000  |    |		.DBG3TAB	0x0002,0x0000
00cc 000b ffff  |    |		.CONST	0x000b,0xffff
00ce 0014 fffe  |    |		.CONST	0x0014,0xfffe
00d0 ; --------------------------------------------------------------------------------------
00d0 ; Debug3 Subtable 0x1
00d0 ; --------------------------------------------------------------------------------------
00d0 0002 0000  |    |		.DBG3TAB	0x0002,0x0000
00d2 001a ffff  |    |		.CONST	0x001a,0xffff
00d4 001d fffe  |    |		.CONST	0x001d,0xfffe
00d6 ; --------------------------------------------------------------------------------------
00d6 ; Debug3 Subtable 0x2
00d6 ; --------------------------------------------------------------------------------------
00d6 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
00d8 ; --------------------------------------------------------------------------------------
00d8 ; Debug3 Subtable 0x3
00d8 ; --------------------------------------------------------------------------------------
00d8 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
00da 002d 0001  | -  |		.CONST	0x002d,0x0001
00dc ; --------------------------------------------------------------------------------------
00dc ; Debug3 Subtable 0x4
00dc ; --------------------------------------------------------------------------------------
00dc 0008 0000  |    |		.DBG3TAB	0x0008,0x0000
00de 0033 ffff  | 3  |		.CONST	0x0033,0xffff
00e0 0047 fffe  | G  |		.CONST	0x0047,0xfffe
00e2 004a fffd  | J  |		.CONST	0x004a,0xfffd
00e4 004d fffc  | M  |		.CONST	0x004d,0xfffc
00e6 0050 fffb  | P  |		.CONST	0x0050,0xfffb
00e8 0053 fffa  | S  |		.CONST	0x0053,0xfffa
00ea 0055 fff9  | U  |		.CONST	0x0055,0xfff9
00ec 0057 fff8  | W  |		.CONST	0x0057,0xfff8
00ee ; --------------------------------------------------------------------------------------
00ee ; Debug3 Subtable 0x5
00ee ; --------------------------------------------------------------------------------------
00ee 0002 0000  |    |		.DBG3TAB	0x0002,0x0000
00f0 005b ffff  | [  |		.CONST	0x005b,0xffff
00f2 005d fffe  | ]  |		.CONST	0x005d,0xfffe
00f4 ; --------------------------------------------------------------------------------------
00f4 ; Debug3 Subtable 0x6
00f4 ; --------------------------------------------------------------------------------------
00f4 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
00f6 006b 0001  | k  |		.CONST	0x006b,0x0001
00f8 ; --------------------------------------------------------------------------------------
00f8 ; Debug3 Subtable 0x7
00f8 ; --------------------------------------------------------------------------------------
00f8 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
00fa 007b 0001  | {  |		.CONST	0x007b,0x0001
00fc 0000 0000  |    |		.BLANK	0000[0x104]