DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

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

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦f82ef36d6⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 03b8       |    |		.CONST	0x03b8								; 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 0002       |    |		.CONST	0x0002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 006a       | j  |		.CONST	0x006a								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0023       | #  |		.CONST	0x0023								; Number of locals
000b			INIT_0008:
000b 029a 0073  |   s|		Declare_Subprogram	INIT_0070,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x047a,0x0000,0x0000,0x0057,0x5005,0x0000,0x0c2a
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 029a 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x1d,0xfff6
001f 029a 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1f,0xfff5
0021 029a 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x21,0xfff4
0023 029a 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x23,0xfff3
0025 029a 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x25,0xfff2
0027 029a 029b  |    |		Declare_Subprogram	INIT_0298,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x27,0xfff1
0029 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0x0.0xf = 0x29,0xfff0
002a 0266       | f  |		Execute	Discrete,Bounds
002b 00e3       |    |		Load_Encached	Natural_Cache
002c 02a0       |    |		Declare_Subprogram	Null_Subprogram
002d 4801       |H   |		Short_Literal	0x1
002e 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
002f 029a 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x2f,0xffef
0031 029a 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x11 = 0x31,0xffee
0033 029a 031b  |    |		Declare_Subprogram	INIT_0318,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x12 = 0x33,0xffed
0035 029a 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x13 = 0x35,0xffec
0037 029a 0353  |   S|		Declare_Subprogram	INIT_0350,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x14 = 0x37,0xffeb
0039 029a 036b  |   k|		Declare_Subprogram	INIT_0368,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x15 = 0x39,0xffea
003b 029a 0393  |    |		Declare_Subprogram	INIT_0390,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x16 = 0x3b,0xffe9
003d 00bf       |    |		Action	Accept_Activation
003e 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1 = .DEBUG	0x003e,0x04aa,0x0000,0x0000,0x0057,0x5105,0x0000,0x0004
													; Debug Table 0x1.0x0 = 0x3e,0xffff
													; Debug Table 0x1.0x1 = 0x3e,0xfffe
													; Debug Table 0x1.0x2 = 0x3e,0xfffd
003f 00c7       |    |		Action	Elaborate_Subprogram
0040 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x3 = 0x40,0xfffc
0041 00c7       |    |		Action	Elaborate_Subprogram
0042 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x4 = 0x42,0xfffb
0043 00c7       |    |		Action	Elaborate_Subprogram
0044 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x5 = 0x44,0xfffa
0045 00c7       |    |		Action	Elaborate_Subprogram
0046 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x6 = 0x46,0xfff9
0047 00c7       |    |		Action	Elaborate_Subprogram
0048 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x7 = 0x48,0xfff8
0049 00c7       |    |		Action	Elaborate_Subprogram
004a 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22				; Debug Table 0x1.0x8 = 0x4a,0xfff7
004b 00c7       |    |		Action	Elaborate_Subprogram
004c 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x9 = 0x4c,0xfff6
004d 00c7       |    |		Action	Elaborate_Subprogram
004e 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0xa = 0x4e,0xfff5
004f 00c7       |    |		Action	Elaborate_Subprogram
0050 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0xb = 0x50,0xfff4
0051 00c7       |    |		Action	Elaborate_Subprogram
0052 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0xc = 0x52,0xfff3
0053 00c7       |    |		Action	Elaborate_Subprogram
0054 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xd = 0x54,0xfff2
0055 00c7       |    |		Action	Elaborate_Subprogram
0056 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23				; Debug Table 0x1.0xe = 0x56,0xfff1
0057 00c7       |    |		Action	Elaborate_Subprogram
0058 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0xf = 0x58,0xfff0
0059 00c7       |    |		Action	Elaborate_Subprogram
005a 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0x10 = 0x5a,0xffef
005b 00c7       |    |		Action	Elaborate_Subprogram
005c 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0x11 = 0x5c,0xffee
005d 00c7       |    |		Action	Elaborate_Subprogram
005e 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x12 = 0x5e,0xffed
005f 00c7       |    |		Action	Elaborate_Subprogram
0060 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0x13 = 0x60,0xffec
0061 00c7       |    |		Action	Elaborate_Subprogram
0062 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x1.0x14 = 0x62,0xffeb
0063 00c7       |    |		Action	Elaborate_Subprogram
0064 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f				; Debug Table 0x1.0x15 = 0x64,0xffea
0065 00c7       |    |		Action	Elaborate_Subprogram
0066 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20				; Debug Table 0x1.0x16 = 0x66,0xffe9
0067 00c7       |    |		Action	Elaborate_Subprogram
0068 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21				; Debug Table 0x1.0x17 = 0x68,0xffe8
0069 00c7       |    |		Action	Elaborate_Subprogram
006a			BODY_0008:
006a 00bc       |    |		Action	Signal_Activated
006b 00bb       |    |		Action	Signal_Completion
006c 0000 0000  |    |		.BLANK	0000[0x4]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0080       |    |		.CONST	0x0080								; Address of begin
0071 0004       |    |		.CONST	0x0004								; Address of exception handler
0072 0004       |    |		.CONST	0x0004								; Number of locals
0073			INIT_0070:
0073 e001       |    |		Load	0x0,0x1								; Debug Table 0x2 = .DEBUG	0x0073,0x04dc,0x0002,0x0000,0x0057,0x5005,0x0000,0x0c2b
													; Debug Table 0x2.0x0 = 0x73,0xffff
0074 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0075 00db       |    |		Load_Top	At_Offset_3
0076 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0077 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0078 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x1 = 0x78,0xfffe
0079 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
007a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
007b 00e3       |    |		Load_Encached	Natural_Cache
007c 03f1       |    |		Declare_Variable	Discrete,With_Value
007d e001       |    |		Load	0x0,0x1								; Debug Table 0x2.0x2 = 0x7d,0xfffd
007e 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
007f 0322       | "  |		Declare_Variable	Record
0080			BODY_0070:
0080 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x3 = 0x80,0x1
0081 00db       |    |		Load_Top	At_Offset_3
0082 0217       |    |		Execute	Heap_Access,All_Reference
0083 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0084 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2.0x4 = 0x84,0x401
0085 00da       |    |		Load_Top	At_Offset_2
0086 4801       |H   |		Short_Literal	0x1
0087 00db       |    |		Load_Top	At_Offset_3
0088 4804       |H   |		Short_Literal	0x4
0089 e406       |    |		Load	0x2,0x6
008a 0217       |    |		Execute	Heap_Access,All_Reference
008b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
008c e002       |    |		Load	0x0,0x2
008d 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
008e 01d7       |    |		Execute	Vector,Field_Read
008f 0229       | )  |		Execute	Access,All_Read
0090 1728       | (  |		Execute	Task,Entry_Call,Field_Number 0x28
0091 00d2       |    |		Pop_Control	Pop_Count_2
0092 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0x5 = 0x92,0x2
0093 e5ff       |    |		Load	0x2,-0x1
0094 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0095 e001       |    |		Load	0x0,0x1
0096 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
0097 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0098 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x6 = 0x98,0x3
0099 00d9       |    |		Load_Top	At_Offset_1
009a 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
009b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x7 = 0x9b,0x4
009c e5fe       |    |		Load	0x2,-0x2
009d 0273       | s  |		Execute	Discrete,Plus
009e 00d9       |    |		Load_Top	At_Offset_1
009f 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00a0 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00a1 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0x8 = 0xa1,0x5
00a2 00d9       |    |		Load_Top	At_Offset_1
00a3 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00a4 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00a5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x9 = 0xa5,0x6
00a6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
00a7 0000       |    |		.XXX[0x1]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab       |    |		.CONST	0x00ab								; Address of begin
00a9 0004       |    |		.CONST	0x0004								; Address of exception handler
00aa 0001       |    |		.CONST	0x0001								; Number of locals
00ab			BODY_00a8:
00ab			INIT_00a8:
00ab 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x00ab,0x04f2,0x0001,0x0000,0x0057,0x5005,0x0000,0x0c39
													; Debug Table 0x3.0x0 = 0xab,0x1
00ac 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00ad 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00ae 00db       |    |		Load_Top	At_Offset_3
00af 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00b0 0217       |    |		Execute	Heap_Access,All_Reference
00b1 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
00b2 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3.0x1 = 0xb2,0x401
00b3 e5fe       |    |		Load	0x2,-0x2
00b4 00db       |    |		Load_Top	At_Offset_3
00b5 4801       |H   |		Short_Literal	0x1
00b6 e403       |    |		Load	0x2,0x3
00b7 4805       |H   |		Short_Literal	0x5
00b8 e403       |    |		Load	0x2,0x3
00b9 0217       |    |		Execute	Heap_Access,All_Reference
00ba 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00bb e002       |    |		Load	0x0,0x2
00bc 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
00bd 01d7       |    |		Execute	Vector,Field_Read
00be 0229       | )  |		Execute	Access,All_Read
00bf 1729       | )  |		Execute	Task,Entry_Call,Field_Number 0x29
00c0 00d2       |    |		Pop_Control	Pop_Count_2
00c1 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x2 = 0xc1,0x2
00c2 00db       |    |		Load_Top	At_Offset_3
00c3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00c4 e001       |    |		Load	0x0,0x1
00c5 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
00c6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00c7 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00d2       |    |		.CONST	0x00d2								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0003       |    |		.CONST	0x0003								; Number of locals
00cb			INIT_00c8:
00cb e001       |    |		Load	0x0,0x1								; Debug Table 0x4 = .DEBUG	0x00cb,0x04fa,0x0002,0x0000,0x0057,0x5005,0x0000,0x0c4a
													; Debug Table 0x4.0x0 = 0xcb,0xffff
