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

⟦36240cd59⟧ SEG

    Length: 1024 (0x400)
    Types: SEG
    Notes: 580c_R1K_CODE
    Names: »2203656.SEG«

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 580c       |X   |		.CONST	0x580c								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 00a0       |    |		.CONST	0x00a0								; 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 001f       |    |		.CONST	0x001f								; 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,0x00d2,0x8000,0x0000,0x000d,0xfa94,0x0000,0x0007
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 029a 002b  |   +|		Declare_Subprogram	INIT_0028,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xd,0xfffd
000f 029a 0033  |   3|		Declare_Subprogram	INIT_0030,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0xf,0xfffc
0011 029a 003b  |   ;|		Declare_Subprogram	INIT_0038,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x11,0xfffb
0013 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x13,0xfffa
0015 00bf       |    |		Action	Accept_Activation
0016 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0016,0x00e0,0x8000,0x0000,0x0012,0x2704,0x0000,0x000d
													; Debug Table 0x1.0x0 = 0x16,0xffff
0017 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x1 = 0x17,0xfffe
0018 00c7       |    |		Action	Elaborate_Subprogram
0019 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x2 = 0x19,0xfffd
001a 00c7       |    |		Action	Elaborate_Subprogram
001b 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x3 = 0x1b,0xfffc
001c 00c7       |    |		Action	Elaborate_Subprogram
001d 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x4 = 0x1d,0xfffb
001e 00c7       |    |		Action	Elaborate_Subprogram
001f			BODY_0008:
001f 00bc       |    |		Action	Signal_Activated
0020 00bb       |    |		Action	Signal_Completion
0021 0000 0000  |    |		.BLANK	0000[0x7]
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 002b       | +  |		.CONST	0x002b								; Address of begin
0029 0004       |    |		.CONST	0x0004								; Address of exception handler
002a 0001       |    |		.CONST	0x0001								; Number of locals
002b			BODY_0028:
002b			INIT_0028:
002b e001       |    |		Load	0x0,0x1								; Debug Table 0x2 = .DEBUG	0x002b,0x00ec,0x0002,0x0000,0x000d,0xfa94,0x0000,0x0015
													; Debug Table 0x2.0x0 = 0x2b,0x1
002c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
002d 00ca       |    |		Action	Exit_Nullary_Function
002e 0000 0000  |    |		.XXX[0x2]
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 e001       |    |		Load	0x0,0x1								; Debug Table 0x3 = .DEBUG	0x0033,0x00f0,0x0002,0x0000,0x000d,0xfa94,0x0000,0x001a
													; Debug Table 0x3.0x0 = 0x33,0x1
0034 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0035 00ca       |    |		Action	Exit_Nullary_Function
0036 0000 0000  |    |		.XXX[0x2]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 004b       | K  |		.CONST	0x004b								; Address of begin
0039 008f       |    |		.CONST	0x008f								; Address of exception handler
003a 0008       |    |		.CONST	0x0008								; Number of locals
003b			INIT_0038:
003b e002       |    |		Load	0x0,0x2								; Debug Table 0x4 = .DEBUG	0x003b,0x00f4,0x0002,0x0000,0x000d,0xfa94,0x0000,0x001f
													; Debug Table 0x4.0x0 = 0x3b,0xffff
