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

⟦969b649f8⟧ SEG

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

Derivation

└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
    └─ ⟦this⟧ »1002515.SEG« 
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
    └─ ⟦this⟧ »1002515.SEG« 
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
    └─ ⟦this⟧ »1002515.SEG« 
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
    └─ ⟦this⟧ »1002515.SEG« 
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
    └─ ⟦this⟧ »1002515.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 00a8       |    |		.CONST	0x00a8								; 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 001e       |    |		.CONST	0x001e								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0010       |    |		.CONST	0x0010								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x00da,0x8000,0x0000,0x0037,0x0854,0x0000,0x0009
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 029a 0023  |   #|		Declare_Subprogram	INIT_0020,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xd,0xfffd
000f 029a 004b  |   K|		Declare_Subprogram	INIT_0048,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0xf,0xfffc
0011 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x11,0xfffb
0013 029a 008b  |    |		Declare_Subprogram	INIT_0088,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x13,0xfffa
0015 00bf       |    |		Action	Accept_Activation
0016 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1 = .DEBUG	0x0016,0x00e8,0x8000,0x0000,0x0037,0x0864,0x0000,0x0005
													; Debug Table 0x1.0x0 = 0x16,0xffff
0017 00c7       |    |		Action	Elaborate_Subprogram
0018 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x1 = 0x18,0xfffe
0019 00c7       |    |		Action	Elaborate_Subprogram
001a 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x2 = 0x1a,0xfffd
001b 00c7       |    |		Action	Elaborate_Subprogram
001c 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x3 = 0x1c,0xfffc
001d 00c7       |    |		Action	Elaborate_Subprogram
001e			BODY_0008:
001e 00bc       |    |		Action	Signal_Activated
001f 00bb       |    |		Action	Signal_Completion
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 0029       | )  |		.CONST	0x0029								; Address of begin
0021 0004       |    |		.CONST	0x0004								; Address of exception handler
0022 0004       |    |		.CONST	0x0004								; Number of locals
0023			INIT_0020:
0023 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2 = .DEBUG	0x0023,0x00f2,0x0001,0x0000,0x0037,0x0854,0x0000,0x0012
													; Debug Table 0x2.0x0 = 0x23,0xffff
0024 e001       |    |		Load	0x0,0x1								; Debug Table 0x2.0x1 = 0x24,0xfffe
0025 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0026 e002       |    |		Load	0x0,0x2								; Debug Table 0x2.0x2 = 0x26,0xfffd
0027 1b40       | @  |		Execute	Package,Field_Read,Field_Number 0x40
0028 0322       | "  |		Declare_Variable	Record
0029			BODY_0020:
0029 00cf       |    |		Action	Mark_Auxiliary
002a 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0x3 = 0x2a,0x1
002b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x4 = 0x2b,0x2
002c e001       |    |		Load	0x0,0x1
002d 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
002e 00e1       |    |		Load_Encached	Boolean_Cache
002f e5ff       |    |		Load	0x2,-0x1
0030 e001       |    |		Load	0x0,0x1
0031 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0032 c402       |    |		Store	0x2,0x2
0033 c403       |    |		Store	0x2,0x3
0034 00d1       |    |		Pop_Control	Pop_Count_1
0035 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x5 = 0x35,0x3
0036 7005       |p   |		Jump_Nonzero	0x3c
0037 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x6 = 0x37,0x4
0038 e003       |    |		Load	0x0,0x3
0039 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
003a 00c9       |    |		Action	Pop_Auxiliary_Loop
003b 7fef       |    |		Jump	0x2b
003c 00ce       |    |		Action	Pop_Auxiliary
003d 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2.0x7 = 0x3d,0x5
003e 00da       |    |		Load_Top	At_Offset_2
003f e001       |    |		Load	0x0,0x1
0040 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0041 c5fe       |    |		Store	0x2,-0x2
0042 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0043 0000 0000  |    |		.BLANK	0000[0x5]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b       | K  |		.CONST	0x004b								; Address of begin
0049 0004       |    |		.CONST	0x0004								; Address of exception handler
004a 0001       |    |		.CONST	0x0001								; Number of locals
004b			BODY_0048:
004b			INIT_0048:
004b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x3 = .DEBUG	0x004b,0x0104,0x0001,0x0000,0x0037,0x0854,0x0000,0x0020
													; Debug Table 0x3.0x0 = 0x4b,0x1