00cc 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00cd 00db       |    |		Load_Top	At_Offset_3
00ce 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00cf 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00d0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x1 = 0xd0,0xfffe
00d1 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00d2			BODY_00c8:
00d2 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x2 = 0xd2,0x1
00d3 0217       |    |		Execute	Heap_Access,All_Reference
00d4 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
00d5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x3 = 0xd5,0x401
00d6 4801       |H   |		Short_Literal	0x1
00d7 00da       |    |		Load_Top	At_Offset_2
00d8 4803       |H   |		Short_Literal	0x3
00d9 e404       |    |		Load	0x2,0x4
00da 0217       |    |		Execute	Heap_Access,All_Reference
00db 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00dc e002       |    |		Load	0x0,0x2
00dd 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
00de 01d7       |    |		Execute	Vector,Field_Read
00df 0229       | )  |		Execute	Access,All_Read
00e0 1744       | D  |		Execute	Task,Entry_Call,Field_Number 0x44
00e1 00d1       |    |		Pop_Control	Pop_Count_1
00e2 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x4 = 0xe2,0x2
00e3 e5ff       |    |		Load	0x2,-0x1
00e4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00e5 e001       |    |		Load	0x0,0x1
00e6 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
00e7 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00e8 e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x5 = 0xe8,0x3
00e9 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00ea 0322       | "  |		Declare_Variable	Record
00eb 00da       |    |		Load_Top	At_Offset_2
00ec 00d9       |    |		Load_Top	At_Offset_1
00ed 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00ee 00d8       |    |		Load_Top	At_Offset_0
00ef 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00f0 00da       |    |		Load_Top	At_Offset_2
00f1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00f2 0a01       |    |		Execute_Immediate	Plus,0x1
00f3 00d9       |    |		Load_Top	At_Offset_1
00f4 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00f5 4801       |H   |		Short_Literal	0x1
00f6 00d0       |    |		Action	Swap_Control
00f7 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00f8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00f9 0000 0000  |    |		.BLANK	0000[0x7]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103       |    |		.CONST	0x0103								; Address of begin
0101 0004       |    |		.CONST	0x0004								; Address of exception handler
0102 0001       |    |		.CONST	0x0001								; Number of locals
0103			BODY_0100:
0103			INIT_0100:
0103 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x0103,0x0508,0x0001,0x0000,0x0057,0x5005,0x0000,0x0c53
													; Debug Table 0x5.0x0 = 0x103,0x1
0104 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0105 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0106 00db       |    |		Load_Top	At_Offset_3
0107 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0108 0217       |    |		Execute	Heap_Access,All_Reference
0109 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
010a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x1 = 0x10a,0x401
010b 4801       |H   |		Short_Literal	0x1
010c 00da       |    |		Load_Top	At_Offset_2
010d 4803       |H   |		Short_Literal	0x3
010e e403       |    |		Load	0x2,0x3
010f 0217       |    |		Execute	Heap_Access,All_Reference
0110 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0111 e002       |    |		Load	0x0,0x2
0112 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
0113 01d7       |    |		Execute	Vector,Field_Read
0114 0229       | )  |		Execute	Access,All_Read
0115 172c       | ,  |		Execute	Task,Entry_Call,Field_Number 0x2c
0116 00d2       |    |		Pop_Control	Pop_Count_2
0117 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x2 = 0x117,0x2
0118 00db       |    |		Load_Top	At_Offset_3
0119 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
011a e001       |    |		Load	0x0,0x1
011b 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
011c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
011d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
011e 0000 0000  |    |		.XXX[0x2]
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 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6 = .DEBUG	0x0123,0x0510,0x0001,0x0000,0x0057,0x5005,0x0000,0x0c5b
													; Debug Table 0x6.0x0 = 0x123,0x1
0124 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0125 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0126 e5fe       |    |		Load	0x2,-0x2
0127 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0128 0217       |    |		Execute	Heap_Access,All_Reference
0129 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
012a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6.0x1 = 0x12a,0x401
012b 00da       |    |		Load_Top	At_Offset_2
012c 4801       |H   |		Short_Literal	0x1
012d 00db       |    |		Load_Top	At_Offset_3
012e 4804       |H   |		Short_Literal	0x4
012f e403       |    |		Load	0x2,0x3
0130 0217       |    |		Execute	Heap_Access,All_Reference
0131 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0132 e002       |    |		Load	0x0,0x2
0133 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
0134 01d7       |    |		Execute	Vector,Field_Read
0135 0229       | )  |		Execute	Access,All_Read
0136 1716       |    |		Execute	Task,Entry_Call,Field_Number 0x16
0137 00d2       |    |		Pop_Control	Pop_Count_2
0138 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x2 = 0x138,0x2
0139 e5fe       |    |		Load	0x2,-0x2
013a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
013b e001       |    |		Load	0x0,0x1
013c 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
013d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
013e 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x3 = 0x13e,0x3
013f e5fe       |    |		Load	0x2,-0x2
0140 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0141 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0142 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0143 0000 0000  |    |		.BLANK	0000[0x5]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b       | K  |		.CONST	0x014b								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0001       |    |		.CONST	0x0001								; Number of locals
014b			BODY_0148:
014b			INIT_0148:
014b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x7 = .DEBUG	0x014b,0x051a,0x0001,0x0000,0x0057,0x5005,0x0000,0x0c68
													; Debug Table 0x7.0x0 = 0x14b,0x1