003c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
003d 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
003e e002       |    |		Load	0x0,0x2								; Debug Table 0x4.0x1 = 0x3e,0xfffe
003f 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
0040 e002       |    |		Load	0x0,0x2								; Debug Table 0x4.0x2 = 0x40,0xfffd
0041 1b28       | (  |		Execute	Package,Field_Read,Field_Number 0x28
0042 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x4.0x3 = 0x42,0xfffc
0043 e002       |    |		Load	0x0,0x2								; Debug Table 0x4.0x4 = 0x43,0xfffb
0044 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
0045 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x4.0x5 = 0x45,0xfffa
0046 e002       |    |		Load	0x0,0x2								; Debug Table 0x4.0x6 = 0x46,0xfff9
0047 1b5a       | Z  |		Execute	Package,Field_Read,Field_Number 0x5a
0048 0322       | "  |		Declare_Variable	Record
0049 0007       |    |		Action	Break_Optional							; Debug Table 0x4.0x7 = 0x49,0xfff8
004a 0007       |    |		Action	Break_Optional							; Debug Table 0x4.0x8 = 0x4a,0xfff7
004b			BODY_0038:
004b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x9 = 0x4b,0x1
004c a407       |    |		Store_Unchecked	0x2,0x7
004d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0xa = 0x4d,0x2
004e e002       |    |		Load	0x0,0x2
004f 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
0050 e002       |    |		Load	0x0,0x2
0051 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0052 a403       |    |		Store_Unchecked	0x2,0x3
0053 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0xb = 0x53,0x3
0054 e403       |    |		Load	0x2,0x3
0055 e002       |    |		Load	0x0,0x2
0056 184d       | M  |		Execute	Package,Field_Execute,Field_Number 0x4d
0057 a404       |    |		Store_Unchecked	0x2,0x4
0058 e404       |    |		Load	0x2,0x4								; Debug Table 0x4.0xc = 0x58,0x4
0059 e002       |    |		Load	0x0,0x2
005a 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
005b a406       |    |		Store_Unchecked	0x2,0x6
005c 4fff       |O   |		Short_Literal	-0x1							; Debug Table 0x4.0xd = 0x5c,0x5
005d a405       |    |		Store_Unchecked	0x2,0x5
005e 0007       |    |		Action	Break_Optional							; Debug Table 0x4.0xe = 0x5e,0x6
005f e405       |    |		Load	0x2,0x5								; Debug Table 0x4.0xf = 0x5f,0x7
0060 e406       |    |		Load	0x2,0x6
0061 0275       | u  |		Execute	Discrete,Unary_Minus
0062 027a       | z  |		Execute	Discrete,Less_Equal
0063 7025       |p%  |		Jump_Nonzero	0x89
0064 e406       |    |		Load	0x2,0x6								; Debug Table 0x4.0x10 = 0x64,0x8
0065 e405       |    |		Load	0x2,0x5
0066 0273       | s  |		Execute	Discrete,Plus
0067 e002       |    |		Load	0x0,0x2
0068 1b29       | )  |		Execute	Package,Field_Read,Field_Number 0x29
0069 025b       | [  |		Execute	Discrete,Check_In_Type
006a e403       |    |		Load	0x2,0x3
006b e002       |    |		Load	0x0,0x2
006c 185b       | [  |		Execute	Package,Field_Execute,Field_Number 0x5b
006d e408       |    |		Load	0x2,0x8
006e 017d       | }  |		Execute	Record,Structure_Write
006f e408       |    |		Load	0x2,0x8								; Debug Table 0x4.0x11 = 0x6f,0x9
0070 e002       |    |		Load	0x0,0x2
0071 185c       | \  |		Execute	Package,Field_Execute,Field_Number 0x5c
0072 0b7e       | ~  |		Execute_Immediate	Case_Compare,0x7e
0073 7005       |p   |		Jump_Nonzero	0x79
0074 e405       |    |		Load	0x2,0x5								; Debug Table 0x4.0x12 = 0x74,0xd
0075 0aff       |    |		Execute_Immediate	Plus,-0x1
0076 0248       | H  |		Execute	Discrete,Check_In_Integer
0077 a405       |    |		Store_Unchecked	0x2,0x5
0078 780e       |x   |		Jump	0x87
0079 0007       |    |		Action	Break_Optional							; Debug Table 0x4.0x13 = 0x79,0xa
007a e405       |    |		Load	0x2,0x5								; Debug Table 0x4.0x14 = 0x7a,0x401
007b 0007       |    |		Action	Break_Optional
007c 4802       |H   |		Short_Literal	0x2							; Debug Table 0x4.0x15 = 0x7c,0x402
007d 0007       |    |		Action	Break_Optional
007e 009c       |    |		Action	Load_Dynamic							; Debug Table 0x4.0x16 = 0x7e,0x403
007f 0007       |    |		Action	Break_Optional
0080 0106       |    |		Execute	Exception,Address						; Debug Table 0x4.0x17 = 0x80,0x404
0081 0007       |    |		Action	Break_Optional
0082 c402       |    |		Store	0x2,0x2								; Debug Table 0x4.0x18 = 0x82,0x405
0083 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x19 = 0x83,0xb
0084 a407       |    |		Store_Unchecked	0x2,0x7
0085 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x4.0x1a = 0x85,0xc
0086 7802       |x   |		Jump	0x89
0087 00d1       |    |		Pop_Control	Pop_Count_1
0088 7fd6       |    |		Jump	0x5f
0089 e407       |    |		Load	0x2,0x7								; Debug Table 0x4.0x1b = 0x89,0xe
008a 6802       |h   |		Jump_Zero	0x8d
008b e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x1c = 0x8b,0xf
008c 00ca       |    |		Action	Exit_Nullary_Function
008d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x1d = 0x8d,0x10
008e 00ca       |    |		Action	Exit_Nullary_Function
008f			TRAP_0038:
008f 0007       |    |		Action	Break_Optional
0090 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x1e = 0x90,0x11
0091 00ca       |    |		Action	Exit_Nullary_Function
0092 0000 0000  |    |		.BLANK	0000[0x6]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b       |    |		.CONST	0x009b								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0001       |    |		.CONST	0x0001								; Number of locals
009b			BODY_0098:
009b			INIT_0098:
009b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5 = .DEBUG	0x009b,0x0134,0x0002,0x0000,0x000d,0xfa94,0x0000,0x0026
													; Debug Table 0x5.0x0 = 0x9b,0x1
009c e001       |    |		Load	0x0,0x1
009d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
009e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
009f 0000       |    |		.XXX[0x1]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; Debug Table
00a0 ; --------------------------------------------------------------------------------------
00a0 0003 0006  |    |		.CONST	0x0003,0x0006
00a2 000b 00d2  |    |		.DEBUG	0x000b,0x00d2,0x8000,0x0000,0x000d,0xfa94,0x0000,0x0007
00aa 0016 00e0  |    |		.DEBUG	0x0016,0x00e0,0x8000,0x0000,0x0012,0x2704,0x0000,0x000d
00b2 002b 00ec  | +  |		.DEBUG	0x002b,0x00ec,0x0002,0x0000,0x000d,0xfa94,0x0000,0x0015
00ba 0033 00f0  | 3  |		.DEBUG	0x0033,0x00f0,0x0002,0x0000,0x000d,0xfa94,0x0000,0x001a
00c2 003b 00f4  | ;  |		.DEBUG	0x003b,0x00f4,0x0002,0x0000,0x000d,0xfa94,0x0000,0x001f
00ca 009b 0134  |   4|		.DEBUG	0x009b,0x0134,0x0002,0x0000,0x000d,0xfa94,0x0000,0x0026
00d2 ; --------------------------------------------------------------------------------------
00d2 ; Debug3 Subtable 0x0
00d2 ; --------------------------------------------------------------------------------------
00d2 0006 0000  |    |		.DBG3TAB	0x0006,0x0000
00d4 000b ffff  |    |		.CONST	0x000b,0xffff
00d6 000c fffe  |    |		.CONST	0x000c,0xfffe
00d8 000d fffd  |    |		.CONST	0x000d,0xfffd
00da 000f fffc  |    |		.CONST	0x000f,0xfffc
00dc 0011 fffb  |    |		.CONST	0x0011,0xfffb
00de 0013 fffa  |    |		.CONST	0x0013,0xfffa
00e0 ; --------------------------------------------------------------------------------------
00e0 ; Debug3 Subtable 0x1
00e0 ; --------------------------------------------------------------------------------------
00e0 0005 0000  |    |		.DBG3TAB	0x0005,0x0000
00e2 0016 ffff  |    |		.CONST	0x0016,0xffff
00e4 0017 fffe  |    |		.CONST	0x0017,0xfffe
00e6 0019 fffd  |    |		.CONST	0x0019,0xfffd
00e8 001b fffc  |    |		.CONST	0x001b,0xfffc
00ea 001d fffb  |    |		.CONST	0x001d,0xfffb
00ec ; --------------------------------------------------------------------------------------
00ec ; Debug3 Subtable 0x2
00ec ; --------------------------------------------------------------------------------------
00ec 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
00ee 002b 0001  | +  |		.CONST	0x002b,0x0001
00f0 ; --------------------------------------------------------------------------------------
00f0 ; Debug3 Subtable 0x3
00f0 ; --------------------------------------------------------------------------------------
00f0 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
00f2 0033 0001  | 3  |		.CONST	0x0033,0x0001
00f4 ; --------------------------------------------------------------------------------------
00f4 ; Debug3 Subtable 0x4
00f4 ; --------------------------------------------------------------------------------------
00f4 0009 0016  |    |		.DBG3TAB	0x0009,0x0016
00f6 003b ffff  | ;  |		.CONST	0x003b,0xffff
00f8 003e fffe  | >  |		.CONST	0x003e,0xfffe
00fa 0040 fffd  | @  |		.CONST	0x0040,0xfffd
00fc 0042 fffc  | B  |		.CONST	0x0042,0xfffc
00fe 0043 fffb  | C  |		.CONST	0x0043,0xfffb
0100 0045 fffa  | E  |		.CONST	0x0045,0xfffa
0102 0046 fff9  | F  |		.CONST	0x0046,0xfff9
0104 0049 fff8  | I  |		.CONST	0x0049,0xfff8
0106 004a fff7  | J  |		.CONST	0x004a,0xfff7
0108 004b 0001  | K  |		.CONST	0x004b,0x0001
010a 004d 0002  | M  |		.CONST	0x004d,0x0002
010c 0053 0003  | S  |		.CONST	0x0053,0x0003
010e 0058 0004  | X  |		.CONST	0x0058,0x0004
0110 005c 0005  | \  |		.CONST	0x005c,0x0005
0112 005e 0006  | ^  |		.CONST	0x005e,0x0006
0114 005f 0007  | _  |		.CONST	0x005f,0x0007
0116 0064 0008  | d  |		.CONST	0x0064,0x0008
0118 006f 0009  | o  |		.CONST	0x006f,0x0009
011a 0074 000d  | t  |		.CONST	0x0074,0x000d
011c 0079 000a  | y  |		.CONST	0x0079,0x000a
011e 007a 0401  | z  |		.CONST	0x007a,0x0401
0120 007c 0402  | |  |		.CONST	0x007c,0x0402
0122 007e 0403  | ~  |		.CONST	0x007e,0x0403
0124 0080 0404  |    |		.CONST	0x0080,0x0404
0126 0082 0405  |    |		.CONST	0x0082,0x0405
0128 0083 000b  |    |		.CONST	0x0083,0x000b
012a 0085 000c  |    |		.CONST	0x0085,0x000c
012c 0089 000e  |    |		.CONST	0x0089,0x000e
012e 008b 000f  |    |		.CONST	0x008b,0x000f
0130 008d 0010  |    |		.CONST	0x008d,0x0010
0132 0090 0011  |    |		.CONST	0x0090,0x0011
0134 ; --------------------------------------------------------------------------------------
0134 ; Debug3 Subtable 0x5
0134 ; --------------------------------------------------------------------------------------
0134 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0136 009b 0001  |    |		.CONST	0x009b,0x0001
0138 0000 0000  |    |		.BLANK	0000[0xc8]