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

⟦48a431c30⟧ SEG

    Length: 2048 (0x800)
    Types: SEG
    Notes: 5811_R1K_CODE
    Names: »116755.SEG«

Derivation

└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
    └─ ⟦this⟧ »116755.SEG« 
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
    └─ ⟦this⟧ »116755.SEG« 
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
    └─ ⟦this⟧ »116755.SEG« 
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
    └─ ⟦this⟧ »116755.SEG« 
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
    └─ ⟦this⟧ »116755.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 0150       | P  |		.CONST	0x0150								; 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 0001       |    |		.CONST	0x0001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 004e       | N  |		.CONST	0x004e								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0021       | !  |		.CONST	0x0021								; Number of locals
000b			INIT_0008:
000b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x0 = .DEBUG	0x000b,0x01ba,0xc000,0x0000,0x0036,0x0794,0x0000,0x0007
													; Debug Table 0x0.0x0 = 0xb,0xffff
													; Debug Table 0x0.0x1 = 0xb,0xfffe
													; Debug Table 0x0.0x2 = 0xb,0xfffd
000c 032b       | +  |		Declare_Type	Record,Incomplete,Visible
000d 029a 0053  |   S|		Declare_Subprogram	INIT_0050,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0xd,0xfffc
000f 029a 005b  |   [|		Declare_Subprogram	INIT_0058,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0xf,0xfffb
0011 029a 0063  |   c|		Declare_Subprogram	INIT_0060,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x11,0xfffa
0013 029a 0073  |   s|		Declare_Subprogram	INIT_0070,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x13,0xfff9
0015 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x15,0xfff8
0017 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x17,0xfff7
0019 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x19,0xfff6
001b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x0.0xa = 0x1b,0xfff5
001c 032b       | +  |		Declare_Type	Record,Incomplete,Visible
001d 029a 011b  |    |		Declare_Subprogram	INIT_0118,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x1d,0xfff4
001f 029a 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x1f,0xfff3
0021 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x21,0xfff2
0023 029a 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x23,0xfff1
0025 6122       |a"  |		Indirect_Literal	Discrete,0x148,{0x00000000, 0x00360794}		; Debug Table 0x0.0x10 = 0x25,0xffef
													; Debug Table 0x0.0x11 = 0x25,0xffee
													; Debug Table 0x0.0x12 = 0x25,0xffed
													; Debug Table 0x0.0x13 = 0x25,0xffec
													; Debug Table 0x0.0x14 = 0x25,0xffeb
													; Debug Table 0x0.0x15 = 0x25,0xffea
													; Debug Table 0x0.0x16 = 0x25,0xffe9
													; Debug Table 0x0.0x17 = 0x25,0xffe8
													; Debug Table 0x0.0xf = 0x25,0xfff0
0026 48d5       |H   |		Short_Literal	0xd5
0027 e20f       |    |		Load	0x1,0xf
0028 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0029 e001       |    |		Load	0x0,0x1
002a 0387       |    |		Declare_Variable	Package
002b 00d8       |    |		Load_Top	At_Offset_0
002c 020f       |    |		Execute	Module,Activate
002d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x18 = 0x2d,0xffe7
002e 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
002f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x19 = 0x2f,0xffe6
0030 00d9       |    |		Load_Top	At_Offset_1
0031 02a0       |    |		Declare_Subprogram	Null_Subprogram
0032 e213       |    |		Load	0x1,0x13
0033 0326       | &  |		Complete_Type	Record,By_Defining
0034 e213       |    |		Load	0x1,0x13							; Debug Table 0x0.0x1a = 0x34,0xffe5
0035 e21b       |    |		Load	0x1,0x1b
0036 0325       | %  |		Complete_Type	Record,By_Renaming
0037 00bf       |    |		Action	Accept_Activation
0038 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1 = .DEBUG	0x0038,0x01f2,0xc000,0x0000,0x0036,0x0a04,0x0000,0x0003
													; Debug Table 0x1.0x0 = 0x38,0xffff
													; Debug Table 0x1.0x1 = 0x38,0xfffe
0039 00c7       |    |		Action	Elaborate_Subprogram
003a 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x2 = 0x3a,0xfffd
003b 00c7       |    |		Action	Elaborate_Subprogram
003c 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x3 = 0x3c,0xfffc
003d 00c7       |    |		Action	Elaborate_Subprogram
003e 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x4 = 0x3e,0xfffb
003f 00c7       |    |		Action	Elaborate_Subprogram
0040 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0x5 = 0x40,0xfffa
0041 00c7       |    |		Action	Elaborate_Subprogram
0042 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x1.0x6 = 0x42,0xfff9
													; Debug Table 0x1.0x7 = 0x42,0xfff8
0043 00c7       |    |		Action	Elaborate_Subprogram
0044 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f				; Debug Table 0x1.0x8 = 0x44,0xfff7
													; Debug Table 0x1.0x9 = 0x44,0xfff6
0045 00c7       |    |		Action	Elaborate_Subprogram
0046 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xa = 0x46,0xfff5
0047 00c7       |    |		Action	Elaborate_Subprogram
0048 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0xb = 0x48,0xfff4
0049 00c7       |    |		Action	Elaborate_Subprogram
004a 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0xc = 0x4a,0xfff3
004b 00c7       |    |		Action	Elaborate_Subprogram
004c 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0xd = 0x4c,0xfff2
004d 00c7       |    |		Action	Elaborate_Subprogram
004e			BODY_0008:
004e 00bc       |    |		Action	Signal_Activated
004f 00bb       |    |		Action	Signal_Completion
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053       | S  |		.CONST	0x0053								; Address of begin
0051 0004       |    |		.CONST	0x0004								; Address of exception handler
0052 0001       |    |		.CONST	0x0001								; Number of locals
0053			BODY_0050:
0053			INIT_0050:
0053 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x2 = .DEBUG	0x0053,0x0210,0x1001,0x0000,0x0036,0x0794,0x0000,0x0048
													; Debug Table 0x2.0x0 = 0x53,0x1
0054 0000 0000  |    |		.BLANK	0000[0x4]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b       | [  |		.CONST	0x005b								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0001       |    |		.CONST	0x0001								; Number of locals
005b			BODY_0058:
005b			INIT_0058:
005b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x005b,0x0214,0x1002,0x0000,0x0036,0x0794,0x0000,0x0050
													; Debug Table 0x3.0x0 = 0x5b,0x1
005c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
005d e220       |    |		Load	0x1,0x20
005e 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
005f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063       | c  |		.CONST	0x0063								; Address of begin
0061 0004       |    |		.CONST	0x0004								; Address of exception handler
0062 0001       |    |		.CONST	0x0001								; Number of locals
0063			BODY_0060:
0063			INIT_0060:
0063 e220       |    |		Load	0x1,0x20							; Debug Table 0x4 = .DEBUG	0x0063,0x0218,0x1001,0x0000,0x0036,0x0794,0x0000,0x0059
													; Debug Table 0x4.0x0 = 0x63,0x1
0064 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0065 00db       |    |		Load_Top	At_Offset_3
0066 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0067 e220       |    |		Load	0x1,0x20							; Debug Table 0x4.0x1 = 0x67,0x2
0068 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0069 00db       |    |		Load_Top	At_Offset_3
006a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
006b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
006c 0000 0000  |    |		.BLANK	0000[0x4]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0075       | u  |		.CONST	0x0075								; Address of begin
0071 0004       |    |		.CONST	0x0004								; Address of exception handler
0072 0002       |    |		.CONST	0x0002								; Number of locals
0073			INIT_0070:
0073 e21b       |    |		Load	0x1,0x1b							; Debug Table 0x5 = .DEBUG	0x0073,0x021e,0x1001,0x0000,0x0036,0x0794,0x0000,0x0061
													; Debug Table 0x5.0x0 = 0x73,0xffff
0074 0322       | "  |		Declare_Variable	Record
0075			BODY_0070:
0075 e220       |    |		Load	0x1,0x20							; Debug Table 0x5.0x1 = 0x75,0x1
													; Debug Table 0x5.0x2 = 0x75,0x401
0076 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0077 e5fe       |    |		Load	0x2,-0x2
0078 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0079 e220       |    |		Load	0x1,0x20							; Debug Table 0x5.0x3 = 0x79,0x402
007a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
007b e5fe       |    |		Load	0x2,-0x2
007c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
007d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x4 = 0x7d,0x2
007e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x5 = 0x7e,0x801
007f 00da       |    |		Load_Top	At_Offset_2
0080 017d       | }  |		Execute	Record,Structure_Write
0081 00d1       |    |		Pop_Control	Pop_Count_1
0082 782f       |x/  |		Jump	0xb2
0083 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x6 = 0x83,0x4
0084 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x7 = 0x84,0xc01
0085 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0086 e220       |    |		Load	0x1,0x20
0087 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0088 e20f       |    |		Load	0x1,0xf
0089 0119       |    |		Execute	Any,Check_In_Formal_Type
008a 00d0       |    |		Action	Swap_Control
008b 00d1       |    |		Pop_Control	Pop_Count_1
008c e20f       |    |		Load	0x1,0xf								; Debug Table 0x5.0x8 = 0x8c,0x4
008d 0119       |    |		Execute	Any,Check_In_Formal_Type
008e e221       | !  |		Load	0x1,0x21							; Debug Table 0x5.0x9 = 0x8e,0xefff
008f e220       |    |		Load	0x1,0x20
0090 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0091 00da       |    |		Load_Top	At_Offset_2
0092 e20f       |    |		Load	0x1,0xf
0093 0119       |    |		Execute	Any,Check_In_Formal_Type
0094 e220       |    |		Load	0x1,0x20
0095 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0096 0039       | 9  |		Store_Top	Access,At_Offset_1
0097 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0xa = 0x97,0x1001
0098 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0xb = 0x98,0x1401
0099 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
009a e220       |    |		Load	0x1,0x20
009b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
009c 00d0       |    |		Action	Swap_Control
009d 00d1       |    |		Pop_Control	Pop_Count_1
009e 6804       |h   |		Jump_Zero	0xa3							; Debug Table 0x5.0xc = 0x9e,0x1001
009f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0xd = 0x9f,0x1002
00a0 e5fe       |    |		Load	0x2,-0x2
00a1 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00a2 7805       |x   |		Jump	0xa8
00a3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0xe = 0xa3,0x1003
00a4 e5fe       |    |		Load	0x2,-0x2
00a5 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00a6 e220       |    |		Load	0x1,0x20
00a7 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00a8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0xf = 0xa8,0x1004
00a9 e5fe       |    |		Load	0x2,-0x2
00aa 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00ab 00d2       |    |		Pop_Control	Pop_Count_2
00ac 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x10 = 0xac,0x5
													; Debug Table 0x5.0x11 = 0xac,0x1801
00ad 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00ae e220       |    |		Load	0x1,0x20
00af 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00b0 00d9       |    |		Load_Top	At_Offset_1
00b1 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00b2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x12 = 0xb2,0x3
00b3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x13 = 0xb3,0x1c01
00b4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00b5 e220       |    |		Load	0x1,0x20
00b6 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00b7 00d0       |    |		Action	Swap_Control
00b8 00d1       |    |		Pop_Control	Pop_Count_1
00b9 6fc9       |o   |		Jump_Zero	0x83							; Debug Table 0x5.0x14 = 0xb9,0x3
00ba 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00bb 0000 0000  |    |		.BLANK	0000[0x5]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00cc       |    |		.CONST	0x00cc								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0002       |    |		.CONST	0x0002								; Number of locals
00c3			INIT_00c0:
00c3 e221       | !  |		Load	0x1,0x21							; Debug Table 0x6 = .DEBUG	0x00c3,0x024a,0x1001,0x0000,0x0036,0x0794,0x0000,0x006d
													; Debug Table 0x6.0x0 = 0xc3,0xffff
00c4 e220       |    |		Load	0x1,0x20
00c5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00c6 e5ff       |    |		Load	0x2,-0x1
00c7 e20f       |    |		Load	0x1,0xf
00c8 0119       |    |		Execute	Any,Check_In_Formal_Type
00c9 e220       |    |		Load	0x1,0x20
00ca 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00cb 0039       | 9  |		Store_Top	Access,At_Offset_1
00cc			BODY_00c0:
00cc e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x6.0x1 = 0xcc,0x1
00cd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x2 = 0xcd,0x401
00ce 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00cf e220       |    |		Load	0x1,0x20
00d0 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00d1 00d0       |    |		Action	Swap_Control
00d2 00d1       |    |		Pop_Control	Pop_Count_1
00d3 6804       |h   |		Jump_Zero	0xd8							; Debug Table 0x6.0x3 = 0xd3,0x1
00d4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x4 = 0xd4,0x2
00d5 e5fe       |    |		Load	0x2,-0x2
00d6 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00d7 7805       |x   |		Jump	0xdd
00d8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x5 = 0xd8,0x3
00d9 e5fe       |    |		Load	0x2,-0x2
00da 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00db e220       |    |		Load	0x1,0x20
00dc 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00dd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x6 = 0xdd,0x4
00de e5fe       |    |		Load	0x2,-0x2
00df 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00e0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00e1 0000 0000  |    |		.BLANK	0000[0x7]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00ef       |    |		.CONST	0x00ef								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0002       |    |		.CONST	0x0002								; Number of locals
00eb			INIT_00e8:
00eb e221       | !  |		Load	0x1,0x21							; Debug Table 0x7 = .DEBUG	0x00eb,0x025a,0x1001,0x0000,0x0036,0x0794,0x0000,0x0079
													; Debug Table 0x7.0x0 = 0xeb,0xffff
00ec 00db       |    |		Load_Top	At_Offset_3
00ed 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00ee 0039       | 9  |		Store_Top	Access,At_Offset_1
00ef			BODY_00e8:
00ef 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x1 = 0xef,0x1
00f0 e220       |    |		Load	0x1,0x20
00f1 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00f2 e5ff       |    |		Load	0x2,-0x1
00f3 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00f4 e220       |    |		Load	0x1,0x20							; Debug Table 0x7.0x2 = 0xf4,0x2
00f5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00f6 00d9       |    |		Load_Top	At_Offset_1
00f7 e220       |    |		Load	0x1,0x20
00f8 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00f9 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x3 = 0xf9,0x3
00fa 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00fb e220       |    |		Load	0x1,0x20
00fc 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00fd 6804       |h   |		Jump_Zero	0x102
00fe 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x4 = 0xfe,0x4
00ff 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0100 e5ff       |    |		Load	0x2,-0x1
0101 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0102 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0103 0000 0000  |    |		.BLANK	0000[0x5]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b       |    |		.CONST	0x010b								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0001       |    |		.CONST	0x0001								; Number of locals
010b			BODY_0108:
010b			INIT_0108:
010b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x010b,0x0266,0x1002,0x0000,0x0036,0x0794,0x0000,0x0081
													; Debug Table 0x8.0x0 = 0x10b,0x1
010c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
010d e220       |    |		Load	0x1,0x20
010e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
010f e20f       |    |		Load	0x1,0xf
0110 0119       |    |		Execute	Any,Check_In_Formal_Type
0111 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0112 0000 0000  |    |		.BLANK	0000[0x6]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011b       |    |		.CONST	0x011b								; Address of begin
0119 0004       |    |		.CONST	0x0004								; Address of exception handler
011a 0001       |    |		.CONST	0x0001								; Number of locals
011b			BODY_0118:
011b			INIT_0118:
011b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9 = .DEBUG	0x011b,0x026a,0x1001,0x0000,0x0036,0x0794,0x0000,0x008e
													; Debug Table 0x9.0x0 = 0x11b,0x1
011c e5fe       |    |		Load	0x2,-0x2
011d 017d       | }  |		Execute	Record,Structure_Write
011e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
011f 0000       |    |		.XXX[0x1]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123       | #  |		.CONST	0x0123								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0001       |    |		.CONST	0x0001								; Number of locals
0123			BODY_0120:
0123			INIT_0120:
0123 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa = .DEBUG	0x0123,0x026e,0x1001,0x0000,0x0036,0x0794,0x0000,0x009a
													; Debug Table 0xa.0x0 = 0x123,0x1