014c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
014d e5fd       |    |		Load	0x2,-0x3
014e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
014f 0217       |    |		Execute	Heap_Access,All_Reference
0150 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0151 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x1 = 0x151,0x401
0152 e5ff       |    |		Load	0x2,-0x1
0153 00db       |    |		Load_Top	At_Offset_3
0154 4801       |H   |		Short_Literal	0x1
0155 e403       |    |		Load	0x2,0x3
0156 4805       |H   |		Short_Literal	0x5
0157 e403       |    |		Load	0x2,0x3
0158 0217       |    |		Execute	Heap_Access,All_Reference
0159 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
015a e002       |    |		Load	0x0,0x2
015b 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
015c 01d7       |    |		Execute	Vector,Field_Read
015d 0229       | )  |		Execute	Access,All_Read
015e 1724       | $  |		Execute	Task,Entry_Call,Field_Number 0x24
015f 00d2       |    |		Pop_Control	Pop_Count_2
0160 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x2 = 0x160,0x2
0161 e5fd       |    |		Load	0x2,-0x3
0162 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0163 e001       |    |		Load	0x0,0x1
0164 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
0165 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0166 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x7.0x3 = 0x166,0x3
0167 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0168 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0169 0a01       |    |		Execute_Immediate	Plus,0x1
016a e5fd       |    |		Load	0x2,-0x3
016b 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
016c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
016d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
016e 0000 0000  |    |		.XXX[0x2]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173       | s  |		.CONST	0x0173								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0001       |    |		.CONST	0x0001								; Number of locals
0173			BODY_0170:
0173			INIT_0170:
0173 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x8 = .DEBUG	0x0173,0x0524,0x0001,0x0000,0x0057,0x5005,0x0000,0x0c79
													; Debug Table 0x8.0x0 = 0x173,0x1
0174 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0175 e5fd       |    |		Load	0x2,-0x3
0176 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0177 0217       |    |		Execute	Heap_Access,All_Reference
0178 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0179 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0x1 = 0x179,0x401
017a e5ff       |    |		Load	0x2,-0x1
017b 00db       |    |		Load_Top	At_Offset_3
017c 4801       |H   |		Short_Literal	0x1
017d e403       |    |		Load	0x2,0x3
017e 4805       |H   |		Short_Literal	0x5
017f e403       |    |		Load	0x2,0x3
0180 0217       |    |		Execute	Heap_Access,All_Reference
0181 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0182 e002       |    |		Load	0x0,0x2
0183 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
0184 01d7       |    |		Execute	Vector,Field_Read
0185 0229       | )  |		Execute	Access,All_Read
0186 1726       | &  |		Execute	Task,Entry_Call,Field_Number 0x26
0187 00d2       |    |		Pop_Control	Pop_Count_2
0188 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0x2 = 0x188,0x2
0189 e5fd       |    |		Load	0x2,-0x3
018a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
018b e001       |    |		Load	0x0,0x1
018c 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
018d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
018e e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x8.0x3 = 0x18e,0x3
018f 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0190 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0191 00db       |    |		Load_Top	At_Offset_3
0192 01db       |    |		Execute	Vector,Length
0193 0273       | s  |		Execute	Discrete,Plus
0194 e5fd       |    |		Load	0x2,-0x3
0195 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0196 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0197 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b       |    |		.CONST	0x019b								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0001       |    |		.CONST	0x0001								; Number of locals
019b			BODY_0198:
019b			INIT_0198:
019b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x9 = .DEBUG	0x019b,0x052e,0x0001,0x0000,0x0057,0x5005,0x0000,0x0c8a
													; Debug Table 0x9.0x0 = 0x19b,0x1
019c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
019d e5fd       |    |		Load	0x2,-0x3
019e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
019f 0217       |    |		Execute	Heap_Access,All_Reference
01a0 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
01a1 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x1 = 0x1a1,0x401
01a2 e5ff       |    |		Load	0x2,-0x1
01a3 00db       |    |		Load_Top	At_Offset_3
01a4 4801       |H   |		Short_Literal	0x1
01a5 e403       |    |		Load	0x2,0x3
01a6 4805       |H   |		Short_Literal	0x5
01a7 e403       |    |		Load	0x2,0x3
01a8 0217       |    |		Execute	Heap_Access,All_Reference
01a9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01aa e002       |    |		Load	0x0,0x2
01ab 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
01ac 01d7       |    |		Execute	Vector,Field_Read
01ad 0229       | )  |		Execute	Access,All_Read
01ae 1727       | '  |		Execute	Task,Entry_Call,Field_Number 0x27
01af 00d2       |    |		Pop_Control	Pop_Count_2
01b0 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0x2 = 0x1b0,0x2
01b1 e5fd       |    |		Load	0x2,-0x3
01b2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01b3 e001       |    |		Load	0x0,0x1
01b4 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
01b5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01b6 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x9.0x3 = 0x1b6,0x3
01b7 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
01b8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01b9 00db       |    |		Load_Top	At_Offset_3
01ba 01db       |    |		Execute	Vector,Length
01bb 0273       | s  |		Execute	Discrete,Plus
01bc e5fd       |    |		Load	0x2,-0x3
01bd 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
01be 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01bf 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3       |    |		.CONST	0x01c3								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0001       |    |		.CONST	0x0001								; Number of locals
01c3			BODY_01c0:
01c3			INIT_01c0:
01c3 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xa = .DEBUG	0x01c3,0x0538,0x0001,0x0000,0x0057,0x5005,0x0000,0x0c9a
													; Debug Table 0xa.0x0 = 0x1c3,0x1
01c4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01c5 00e4       |    |		Load_Encached	Positive_Cache
01c6 e5fd       |    |		Load	0x2,-0x3
01c7 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
01c8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01c9 e5fd       |    |		Load	0x2,-0x3
01ca 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01cb 0217       |    |		Execute	Heap_Access,All_Reference
01cc 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
01cd 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0xa.0x1 = 0x1cd,0x401
01ce e5fe       |    |		Load	0x2,-0x2
01cf e5ff       |    |		Load	0x2,-0x1
01d0 e404       |    |		Load	0x2,0x4
01d1 4801       |H   |		Short_Literal	0x1
01d2 e405       |    |		Load	0x2,0x5
01d3 4806       |H   |		Short_Literal	0x6
01d4 e405       |    |		Load	0x2,0x5
01d5 0217       |    |		Execute	Heap_Access,All_Reference
01d6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01d7 e002       |    |		Load	0x0,0x2
01d8 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
01d9 01d7       |    |		Execute	Vector,Field_Read
01da 0229       | )  |		Execute	Access,All_Read
01db 170e       |    |		Execute	Task,Entry_Call,Field_Number 0xe
01dc c403       |    |		Store	0x2,0x3
01dd 00d2       |    |		Pop_Control	Pop_Count_2
01de 00d9       |    |		Load_Top	At_Offset_1
01df 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01e0 00d1       |    |		Pop_Control	Pop_Count_1
01e1 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x2 = 0x1e1,0x2
01e2 e5fd       |    |		Load	0x2,-0x3
01e3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01e4 e001       |    |		Load	0x0,0x1
01e5 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
01e6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01e7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb       |    |		.CONST	0x01eb								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0001       |    |		.CONST	0x0001								; Number of locals
01eb			BODY_01e8:
01eb			INIT_01e8:
01eb e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xb = .DEBUG	0x01eb,0x0540,0x0001,0x0000,0x0057,0x5005,0x0000,0x0cab
													; Debug Table 0xb.0x0 = 0x1eb,0x1