004c e001       |    |		Load	0x0,0x1
004d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
004e 0322       | "  |		Declare_Variable	Record
004f 4800       |H   |		Short_Literal	0x0
0050 00d9       |    |		Load_Top	At_Offset_1
0051 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0052 e5fc       |    |		Load	0x2,-0x4
0053 00d9       |    |		Load_Top	At_Offset_1
0054 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0055 e5fe       |    |		Load	0x2,-0x2
0056 00d9       |    |		Load_Top	At_Offset_1
0057 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0058 e5ff       |    |		Load	0x2,-0x1
0059 00d9       |    |		Load_Top	At_Offset_1
005a 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
005b 4801       |H   |		Short_Literal	0x1
005c 00d9       |    |		Load_Top	At_Offset_1
005d 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
005e e5fd       |    |		Load	0x2,-0x3
005f 00d9       |    |		Load_Top	At_Offset_1
0060 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0061 4800       |H   |		Short_Literal	0x0
0062 00d9       |    |		Load_Top	At_Offset_1
0063 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0064 820d       |    |		Call	0x1,0xd
0065 c5fb       |    |		Store	0x2,-0x5
0066 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0067 0000       |    |		.XXX[0x1]
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 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x4 = .DEBUG	0x006b,0x0108,0x0001,0x0000,0x0037,0x0854,0x0000,0x003c
													; Debug Table 0x4.0x0 = 0x6b,0x1
006c e001       |    |		Load	0x0,0x1
006d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
006e 0322       | "  |		Declare_Variable	Record
006f 4801       |H   |		Short_Literal	0x1
0070 00d9       |    |		Load_Top	At_Offset_1
0071 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0072 e5fd       |    |		Load	0x2,-0x3
0073 00d9       |    |		Load_Top	At_Offset_1
0074 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0075 e5fe       |    |		Load	0x2,-0x2
0076 00d9       |    |		Load_Top	At_Offset_1
0077 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0078 e5ff       |    |		Load	0x2,-0x1
0079 00d9       |    |		Load_Top	At_Offset_1
007a 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
007b 4800       |H   |		Short_Literal	0x0
007c 00d9       |    |		Load_Top	At_Offset_1
007d 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
007e 4800       |H   |		Short_Literal	0x0
007f 00d9       |    |		Load_Top	At_Offset_1
0080 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0081 4800       |H   |		Short_Literal	0x0
0082 00d9       |    |		Load_Top	At_Offset_1
0083 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0084 820d       |    |		Call	0x1,0xd
0085 c5fc       |    |		Store	0x2,-0x4
0086 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0087 0000       |    |		.XXX[0x1]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b       |    |		.CONST	0x008b								; Address of begin
0089 0004       |    |		.CONST	0x0004								; Address of exception handler
008a 0001       |    |		.CONST	0x0001								; Number of locals
008b			BODY_0088:
008b			INIT_0088:
008b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x5 = .DEBUG	0x008b,0x010c,0x0001,0x0000,0x0037,0x0854,0x0000,0x0054
													; Debug Table 0x5.0x0 = 0x8b,0x1