0124 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0125 e220       |    |		Load	0x1,0x20
0126 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0127 00db       |    |		Load_Top	At_Offset_3
0128 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0129 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
012a 0000 0000  |    |		.BLANK	0000[0x6]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133       | 3  |		.CONST	0x0133								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0001       |    |		.CONST	0x0001								; Number of locals
0133			BODY_0130:
0133			INIT_0130:
0133 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x0133,0x0272,0x1002,0x0000,0x0036,0x0794,0x0000,0x00a2
													; Debug Table 0xb.0x0 = 0x133,0x1
0134 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0135 e220       |    |		Load	0x1,0x20
0136 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0137 e20f       |    |		Load	0x1,0xf
0138 0119       |    |		Execute	Any,Check_In_Formal_Type
0139 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
013a 0000 0000  |    |		.BLANK	0000[0x6]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143       | C  |		.CONST	0x0143								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0001       |    |		.CONST	0x0001								; Number of locals
0143			BODY_0140:
0143			INIT_0140:
0143 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc = .DEBUG	0x0143,0x0276,0x1002,0x0000,0x0036,0x0794,0x0000,0x00ab
													; Debug Table 0xc.0x0 = 0x143,0x1
0144 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0145 e220       |    |		Load	0x1,0x20
0146 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0147 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0148 0000 0000  |    |		.LITERAL	{0x00000000, 0x00360794}
014c 0000 0000  |    |		.BLANK	0000[0x4]
0150 ; --------------------------------------------------------------------------------------
0150 ; Debug Table
0150 ; --------------------------------------------------------------------------------------
0150 0003 000d  |    |		.CONST	0x0003,0x000d
0152 000b 01ba  |    |		.DEBUG	0x000b,0x01ba,0xc000,0x0000,0x0036,0x0794,0x0000,0x0007
015a 0038 01f2  | 8  |		.DEBUG	0x0038,0x01f2,0xc000,0x0000,0x0036,0x0a04,0x0000,0x0003
0162 0053 0210  | S  |		.DEBUG	0x0053,0x0210,0x1001,0x0000,0x0036,0x0794,0x0000,0x0048
016a 005b 0214  | [  |		.DEBUG	0x005b,0x0214,0x1002,0x0000,0x0036,0x0794,0x0000,0x0050
0172 0063 0218  | c  |		.DEBUG	0x0063,0x0218,0x1001,0x0000,0x0036,0x0794,0x0000,0x0059
017a 0073 021e  | s  |		.DEBUG	0x0073,0x021e,0x1001,0x0000,0x0036,0x0794,0x0000,0x0061
0182 00c3 024a  |   J|		.DEBUG	0x00c3,0x024a,0x1001,0x0000,0x0036,0x0794,0x0000,0x006d
018a 00eb 025a  |   Z|		.DEBUG	0x00eb,0x025a,0x1001,0x0000,0x0036,0x0794,0x0000,0x0079
0192 010b 0266  |   f|		.DEBUG	0x010b,0x0266,0x1002,0x0000,0x0036,0x0794,0x0000,0x0081
019a 011b 026a  |   j|		.DEBUG	0x011b,0x026a,0x1001,0x0000,0x0036,0x0794,0x0000,0x008e
01a2 0123 026e  | # n|		.DEBUG	0x0123,0x026e,0x1001,0x0000,0x0036,0x0794,0x0000,0x009a
01aa 0133 0272  | 3 r|		.DEBUG	0x0133,0x0272,0x1002,0x0000,0x0036,0x0794,0x0000,0x00a2
01b2 0143 0276  | C v|		.DEBUG	0x0143,0x0276,0x1002,0x0000,0x0036,0x0794,0x0000,0x00ab
01ba ; --------------------------------------------------------------------------------------
01ba ; Debug3 Subtable 0x0
01ba ; --------------------------------------------------------------------------------------
01ba 001b 0000  |    |		.DBG3TAB	0x001b,0x0000
01bc 000b ffff  |    |		.CONST	0x000b,0xffff
01be 000b fffe  |    |		.CONST	0x000b,0xfffe
01c0 000b fffd  |    |		.CONST	0x000b,0xfffd
01c2 000d fffc  |    |		.CONST	0x000d,0xfffc
01c4 000f fffb  |    |		.CONST	0x000f,0xfffb
01c6 0011 fffa  |    |		.CONST	0x0011,0xfffa
01c8 0013 fff9  |    |		.CONST	0x0013,0xfff9
01ca 0015 fff8  |    |		.CONST	0x0015,0xfff8
01cc 0017 fff7  |    |		.CONST	0x0017,0xfff7
01ce 0019 fff6  |    |		.CONST	0x0019,0xfff6
01d0 001b fff5  |    |		.CONST	0x001b,0xfff5
01d2 001d fff4  |    |		.CONST	0x001d,0xfff4
01d4 001f fff3  |    |		.CONST	0x001f,0xfff3
01d6 0021 fff2  | !  |		.CONST	0x0021,0xfff2
01d8 0023 fff1  | #  |		.CONST	0x0023,0xfff1
01da 0025 fff0  | %  |		.CONST	0x0025,0xfff0
01dc 0025 ffef  | %  |		.CONST	0x0025,0xffef
01de 0025 ffee  | %  |		.CONST	0x0025,0xffee
01e0 0025 ffed  | %  |		.CONST	0x0025,0xffed
01e2 0025 ffec  | %  |		.CONST	0x0025,0xffec
01e4 0025 ffeb  | %  |		.CONST	0x0025,0xffeb
01e6 0025 ffea  | %  |		.CONST	0x0025,0xffea
01e8 0025 ffe9  | %  |		.CONST	0x0025,0xffe9
01ea 0025 ffe8  | %  |		.CONST	0x0025,0xffe8
01ec 002d ffe7  | -  |		.CONST	0x002d,0xffe7
01ee 002f ffe6  | /  |		.CONST	0x002f,0xffe6
01f0 0034 ffe5  | 4  |		.CONST	0x0034,0xffe5
01f2 ; --------------------------------------------------------------------------------------
01f2 ; Debug3 Subtable 0x1
01f2 ; --------------------------------------------------------------------------------------
01f2 000e 0000  |    |		.DBG3TAB	0x000e,0x0000
01f4 0038 ffff  | 8  |		.CONST	0x0038,0xffff
01f6 0038 fffe  | 8  |		.CONST	0x0038,0xfffe
01f8 003a fffd  | :  |		.CONST	0x003a,0xfffd
01fa 003c fffc  | <  |		.CONST	0x003c,0xfffc
01fc 003e fffb  | >  |		.CONST	0x003e,0xfffb
01fe 0040 fffa  | @  |		.CONST	0x0040,0xfffa
0200 0042 fff9  | B  |		.CONST	0x0042,0xfff9
0202 0042 fff8  | B  |		.CONST	0x0042,0xfff8
0204 0044 fff7  | D  |		.CONST	0x0044,0xfff7
0206 0044 fff6  | D  |		.CONST	0x0044,0xfff6
0208 0046 fff5  | F  |		.CONST	0x0046,0xfff5
020a 0048 fff4  | H  |		.CONST	0x0048,0xfff4
020c 004a fff3  | J  |		.CONST	0x004a,0xfff3
020e 004c fff2  | L  |		.CONST	0x004c,0xfff2
0210 ; --------------------------------------------------------------------------------------
0210 ; Debug3 Subtable 0x2
0210 ; --------------------------------------------------------------------------------------
0210 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0212 0053 0001  | S  |		.CONST	0x0053,0x0001
0214 ; --------------------------------------------------------------------------------------
0214 ; Debug3 Subtable 0x3
0214 ; --------------------------------------------------------------------------------------
0214 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0216 005b 0001  | [  |		.CONST	0x005b,0x0001
0218 ; --------------------------------------------------------------------------------------
0218 ; Debug3 Subtable 0x4
0218 ; --------------------------------------------------------------------------------------
0218 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
021a 0063 0001  | c  |		.CONST	0x0063,0x0001
021c 0067 0002  | g  |		.CONST	0x0067,0x0002
021e ; --------------------------------------------------------------------------------------
021e ; Debug3 Subtable 0x5
021e ; --------------------------------------------------------------------------------------
021e 0002 0013  |    |		.DBG3TAB	0x0002,0x0013
0220 0073 ffff  | s  |		.CONST	0x0073,0xffff
0222 0075 0001  | u  |		.CONST	0x0075,0x0001
0224 0075 0401  | u  |		.CONST	0x0075,0x0401
0226 0079 0402  | y  |		.CONST	0x0079,0x0402
0228 007d 0002  | }  |		.CONST	0x007d,0x0002
022a 007e 0801  | ~  |		.CONST	0x007e,0x0801
022c 0083 0004  |    |		.CONST	0x0083,0x0004
022e 0084 0c01  |    |		.CONST	0x0084,0x0c01
0230 008c 0004  |    |		.CONST	0x008c,0x0004
0232 008e efff  |    |		.CONST	0x008e,0xefff
0234 0097 1001  |    |		.CONST	0x0097,0x1001
0236 0098 1401  |    |		.CONST	0x0098,0x1401
0238 009e 1001  |    |		.CONST	0x009e,0x1001
023a 009f 1002  |    |		.CONST	0x009f,0x1002
023c 00a3 1003  |    |		.CONST	0x00a3,0x1003
023e 00a8 1004  |    |		.CONST	0x00a8,0x1004
0240 00ac 0005  |    |		.CONST	0x00ac,0x0005
0242 00ac 1801  |    |		.CONST	0x00ac,0x1801
0244 00b2 0003  |    |		.CONST	0x00b2,0x0003
0246 00b3 1c01  |    |		.CONST	0x00b3,0x1c01
0248 00b9 0003  |    |		.CONST	0x00b9,0x0003
024a ; --------------------------------------------------------------------------------------
024a ; Debug3 Subtable 0x6
024a ; --------------------------------------------------------------------------------------
024a 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
024c 00c3 ffff  |    |		.CONST	0x00c3,0xffff
024e 00cc 0001  |    |		.CONST	0x00cc,0x0001
0250 00cd 0401  |    |		.CONST	0x00cd,0x0401
0252 00d3 0001  |    |		.CONST	0x00d3,0x0001
0254 00d4 0002  |    |		.CONST	0x00d4,0x0002
0256 00d8 0003  |    |		.CONST	0x00d8,0x0003
0258 00dd 0004  |    |		.CONST	0x00dd,0x0004
025a ; --------------------------------------------------------------------------------------
025a ; Debug3 Subtable 0x7
025a ; --------------------------------------------------------------------------------------
025a 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
025c 00eb ffff  |    |		.CONST	0x00eb,0xffff
025e 00ef 0001  |    |		.CONST	0x00ef,0x0001
0260 00f4 0002  |    |		.CONST	0x00f4,0x0002
0262 00f9 0003  |    |		.CONST	0x00f9,0x0003
0264 00fe 0004  |    |		.CONST	0x00fe,0x0004
0266 ; --------------------------------------------------------------------------------------
0266 ; Debug3 Subtable 0x8
0266 ; --------------------------------------------------------------------------------------
0266 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0268 010b 0001  |    |		.CONST	0x010b,0x0001
026a ; --------------------------------------------------------------------------------------
026a ; Debug3 Subtable 0x9
026a ; --------------------------------------------------------------------------------------
026a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
026c 011b 0001  |    |		.CONST	0x011b,0x0001
026e ; --------------------------------------------------------------------------------------
026e ; Debug3 Subtable 0xa
026e ; --------------------------------------------------------------------------------------
026e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0270 0123 0001  | #  |		.CONST	0x0123,0x0001
0272 ; --------------------------------------------------------------------------------------
0272 ; Debug3 Subtable 0xb
0272 ; --------------------------------------------------------------------------------------
0272 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0274 0133 0001  | 3  |		.CONST	0x0133,0x0001
0276 ; --------------------------------------------------------------------------------------
0276 ; Debug3 Subtable 0xc
0276 ; --------------------------------------------------------------------------------------
0276 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0278 0143 0001  | C  |		.CONST	0x0143,0x0001
027a 0000 0000  |    |		.BLANK	0000[0x186]