01ec 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01ed 00e4       |    |		Load_Encached	Positive_Cache
01ee e5fd       |    |		Load	0x2,-0x3
01ef 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
01f0 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01f1 e5fd       |    |		Load	0x2,-0x3
01f2 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01f3 0217       |    |		Execute	Heap_Access,All_Reference
01f4 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
01f5 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0xb.0x1 = 0x1f5,0x401
01f6 e5fe       |    |		Load	0x2,-0x2
01f7 e5ff       |    |		Load	0x2,-0x1
01f8 e404       |    |		Load	0x2,0x4
01f9 4801       |H   |		Short_Literal	0x1
01fa e405       |    |		Load	0x2,0x5
01fb 4806       |H   |		Short_Literal	0x6
01fc e405       |    |		Load	0x2,0x5
01fd 0217       |    |		Execute	Heap_Access,All_Reference
01fe 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01ff e002       |    |		Load	0x0,0x2
0200 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
0201 01d7       |    |		Execute	Vector,Field_Read
0202 0229       | )  |		Execute	Access,All_Read
0203 170f       |    |		Execute	Task,Entry_Call,Field_Number 0xf
0204 c403       |    |		Store	0x2,0x3
0205 00d2       |    |		Pop_Control	Pop_Count_2
0206 00d9       |    |		Load_Top	At_Offset_1
0207 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0208 00d1       |    |		Pop_Control	Pop_Count_1
0209 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0x2 = 0x209,0x2
020a e5fd       |    |		Load	0x2,-0x3
020b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
020c e001       |    |		Load	0x0,0x1
020d 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
020e 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
020f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213       |    |		.CONST	0x0213								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0001       |    |		.CONST	0x0001								; Number of locals
0213			BODY_0210:
0213			INIT_0210:
0213 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xc = .DEBUG	0x0213,0x0548,0x0001,0x0000,0x0057,0x5005,0x0000,0x0cbc
													; Debug Table 0xc.0x0 = 0x213,0x1
0214 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0215 e5fd       |    |		Load	0x2,-0x3
0216 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0217 0217       |    |		Execute	Heap_Access,All_Reference
0218 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0219 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0x1 = 0x219,0x401
021a e5ff       |    |		Load	0x2,-0x1
021b 00db       |    |		Load_Top	At_Offset_3
021c 4801       |H   |		Short_Literal	0x1
021d e403       |    |		Load	0x2,0x3
021e 4805       |H   |		Short_Literal	0x5
021f e403       |    |		Load	0x2,0x3
0220 0217       |    |		Execute	Heap_Access,All_Reference
0221 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0222 e002       |    |		Load	0x0,0x2
0223 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
0224 01d7       |    |		Execute	Vector,Field_Read
0225 0229       | )  |		Execute	Access,All_Read
0226 1738       | 8  |		Execute	Task,Entry_Call,Field_Number 0x38
0227 00d2       |    |		Pop_Control	Pop_Count_2
0228 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x2 = 0x228,0x2
0229 e5fd       |    |		Load	0x2,-0x3
022a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
022b e001       |    |		Load	0x0,0x1
022c 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
022d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
022e e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xc.0x3 = 0x22e,0x3
022f 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0230 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0231 0a01       |    |		Execute_Immediate	Plus,0x1
0232 e5fd       |    |		Load	0x2,-0x3
0233 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0234 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0235 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0236 0000 0000  |    |		.XXX[0x2]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b       | ;  |		.CONST	0x023b								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0001       |    |		.CONST	0x0001								; Number of locals
023b			BODY_0238:
023b			INIT_0238:
023b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd = .DEBUG	0x023b,0x0552,0x0001,0x0000,0x0057,0x5005,0x0000,0x0ccd
													; Debug Table 0xd.0x0 = 0x23b,0x1
023c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
023d 00db       |    |		Load_Top	At_Offset_3
023e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
023f 0217       |    |		Execute	Heap_Access,All_Reference
0240 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0241 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xd.0x1 = 0x241,0x401
0242 00da       |    |		Load_Top	At_Offset_2
0243 4801       |H   |		Short_Literal	0x1
0244 00db       |    |		Load_Top	At_Offset_3
0245 4804       |H   |		Short_Literal	0x4
0246 e403       |    |		Load	0x2,0x3
0247 0217       |    |		Execute	Heap_Access,All_Reference
0248 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0249 e002       |    |		Load	0x0,0x2
024a 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
024b 01d7       |    |		Execute	Vector,Field_Read
024c 0229       | )  |		Execute	Access,All_Read
024d 1715       |    |		Execute	Task,Entry_Call,Field_Number 0x15
024e 00d2       |    |		Pop_Control	Pop_Count_2
024f 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0x2 = 0x24f,0x2
0250 00db       |    |		Load_Top	At_Offset_3
0251 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0252 e001       |    |		Load	0x0,0x1
0253 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
0254 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0255 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0256 0000 0000  |    |		.XXX[0x2]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b       | [  |		.CONST	0x025b								; Address of begin
0259 0004       |    |		.CONST	0x0004								; Address of exception handler
025a 0001       |    |		.CONST	0x0001								; Number of locals
025b			BODY_0258:
025b			INIT_0258:
025b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe = .DEBUG	0x025b,0x055a,0x0001,0x0000,0x0057,0x5005,0x0000,0x0cda
													; Debug Table 0xe.0x0 = 0x25b,0x1
025c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
025d 00db       |    |		Load_Top	At_Offset_3
025e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
025f 0217       |    |		Execute	Heap_Access,All_Reference
0260 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0261 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xe.0x1 = 0x261,0x401
0262 e5fd       |    |		Load	0x2,-0x3
0263 e5fe       |    |		Load	0x2,-0x2
0264 e402       |    |		Load	0x2,0x2
0265 4801       |H   |		Short_Literal	0x1
0266 e403       |    |		Load	0x2,0x3
0267 4806       |H   |		Short_Literal	0x6
0268 e403       |    |		Load	0x2,0x3
0269 0217       |    |		Execute	Heap_Access,All_Reference
026a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
026b e002       |    |		Load	0x0,0x2
026c 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
026d 01d7       |    |		Execute	Vector,Field_Read
026e 0229       | )  |		Execute	Access,All_Read
026f 173a       | :  |		Execute	Task,Entry_Call,Field_Number 0x3a
0270 00d2       |    |		Pop_Control	Pop_Count_2
0271 4801       |H   |		Short_Literal	0x1							; Debug Table 0xe.0x2 = 0x271,0x2
0272 00db       |    |		Load_Top	At_Offset_3
0273 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0274 e001       |    |		Load	0x0,0x1
0275 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
0276 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0277 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b       | {  |		.CONST	0x027b								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0001       |    |		.CONST	0x0001								; Number of locals
027b			BODY_0278:
027b			INIT_0278:
027b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xf = .DEBUG	0x027b,0x0562,0x0001,0x0000,0x0057,0x5005,0x0000,0x0cef
													; Debug Table 0xf.0x0 = 0x27b,0x1
027c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
027d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
027e 00db       |    |		Load_Top	At_Offset_3
027f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0280 0217       |    |		Execute	Heap_Access,All_Reference
0281 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0282 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xf.0x1 = 0x282,0x401
0283 e5fe       |    |		Load	0x2,-0x2
0284 00db       |    |		Load_Top	At_Offset_3
0285 4801       |H   |		Short_Literal	0x1
0286 e403       |    |		Load	0x2,0x3
0287 4805       |H   |		Short_Literal	0x5
0288 e403       |    |		Load	0x2,0x3
0289 0217       |    |		Execute	Heap_Access,All_Reference
028a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
028b e002       |    |		Load	0x0,0x2
028c 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
028d 01d7       |    |		Execute	Vector,Field_Read
028e 0229       | )  |		Execute	Access,All_Read
028f 173b       | ;  |		Execute	Task,Entry_Call,Field_Number 0x3b
0290 00d2       |    |		Pop_Control	Pop_Count_2
0291 4801       |H   |		Short_Literal	0x1							; Debug Table 0xf.0x2 = 0x291,0x2
0292 00db       |    |		Load_Top	At_Offset_3
0293 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0294 e001       |    |		Load	0x0,0x1
0295 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
0296 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0297 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b       |    |		.CONST	0x029b								; Address of begin
0299 0004       |    |		.CONST	0x0004								; Address of exception handler
029a 0001       |    |		.CONST	0x0001								; Number of locals
029b			BODY_0298:
029b			INIT_0298:
029b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10 = .DEBUG	0x029b,0x056a,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d00
													; Debug Table 0x10.0x0 = 0x29b,0x1