008c e001       |    |		Load	0x0,0x1
008d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
008e 0322       | "  |		Declare_Variable	Record
008f 4801       |H   |		Short_Literal	0x1
0090 00d9       |    |		Load_Top	At_Offset_1
0091 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0092 e5fd       |    |		Load	0x2,-0x3
0093 00d9       |    |		Load_Top	At_Offset_1
0094 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0095 e5fe       |    |		Load	0x2,-0x2
0096 00d9       |    |		Load_Top	At_Offset_1
0097 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0098 e5ff       |    |		Load	0x2,-0x1
0099 00d9       |    |		Load_Top	At_Offset_1
009a 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
009b 4800       |H   |		Short_Literal	0x0
009c 00d9       |    |		Load_Top	At_Offset_1
009d 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
009e 4800       |H   |		Short_Literal	0x0
009f 00d9       |    |		Load_Top	At_Offset_1
00a0 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
00a1 4801       |H   |		Short_Literal	0x1
00a2 00d9       |    |		Load_Top	At_Offset_1
00a3 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
00a4 820d       |    |		Call	0x1,0xd
00a5 c5fc       |    |		Store	0x2,-0x4
00a6 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00a7 0000       |    |		.XXX[0x1]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; Debug Table
00a8 ; --------------------------------------------------------------------------------------
00a8 0003 0006  |    |		.CONST	0x0003,0x0006
00aa 000b 00da  |    |		.DEBUG	0x000b,0x00da,0x8000,0x0000,0x0037,0x0854,0x0000,0x0009
00b2 0016 00e8  |    |		.DEBUG	0x0016,0x00e8,0x8000,0x0000,0x0037,0x0864,0x0000,0x0005
00ba 0023 00f2  | #  |		.DEBUG	0x0023,0x00f2,0x0001,0x0000,0x0037,0x0854,0x0000,0x0012
00c2 004b 0104  | K  |		.DEBUG	0x004b,0x0104,0x0001,0x0000,0x0037,0x0854,0x0000,0x0020
00ca 006b 0108  | k  |		.DEBUG	0x006b,0x0108,0x0001,0x0000,0x0037,0x0854,0x0000,0x003c
00d2 008b 010c  |    |		.DEBUG	0x008b,0x010c,0x0001,0x0000,0x0037,0x0854,0x0000,0x0054
00da ; --------------------------------------------------------------------------------------
00da ; Debug3 Subtable 0x0
00da ; --------------------------------------------------------------------------------------
00da 0006 0000  |    |		.DBG3TAB	0x0006,0x0000
00dc 000b ffff  |    |		.CONST	0x000b,0xffff
00de 000c fffe  |    |		.CONST	0x000c,0xfffe
00e0 000d fffd  |    |		.CONST	0x000d,0xfffd
00e2 000f fffc  |    |		.CONST	0x000f,0xfffc
00e4 0011 fffb  |    |		.CONST	0x0011,0xfffb
00e6 0013 fffa  |    |		.CONST	0x0013,0xfffa
00e8 ; --------------------------------------------------------------------------------------
00e8 ; Debug3 Subtable 0x1
00e8 ; --------------------------------------------------------------------------------------
00e8 0004 0000  |    |		.DBG3TAB	0x0004,0x0000
00ea 0016 ffff  |    |		.CONST	0x0016,0xffff
00ec 0018 fffe  |    |		.CONST	0x0018,0xfffe
00ee 001a fffd  |    |		.CONST	0x001a,0xfffd
00f0 001c fffc  |    |		.CONST	0x001c,0xfffc
00f2 ; --------------------------------------------------------------------------------------
00f2 ; Debug3 Subtable 0x2
00f2 ; --------------------------------------------------------------------------------------
00f2 0003 0005  |    |		.DBG3TAB	0x0003,0x0005
00f4 0023 ffff  | #  |		.CONST	0x0023,0xffff
00f6 0024 fffe  | $  |		.CONST	0x0024,0xfffe
00f8 0026 fffd  | &  |		.CONST	0x0026,0xfffd
00fa 002a 0001  | *  |		.CONST	0x002a,0x0001
00fc 002b 0002  | +  |		.CONST	0x002b,0x0002
00fe 0035 0003  | 5  |		.CONST	0x0035,0x0003
0100 0037 0004  | 7  |		.CONST	0x0037,0x0004
0102 003d 0005  | =  |		.CONST	0x003d,0x0005
0104 ; --------------------------------------------------------------------------------------
0104 ; Debug3 Subtable 0x3
0104 ; --------------------------------------------------------------------------------------
0104 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0106 004b 0001  | K  |		.CONST	0x004b,0x0001
0108 ; --------------------------------------------------------------------------------------
0108 ; Debug3 Subtable 0x4
0108 ; --------------------------------------------------------------------------------------
0108 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
010a 006b 0001  | k  |		.CONST	0x006b,0x0001
010c ; --------------------------------------------------------------------------------------
010c ; Debug3 Subtable 0x5
010c ; --------------------------------------------------------------------------------------
010c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
010e 008b 0001  |    |		.CONST	0x008b,0x0001
0110 0000 0000  |    |		.BLANK	0000[0xf0]