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

⟦d2d0697dd⟧ SEG

    Length: 1024 (0x400)
    Types: SEG
    Notes: 5805_R1K_CODE
    Names: »1017874.SEG«

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5805       |X   |		.CONST	0x5805								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 00d8       |    |		.CONST	0x00d8								; 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 008c       |    |		.CONST	0x008c								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0029       | )  |		.CONST	0x0029								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x00ea,0x8000,0x0000,0x000d,0xf304,0x0000,0x0009
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x3 = 0xe,0xfffc
000f 4803       |H   |		Short_Literal	0x3
0010 029f 0093  |    |		Declare_Subprogram	INIT_0090,For_Call
0012 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0013 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x4 = 0x13,0xfffb
0014 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0015 0129       | )  |		Execute	Any,Make_Visible
0016 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x5 = 0x16,0xfffa
0017 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0018 0129       | )  |		Execute	Any,Make_Visible
0019 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x6 = 0x19,0xfff9
001a 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
001b 0129       | )  |		Execute	Any,Make_Visible
001c e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x7 = 0x1c,0xfff8
001d 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
001e 0129       | )  |		Execute	Any,Make_Visible
001f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x0.0x8 = 0x1f,0xfff7
0020 480d       |H   |		Short_Literal	0xd
0021 e002       |    |		Load	0x0,0x2
0022 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0023 035c       | \  |		Declare_Type	Array,Constrained,Visible
0024 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x9 = 0x24,0xfff6
0025 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0026 0129       | )  |		Execute	Any,Make_Visible
0027 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0xa = 0x27,0xfff5
0028 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0029 0129       | )  |		Execute	Any,Make_Visible
002a e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0xb = 0x2a,0xfff4
002b 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
002c 0129       | )  |		Execute	Any,Make_Visible
002d e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0xc = 0x2d,0xfff3
002e 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
002f 0129       | )  |		Execute	Any,Make_Visible
0030 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0xd = 0x30,0xfff2
0031 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
0032 0129       | )  |		Execute	Any,Make_Visible
0033 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0xe = 0x33,0xfff1
0034 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0035 0129       | )  |		Execute	Any,Make_Visible
0036 4803       |H   |		Short_Literal	0x3							; Debug Table 0x0.0xf = 0x36,0xfff0
0037 4809       |H   |		Short_Literal	0x9
0038 e001       |    |		Load	0x0,0x1
0039 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
003a 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
003b e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x10 = 0x3b,0xffef
003c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
003d 0129       | )  |		Execute	Any,Make_Visible
003e e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x11 = 0x3e,0xffee
003f 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0040 0129       | )  |		Execute	Any,Make_Visible
0041 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x12 = 0x41,0xffed
0042 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0043 0129       | )  |		Execute	Any,Make_Visible
0044 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x0.0x13 = 0x44,0xffec
0045 0266       | f  |		Execute	Discrete,Bounds
0046 00da       |    |		Load_Top	At_Offset_2
0047 02a0       |    |		Declare_Subprogram	Null_Subprogram
0048 4801       |H   |		Short_Literal	0x1
0049 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
004a e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x14 = 0x4a,0xffeb
004b 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
004c 0129       | )  |		Execute	Any,Make_Visible
004d e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x15 = 0x4d,0xffea
004e 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
004f 0129       | )  |		Execute	Any,Make_Visible
0050 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x16 = 0x50,0xffe9
0051 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0052 0129       | )  |		Execute	Any,Make_Visible
0053 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0x0.0x17 = 0x53,0xffe8
0054 0266       | f  |		Execute	Discrete,Bounds
0055 e210       |    |		Load	0x1,0x10
0056 02a0       |    |		Declare_Subprogram	Null_Subprogram
0057 4801       |H   |		Short_Literal	0x1
0058 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
0059 4809       |H   |		Short_Literal	0x9							; Debug Table 0x0.0x18 = 0x59,0xffe7
005a 4803       |H   |		Short_Literal	0x3
005b e21d       |    |		Load	0x1,0x1d
005c 0334       | 4  |		Declare_Variable	Array,With_Constraint
005d 0129       | )  |		Execute	Any,Make_Visible
005e e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x19 = 0x5e,0xffe6
005f 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
0060 0129       | )  |		Execute	Any,Make_Visible
0061 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x1a = 0x61,0xffe5
0062 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
0063 0129       | )  |		Execute	Any,Make_Visible
0064 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x1b = 0x64,0xffe4
0065 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
0066 0129       | )  |		Execute	Any,Make_Visible
0067 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1c = 0x67,0xffe3
0068 604b       |`K  |		Indirect_Literal	Discrete,0xb4,{0x00000000, 0x0df30401}		; Debug Table 0x0.0x1d = 0x68,0xffe2
0069 0129       | )  |		Execute	Any,Make_Visible
006a 6045       |`E  |		Indirect_Literal	Discrete,0xb0,{0x00000000, 0x0df30402}		; Debug Table 0x0.0x1e = 0x6a,0xffe1
006b 0129       | )  |		Execute	Any,Make_Visible
006c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1f = 0x6c,0xffe0
006d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x20 = 0x6d,0xffdf
006e 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x21 = 0x6e,0xffde
006f 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x22 = 0x6f,0xffdd
0070 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x23 = 0x70,0xffdc
0071 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x24 = 0x71,0xffdb
0072 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x25 = 0x72,0xffda
0073 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x26 = 0x73,0xffd9
0074 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x27 = 0x74,0xffd8
0075 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x28 = 0x75,0xffd7
0076 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x29 = 0x76,0xffd6
0077 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2a = 0x77,0xffd5
0078 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2b = 0x78,0xffd4
0079 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2c = 0x79,0xffd3
007a 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2d = 0x7a,0xffd2
007b 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2e = 0x7b,0xffd1
007c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x2f = 0x7c,0xffd0
007d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x30 = 0x7d,0xffcf
007e 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x31 = 0x7e,0xffce
007f 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x32 = 0x7f,0xffcd
0080 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x33 = 0x80,0xffcc
0081 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x34 = 0x81,0xffcb
0082 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x35 = 0x82,0xffca
0083 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x36 = 0x83,0xffc9
0084 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x37 = 0x84,0xffc8
0085 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x38 = 0x85,0xffc7
0086 6025       |`%  |		Indirect_Literal	Discrete,0xac,{0x00000000, 0x0df30403}		; Debug Table 0x0.0x39 = 0x86,0xffc6
0087 0129       | )  |		Execute	Any,Make_Visible
0088 601f       |`   |		Indirect_Literal	Discrete,0xa8,{0x00000000, 0x0df30404}		; Debug Table 0x0.0x3a = 0x88,0xffc5
0089 0129       | )  |		Execute	Any,Make_Visible
008a 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x3b = 0x8a,0xffc4
008b 00bf       |    |		Action	Accept_Activation						; Debug Table 0x0.0x3c = 0x8b,0xffc3
008c			BODY_0008:
008c 00bc       |    |		Action	Signal_Activated
008d 00bb       |    |		Action	Signal_Completion
008e 0000 0000  |    |		.XXX[0x2]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093       |    |		.CONST	0x0093								; Address of begin
0091 0004       |    |		.CONST	0x0004								; Address of exception handler
0092 0001       |    |		.CONST	0x0001								; Number of locals
0093			BODY_0090:
0093			INIT_0090:
0093 4603       |F   |		Jump_Case	0x4							; Debug Table 0x1 = .DEBUG	0x0093,0x0166,0x0005,0x0000,0x000d,0xf304,0x0000,0x001b
0094 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0095 7802       |x   |		Jump	0x98								; case 0x1
0096 7805       |x   |		Jump	0x9c								; case 0x2
0097 7809       |x   |		Jump	0xa1								; case 0x3
0098 00da       |    |		Load_Top	At_Offset_2
0099 0091 00b8  |    |		Action	Push_String_Extended_Indexed,0xb8				; "FIXED_LENGTH"
009b 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
009c 00db       |    |		Load_Top	At_Offset_3
009d 00db       |    |		Load_Top	At_Offset_3
009e 00e0       |    |		Load_Encached	Standard_Cache
009f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00a0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00a1 00da       |    |		Load_Top	At_Offset_2
00a2 00e0       |    |		Load_Encached	Standard_Cache
00a3 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00a4 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00a5 0000 0000  |    |		.XXX[0x3]
00a7 0000       |    |
00a8 0000 0000  |    |		.LITERAL	{0x00000000, 0x0df30404}
00ac 0000 0000  |    |		.LITERAL	{0x00000000, 0x0df30403}
00b0 0000 0000  |    |		.LITERAL	{0x00000000, 0x0df30402}
00b4 0000 0000  |    |		.LITERAL	{0x00000000, 0x0df30401}
00b8 ; --------------------------------------------------------------------------------------
00b8 ; STRING TABLE
00b8 ; --------------------------------------------------------------------------------------
00b8 000a       |    |		.STRTAB	0x000a->0x00bd							; "FIXED_LENGTH"
00b9 0014       |    |		.STRTAB	0x0014->0x00c3							; "VARIABLE_LENGTH"
00ba 0021       | !  |		.STRTAB	0x0021->0x00ca							; "SPANNED"
00bb 0026       | &  |		.STRTAB	0x0026->0x00ce							; "UNDEFINED"
00bc 002d       | -  |		.STREND 0x002d->0x00d2
00bd 4649 5845  |FIXE|		.STRTAB_STRINGS
00d3 0000 0000  |    |		.BLANK	0000[0x5]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; Debug Table
00d8 ; --------------------------------------------------------------------------------------
00d8 0003 0002  |    |		.CONST	0x0003,0x0002
00da 000b 00ea  |    |		.DEBUG	0x000b,0x00ea,0x8000,0x0000,0x000d,0xf304,0x0000,0x0009
00e2 0093 0166  |   f|		.DEBUG	0x0093,0x0166,0x0005,0x0000,0x000d,0xf304,0x0000,0x001b
00ea ; --------------------------------------------------------------------------------------
00ea ; Debug3 Subtable 0x0
00ea ; --------------------------------------------------------------------------------------
00ea 003d 0000  | =  |		.DBG3TAB	0x003d,0x0000
00ec 000b ffff  |    |		.CONST	0x000b,0xffff
00ee 000c fffe  |    |		.CONST	0x000c,0xfffe
00f0 000d fffd  |    |		.CONST	0x000d,0xfffd
00f2 000e fffc  |    |		.CONST	0x000e,0xfffc
00f4 0013 fffb  |    |		.CONST	0x0013,0xfffb
00f6 0016 fffa  |    |		.CONST	0x0016,0xfffa
00f8 0019 fff9  |    |		.CONST	0x0019,0xfff9
00fa 001c fff8  |    |		.CONST	0x001c,0xfff8
00fc 001f fff7  |    |		.CONST	0x001f,0xfff7
00fe 0024 fff6  | $  |		.CONST	0x0024,0xfff6
0100 0027 fff5  | '  |		.CONST	0x0027,0xfff5
0102 002a fff4  | *  |		.CONST	0x002a,0xfff4
0104 002d fff3  | -  |		.CONST	0x002d,0xfff3
0106 0030 fff2  | 0  |		.CONST	0x0030,0xfff2
0108 0033 fff1  | 3  |		.CONST	0x0033,0xfff1
010a 0036 fff0  | 6  |		.CONST	0x0036,0xfff0
010c 003b ffef  | ;  |		.CONST	0x003b,0xffef
010e 003e ffee  | >  |		.CONST	0x003e,0xffee
0110 0041 ffed  | A  |		.CONST	0x0041,0xffed
0112 0044 ffec  | D  |		.CONST	0x0044,0xffec
0114 004a ffeb  | J  |		.CONST	0x004a,0xffeb
0116 004d ffea  | M  |		.CONST	0x004d,0xffea
0118 0050 ffe9  | P  |		.CONST	0x0050,0xffe9
011a 0053 ffe8  | S  |		.CONST	0x0053,0xffe8
011c 0059 ffe7  | Y  |		.CONST	0x0059,0xffe7
011e 005e ffe6  | ^  |		.CONST	0x005e,0xffe6
0120 0061 ffe5  | a  |		.CONST	0x0061,0xffe5
0122 0064 ffe4  | d  |		.CONST	0x0064,0xffe4
0124 0067 ffe3  | g  |		.CONST	0x0067,0xffe3
0126 0068 ffe2  | h  |		.CONST	0x0068,0xffe2
0128 006a ffe1  | j  |		.CONST	0x006a,0xffe1
012a 006c ffe0  | l  |		.CONST	0x006c,0xffe0
012c 006d ffdf  | m  |		.CONST	0x006d,0xffdf
012e 006e ffde  | n  |		.CONST	0x006e,0xffde
0130 006f ffdd  | o  |		.CONST	0x006f,0xffdd
0132 0070 ffdc  | p  |		.CONST	0x0070,0xffdc
0134 0071 ffdb  | q  |		.CONST	0x0071,0xffdb
0136 0072 ffda  | r  |		.CONST	0x0072,0xffda
0138 0073 ffd9  | s  |		.CONST	0x0073,0xffd9
013a 0074 ffd8  | t  |		.CONST	0x0074,0xffd8
013c 0075 ffd7  | u  |		.CONST	0x0075,0xffd7
013e 0076 ffd6  | v  |		.CONST	0x0076,0xffd6
0140 0077 ffd5  | w  |		.CONST	0x0077,0xffd5
0142 0078 ffd4  | x  |		.CONST	0x0078,0xffd4
0144 0079 ffd3  | y  |		.CONST	0x0079,0xffd3
0146 007a ffd2  | z  |		.CONST	0x007a,0xffd2
0148 007b ffd1  | {  |		.CONST	0x007b,0xffd1
014a 007c ffd0  | |  |		.CONST	0x007c,0xffd0
014c 007d ffcf  | }  |		.CONST	0x007d,0xffcf
014e 007e ffce  | ~  |		.CONST	0x007e,0xffce
0150 007f ffcd  |    |		.CONST	0x007f,0xffcd
0152 0080 ffcc  |    |		.CONST	0x0080,0xffcc
0154 0081 ffcb  |    |		.CONST	0x0081,0xffcb
0156 0082 ffca  |    |		.CONST	0x0082,0xffca
0158 0083 ffc9  |    |		.CONST	0x0083,0xffc9
015a 0084 ffc8  |    |		.CONST	0x0084,0xffc8
015c 0085 ffc7  |    |		.CONST	0x0085,0xffc7
015e 0086 ffc6  |    |		.CONST	0x0086,0xffc6
0160 0088 ffc5  |    |		.CONST	0x0088,0xffc5
0162 008a ffc4  |    |		.CONST	0x008a,0xffc4
0164 008b ffc3  |    |		.CONST	0x008b,0xffc3
0166 ; --------------------------------------------------------------------------------------
0166 ; Debug3 Subtable 0x1
0166 ; --------------------------------------------------------------------------------------
0166 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0168 0000 0000  |    |		.BLANK	0000[0x98]