029c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
029d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
029e 00db       |    |		Load_Top	At_Offset_3
029f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02a0 0217       |    |		Execute	Heap_Access,All_Reference
02a1 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
02a2 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x10.0x1 = 0x2a2,0x401
02a3 e5fe       |    |		Load	0x2,-0x2
02a4 00db       |    |		Load_Top	At_Offset_3
02a5 4801       |H   |		Short_Literal	0x1
02a6 e403       |    |		Load	0x2,0x3
02a7 4805       |H   |		Short_Literal	0x5
02a8 e403       |    |		Load	0x2,0x3
02a9 0217       |    |		Execute	Heap_Access,All_Reference
02aa 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02ab e002       |    |		Load	0x0,0x2
02ac 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
02ad 01d7       |    |		Execute	Vector,Field_Read
02ae 0229       | )  |		Execute	Access,All_Read
02af 173c       | <  |		Execute	Task,Entry_Call,Field_Number 0x3c
02b0 00d2       |    |		Pop_Control	Pop_Count_2
02b1 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x2 = 0x2b1,0x2
02b2 00db       |    |		Load_Top	At_Offset_3
02b3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02b4 e001       |    |		Load	0x0,0x1
02b5 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
02b6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02b7 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb       |    |		.CONST	0x02bb								; Address of begin
02b9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ba 0001       |    |		.CONST	0x0001								; Number of locals
02bb			BODY_02b8:
02bb			INIT_02b8:
02bb e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x11 = .DEBUG	0x02bb,0x0572,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d19
													; Debug Table 0x11.0x0 = 0x2bb,0x1
02bc 00d8       |    |		Load_Top	At_Offset_0
02bd 01da       |    |		Execute	Vector,Bounds
02be e001       |    |		Load	0x0,0x1
02bf 1b62       | b  |		Execute	Package,Field_Read,Field_Number 0x62
02c0 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
02c1 0334       | 4  |		Declare_Variable	Array,With_Constraint
02c2 00d0       |    |		Action	Swap_Control
02c3 00d8       |    |		Load_Top	At_Offset_0
02c4 01dd       |    |		Execute	Vector,First
02c5 00da       |    |		Load_Top	At_Offset_2
02c6 01dd       |    |		Execute	Vector,First
02c7 0272       | r  |		Execute	Discrete,Minus
02c8 00da       |    |		Load_Top	At_Offset_2
02c9 01d9       |    |		Execute	Vector,Reverse_Bounds
02ca 0263       | c  |		Execute	Discrete,Above_Bound
02cb 700a       |p   |		Jump_Nonzero	0x2d6
02cc 00d8       |    |		Load_Top	At_Offset_0
02cd 00db       |    |		Load_Top	At_Offset_3
02ce 0273       | s  |		Execute	Discrete,Plus
02cf e403       |    |		Load	0x2,0x3
02d0 01d7       |    |		Execute	Vector,Field_Read
02d1 00d9       |    |		Load_Top	At_Offset_1
02d2 e402       |    |		Load	0x2,0x2
02d3 01d5       |    |		Execute	Vector,Field_Reference
02d4 0118       |    |		Execute	Any,Write_Unchecked
02d5 3ff6       |?   |		Loop_Increasing	0x2cc
02d6 00d2       |    |		Pop_Control	Pop_Count_2
02d7 00db       |    |		Load_Top	At_Offset_3
02d8 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
02d9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02da e5ff       |    |		Load	0x2,-0x1
02db 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02dc 0217       |    |		Execute	Heap_Access,All_Reference
02dd 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
02de 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0x1 = 0x2de,0x401
02df e5fd       |    |		Load	0x2,-0x3
02e0 e5fe       |    |		Load	0x2,-0x2
02e1 e403       |    |		Load	0x2,0x3
02e2 4801       |H   |		Short_Literal	0x1
02e3 e404       |    |		Load	0x2,0x4
02e4 4806       |H   |		Short_Literal	0x6
02e5 e404       |    |		Load	0x2,0x4
02e6 0217       |    |		Execute	Heap_Access,All_Reference
02e7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02e8 e002       |    |		Load	0x0,0x2
02e9 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
02ea 01d7       |    |		Execute	Vector,Field_Read
02eb 0229       | )  |		Execute	Access,All_Read
02ec 173d       | =  |		Execute	Task,Entry_Call,Field_Number 0x3d
02ed 00d3       |    |		Pop_Control	Pop_Count_3
02ee 4801       |H   |		Short_Literal	0x1							; Debug Table 0x11.0x2 = 0x2ee,0x2
02ef 00db       |    |		Load_Top	At_Offset_3
02f0 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02f1 e001       |    |		Load	0x0,0x1
02f2 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
02f3 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02f4 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
02f5 0000 0000  |    |		.XXX[0x3]
02f7 0000       |    |
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fb       |    |		.CONST	0x02fb								; Address of begin
02f9 0004       |    |		.CONST	0x0004								; Address of exception handler
02fa 0001       |    |		.CONST	0x0001								; Number of locals
02fb			BODY_02f8:
02fb			INIT_02f8:
02fb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12 = .DEBUG	0x02fb,0x057a,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d2d
													; Debug Table 0x12.0x0 = 0x2fb,0x1
02fc 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
02fd 00db       |    |		Load_Top	At_Offset_3
02fe 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02ff 0217       |    |		Execute	Heap_Access,All_Reference
0300 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0301 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x12.0x1 = 0x301,0x401
0302 00da       |    |		Load_Top	At_Offset_2
0303 4801       |H   |		Short_Literal	0x1
0304 00db       |    |		Load_Top	At_Offset_3
0305 4804       |H   |		Short_Literal	0x4
0306 e403       |    |		Load	0x2,0x3
0307 0217       |    |		Execute	Heap_Access,All_Reference
0308 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0309 e002       |    |		Load	0x0,0x2
030a 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
030b 01d7       |    |		Execute	Vector,Field_Read
030c 0229       | )  |		Execute	Access,All_Read
030d 173e       | >  |		Execute	Task,Entry_Call,Field_Number 0x3e
030e 00d2       |    |		Pop_Control	Pop_Count_2
030f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12.0x2 = 0x30f,0x2
0310 00db       |    |		Load_Top	At_Offset_3
0311 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0312 e001       |    |		Load	0x0,0x1
0313 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
0314 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0315 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0316 0000 0000  |    |		.XXX[0x2]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 031b       |    |		.CONST	0x031b								; Address of begin
0319 0004       |    |		.CONST	0x0004								; Address of exception handler
031a 0001       |    |		.CONST	0x0001								; Number of locals
031b			BODY_0318:
031b			INIT_0318:
031b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13 = .DEBUG	0x031b,0x0582,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d39
													; Debug Table 0x13.0x0 = 0x31b,0x1
031c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
031d 00db       |    |		Load_Top	At_Offset_3
031e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
031f 0217       |    |		Execute	Heap_Access,All_Reference
0320 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0321 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x13.0x1 = 0x321,0x401
0322 e5fe       |    |		Load	0x2,-0x2
0323 00db       |    |		Load_Top	At_Offset_3
0324 4801       |H   |		Short_Literal	0x1
0325 e403       |    |		Load	0x2,0x3
0326 4805       |H   |		Short_Literal	0x5
0327 e403       |    |		Load	0x2,0x3
0328 0217       |    |		Execute	Heap_Access,All_Reference
0329 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
032a e002       |    |		Load	0x0,0x2
032b 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
032c 01d7       |    |		Execute	Vector,Field_Read
032d 0229       | )  |		Execute	Access,All_Read
032e 173f       | ?  |		Execute	Task,Entry_Call,Field_Number 0x3f
032f 00d2       |    |		Pop_Control	Pop_Count_2
0330 4801       |H   |		Short_Literal	0x1							; Debug Table 0x13.0x2 = 0x330,0x2
0331 00db       |    |		Load_Top	At_Offset_3
0332 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0333 e001       |    |		Load	0x0,0x1
0334 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
0335 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0336 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0337 0000       |    |		.XXX[0x1]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033b       | ;  |		.CONST	0x033b								; Address of begin
0339 0004       |    |		.CONST	0x0004								; Address of exception handler
033a 0001       |    |		.CONST	0x0001								; Number of locals
033b			BODY_0338:
033b			INIT_0338:
033b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14 = .DEBUG	0x033b,0x058a,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d4b
													; Debug Table 0x14.0x0 = 0x33b,0x1
033c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
033d 00db       |    |		Load_Top	At_Offset_3
033e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
033f 0217       |    |		Execute	Heap_Access,All_Reference
0340 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0341 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x14.0x1 = 0x341,0x401
0342 e5fd       |    |		Load	0x2,-0x3
0343 e5fe       |    |		Load	0x2,-0x2
0344 e402       |    |		Load	0x2,0x2
0345 e403       |    |		Load	0x2,0x3
0346 4805       |H   |		Short_Literal	0x5
0347 e403       |    |		Load	0x2,0x3
0348 0217       |    |		Execute	Heap_Access,All_Reference
0349 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
034a e002       |    |		Load	0x0,0x2
034b 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
034c 01d7       |    |		Execute	Vector,Field_Read
034d 0229       | )  |		Execute	Access,All_Read
034e 1747       | G  |		Execute	Task,Entry_Call,Field_Number 0x47
034f 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0353       | S  |		.CONST	0x0353								; Address of begin
0351 0004       |    |		.CONST	0x0004								; Address of exception handler
0352 0001       |    |		.CONST	0x0001								; Number of locals
0353			BODY_0350:
0353			INIT_0350:
0353 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15 = .DEBUG	0x0353,0x0590,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d61
													; Debug Table 0x15.0x0 = 0x353,0x1
0354 0217       |    |		Execute	Heap_Access,All_Reference
0355 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0356 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x1 = 0x356,0x401
0357 4801       |H   |		Short_Literal	0x1
0358 00da       |    |		Load_Top	At_Offset_2
0359 0217       |    |		Execute	Heap_Access,All_Reference
035a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
035b e002       |    |		Load	0x0,0x2
035c 1b7c       | |  |		Execute	Package,Field_Read,Field_Number 0x7c
035d 01d7       |    |		Execute	Vector,Field_Read
035e 0229       | )  |		Execute	Access,All_Read
035f 1714       |    |		Execute	Task,Entry_Call,Field_Number 0x14
0360 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0361 0000 0000  |    |		.BLANK	0000[0x7]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036b       | k  |		.CONST	0x036b								; Address of begin
0369 0004       |    |		.CONST	0x0004								; Address of exception handler
036a 0001       |    |		.CONST	0x0001								; Number of locals
036b			BODY_0368:
036b			INIT_0368:
036b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x16 = .DEBUG	0x036b,0x0596,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d69
													; Debug Table 0x16.0x0 = 0x36b,0x1
036c e5fd       |    |		Load	0x2,-0x3
036d e5fe       |    |		Load	0x2,-0x2
036e 0217       |    |		Execute	Heap_Access,All_Reference
036f 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0370 e5ff       |    |		Load	0x2,-0x1
0371 e5fc       |    |		Load	0x2,-0x4
0372 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0373 4801       |H   |		Short_Literal	0x1
0374 e5fc       |    |		Load	0x2,-0x4
0375 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0376 0217       |    |		Execute	Heap_Access,All_Reference
0377 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0378 e002       |    |		Load	0x0,0x2
0379 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
037a c5fb       |    |		Store	0x2,-0x5
037b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x16.0x1 = 0x37b,0x2
037c e5fc       |    |		Load	0x2,-0x4
037d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
037e e001       |    |		Load	0x0,0x1
037f 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
0380 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0381 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x16.0x2 = 0x381,0x3
0382 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0383 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0384 0a01       |    |		Execute_Immediate	Plus,0x1
0385 e5fc       |    |		Load	0x2,-0x4
0386 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0387 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0388 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0389 0000 0000  |    |		.BLANK	0000[0x7]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393       |    |		.CONST	0x0393								; Address of begin
0391 0004       |    |		.CONST	0x0004								; Address of exception handler
0392 0001       |    |		.CONST	0x0001								; Number of locals
0393			BODY_0390:
0393			INIT_0390:
0393 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x17 = .DEBUG	0x0393,0x059e,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d83
													; Debug Table 0x17.0x0 = 0x393,0x1
0394 e5fd       |    |		Load	0x2,-0x3
0395 e5fe       |    |		Load	0x2,-0x2
0396 0217       |    |		Execute	Heap_Access,All_Reference
0397 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0398 e5ff       |    |		Load	0x2,-0x1
0399 e5fc       |    |		Load	0x2,-0x4
039a 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
039b 4801       |H   |		Short_Literal	0x1
039c e5fc       |    |		Load	0x2,-0x4
039d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
039e 0217       |    |		Execute	Heap_Access,All_Reference
039f 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
03a0 e002       |    |		Load	0x0,0x2
03a1 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
03a2 c5fb       |    |		Store	0x2,-0x5
03a3 4801       |H   |		Short_Literal	0x1							; Debug Table 0x17.0x1 = 0x3a3,0x2
03a4 e5fc       |    |		Load	0x2,-0x4
03a5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03a6 e001       |    |		Load	0x0,0x1
03a7 1b36       | 6  |		Execute	Package,Field_Read,Field_Number 0x36
03a8 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
03a9 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x17.0x2 = 0x3a9,0x3
03aa 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
03ab 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03ac 0a01       |    |		Execute_Immediate	Plus,0x1
03ad e5fc       |    |		Load	0x2,-0x4
03ae 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
03af 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03b0 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
03b1 0000 0000  |    |		.BLANK	0000[0x7]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; Debug Table
03b8 ; --------------------------------------------------------------------------------------
03b8 0003 0018  |    |		.CONST	0x0003,0x0018
03ba 000b 047a  |   z|		.DEBUG	0x000b,0x047a,0x0000,0x0000,0x0057,0x5005,0x0000,0x0c2a
03c2 003e 04aa  | >  |		.DEBUG	0x003e,0x04aa,0x0000,0x0000,0x0057,0x5105,0x0000,0x0004
03ca 0073 04dc  | s  |		.DEBUG	0x0073,0x04dc,0x0002,0x0000,0x0057,0x5005,0x0000,0x0c2b
03d2 00ab 04f2  |    |		.DEBUG	0x00ab,0x04f2,0x0001,0x0000,0x0057,0x5005,0x0000,0x0c39
03da 00cb 04fa  |    |		.DEBUG	0x00cb,0x04fa,0x0002,0x0000,0x0057,0x5005,0x0000,0x0c4a
03e2 0103 0508  |    |		.DEBUG	0x0103,0x0508,0x0001,0x0000,0x0057,0x5005,0x0000,0x0c53
03ea 0123 0510  | #  |		.DEBUG	0x0123,0x0510,0x0001,0x0000,0x0057,0x5005,0x0000,0x0c5b
03f2 014b 051a  | K  |		.DEBUG	0x014b,0x051a,0x0001,0x0000,0x0057,0x5005,0x0000,0x0c68
03fa 0173 0524  | s $|		.DEBUG	0x0173,0x0524,0x0001,0x0000,0x0057,0x5005,0x0000,0x0c79
0402 019b 052e  |   .|		.DEBUG	0x019b,0x052e,0x0001,0x0000,0x0057,0x5005,0x0000,0x0c8a
040a 01c3 0538  |   8|		.DEBUG	0x01c3,0x0538,0x0001,0x0000,0x0057,0x5005,0x0000,0x0c9a
0412 01eb 0540  |   @|		.DEBUG	0x01eb,0x0540,0x0001,0x0000,0x0057,0x5005,0x0000,0x0cab
041a 0213 0548  |   H|		.DEBUG	0x0213,0x0548,0x0001,0x0000,0x0057,0x5005,0x0000,0x0cbc
0422 023b 0552  | ; R|		.DEBUG	0x023b,0x0552,0x0001,0x0000,0x0057,0x5005,0x0000,0x0ccd
042a 025b 055a  | [ Z|		.DEBUG	0x025b,0x055a,0x0001,0x0000,0x0057,0x5005,0x0000,0x0cda
0432 027b 0562  | { b|		.DEBUG	0x027b,0x0562,0x0001,0x0000,0x0057,0x5005,0x0000,0x0cef
043a 029b 056a  |   j|		.DEBUG	0x029b,0x056a,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d00
0442 02bb 0572  |   r|		.DEBUG	0x02bb,0x0572,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d19
044a 02fb 057a  |   z|		.DEBUG	0x02fb,0x057a,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d2d
0452 031b 0582  |    |		.DEBUG	0x031b,0x0582,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d39
045a 033b 058a  | ;  |		.DEBUG	0x033b,0x058a,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d4b
0462 0353 0590  | S  |		.DEBUG	0x0353,0x0590,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d61
046a 036b 0596  | k  |		.DEBUG	0x036b,0x0596,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d69
0472 0393 059e  |    |		.DEBUG	0x0393,0x059e,0x0001,0x0000,0x0057,0x5005,0x0000,0x0d83
047a ; --------------------------------------------------------------------------------------
047a ; Debug3 Subtable 0x0
047a ; --------------------------------------------------------------------------------------
047a 0017 0000  |    |		.DBG3TAB	0x0017,0x0000
047c 000b ffff  |    |		.CONST	0x000b,0xffff
047e 000d fffe  |    |		.CONST	0x000d,0xfffe
0480 000f fffd  |    |		.CONST	0x000f,0xfffd
0482 0011 fffc  |    |		.CONST	0x0011,0xfffc
0484 0013 fffb  |    |		.CONST	0x0013,0xfffb
0486 0015 fffa  |    |		.CONST	0x0015,0xfffa
0488 0017 fff9  |    |		.CONST	0x0017,0xfff9
048a 0019 fff8  |    |		.CONST	0x0019,0xfff8
048c 001b fff7  |    |		.CONST	0x001b,0xfff7
048e 001d fff6  |    |		.CONST	0x001d,0xfff6
0490 001f fff5  |    |		.CONST	0x001f,0xfff5
0492 0021 fff4  | !  |		.CONST	0x0021,0xfff4
0494 0023 fff3  | #  |		.CONST	0x0023,0xfff3
0496 0025 fff2  | %  |		.CONST	0x0025,0xfff2
0498 0027 fff1  | '  |		.CONST	0x0027,0xfff1
049a 0029 fff0  | )  |		.CONST	0x0029,0xfff0
049c 002f ffef  | /  |		.CONST	0x002f,0xffef
049e 0031 ffee  | 1  |		.CONST	0x0031,0xffee
04a0 0033 ffed  | 3  |		.CONST	0x0033,0xffed
04a2 0035 ffec  | 5  |		.CONST	0x0035,0xffec
04a4 0037 ffeb  | 7  |		.CONST	0x0037,0xffeb
04a6 0039 ffea  | 9  |		.CONST	0x0039,0xffea
04a8 003b ffe9  | ;  |		.CONST	0x003b,0xffe9
04aa ; --------------------------------------------------------------------------------------
04aa ; Debug3 Subtable 0x1
04aa ; --------------------------------------------------------------------------------------
04aa 0018 0000  |    |		.DBG3TAB	0x0018,0x0000
04ac 003e ffff  | >  |		.CONST	0x003e,0xffff
04ae 003e fffe  | >  |		.CONST	0x003e,0xfffe
04b0 003e fffd  | >  |		.CONST	0x003e,0xfffd
04b2 0040 fffc  | @  |		.CONST	0x0040,0xfffc
04b4 0042 fffb  | B  |		.CONST	0x0042,0xfffb
04b6 0044 fffa  | D  |		.CONST	0x0044,0xfffa
04b8 0046 fff9  | F  |		.CONST	0x0046,0xfff9
04ba 0048 fff8  | H  |		.CONST	0x0048,0xfff8
04bc 004a fff7  | J  |		.CONST	0x004a,0xfff7
04be 004c fff6  | L  |		.CONST	0x004c,0xfff6
04c0 004e fff5  | N  |		.CONST	0x004e,0xfff5
04c2 0050 fff4  | P  |		.CONST	0x0050,0xfff4
04c4 0052 fff3  | R  |		.CONST	0x0052,0xfff3
04c6 0054 fff2  | T  |		.CONST	0x0054,0xfff2
04c8 0056 fff1  | V  |		.CONST	0x0056,0xfff1
04ca 0058 fff0  | X  |		.CONST	0x0058,0xfff0
04cc 005a ffef  | Z  |		.CONST	0x005a,0xffef
04ce 005c ffee  | \  |		.CONST	0x005c,0xffee
04d0 005e ffed  | ^  |		.CONST	0x005e,0xffed
04d2 0060 ffec  | `  |		.CONST	0x0060,0xffec
04d4 0062 ffeb  | b  |		.CONST	0x0062,0xffeb
04d6 0064 ffea  | d  |		.CONST	0x0064,0xffea
04d8 0066 ffe9  | f  |		.CONST	0x0066,0xffe9
04da 0068 ffe8  | h  |		.CONST	0x0068,0xffe8
04dc ; --------------------------------------------------------------------------------------
04dc ; Debug3 Subtable 0x2
04dc ; --------------------------------------------------------------------------------------
04dc 0003 0007  |    |		.DBG3TAB	0x0003,0x0007
04de 0073 ffff  | s  |		.CONST	0x0073,0xffff
04e0 0078 fffe  | x  |		.CONST	0x0078,0xfffe
04e2 007d fffd  | }  |		.CONST	0x007d,0xfffd
04e4 0080 0001  |    |		.CONST	0x0080,0x0001
04e6 0084 0401  |    |		.CONST	0x0084,0x0401
04e8 0092 0002  |    |		.CONST	0x0092,0x0002
04ea 0098 0003  |    |		.CONST	0x0098,0x0003
04ec 009b 0004  |    |		.CONST	0x009b,0x0004
04ee 00a1 0005  |    |		.CONST	0x00a1,0x0005
04f0 00a5 0006  |    |		.CONST	0x00a5,0x0006
04f2 ; --------------------------------------------------------------------------------------
04f2 ; Debug3 Subtable 0x3
04f2 ; --------------------------------------------------------------------------------------
04f2 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
04f4 00ab 0001  |    |		.CONST	0x00ab,0x0001
04f6 00b2 0401  |    |		.CONST	0x00b2,0x0401
04f8 00c1 0002  |    |		.CONST	0x00c1,0x0002
04fa ; --------------------------------------------------------------------------------------
04fa ; Debug3 Subtable 0x4
04fa ; --------------------------------------------------------------------------------------
04fa 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
04fc 00cb ffff  |    |		.CONST	0x00cb,0xffff
04fe 00d0 fffe  |    |		.CONST	0x00d0,0xfffe
0500 00d2 0001  |    |		.CONST	0x00d2,0x0001
0502 00d5 0401  |    |		.CONST	0x00d5,0x0401
0504 00e2 0002  |    |		.CONST	0x00e2,0x0002
0506 00e8 0003  |    |		.CONST	0x00e8,0x0003
0508 ; --------------------------------------------------------------------------------------
0508 ; Debug3 Subtable 0x5
0508 ; --------------------------------------------------------------------------------------
0508 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
050a 0103 0001  |    |		.CONST	0x0103,0x0001
050c 010a 0401  |    |		.CONST	0x010a,0x0401
050e 0117 0002  |    |		.CONST	0x0117,0x0002
0510 ; --------------------------------------------------------------------------------------
0510 ; Debug3 Subtable 0x6
0510 ; --------------------------------------------------------------------------------------
0510 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0512 0123 0001  | #  |		.CONST	0x0123,0x0001
0514 012a 0401  | *  |		.CONST	0x012a,0x0401
0516 0138 0002  | 8  |		.CONST	0x0138,0x0002
0518 013e 0003  | >  |		.CONST	0x013e,0x0003
051a ; --------------------------------------------------------------------------------------
051a ; Debug3 Subtable 0x7
051a ; --------------------------------------------------------------------------------------
051a 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
051c 014b 0001  | K  |		.CONST	0x014b,0x0001
051e 0151 0401  | Q  |		.CONST	0x0151,0x0401
0520 0160 0002  | `  |		.CONST	0x0160,0x0002
0522 0166 0003  | f  |		.CONST	0x0166,0x0003
0524 ; --------------------------------------------------------------------------------------
0524 ; Debug3 Subtable 0x8
0524 ; --------------------------------------------------------------------------------------
0524 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0526 0173 0001  | s  |		.CONST	0x0173,0x0001
0528 0179 0401  | y  |		.CONST	0x0179,0x0401
052a 0188 0002  |    |		.CONST	0x0188,0x0002
052c 018e 0003  |    |		.CONST	0x018e,0x0003
052e ; --------------------------------------------------------------------------------------
052e ; Debug3 Subtable 0x9
052e ; --------------------------------------------------------------------------------------
052e 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0530 019b 0001  |    |		.CONST	0x019b,0x0001
0532 01a1 0401  |    |		.CONST	0x01a1,0x0401
0534 01b0 0002  |    |		.CONST	0x01b0,0x0002
0536 01b6 0003  |    |		.CONST	0x01b6,0x0003
0538 ; --------------------------------------------------------------------------------------
0538 ; Debug3 Subtable 0xa
0538 ; --------------------------------------------------------------------------------------
0538 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
053a 01c3 0001  |    |		.CONST	0x01c3,0x0001
053c 01cd 0401  |    |		.CONST	0x01cd,0x0401
053e 01e1 0002  |    |		.CONST	0x01e1,0x0002
0540 ; --------------------------------------------------------------------------------------
0540 ; Debug3 Subtable 0xb
0540 ; --------------------------------------------------------------------------------------
0540 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0542 01eb 0001  |    |		.CONST	0x01eb,0x0001
0544 01f5 0401  |    |		.CONST	0x01f5,0x0401
0546 0209 0002  |    |		.CONST	0x0209,0x0002
0548 ; --------------------------------------------------------------------------------------
0548 ; Debug3 Subtable 0xc
0548 ; --------------------------------------------------------------------------------------
0548 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
054a 0213 0001  |    |		.CONST	0x0213,0x0001
054c 0219 0401  |    |		.CONST	0x0219,0x0401
054e 0228 0002  | (  |		.CONST	0x0228,0x0002
0550 022e 0003  | .  |		.CONST	0x022e,0x0003
0552 ; --------------------------------------------------------------------------------------
0552 ; Debug3 Subtable 0xd
0552 ; --------------------------------------------------------------------------------------
0552 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0554 023b 0001  | ;  |		.CONST	0x023b,0x0001
0556 0241 0401  | A  |		.CONST	0x0241,0x0401
0558 024f 0002  | O  |		.CONST	0x024f,0x0002
055a ; --------------------------------------------------------------------------------------
055a ; Debug3 Subtable 0xe
055a ; --------------------------------------------------------------------------------------
055a 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
055c 025b 0001  | [  |		.CONST	0x025b,0x0001
055e 0261 0401  | a  |		.CONST	0x0261,0x0401
0560 0271 0002  | q  |		.CONST	0x0271,0x0002
0562 ; --------------------------------------------------------------------------------------
0562 ; Debug3 Subtable 0xf
0562 ; --------------------------------------------------------------------------------------
0562 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0564 027b 0001  | {  |		.CONST	0x027b,0x0001
0566 0282 0401  |    |		.CONST	0x0282,0x0401
0568 0291 0002  |    |		.CONST	0x0291,0x0002
056a ; --------------------------------------------------------------------------------------
056a ; Debug3 Subtable 0x10
056a ; --------------------------------------------------------------------------------------
056a 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
056c 029b 0001  |    |		.CONST	0x029b,0x0001
056e 02a2 0401  |    |		.CONST	0x02a2,0x0401
0570 02b1 0002  |    |		.CONST	0x02b1,0x0002
0572 ; --------------------------------------------------------------------------------------
0572 ; Debug3 Subtable 0x11
0572 ; --------------------------------------------------------------------------------------
0572 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0574 02bb 0001  |    |		.CONST	0x02bb,0x0001
0576 02de 0401  |    |		.CONST	0x02de,0x0401
0578 02ee 0002  |    |		.CONST	0x02ee,0x0002
057a ; --------------------------------------------------------------------------------------
057a ; Debug3 Subtable 0x12
057a ; --------------------------------------------------------------------------------------
057a 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
057c 02fb 0001  |    |		.CONST	0x02fb,0x0001
057e 0301 0401  |    |		.CONST	0x0301,0x0401
0580 030f 0002  |    |		.CONST	0x030f,0x0002
0582 ; --------------------------------------------------------------------------------------
0582 ; Debug3 Subtable 0x13
0582 ; --------------------------------------------------------------------------------------
0582 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0584 031b 0001  |    |		.CONST	0x031b,0x0001
0586 0321 0401  | !  |		.CONST	0x0321,0x0401
0588 0330 0002  | 0  |		.CONST	0x0330,0x0002
058a ; --------------------------------------------------------------------------------------
058a ; Debug3 Subtable 0x14
058a ; --------------------------------------------------------------------------------------
058a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
058c 033b 0001  | ;  |		.CONST	0x033b,0x0001
058e 0341 0401  | A  |		.CONST	0x0341,0x0401
0590 ; --------------------------------------------------------------------------------------
0590 ; Debug3 Subtable 0x15
0590 ; --------------------------------------------------------------------------------------
0590 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0592 0353 0001  | S  |		.CONST	0x0353,0x0001
0594 0356 0401  | V  |		.CONST	0x0356,0x0401
0596 ; --------------------------------------------------------------------------------------
0596 ; Debug3 Subtable 0x16
0596 ; --------------------------------------------------------------------------------------
0596 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0598 036b 0001  | k  |		.CONST	0x036b,0x0001
059a 037b 0002  | {  |		.CONST	0x037b,0x0002
059c 0381 0003  |    |		.CONST	0x0381,0x0003
059e ; --------------------------------------------------------------------------------------
059e ; Debug3 Subtable 0x17
059e ; --------------------------------------------------------------------------------------
059e 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
05a0 0393 0001  |    |		.CONST	0x0393,0x0001
05a2 03a3 0002  |    |		.CONST	0x03a3,0x0002
05a4 03a9 0003  |    |		.CONST	0x03a9,0x0003
05a6 0000 0000  |    |		.BLANK	0000[0x5a]