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

⟦f3f87da61⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df

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 04d0       |    |		.CONST	0x04d0								; 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 0003       |    |		.CONST	0x0003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 009c       |    |		.CONST	0x009c								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0028       | (  |		.CONST	0x0028								; Number of locals
000b			INIT_0008:
000b 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x0 = .DEBUG	0x000b,0x0592,0x8000,0x0000,0x0059,0x8965,0x0000,0x000d
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 00e3       |    |		Load_Encached	Natural_Cache
000d 4800       |H   |		Short_Literal	0x0
000e 4801       |H   |		Short_Literal	0x1
000f 4802       |H   |		Short_Literal	0x2
0010 4806       |H   |		Short_Literal	0x6
0011 0319       |    |		Declare_Type	Variant_Record,Incomplete,Visible
0012 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0x12,0xfffe
0014 029a 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0x14,0xfffd
0016 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x16,0xfffc
0018 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x18,0xfffb
001a 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x1a,0xfffa
001c 029a 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x1c,0xfff9
001e 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x1e,0xfff8
0020 029a 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x20,0xfff7
0022 029a 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x22,0xfff6
0024 029a 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x24,0xfff5
0026 029a 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x26,0xfff4
0028 029a 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x28,0xfff3
002a e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0xd = 0x2a,0xfff2
													; Debug Table 0x0.0xe = 0x2a,0xfff1
002b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
002c e002       |    |		Load	0x0,0x2
002d 1b67       | g  |		Execute	Package,Field_Read,Field_Number 0x67
002e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
002f 029f 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Call
0031 4802       |H   |		Short_Literal	0x2
0032 032d       | -  |		Declare_Type	Record,Defined
0033 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0xf = 0x33,0xfff0
0034 0322       | "  |		Declare_Variable	Record
0035 e001       |    |		Load	0x0,0x1
0036 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0037 00d9       |    |		Load_Top	At_Offset_1
0038 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0039 e002       |    |		Load	0x0,0x2
003a 1b67       | g  |		Execute	Package,Field_Read,Field_Number 0x67
003b 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
003c e002       |    |		Load	0x0,0x2
003d 1b66       | f  |		Execute	Package,Field_Read,Field_Number 0x66
003e 0119       |    |		Execute	Any,Check_In_Formal_Type
003f 00d9       |    |		Load_Top	At_Offset_1
0040 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0041 029b 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Outer_Call,Unelaborated		; Debug Table 0x0.0x10 = 0x41,0xffef
0043 6328       |c(  |		Indirect_Literal	Discrete,0x36c,{0x00000000, 0x00598965}		; Debug Table 0x0.0x11 = 0x43,0xffee
0044 4901       |I   |		Short_Literal	0x101
0045 e21a       |    |		Load	0x1,0x1a
0046 e21b       |    |		Load	0x1,0x1b
0047 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
0048 e003       |    |		Load	0x0,0x3
0049 0387       |    |		Declare_Variable	Package
004a 00d8       |    |		Load_Top	At_Offset_0
004b 020f       |    |		Execute	Module,Activate
004c e004       |    |		Load	0x0,0x4								; Debug Table 0x0.0x12 = 0x4c,0xffed
004d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
004e e001       |    |		Load	0x0,0x1
004f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0050 029f 03db  |    |		Declare_Subprogram	INIT_03d8,For_Call
0052 4802       |H   |		Short_Literal	0x2
0053 032d       | -  |		Declare_Type	Record,Defined
0054 6317       |c   |		Indirect_Literal	Discrete,0x36c,{0x00000000, 0x00598965}		; Debug Table 0x0.0x13 = 0x54,0xffec
0055 4921       |I!  |		Short_Literal	0x121
0056 4832       |H2  |		Short_Literal	0x32
0057 e004       |    |		Load	0x0,0x4
0058 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0059 e21a       |    |		Load	0x1,0x1a
005a e004       |    |		Load	0x0,0x4
005b 1916       |    |		Execute	Package,Field_Reference,Field_Number 0x16
005c e005       |    |		Load	0x0,0x5
005d 0387       |    |		Declare_Variable	Package
005e 00d8       |    |		Load_Top	At_Offset_0
005f 020f       |    |		Execute	Module,Activate
0060 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x0.0x14 = 0x60,0xffeb
0061 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0062 00d9       |    |		Load_Top	At_Offset_1
0063 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0064 e004       |    |		Load	0x0,0x4
0065 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0066 e21d       |    |		Load	0x1,0x1d
0067 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0068 029f 03f3  |    |		Declare_Subprogram	INIT_03f0,For_Call
006a 4800       |H   |		Short_Literal	0x0
006b 4801       |H   |		Short_Literal	0x1
006c 4803       |H   |		Short_Literal	0x3
006d e20d       |    |		Load	0x1,0xd
006e 0307       |    |		Complete_Type	Variant_Record,By_Defining
006f 00bf       |    |		Action	Accept_Activation
0070 e006       |    |		Load	0x0,0x6								; Debug Table 0x1 = .DEBUG	0x0070,0x05be,0x8000,0x0000,0x0059,0x8f75,0x0000,0x0009
													; Debug Table 0x1.0x0 = 0x70,0xffff
													; Debug Table 0x1.0x1 = 0x70,0xfffe
													; Debug Table 0x1.0x2 = 0x70,0xfffd
0071 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0072 e006       |    |		Load	0x0,0x6								; Debug Table 0x1.0x3 = 0x72,0xfffc
0073 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0074 e006       |    |		Load	0x0,0x6								; Debug Table 0x1.0x4 = 0x74,0xfffb
0075 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0076 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x5 = 0x76,0xfffa
0077 00c7       |    |		Action	Elaborate_Subprogram
0078 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x6 = 0x78,0xfff9
0079 00c7       |    |		Action	Elaborate_Subprogram
007a 029d 042b  |   +|		Declare_Subprogram	INIT_0428,For_Outer_Call			; Debug Table 0x1.0x7 = 0x7a,0xfff8
007c 029d 044b  |   K|		Declare_Subprogram	INIT_0448,For_Outer_Call			; Debug Table 0x1.0x8 = 0x7c,0xfff7
007e 029d 045b  |   [|		Declare_Subprogram	INIT_0458,For_Outer_Call			; Debug Table 0x1.0x9 = 0x7e,0xfff6
0080 029d 047b  |   {|		Declare_Subprogram	INIT_0478,For_Outer_Call			; Debug Table 0x1.0xa = 0x80,0xfff5
0082 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0xb = 0x82,0xfff4
0083 00c7       |    |		Action	Elaborate_Subprogram
0084 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0xc = 0x84,0xfff3
0085 00c7       |    |		Action	Elaborate_Subprogram
0086 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0xd = 0x86,0xfff2
0087 00c7       |    |		Action	Elaborate_Subprogram
0088 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0xe = 0x88,0xfff1
0089 00c7       |    |		Action	Elaborate_Subprogram
008a 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0xf = 0x8a,0xfff0
008b 00c7       |    |		Action	Elaborate_Subprogram
008c 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x10 = 0x8c,0xffef
008d 00c7       |    |		Action	Elaborate_Subprogram
008e 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x11 = 0x8e,0xffee
008f 00c7       |    |		Action	Elaborate_Subprogram
0090 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x12 = 0x90,0xffed
0091 00c7       |    |		Action	Elaborate_Subprogram
0092 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x13 = 0x92,0xffec
0093 00c7       |    |		Action	Elaborate_Subprogram
0094 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0x14 = 0x94,0xffeb
0095 00c7       |    |		Action	Elaborate_Subprogram
0096 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x15 = 0x96,0xffea
0097 00c7       |    |		Action	Elaborate_Subprogram
0098 029d 049b  |    |		Declare_Subprogram	INIT_0498,For_Outer_Call			; Debug Table 0x1.0x16 = 0x98,0xffe9
009a 029d 04a3  |    |		Declare_Subprogram	INIT_04a0,For_Outer_Call			; Debug Table 0x1.0x17 = 0x9a,0xffe8
009c			BODY_0008:
009c 0092 04a7  |    |		Action	Push_String_Extended,0x4a7					; "The Stack is empty"
													; Debug Table 0x1.0x18 = 0x9c,0x1
009e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x19 = 0x9e,0x401
009f e006       |    |		Load	0x0,0x6
00a0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00a1 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
00a2 00d0       |    |		Action	Swap_Control
00a3 00d1       |    |		Pop_Control	Pop_Count_1
00a4 a220       |    |		Store_Unchecked	0x1,0x20						; Debug Table 0x1.0x1a = 0xa4,0x1
00a5 0092 04a8  |    |		Action	Push_String_Extended,0x4a8					; "The name is not defined"
													; Debug Table 0x1.0x1b = 0xa5,0x2
00a7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x1c = 0xa7,0x801
00a8 e006       |    |		Load	0x0,0x6
00a9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00aa 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
00ab 00d0       |    |		Action	Swap_Control
00ac 00d1       |    |		Pop_Control	Pop_Count_1
00ad a221       | !  |		Store_Unchecked	0x1,0x21						; Debug Table 0x1.0x1d = 0xad,0x2
00ae 0092 04a9  |    |		Action	Push_String_Extended,0x4a9					; "The named mark is no longer valid"
													; Debug Table 0x1.0x1e = 0xae,0x3
00b0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x1f = 0xb0,0xc01
00b1 e006       |    |		Load	0x0,0x6
00b2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00b3 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
00b4 00d0       |    |		Action	Swap_Control
00b5 00d1       |    |		Pop_Control	Pop_Count_1
00b6 a222       | "  |		Store_Unchecked	0x1,0x22						; Debug Table 0x1.0x20 = 0xb6,0x3
00b7 00bc       |    |		Action	Signal_Activated
00b8 00bb       |    |		Action	Signal_Completion
00b9 0000 0000  |    |		.BLANK	0000[0x7]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3       |    |		.CONST	0x00c3								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0001       |    |		.CONST	0x0001								; Number of locals
00c3			BODY_00c0:
00c3			INIT_00c0:
00c3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2 = .DEBUG	0x00c3,0x0602,0x0001,0x0000,0x0059,0x8965,0x0000,0x001c
													; Debug Table 0x2.0x0 = 0xc3,0x1
00c4 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
00c5 e21d       |    |		Load	0x1,0x1d
00c6 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00c7 00d1       |    |		Pop_Control	Pop_Count_1
00c8 e21d       |    |		Load	0x1,0x1d							; Debug Table 0x2.0x1 = 0xc8,0x2
00c9 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00ca 4800       |H   |		Short_Literal	0x0
00cb e5fe       |    |		Load	0x2,-0x2
00cc 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
00cd e21d       |    |		Load	0x1,0x1d
00ce 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
00cf e5fe       |    |		Load	0x2,-0x2
00d0 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
00d1 e21f       |    |		Load	0x1,0x1f							; Debug Table 0x2.0x2 = 0xd1,0x3
00d2 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00d3 4832       |H2  |		Short_Literal	0x32
00d4 e21f       |    |		Load	0x1,0x1f
00d5 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
00d6 e5fe       |    |		Load	0x2,-0x2
00d7 2804       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
00d8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00d9 0000 0000  |    |		.BLANK	0000[0x7]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3       |    |		.CONST	0x00e3								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0001       |    |		.CONST	0x0001								; Number of locals
00e3			BODY_00e0:
00e3			INIT_00e0:
00e3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x3 = .DEBUG	0x00e3,0x060a,0x0001,0x0000,0x0059,0x8965,0x0000,0x002a
													; Debug Table 0x3.0x0 = 0xe3,0x1
00e4 0000 0000  |    |		.BLANK	0000[0x4]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb       |    |		.CONST	0x00eb								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0001       |    |		.CONST	0x0001								; Number of locals
00eb			BODY_00e8:
00eb			INIT_00e8:
00eb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4 = .DEBUG	0x00eb,0x060e,0x0001,0x0000,0x0059,0x8965,0x0000,0x0032
													; Debug Table 0x4.0x0 = 0xeb,0x1
00ec 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
00ed e21a       |    |		Load	0x1,0x1a
00ee 0322       | "  |		Declare_Variable	Record
00ef e5ff       |    |		Load	0x2,-0x1
00f0 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
00f1 00d9       |    |		Load_Top	At_Offset_1
00f2 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00f3 e5ff       |    |		Load	0x2,-0x1
00f4 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
00f5 e002       |    |		Load	0x0,0x2
00f6 1b66       | f  |		Execute	Package,Field_Read,Field_Number 0x66
00f7 0119       |    |		Execute	Any,Check_In_Formal_Type
00f8 00d9       |    |		Load_Top	At_Offset_1
00f9 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00fa e21d       |    |		Load	0x1,0x1d
00fb 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00fc 00d1       |    |		Pop_Control	Pop_Count_1
00fd e21d       |    |		Load	0x1,0x1d							; Debug Table 0x4.0x1 = 0xfd,0x2
00fe 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00ff 4800       |H   |		Short_Literal	0x0
0100 e5fe       |    |		Load	0x2,-0x2
0101 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0102 e21d       |    |		Load	0x1,0x1d
0103 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0104 e5fe       |    |		Load	0x2,-0x2
0105 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0106 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0107 0000       |    |		.XXX[0x1]
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 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5 = .DEBUG	0x010b,0x0614,0x0001,0x0000,0x0059,0x8965,0x0000,0x0040
													; Debug Table 0x5.0x0 = 0x10b,0x1
010c 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
010d e21a       |    |		Load	0x1,0x1a
010e 0322       | "  |		Declare_Variable	Record
010f e5ff       |    |		Load	0x2,-0x1
0110 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0111 00d9       |    |		Load_Top	At_Offset_1
0112 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0113 e5ff       |    |		Load	0x2,-0x1
0114 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0115 e002       |    |		Load	0x0,0x2
0116 1b66       | f  |		Execute	Package,Field_Read,Field_Number 0x66
0117 0119       |    |		Execute	Any,Check_In_Formal_Type
0118 00d9       |    |		Load_Top	At_Offset_1
0119 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
011a e21d       |    |		Load	0x1,0x1d
011b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
011c 00d1       |    |		Pop_Control	Pop_Count_1
011d e21d       |    |		Load	0x1,0x1d							; Debug Table 0x5.0x1 = 0x11d,0x2
011e 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
011f 4800       |H   |		Short_Literal	0x0
0120 e5fd       |    |		Load	0x2,-0x3
0121 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0122 e21d       |    |		Load	0x1,0x1d
0123 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0124 e5fd       |    |		Load	0x2,-0x3
0125 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0126 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x2 = 0x126,0x3
0127 2c04       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
0128 4800       |H   |		Short_Literal	0x0
0129 e21a       |    |		Load	0x1,0x1a
012a 0322       | "  |		Declare_Variable	Record
012b e5ff       |    |		Load	0x2,-0x1
012c 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
012d 00d9       |    |		Load_Top	At_Offset_1
012e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
012f e5ff       |    |		Load	0x2,-0x1
0130 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0131 e002       |    |		Load	0x0,0x2
0132 1b66       | f  |		Execute	Package,Field_Read,Field_Number 0x66
0133 0119       |    |		Execute	Any,Check_In_Formal_Type
0134 00d9       |    |		Load_Top	At_Offset_1
0135 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0136 4801       |H   |		Short_Literal	0x1
0137 e5fd       |    |		Load	0x2,-0x3
0138 2c05       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5
0139 e5fe       |    |		Load	0x2,-0x2
013a e004       |    |		Load	0x0,0x4
013b 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
013c e21f       |    |		Load	0x1,0x1f
013d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
013e e5fd       |    |		Load	0x2,-0x3
013f 2804       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
0140 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0141 0000 0000  |    |		.BLANK	0000[0x7]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b       | K  |		.CONST	0x014b								; Address of begin
0149 0154       | T  |		.CONST	0x0154								; Address of exception handler
014a 0001       |    |		.CONST	0x0001								; Number of locals
014b			BODY_0148:
014b			INIT_0148:
014b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6 = .DEBUG	0x014b,0x061c,0x0001,0x0000,0x0059,0x8965,0x0000,0x0052
													; Debug Table 0x6.0x0 = 0x14b,0x1
014c 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
014d e5fe       |    |		Load	0x2,-0x2
014e 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
014f e21d       |    |		Load	0x1,0x1d
0150 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0151 e21d       |    |		Load	0x1,0x1d
0152 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0153 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0154			TRAP_0148:
0154 010e       |    |		Execute	Exception,Is_Constraint_Error
0155 6811       |h   |		Jump_Zero	0x167
0156 e220       |    |		Load	0x1,0x20							; Debug Table 0x6.0x1 = 0x156,0x2
0157 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6.0x2 = 0x157,0x401
0158 00d9       |    |		Load_Top	At_Offset_1
0159 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x3 = 0x159,0x801
015a 0227       | '  |		Execute	Access,All_Reference
015b 0335       | 5  |		Declare_Variable	Array,Duplicate
015c 00d0       |    |		Action	Swap_Control
015d 00d1       |    |		Pop_Control	Pop_Count_1
015e 00d0       |    |		Action	Swap_Control
015f 00d1       |    |		Pop_Control	Pop_Count_1
0160 e007       |    |		Load	0x0,0x7								; Debug Table 0x6.0x4 = 0x160,0x401
0161 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0162 00d1       |    |		Pop_Control	Pop_Count_1
0163 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x5 = 0x163,0x402
0164 e5ff       |    |		Load	0x2,-0x1
0165 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0166 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0167 0100       |    |		Execute	Exception,Raise
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016d       | m  |		.CONST	0x016d								; Address of begin
0169 017d       | }  |		.CONST	0x017d								; Address of exception handler
016a 0002       |    |		.CONST	0x0002								; Number of locals
016b			INIT_0168:
016b e21d       |    |		Load	0x1,0x1d							; Debug Table 0x7 = .DEBUG	0x016b,0x062a,0x0001,0x0000,0x0059,0x8965,0x0000,0x0060
													; Debug Table 0x7.0x0 = 0x16b,0xffff
016c 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
016d			BODY_0168:
016d e21d       |    |		Load	0x1,0x1d							; Debug Table 0x7.0x1 = 0x16d,0x1
016e 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
016f 4800       |H   |		Short_Literal	0x0
0170 e5fe       |    |		Load	0x2,-0x2
0171 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0172 e21d       |    |		Load	0x1,0x1d
0173 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0174 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0175 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x2 = 0x175,0x2
0176 e5fe       |    |		Load	0x2,-0x2
0177 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0178 e21d       |    |		Load	0x1,0x1d
0179 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
017a 00d1       |    |		Pop_Control	Pop_Count_1
017b 0059       | Y  |		Store_Top	Discrete,At_Offset_1
017c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
017d			TRAP_0168:
017d 010e       |    |		Execute	Exception,Is_Constraint_Error
017e 6811       |h   |		Jump_Zero	0x190
017f e220       |    |		Load	0x1,0x20							; Debug Table 0x7.0x3 = 0x17f,0x3
0180 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7.0x4 = 0x180,0x401
0181 00d9       |    |		Load_Top	At_Offset_1
0182 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x5 = 0x182,0x801
0183 0227       | '  |		Execute	Access,All_Reference
0184 0335       | 5  |		Declare_Variable	Array,Duplicate
0185 00d0       |    |		Action	Swap_Control
0186 00d1       |    |		Pop_Control	Pop_Count_1
0187 00d0       |    |		Action	Swap_Control
0188 00d1       |    |		Pop_Control	Pop_Count_1
0189 e007       |    |		Load	0x0,0x7								; Debug Table 0x7.0x6 = 0x189,0x401
018a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
018b 00d1       |    |		Pop_Control	Pop_Count_1
018c 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x7 = 0x18c,0x402
018d e5ff       |    |		Load	0x2,-0x1
018e 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
018f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0190 0100       |    |		Execute	Exception,Raise
0191 0000 0000  |    |		.BLANK	0000[0x7]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b       |    |		.CONST	0x019b								; Address of begin
0199 01a1       |    |		.CONST	0x01a1								; Address of exception handler
019a 0001       |    |		.CONST	0x0001								; Number of locals
019b			BODY_0198:
019b			INIT_0198:
019b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x8 = .DEBUG	0x019b,0x063c,0x0001,0x0000,0x0059,0x8965,0x0000,0x006e
													; Debug Table 0x8.0x0 = 0x19b,0x1
019c 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
019d 00db       |    |		Load_Top	At_Offset_3
019e e21d       |    |		Load	0x1,0x1d
019f 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01a0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01a1			TRAP_0198:
01a1 010e       |    |		Execute	Exception,Is_Constraint_Error
01a2 6811       |h   |		Jump_Zero	0x1b4
01a3 e220       |    |		Load	0x1,0x20							; Debug Table 0x8.0x1 = 0x1a3,0x2
01a4 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0x2 = 0x1a4,0x401
01a5 00d9       |    |		Load_Top	At_Offset_1
01a6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x3 = 0x1a6,0x801
01a7 0227       | '  |		Execute	Access,All_Reference
01a8 0335       | 5  |		Declare_Variable	Array,Duplicate
01a9 00d0       |    |		Action	Swap_Control
01aa 00d1       |    |		Pop_Control	Pop_Count_1
01ab 00d0       |    |		Action	Swap_Control
01ac 00d1       |    |		Pop_Control	Pop_Count_1
01ad e007       |    |		Load	0x0,0x7								; Debug Table 0x8.0x4 = 0x1ad,0x401
01ae 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01af 00d1       |    |		Pop_Control	Pop_Count_1
01b0 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0x5 = 0x1b0,0x402
01b1 e5fe       |    |		Load	0x2,-0x2
01b2 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
01b3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01b4 0100       |    |		Execute	Exception,Raise
01b5 0000 0000  |    |		.XXX[0x3]
01b7 0000       |    |
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb       |    |		.CONST	0x01bb								; Address of begin
01b9 01c0       |    |		.CONST	0x01c0								; Address of exception handler
01ba 0001       |    |		.CONST	0x0001								; Number of locals
01bb			BODY_01b8:
01bb			INIT_01b8:
01bb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9 = .DEBUG	0x01bb,0x064a,0x0001,0x0000,0x0059,0x8965,0x0000,0x0080
													; Debug Table 0x9.0x0 = 0x1bb,0x1
01bc 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
01bd e21d       |    |		Load	0x1,0x1d
01be 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
01bf 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01c0			TRAP_01b8:
01c0 010e       |    |		Execute	Exception,Is_Constraint_Error
01c1 6811       |h   |		Jump_Zero	0x1d3
01c2 e220       |    |		Load	0x1,0x20							; Debug Table 0x9.0x1 = 0x1c2,0x2
01c3 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x2 = 0x1c3,0x401
01c4 00d9       |    |		Load_Top	At_Offset_1
01c5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x3 = 0x1c5,0x801
01c6 0227       | '  |		Execute	Access,All_Reference
01c7 0335       | 5  |		Declare_Variable	Array,Duplicate
01c8 00d0       |    |		Action	Swap_Control
01c9 00d1       |    |		Pop_Control	Pop_Count_1
01ca 00d0       |    |		Action	Swap_Control
01cb 00d1       |    |		Pop_Control	Pop_Count_1
01cc e007       |    |		Load	0x0,0x7								; Debug Table 0x9.0x4 = 0x1cc,0x401
01cd 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01ce 00d1       |    |		Pop_Control	Pop_Count_1
01cf 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x5 = 0x1cf,0x402
01d0 e5ff       |    |		Load	0x2,-0x1
01d1 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
01d2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01d3 0100       |    |		Execute	Exception,Raise
01d4 0000 0000  |    |		.BLANK	0000[0x4]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01db       |    |		.CONST	0x01db								; Address of begin
01d9 021f       |    |		.CONST	0x021f								; Address of exception handler
01da 0001       |    |		.CONST	0x0001								; Number of locals
01db			BODY_01d8:
01db			INIT_01d8:
01db e21d       |    |		Load	0x1,0x1d							; Debug Table 0xa = .DEBUG	0x01db,0x0658,0x0001,0x0000,0x0059,0x8965,0x0000,0x008e
													; Debug Table 0xa.0x0 = 0x1db,0x1
01dc 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
01dd 4800       |H   |		Short_Literal	0x0
01de e5fe       |    |		Load	0x2,-0x2
01df 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
01e0 e21d       |    |		Load	0x1,0x1d
01e1 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
01e2 e5fe       |    |		Load	0x2,-0x2
01e3 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
01e4 00cf       |    |		Action	Mark_Auxiliary
01e5 7812       |x   |		Jump	0x1f8
01e6 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x1 = 0x1e6,0x3
01e7 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
01e8 e5fe       |    |		Load	0x2,-0x2
01e9 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
01ea e21d       |    |		Load	0x1,0x1d
01eb 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
01ec 8224       | $  |		Call	0x1,0x24
01ed 700f       |p   |		Jump_Nonzero	0x1fd
01ee e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x2 = 0x1ee,0x4
01ef 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
01f0 e5fe       |    |		Load	0x2,-0x2
01f1 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
01f2 e21d       |    |		Load	0x1,0x1d
01f3 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01f4 00d1       |    |		Pop_Control	Pop_Count_1
01f5 e5fe       |    |		Load	0x2,-0x2
01f6 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
01f7 00c9       |    |		Action	Pop_Auxiliary_Loop
01f8 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x3 = 0x1f8,0x2
01f9 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
01fa e21d       |    |		Load	0x1,0x1d
01fb 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01fc 6fe9       |o   |		Jump_Zero	0x1e6
01fd 00ce       |    |		Action	Pop_Auxiliary
01fe 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x4 = 0x1fe,0x5
01ff 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0200 e21d       |    |		Load	0x1,0x1d
0201 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0202 700a       |p   |		Jump_Nonzero	0x20d
0203 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x5 = 0x203,0x6
0204 e5fe       |    |		Load	0x2,-0x2
0205 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0206 e5fe       |    |		Load	0x2,-0x2
0207 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0208 e21d       |    |		Load	0x1,0x1d
0209 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
020a 8223       | #  |		Call	0x1,0x23
020b 00d1       |    |		Pop_Control	Pop_Count_1
020c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
020d e220       |    |		Load	0x1,0x20							; Debug Table 0xa.0x6 = 0x20d,0x7
020e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x7 = 0x20e,0x401
020f 00d9       |    |		Load_Top	At_Offset_1
0210 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x8 = 0x210,0x801
0211 0227       | '  |		Execute	Access,All_Reference
0212 0335       | 5  |		Declare_Variable	Array,Duplicate
0213 00d0       |    |		Action	Swap_Control
0214 00d1       |    |		Pop_Control	Pop_Count_1
0215 00d0       |    |		Action	Swap_Control
0216 00d1       |    |		Pop_Control	Pop_Count_1
0217 e007       |    |		Load	0x0,0x7								; Debug Table 0xa.0x9 = 0x217,0x401
0218 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0219 00d1       |    |		Pop_Control	Pop_Count_1
021a 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0xa = 0x21a,0x402
021b e5ff       |    |		Load	0x2,-0x1
021c 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
021d 00d1       |    |		Pop_Control	Pop_Count_1
021e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
021f			TRAP_01d8:
021f 010e       |    |		Execute	Exception,Is_Constraint_Error
0220 6811       |h   |		Jump_Zero	0x232
0221 e220       |    |		Load	0x1,0x20							; Debug Table 0xa.0xb = 0x221,0x8
0222 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0xc = 0x222,0xc01
0223 00d9       |    |		Load_Top	At_Offset_1
0224 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0xd = 0x224,0x1001
0225 0227       | '  |		Execute	Access,All_Reference
0226 0335       | 5  |		Declare_Variable	Array,Duplicate
0227 00d0       |    |		Action	Swap_Control
0228 00d1       |    |		Pop_Control	Pop_Count_1
0229 00d0       |    |		Action	Swap_Control
022a 00d1       |    |		Pop_Control	Pop_Count_1
022b e007       |    |		Load	0x0,0x7								; Debug Table 0xa.0xe = 0x22b,0xc01
022c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
022d 00d1       |    |		Pop_Control	Pop_Count_1
022e 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0xf = 0x22e,0xc02
022f e5ff       |    |		Load	0x2,-0x1
0230 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0231 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0232 0100       |    |		Execute	Exception,Raise
0233 0000 0000  |    |		.BLANK	0000[0x5]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023f       | ?  |		.CONST	0x023f								; Address of begin
0239 02ba       |    |		.CONST	0x02ba								; Address of exception handler
023a 0002       |    |		.CONST	0x0002								; Number of locals
023b			INIT_0238:
023b e21a       |    |		Load	0x1,0x1a							; Debug Table 0xb = .DEBUG	0x023b,0x067a,0x0001,0x0000,0x0059,0x8965,0x0000,0x009c
													; Debug Table 0xb.0x0 = 0x23b,0xffff
023c 0322       | "  |		Declare_Variable	Record
023d 00d8       |    |		Load_Top	At_Offset_0
023e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
023f			BODY_0238:
023f e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x1 = 0x23f,0xfffe
													; Debug Table 0xb.0x2 = 0x23f,0xfffd
													; Debug Table 0xb.0x3 = 0x23f,0x1
0240 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0241 e5fe       |    |		Load	0x2,-0x2
0242 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0243 e21d       |    |		Load	0x1,0x1d
0244 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0245 6812       |h   |		Jump_Zero	0x258
0246 e220       |    |		Load	0x1,0x20							; Debug Table 0xb.0x4 = 0x246,0x2
0247 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0x5 = 0x247,0x401
0248 00d9       |    |		Load_Top	At_Offset_1
0249 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x6 = 0x249,0x801
024a 0227       | '  |		Execute	Access,All_Reference
024b 0335       | 5  |		Declare_Variable	Array,Duplicate
024c 00d0       |    |		Action	Swap_Control
024d 00d1       |    |		Pop_Control	Pop_Count_1
024e 00d0       |    |		Action	Swap_Control
024f 00d1       |    |		Pop_Control	Pop_Count_1
0250 e007       |    |		Load	0x0,0x7								; Debug Table 0xb.0x7 = 0x250,0x401
0251 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0252 00d1       |    |		Pop_Control	Pop_Count_1
0253 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x8 = 0x253,0x402
0254 e5ff       |    |		Load	0x2,-0x1
0255 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0256 00d1       |    |		Pop_Control	Pop_Count_1
0257 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0258 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x9 = 0x258,0x3
0259 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
025a e5fe       |    |		Load	0x2,-0x2
025b 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
025c e21d       |    |		Load	0x1,0x1d
025d 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
025e 00d9       |    |		Load_Top	At_Offset_1
025f 017d       | }  |		Execute	Record,Structure_Write
0260 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0xa = 0x260,0x4
0261 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0262 e5ff       |    |		Load	0x2,-0x1
0263 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0264 016f       | o  |		Execute	Variant_Record,Equal
0265 6804       |h   |		Jump_Zero	0x26a
0266 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0xb = 0x266,0x5
0267 8225       | %  |		Call	0x1,0x25
0268 00d1       |    |		Pop_Control	Pop_Count_1
0269 7812       |x   |		Jump	0x27c
026a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0xc = 0x26a,0x6
026b 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
026c e5fe       |    |		Load	0x2,-0x2
026d 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
026e e21d       |    |		Load	0x1,0x1d
026f 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0270 00d1       |    |		Pop_Control	Pop_Count_1
0271 e5fe       |    |		Load	0x2,-0x2
0272 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0273 e21d       |    |		Load	0x1,0x1d							; Debug Table 0xb.0xd = 0x273,0x7
0274 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0275 4800       |H   |		Short_Literal	0x0
0276 e5fe       |    |		Load	0x2,-0x2
0277 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0278 e21d       |    |		Load	0x1,0x1d
0279 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
027a e5fe       |    |		Load	0x2,-0x2
027b 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
027c 00cf       |    |		Action	Mark_Auxiliary
027d 7812       |x   |		Jump	0x290
027e e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0xe = 0x27e,0x9
027f 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0280 e5fe       |    |		Load	0x2,-0x2
0281 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0282 e21d       |    |		Load	0x1,0x1d
0283 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0284 8224       | $  |		Call	0x1,0x24
0285 700f       |p   |		Jump_Nonzero	0x295
0286 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0xf = 0x286,0xa
0287 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0288 e5fe       |    |		Load	0x2,-0x2
0289 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
028a e21d       |    |		Load	0x1,0x1d
028b 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
028c 00d1       |    |		Pop_Control	Pop_Count_1
028d e5fe       |    |		Load	0x2,-0x2
028e 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
028f 00c9       |    |		Action	Pop_Auxiliary_Loop
0290 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x10 = 0x290,0x8
0291 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0292 e21d       |    |		Load	0x1,0x1d
0293 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0294 6fe9       |o   |		Jump_Zero	0x27e
0295 00ce       |    |		Action	Pop_Auxiliary
0296 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x11 = 0x296,0xb
0297 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0298 e21d       |    |		Load	0x1,0x1d
0299 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
029a 700d       |p   |		Jump_Nonzero	0x2a8
029b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x12 = 0x29b,0xc
029c 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
029d e5fe       |    |		Load	0x2,-0x2
029e 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
029f e21d       |    |		Load	0x1,0x1d
02a0 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
02a1 00d9       |    |		Load_Top	At_Offset_1
02a2 017d       | }  |		Execute	Record,Structure_Write
02a3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x13 = 0x2a3,0xd
02a4 00d9       |    |		Load_Top	At_Offset_1
02a5 8223       | #  |		Call	0x1,0x23
02a6 00d1       |    |		Pop_Control	Pop_Count_1
02a7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02a8 e220       |    |		Load	0x1,0x20							; Debug Table 0xb.0x14 = 0x2a8,0xe
02a9 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0x15 = 0x2a9,0xc01
02aa 00d9       |    |		Load_Top	At_Offset_1
02ab 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x16 = 0x2ab,0x1001
02ac 0227       | '  |		Execute	Access,All_Reference
02ad 0335       | 5  |		Declare_Variable	Array,Duplicate
02ae 00d0       |    |		Action	Swap_Control
02af 00d1       |    |		Pop_Control	Pop_Count_1
02b0 00d0       |    |		Action	Swap_Control
02b1 00d1       |    |		Pop_Control	Pop_Count_1
02b2 e007       |    |		Load	0x0,0x7								; Debug Table 0xb.0x17 = 0x2b2,0xc01
02b3 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02b4 00d1       |    |		Pop_Control	Pop_Count_1
02b5 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x18 = 0x2b5,0xc02
02b6 e5ff       |    |		Load	0x2,-0x1
02b7 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
02b8 00d1       |    |		Pop_Control	Pop_Count_1
02b9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02ba			TRAP_0238:
02ba 010e       |    |		Execute	Exception,Is_Constraint_Error
02bb 6811       |h   |		Jump_Zero	0x2cd
02bc e220       |    |		Load	0x1,0x20							; Debug Table 0xb.0x19 = 0x2bc,0xf
02bd e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0x1a = 0x2bd,0x1401
02be 00d9       |    |		Load_Top	At_Offset_1
02bf 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x1b = 0x2bf,0x1801
02c0 0227       | '  |		Execute	Access,All_Reference
02c1 0335       | 5  |		Declare_Variable	Array,Duplicate
02c2 00d0       |    |		Action	Swap_Control
02c3 00d1       |    |		Pop_Control	Pop_Count_1
02c4 00d0       |    |		Action	Swap_Control
02c5 00d1       |    |		Pop_Control	Pop_Count_1
02c6 e007       |    |		Load	0x0,0x7								; Debug Table 0xb.0x1c = 0x2c6,0x1401
02c7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02c8 00d1       |    |		Pop_Control	Pop_Count_1
02c9 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x1d = 0x2c9,0x1402
02ca e5ff       |    |		Load	0x2,-0x1
02cb 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
02cc 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02cd 0100       |    |		Execute	Exception,Raise
02ce 0000 0000  |    |		.XXX[0x2]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d7       |    |		.CONST	0x02d7								; Address of begin
02d1 0355       | U  |		.CONST	0x0355								; Address of exception handler
02d2 0002       |    |		.CONST	0x0002								; Number of locals
02d3			INIT_02d0:
02d3 e21a       |    |		Load	0x1,0x1a							; Debug Table 0xc = .DEBUG	0x02d3,0x06b8,0x0001,0x0000,0x0059,0x8965,0x0000,0x00aa
													; Debug Table 0xc.0x0 = 0x2d3,0xffff
02d4 0322       | "  |		Declare_Variable	Record
02d5 00d8       |    |		Load_Top	At_Offset_0
02d6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02d7			BODY_02d0:
02d7 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0x1 = 0x2d7,0xfffe
													; Debug Table 0xc.0x2 = 0x2d7,0xfffd
													; Debug Table 0xc.0x3 = 0x2d7,0x1
02d8 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
02d9 e5fe       |    |		Load	0x2,-0x2
02da 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
02db e21d       |    |		Load	0x1,0x1d
02dc 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
02dd 6812       |h   |		Jump_Zero	0x2f0
02de e220       |    |		Load	0x1,0x20							; Debug Table 0xc.0x4 = 0x2de,0x2
02df e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x5 = 0x2df,0x401
02e0 00d9       |    |		Load_Top	At_Offset_1
02e1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x6 = 0x2e1,0x801
02e2 0227       | '  |		Execute	Access,All_Reference
02e3 0335       | 5  |		Declare_Variable	Array,Duplicate
02e4 00d0       |    |		Action	Swap_Control
02e5 00d1       |    |		Pop_Control	Pop_Count_1
02e6 00d0       |    |		Action	Swap_Control
02e7 00d1       |    |		Pop_Control	Pop_Count_1
02e8 e007       |    |		Load	0x0,0x7								; Debug Table 0xc.0x7 = 0x2e8,0x401
02e9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02ea 00d1       |    |		Pop_Control	Pop_Count_1
02eb 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x8 = 0x2eb,0x402
02ec e5ff       |    |		Load	0x2,-0x1
02ed 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
02ee 00d1       |    |		Pop_Control	Pop_Count_1
02ef 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02f0 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0x9 = 0x2f0,0x3
02f1 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
02f2 e5fe       |    |		Load	0x2,-0x2
02f3 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
02f4 e21d       |    |		Load	0x1,0x1d
02f5 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
02f6 00d9       |    |		Load_Top	At_Offset_1
02f7 017d       | }  |		Execute	Record,Structure_Write
02f8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xa = 0x2f8,0x4
02f9 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
02fa e5ff       |    |		Load	0x2,-0x1
02fb 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
02fc 016f       | o  |		Execute	Variant_Record,Equal
02fd 6804       |h   |		Jump_Zero	0x302
02fe e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0xb = 0x2fe,0x5
02ff 8226       | &  |		Call	0x1,0x26
0300 00d1       |    |		Pop_Control	Pop_Count_1
0301 7812       |x   |		Jump	0x314
0302 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0xc = 0x302,0x6
0303 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0304 e5fe       |    |		Load	0x2,-0x2
0305 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0306 e21d       |    |		Load	0x1,0x1d
0307 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0308 00d1       |    |		Pop_Control	Pop_Count_1
0309 e5fe       |    |		Load	0x2,-0x2
030a 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
030b e21d       |    |		Load	0x1,0x1d							; Debug Table 0xc.0xd = 0x30b,0x7
030c 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
030d 4800       |H   |		Short_Literal	0x0
030e e5fe       |    |		Load	0x2,-0x2
030f 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0310 e21d       |    |		Load	0x1,0x1d
0311 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0312 e5fe       |    |		Load	0x2,-0x2
0313 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0314 00cf       |    |		Action	Mark_Auxiliary
0315 7815       |x   |		Jump	0x32b
0316 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0xe = 0x316,0x9
0317 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0318 e5fe       |    |		Load	0x2,-0x2
0319 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
031a e21d       |    |		Load	0x1,0x1d
031b 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
031c 8224       | $  |		Call	0x1,0x24
031d 7012       |p   |		Jump_Nonzero	0x330
031e e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0xf = 0x31e,0xa
031f 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0320 e5fe       |    |		Load	0x2,-0x2
0321 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0322 e21d       |    |		Load	0x1,0x1d
0323 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0324 00d1       |    |		Pop_Control	Pop_Count_1
0325 e5fe       |    |		Load	0x2,-0x2
0326 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0327 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0x10 = 0x327,0xb
0328 8226       | &  |		Call	0x1,0x26
0329 00d1       |    |		Pop_Control	Pop_Count_1
032a 00c9       |    |		Action	Pop_Auxiliary_Loop
032b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0x11 = 0x32b,0x8
032c 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
032d e21d       |    |		Load	0x1,0x1d
032e 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
032f 6fe6       |o   |		Jump_Zero	0x316
0330 00ce       |    |		Action	Pop_Auxiliary
0331 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0x12 = 0x331,0xc
0332 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0333 e21d       |    |		Load	0x1,0x1d
0334 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0335 700d       |p   |		Jump_Nonzero	0x343
0336 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0x13 = 0x336,0xd
0337 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0338 e5fe       |    |		Load	0x2,-0x2
0339 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
033a e21d       |    |		Load	0x1,0x1d
033b 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
033c 00d9       |    |		Load_Top	At_Offset_1
033d 017d       | }  |		Execute	Record,Structure_Write
033e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x14 = 0x33e,0xe
033f 00d9       |    |		Load_Top	At_Offset_1
0340 8223       | #  |		Call	0x1,0x23
0341 00d1       |    |		Pop_Control	Pop_Count_1
0342 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0343 e220       |    |		Load	0x1,0x20							; Debug Table 0xc.0x15 = 0x343,0xf
0344 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x16 = 0x344,0xc01
0345 00d9       |    |		Load_Top	At_Offset_1
0346 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x17 = 0x346,0x1001
0347 0227       | '  |		Execute	Access,All_Reference
0348 0335       | 5  |		Declare_Variable	Array,Duplicate
0349 00d0       |    |		Action	Swap_Control
034a 00d1       |    |		Pop_Control	Pop_Count_1
034b 00d0       |    |		Action	Swap_Control
034c 00d1       |    |		Pop_Control	Pop_Count_1
034d e007       |    |		Load	0x0,0x7								; Debug Table 0xc.0x18 = 0x34d,0xc01
034e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
034f 00d1       |    |		Pop_Control	Pop_Count_1
0350 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x19 = 0x350,0xc02
0351 e5ff       |    |		Load	0x2,-0x1
0352 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0353 00d1       |    |		Pop_Control	Pop_Count_1
0354 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0355			TRAP_02d0:
0355 010e       |    |		Execute	Exception,Is_Constraint_Error
0356 6811       |h   |		Jump_Zero	0x368
0357 e220       |    |		Load	0x1,0x20							; Debug Table 0xc.0x1a = 0x357,0x10
0358 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x1b = 0x358,0x1401
0359 00d9       |    |		Load_Top	At_Offset_1
035a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x1c = 0x35a,0x1801
035b 0227       | '  |		Execute	Access,All_Reference
035c 0335       | 5  |		Declare_Variable	Array,Duplicate
035d 00d0       |    |		Action	Swap_Control
035e 00d1       |    |		Pop_Control	Pop_Count_1
035f 00d0       |    |		Action	Swap_Control
0360 00d1       |    |		Pop_Control	Pop_Count_1
0361 e007       |    |		Load	0x0,0x7								; Debug Table 0xc.0x1d = 0x361,0x1401
0362 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0363 00d1       |    |		Pop_Control	Pop_Count_1
0364 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x1e = 0x364,0x1402
0365 e5ff       |    |		Load	0x2,-0x1
0366 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0367 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0368 0100       |    |		Execute	Exception,Raise
0369 0000 0000  |    |		.XXX[0x3]
036b 0000       |    |
036c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00598965}
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0377       | w  |		.CONST	0x0377								; Address of begin
0371 03a1       |    |		.CONST	0x03a1								; Address of exception handler
0372 0002       |    |		.CONST	0x0002								; Number of locals
0373			INIT_0370:
0373 e21a       |    |		Load	0x1,0x1a							; Debug Table 0xd = .DEBUG	0x0373,0x06f8,0x0001,0x0000,0x0059,0x8965,0x0000,0x00b8
													; Debug Table 0xd.0x0 = 0x373,0xffff
0374 0322       | "  |		Declare_Variable	Record
0375 00d8       |    |		Load_Top	At_Offset_0
0376 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0377			BODY_0370:
0377 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0x1 = 0x377,0x1
0378 e5fd       |    |		Load	0x2,-0x3
0379 2c05       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5
037a e5ff       |    |		Load	0x2,-0x1
037b e004       |    |		Load	0x0,0x4
037c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
037d e5fd       |    |		Load	0x2,-0x3
037e 2c04       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
037f e21f       |    |		Load	0x1,0x1f
0380 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0381 00d9       |    |		Load_Top	At_Offset_1
0382 017d       | }  |		Execute	Record,Structure_Write
0383 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xd.0x2 = 0x383,0x2
0384 e5fe       |    |		Load	0x2,-0x2
0385 8210       |    |		Call	0x1,0x10
0386 00d1       |    |		Pop_Control	Pop_Count_1
0387 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x3 = 0x387,0x3
0388 8224       | $  |		Call	0x1,0x24
0389 7012       |p   |		Jump_Nonzero	0x39c
038a e222       | "  |		Load	0x1,0x22							; Debug Table 0xd.0x4 = 0x38a,0x4
038b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xd.0x5 = 0x38b,0x401
038c 00d9       |    |		Load_Top	At_Offset_1
038d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x6 = 0x38d,0x801
038e 0227       | '  |		Execute	Access,All_Reference
038f 0335       | 5  |		Declare_Variable	Array,Duplicate
0390 00d0       |    |		Action	Swap_Control
0391 00d1       |    |		Pop_Control	Pop_Count_1
0392 00d0       |    |		Action	Swap_Control
0393 00d1       |    |		Pop_Control	Pop_Count_1
0394 e007       |    |		Load	0x0,0x7								; Debug Table 0xd.0x7 = 0x394,0x401
0395 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0396 00d1       |    |		Pop_Control	Pop_Count_1
0397 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x8 = 0x397,0x402
0398 e5fe       |    |		Load	0x2,-0x2
0399 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
039a 00d1       |    |		Pop_Control	Pop_Count_1
039b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
039c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xd.0x9 = 0x39c,0x5
039d 00d9       |    |		Load_Top	At_Offset_1
039e 8223       | #  |		Call	0x1,0x23
039f 00d1       |    |		Pop_Control	Pop_Count_1
03a0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03a1			TRAP_0370:
03a1 e21f       |    |		Load	0x1,0x1f
03a2 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
03a3 010f       |    |		Execute	Exception,Equal
03a4 6811       |h   |		Jump_Zero	0x3b6
03a5 e221       | !  |		Load	0x1,0x21							; Debug Table 0xd.0xa = 0x3a5,0x6
03a6 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xd.0xb = 0x3a6,0xc01
03a7 00d9       |    |		Load_Top	At_Offset_1
03a8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0xc = 0x3a8,0x1001
03a9 0227       | '  |		Execute	Access,All_Reference
03aa 0335       | 5  |		Declare_Variable	Array,Duplicate
03ab 00d0       |    |		Action	Swap_Control
03ac 00d1       |    |		Pop_Control	Pop_Count_1
03ad 00d0       |    |		Action	Swap_Control
03ae 00d1       |    |		Pop_Control	Pop_Count_1
03af e007       |    |		Load	0x0,0x7								; Debug Table 0xd.0xd = 0x3af,0xc01
03b0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03b1 00d1       |    |		Pop_Control	Pop_Count_1
03b2 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0xe = 0x3b2,0xc02
03b3 e5fe       |    |		Load	0x2,-0x2
03b4 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
03b5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
03b6 0100       |    |		Execute	Exception,Raise
03b7 0000       |    |		.XXX[0x1]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb       |    |		.CONST	0x03bb								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0001       |    |		.CONST	0x0001								; Number of locals
03bb			BODY_03b8:
03bb			INIT_03b8:
03bb 4608       |F   |		Jump_Case	0x9							; Debug Table 0xe = .DEBUG	0x03bb,0x0718,0x0005,0x0000,0x0059,0x8965,0x0000,0x00cf
03bc 7808       |x   |		Jump	0x3c5								; case 0x0
03bd 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
03be 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
03bf 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
03c0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
03c1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
03c2 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
03c3 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
03c4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
03c5 00da       |    |		Load_Top	At_Offset_2
03c6 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
03c7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03c8 00da       |    |		Load_Top	At_Offset_2
03c9 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
03ca 0125       | %  |		Execute	Any,Set_Constraint
03cb 00da       |    |		Load_Top	At_Offset_2
03cc 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
03cd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03ce 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
03cf 0000       |    |		.XXX[0x1]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d3       |    |		.CONST	0x03d3								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0001       |    |		.CONST	0x0001								; Number of locals
03d3			BODY_03d0:
03d3			INIT_03d0:
03d3 e21b       |    |		Load	0x1,0x1b							; Debug Table 0xf = .DEBUG	0x03d3,0x071a,0x0001,0x0000,0x0059,0x8965,0x0000,0x00f9
													; Debug Table 0xf.0x0 = 0x3d3,0x1
03d4 00db       |    |		Load_Top	At_Offset_3
03d5 017d       | }  |		Execute	Record,Structure_Write
03d6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03d7 0000       |    |		.XXX[0x1]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03db       |    |		.CONST	0x03db								; Address of begin
03d9 0004       |    |		.CONST	0x0004								; Address of exception handler
03da 0001       |    |		.CONST	0x0001								; Number of locals
03db			BODY_03d8:
03db			INIT_03d8:
03db 4608       |F   |		Jump_Case	0x9							; Debug Table 0x10 = .DEBUG	0x03db,0x071e,0x0005,0x0000,0x0059,0x8965,0x0000,0x010f
03dc 7808       |x   |		Jump	0x3e5								; case 0x0
03dd 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
03de 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
03df 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
03e0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
03e1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
03e2 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
03e3 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
03e4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
03e5 00da       |    |		Load_Top	At_Offset_2
03e6 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
03e7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03e8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
03e9 0000 0000  |    |		.BLANK	0000[0x7]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3       |    |		.CONST	0x03f3								; Address of begin
03f1 0004       |    |		.CONST	0x0004								; Address of exception handler
03f2 0001       |    |		.CONST	0x0001								; Number of locals
03f3			BODY_03f0:
03f3			INIT_03f0:
03f3 4608       |F   |		Jump_Case	0x9							; Debug Table 0x11 = .DEBUG	0x03f3,0x0720,0x0005,0x0000,0x0059,0x8965,0x0000,0x0136
03f4 7808       |x   |		Jump	0x3fd								; case 0x0
03f5 781a       |x   |		Jump	0x410								; case 0x1
03f6 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
03f7 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
03f8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
03f9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
03fa 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
03fb 7817       |x   |		Jump	0x413								; case 0x7
03fc 7820       |x   |		Jump	0x41d								; case 0x8
03fd 00da       |    |		Load_Top	At_Offset_2
03fe 016c       | l  |		Execute	Variant_Record,Is_Constrained
03ff 700a       |p   |		Jump_Nonzero	0x40a
0400 00cf       |    |		Action	Mark_Auxiliary
0401 480a       |H   |		Short_Literal	0xa
0402 480a       |H   |		Short_Literal	0xa
0403 e5ff       |    |		Load	0x2,-0x1
0404 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0405 00d8       |    |		Load_Top	At_Offset_0
0406 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0407 c5ff       |    |		Store	0x2,-0x1
0408 00ce       |    |		Action	Pop_Auxiliary
0409 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
040a 00da       |    |		Load_Top	At_Offset_2
040b 2206       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x6
040c 00da       |    |		Load_Top	At_Offset_2
040d 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
040e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
040f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0410 00da       |    |		Load_Top	At_Offset_2
0411 2206       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x6
0412 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0413 e5fd       |    |		Load	0x2,-0x3
0414 e5fe       |    |		Load	0x2,-0x2
0415 e5fd       |    |		Load	0x2,-0x3
0416 e21d       |    |		Load	0x1,0x1d
0417 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0418 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0419 4801       |H   |		Short_Literal	0x1
041a e5ff       |    |		Load	0x2,-0x1
041b 031b       |    |		Declare_Type	Variant_Record,Constrained
041c 4203       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x3
041d e5fd       |    |		Load	0x2,-0x3
041e e5fe       |    |		Load	0x2,-0x2
041f e5ff       |    |		Load	0x2,-0x1
0420 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
0421 e5fd       |    |		Load	0x2,-0x3
0422 e21d       |    |		Load	0x1,0x1d
0423 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0424 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0425 2d06       |-   |		Execute	Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x6
0426 016a       | j  |		QQ_execute	Variant_Record,XXX
0427 4203       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x3
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042b       | +  |		.CONST	0x042b								; Address of begin
0429 0004       |    |		.CONST	0x0004								; Address of exception handler
042a 0001       |    |		.CONST	0x0001								; Number of locals
042b			BODY_0428:
042b			INIT_0428:
042b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12 = .DEBUG	0x042b,0x0722,0x0001,0x0000,0x0059,0x8f75,0x0000,0x0063
													; Debug Table 0x12.0x0 = 0x42b,0xffff
													; Debug Table 0x12.0x1 = 0x42b,0x1
042c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
042d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
042e 680c       |h   |		Jump_Zero	0x43b
042f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x2 = 0x42f,0x2
0430 4801       |H   |		Short_Literal	0x1
0431 e5ff       |    |		Load	0x2,-0x1
0432 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0433 e001       |    |		Load	0x0,0x1
0434 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0435 00d1       |    |		Pop_Control	Pop_Count_1
0436 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12.0x3 = 0x436,0x3
0437 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0438 e5fe       |    |		Load	0x2,-0x2
0439 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
043a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
043b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x4 = 0x43b,0x4
043c 00db       |    |		Load_Top	At_Offset_3
043d 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
043e e001       |    |		Load	0x0,0x1
043f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0440 0161       | a  |		Execute	Variant_Record,Check_In_Formal_Type
0441 e001       |    |		Load	0x0,0x1
0442 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0443 00d1       |    |		Pop_Control	Pop_Count_1
0444 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0445 0000 0000  |    |		.XXX[0x3]
0447 0000       |    |
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 044b       | K  |		.CONST	0x044b								; Address of begin
0449 0004       |    |		.CONST	0x0004								; Address of exception handler
044a 0001       |    |		.CONST	0x0001								; Number of locals
044b			BODY_0448:
044b			INIT_0448:
044b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13 = .DEBUG	0x044b,0x072e,0x0002,0x0000,0x0059,0x8f75,0x0000,0x00a8
													; Debug Table 0x13.0x0 = 0x44b,0x1
044c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
044d 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
044e 6806       |h   |		Jump_Zero	0x455
044f 00da       |    |		Load_Top	At_Offset_2
0450 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0451 e002       |    |		Load	0x0,0x2
0452 1b67       | g  |		Execute	Package,Field_Read,Field_Number 0x67
0453 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0454 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0455 4801       |H   |		Short_Literal	0x1
0456 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0457 0000       |    |		.XXX[0x1]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 045b       | [  |		.CONST	0x045b								; Address of begin
0459 0004       |    |		.CONST	0x0004								; Address of exception handler
045a 0001       |    |		.CONST	0x0001								; Number of locals
045b			BODY_0458:
045b			INIT_0458:
045b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14 = .DEBUG	0x045b,0x0732,0x0001,0x0000,0x0059,0x8f75,0x0000,0x00c8
													; Debug Table 0x14.0x0 = 0x45b,0x1
045c 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
045d 00db       |    |		Load_Top	At_Offset_3
045e 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
045f e21d       |    |		Load	0x1,0x1d
0460 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0461 00db       |    |		Load_Top	At_Offset_3
0462 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0463 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14.0x1 = 0x463,0x2
0464 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0465 00db       |    |		Load_Top	At_Offset_3
0466 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0467 e21d       |    |		Load	0x1,0x1d
0468 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0469 6809       |h   |		Jump_Zero	0x473
046a e21d       |    |		Load	0x1,0x1d							; Debug Table 0x14.0x2 = 0x46a,0x3
046b 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
046c 4800       |H   |		Short_Literal	0x0
046d e5ff       |    |		Load	0x2,-0x1
046e 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
046f e21d       |    |		Load	0x1,0x1d
0470 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0471 00db       |    |		Load_Top	At_Offset_3
0472 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0473 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0474 0000 0000  |    |		.BLANK	0000[0x4]
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047b       | {  |		.CONST	0x047b								; Address of begin
0479 0004       |    |		.CONST	0x0004								; Address of exception handler
047a 0001       |    |		.CONST	0x0001								; Number of locals
047b			BODY_0478:
047b			INIT_0478:
047b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15 = .DEBUG	0x047b,0x073a,0x0001,0x0000,0x0059,0x8f75,0x0000,0x00f8
													; Debug Table 0x15.0x0 = 0x47b,0x1
047c 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
047d 00db       |    |		Load_Top	At_Offset_3
047e 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
047f e21d       |    |		Load	0x1,0x1d
0480 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0481 00db       |    |		Load_Top	At_Offset_3
0482 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0483 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15.0x1 = 0x483,0x2
0484 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0485 00db       |    |		Load_Top	At_Offset_3
0486 2c03       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0487 e21d       |    |		Load	0x1,0x1d
0488 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0489 6809       |h   |		Jump_Zero	0x493
048a e21d       |    |		Load	0x1,0x1d							; Debug Table 0x15.0x2 = 0x48a,0x3
048b 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
048c 4801       |H   |		Short_Literal	0x1
048d e5ff       |    |		Load	0x2,-0x1
048e 2506       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x6
048f e21d       |    |		Load	0x1,0x1d
0490 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0491 00db       |    |		Load_Top	At_Offset_3
0492 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0493 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0494 0000 0000  |    |		.BLANK	0000[0x4]
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 049b       |    |		.CONST	0x049b								; Address of begin
0499 0004       |    |		.CONST	0x0004								; Address of exception handler
049a 0001       |    |		.CONST	0x0001								; Number of locals
049b			BODY_0498:
049b			INIT_0498:
049b e21b       |    |		Load	0x1,0x1b							; Debug Table 0x16 = .DEBUG	0x049b,0x0742,0x0001,0x0000,0x0059,0x8f75,0x0000,0x04f6
													; Debug Table 0x16.0x0 = 0x49b,0x1
049c 00db       |    |		Load_Top	At_Offset_3
049d 017d       | }  |		Execute	Record,Structure_Write
049e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
049f 0000       |    |		.XXX[0x1]
04a0 ; --------------------------------------------------------------------------------------
04a0 ; SUBPROGRAM
04a0 ; --------------------------------------------------------------------------------------
04a0 04a3       |    |		.CONST	0x04a3								; Address of begin
04a1 0004       |    |		.CONST	0x0004								; Address of exception handler
04a2 0001       |    |		.CONST	0x0001								; Number of locals
04a3			BODY_04a0:
04a3			INIT_04a0:
04a3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x17 = .DEBUG	0x04a3,0x0746,0x0001,0x0000,0x0059,0x8f75,0x0000,0x0505
													; Debug Table 0x17.0x0 = 0x4a3,0x1
04a4 e5fe       |    |		Load	0x2,-0x2
04a5 017d       | }  |		Execute	Record,Structure_Write
04a6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04a7 ; --------------------------------------------------------------------------------------
04a7 ; STRING TABLE
04a7 ; --------------------------------------------------------------------------------------
04a7 0008       |    |		.STRTAB	0x0008->0x04ab							; "The Stack is empty"
04a8 0018       |    |		.STRTAB	0x0018->0x04b4							; "The name is not defined"
04a9 002d       | -  |		.STRTAB	0x002d->0x04bf							; "The named mark is no longer valid"
04aa 004c       | L  |		.STREND 0x004c->0x04d0
04ab 5468 6520  |The |		.STRTAB_STRINGS
04d0 ; --------------------------------------------------------------------------------------
04d0 ; Debug Table
04d0 ; --------------------------------------------------------------------------------------
04d0 0003 0018  |    |		.CONST	0x0003,0x0018
04d2 000b 0592  |    |		.DEBUG	0x000b,0x0592,0x8000,0x0000,0x0059,0x8965,0x0000,0x000d
04da 0070 05be  | p  |		.DEBUG	0x0070,0x05be,0x8000,0x0000,0x0059,0x8f75,0x0000,0x0009
04e2 00c3 0602  |    |		.DEBUG	0x00c3,0x0602,0x0001,0x0000,0x0059,0x8965,0x0000,0x001c
04ea 00e3 060a  |    |		.DEBUG	0x00e3,0x060a,0x0001,0x0000,0x0059,0x8965,0x0000,0x002a
04f2 00eb 060e  |    |		.DEBUG	0x00eb,0x060e,0x0001,0x0000,0x0059,0x8965,0x0000,0x0032
04fa 010b 0614  |    |		.DEBUG	0x010b,0x0614,0x0001,0x0000,0x0059,0x8965,0x0000,0x0040
0502 014b 061c  | K  |		.DEBUG	0x014b,0x061c,0x0001,0x0000,0x0059,0x8965,0x0000,0x0052
050a 016b 062a  | k *|		.DEBUG	0x016b,0x062a,0x0001,0x0000,0x0059,0x8965,0x0000,0x0060
0512 019b 063c  |   <|		.DEBUG	0x019b,0x063c,0x0001,0x0000,0x0059,0x8965,0x0000,0x006e
051a 01bb 064a  |   J|		.DEBUG	0x01bb,0x064a,0x0001,0x0000,0x0059,0x8965,0x0000,0x0080
0522 01db 0658  |   X|		.DEBUG	0x01db,0x0658,0x0001,0x0000,0x0059,0x8965,0x0000,0x008e
052a 023b 067a  | ; z|		.DEBUG	0x023b,0x067a,0x0001,0x0000,0x0059,0x8965,0x0000,0x009c
0532 02d3 06b8  |    |		.DEBUG	0x02d3,0x06b8,0x0001,0x0000,0x0059,0x8965,0x0000,0x00aa
053a 0373 06f8  | s  |		.DEBUG	0x0373,0x06f8,0x0001,0x0000,0x0059,0x8965,0x0000,0x00b8
0542 03bb 0718  |    |		.DEBUG	0x03bb,0x0718,0x0005,0x0000,0x0059,0x8965,0x0000,0x00cf
054a 03d3 071a  |    |		.DEBUG	0x03d3,0x071a,0x0001,0x0000,0x0059,0x8965,0x0000,0x00f9
0552 03db 071e  |    |		.DEBUG	0x03db,0x071e,0x0005,0x0000,0x0059,0x8965,0x0000,0x010f
055a 03f3 0720  |    |		.DEBUG	0x03f3,0x0720,0x0005,0x0000,0x0059,0x8965,0x0000,0x0136
0562 042b 0722  | + "|		.DEBUG	0x042b,0x0722,0x0001,0x0000,0x0059,0x8f75,0x0000,0x0063
056a 044b 072e  | K .|		.DEBUG	0x044b,0x072e,0x0002,0x0000,0x0059,0x8f75,0x0000,0x00a8
0572 045b 0732  | [ 2|		.DEBUG	0x045b,0x0732,0x0001,0x0000,0x0059,0x8f75,0x0000,0x00c8
057a 047b 073a  | { :|		.DEBUG	0x047b,0x073a,0x0001,0x0000,0x0059,0x8f75,0x0000,0x00f8
0582 049b 0742  |   B|		.DEBUG	0x049b,0x0742,0x0001,0x0000,0x0059,0x8f75,0x0000,0x04f6
058a 04a3 0746  |   F|		.DEBUG	0x04a3,0x0746,0x0001,0x0000,0x0059,0x8f75,0x0000,0x0505
0592 ; --------------------------------------------------------------------------------------
0592 ; Debug3 Subtable 0x0
0592 ; --------------------------------------------------------------------------------------
0592 0015 0000  |    |		.DBG3TAB	0x0015,0x0000
0594 000b ffff  |    |		.CONST	0x000b,0xffff
0596 0012 fffe  |    |		.CONST	0x0012,0xfffe
0598 0014 fffd  |    |		.CONST	0x0014,0xfffd
059a 0016 fffc  |    |		.CONST	0x0016,0xfffc
059c 0018 fffb  |    |		.CONST	0x0018,0xfffb
059e 001a fffa  |    |		.CONST	0x001a,0xfffa
05a0 001c fff9  |    |		.CONST	0x001c,0xfff9
05a2 001e fff8  |    |		.CONST	0x001e,0xfff8
05a4 0020 fff7  |    |		.CONST	0x0020,0xfff7
05a6 0022 fff6  | "  |		.CONST	0x0022,0xfff6
05a8 0024 fff5  | $  |		.CONST	0x0024,0xfff5
05aa 0026 fff4  | &  |		.CONST	0x0026,0xfff4
05ac 0028 fff3  | (  |		.CONST	0x0028,0xfff3
05ae 002a fff2  | *  |		.CONST	0x002a,0xfff2
05b0 002a fff1  | *  |		.CONST	0x002a,0xfff1
05b2 0033 fff0  | 3  |		.CONST	0x0033,0xfff0
05b4 0041 ffef  | A  |		.CONST	0x0041,0xffef
05b6 0043 ffee  | C  |		.CONST	0x0043,0xffee
05b8 004c ffed  | L  |		.CONST	0x004c,0xffed
05ba 0054 ffec  | T  |		.CONST	0x0054,0xffec
05bc 0060 ffeb  | `  |		.CONST	0x0060,0xffeb
05be ; --------------------------------------------------------------------------------------
05be ; Debug3 Subtable 0x1
05be ; --------------------------------------------------------------------------------------
05be 0018 0009  |    |		.DBG3TAB	0x0018,0x0009
05c0 0070 ffff  | p  |		.CONST	0x0070,0xffff
05c2 0070 fffe  | p  |		.CONST	0x0070,0xfffe
05c4 0070 fffd  | p  |		.CONST	0x0070,0xfffd
05c6 0072 fffc  | r  |		.CONST	0x0072,0xfffc
05c8 0074 fffb  | t  |		.CONST	0x0074,0xfffb
05ca 0076 fffa  | v  |		.CONST	0x0076,0xfffa
05cc 0078 fff9  | x  |		.CONST	0x0078,0xfff9
05ce 007a fff8  | z  |		.CONST	0x007a,0xfff8
05d0 007c fff7  | |  |		.CONST	0x007c,0xfff7
05d2 007e fff6  | ~  |		.CONST	0x007e,0xfff6
05d4 0080 fff5  |    |		.CONST	0x0080,0xfff5
05d6 0082 fff4  |    |		.CONST	0x0082,0xfff4
05d8 0084 fff3  |    |		.CONST	0x0084,0xfff3
05da 0086 fff2  |    |		.CONST	0x0086,0xfff2
05dc 0088 fff1  |    |		.CONST	0x0088,0xfff1
05de 008a fff0  |    |		.CONST	0x008a,0xfff0
05e0 008c ffef  |    |		.CONST	0x008c,0xffef
05e2 008e ffee  |    |		.CONST	0x008e,0xffee
05e4 0090 ffed  |    |		.CONST	0x0090,0xffed
05e6 0092 ffec  |    |		.CONST	0x0092,0xffec
05e8 0094 ffeb  |    |		.CONST	0x0094,0xffeb
05ea 0096 ffea  |    |		.CONST	0x0096,0xffea
05ec 0098 ffe9  |    |		.CONST	0x0098,0xffe9
05ee 009a ffe8  |    |		.CONST	0x009a,0xffe8
05f0 009c 0001  |    |		.CONST	0x009c,0x0001
05f2 009e 0401  |    |		.CONST	0x009e,0x0401
05f4 00a4 0001  |    |		.CONST	0x00a4,0x0001
05f6 00a5 0002  |    |		.CONST	0x00a5,0x0002
05f8 00a7 0801  |    |		.CONST	0x00a7,0x0801
05fa 00ad 0002  |    |		.CONST	0x00ad,0x0002
05fc 00ae 0003  |    |		.CONST	0x00ae,0x0003
05fe 00b0 0c01  |    |		.CONST	0x00b0,0x0c01
0600 00b6 0003  |    |		.CONST	0x00b6,0x0003
0602 ; --------------------------------------------------------------------------------------
0602 ; Debug3 Subtable 0x2
0602 ; --------------------------------------------------------------------------------------
0602 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0604 00c3 0001  |    |		.CONST	0x00c3,0x0001
0606 00c8 0002  |    |		.CONST	0x00c8,0x0002
0608 00d1 0003  |    |		.CONST	0x00d1,0x0003
060a ; --------------------------------------------------------------------------------------
060a ; Debug3 Subtable 0x3
060a ; --------------------------------------------------------------------------------------
060a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
060c 00e3 0001  |    |		.CONST	0x00e3,0x0001
060e ; --------------------------------------------------------------------------------------
060e ; Debug3 Subtable 0x4
060e ; --------------------------------------------------------------------------------------
060e 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0610 00eb 0001  |    |		.CONST	0x00eb,0x0001
0612 00fd 0002  |    |		.CONST	0x00fd,0x0002
0614 ; --------------------------------------------------------------------------------------
0614 ; Debug3 Subtable 0x5
0614 ; --------------------------------------------------------------------------------------
0614 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0616 010b 0001  |    |		.CONST	0x010b,0x0001
0618 011d 0002  |    |		.CONST	0x011d,0x0002
061a 0126 0003  | &  |		.CONST	0x0126,0x0003
061c ; --------------------------------------------------------------------------------------
061c ; Debug3 Subtable 0x6
061c ; --------------------------------------------------------------------------------------
061c 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
061e 014b 0001  | K  |		.CONST	0x014b,0x0001
0620 0156 0002  | V  |		.CONST	0x0156,0x0002
0622 0157 0401  | W  |		.CONST	0x0157,0x0401
0624 0159 0801  | Y  |		.CONST	0x0159,0x0801
0626 0160 0401  | `  |		.CONST	0x0160,0x0401
0628 0163 0402  | c  |		.CONST	0x0163,0x0402
062a ; --------------------------------------------------------------------------------------
062a ; Debug3 Subtable 0x7
062a ; --------------------------------------------------------------------------------------
062a 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
062c 016b ffff  | k  |		.CONST	0x016b,0xffff
062e 016d 0001  | m  |		.CONST	0x016d,0x0001
0630 0175 0002  | u  |		.CONST	0x0175,0x0002
0632 017f 0003  |    |		.CONST	0x017f,0x0003
0634 0180 0401  |    |		.CONST	0x0180,0x0401
0636 0182 0801  |    |		.CONST	0x0182,0x0801
0638 0189 0401  |    |		.CONST	0x0189,0x0401
063a 018c 0402  |    |		.CONST	0x018c,0x0402
063c ; --------------------------------------------------------------------------------------
063c ; Debug3 Subtable 0x8
063c ; --------------------------------------------------------------------------------------
063c 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
063e 019b 0001  |    |		.CONST	0x019b,0x0001
0640 01a3 0002  |    |		.CONST	0x01a3,0x0002
0642 01a4 0401  |    |		.CONST	0x01a4,0x0401
0644 01a6 0801  |    |		.CONST	0x01a6,0x0801
0646 01ad 0401  |    |		.CONST	0x01ad,0x0401
0648 01b0 0402  |    |		.CONST	0x01b0,0x0402
064a ; --------------------------------------------------------------------------------------
064a ; Debug3 Subtable 0x9
064a ; --------------------------------------------------------------------------------------
064a 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
064c 01bb 0001  |    |		.CONST	0x01bb,0x0001
064e 01c2 0002  |    |		.CONST	0x01c2,0x0002
0650 01c3 0401  |    |		.CONST	0x01c3,0x0401
0652 01c5 0801  |    |		.CONST	0x01c5,0x0801
0654 01cc 0401  |    |		.CONST	0x01cc,0x0401
0656 01cf 0402  |    |		.CONST	0x01cf,0x0402
0658 ; --------------------------------------------------------------------------------------
0658 ; Debug3 Subtable 0xa
0658 ; --------------------------------------------------------------------------------------
0658 0000 0010  |    |		.DBG3TAB	0x0000,0x0010
065a 01db 0001  |    |		.CONST	0x01db,0x0001
065c 01e6 0003  |    |		.CONST	0x01e6,0x0003
065e 01ee 0004  |    |		.CONST	0x01ee,0x0004
0660 01f8 0002  |    |		.CONST	0x01f8,0x0002
0662 01fe 0005  |    |		.CONST	0x01fe,0x0005
0664 0203 0006  |    |		.CONST	0x0203,0x0006
0666 020d 0007  |    |		.CONST	0x020d,0x0007
0668 020e 0401  |    |		.CONST	0x020e,0x0401
066a 0210 0801  |    |		.CONST	0x0210,0x0801
066c 0217 0401  |    |		.CONST	0x0217,0x0401
066e 021a 0402  |    |		.CONST	0x021a,0x0402
0670 0221 0008  | !  |		.CONST	0x0221,0x0008
0672 0222 0c01  | "  |		.CONST	0x0222,0x0c01
0674 0224 1001  | $  |		.CONST	0x0224,0x1001
0676 022b 0c01  | +  |		.CONST	0x022b,0x0c01
0678 022e 0c02  | .  |		.CONST	0x022e,0x0c02
067a ; --------------------------------------------------------------------------------------
067a ; Debug3 Subtable 0xb
067a ; --------------------------------------------------------------------------------------
067a 0003 001b  |    |		.DBG3TAB	0x0003,0x001b
067c 023b ffff  | ;  |		.CONST	0x023b,0xffff
067e 023f fffe  | ?  |		.CONST	0x023f,0xfffe
0680 023f fffd  | ?  |		.CONST	0x023f,0xfffd
0682 023f 0001  | ?  |		.CONST	0x023f,0x0001
0684 0246 0002  | F  |		.CONST	0x0246,0x0002
0686 0247 0401  | G  |		.CONST	0x0247,0x0401
0688 0249 0801  | I  |		.CONST	0x0249,0x0801
068a 0250 0401  | P  |		.CONST	0x0250,0x0401
068c 0253 0402  | S  |		.CONST	0x0253,0x0402
068e 0258 0003  | X  |		.CONST	0x0258,0x0003
0690 0260 0004  | `  |		.CONST	0x0260,0x0004
0692 0266 0005  | f  |		.CONST	0x0266,0x0005
0694 026a 0006  | j  |		.CONST	0x026a,0x0006
0696 0273 0007  | s  |		.CONST	0x0273,0x0007
0698 027e 0009  | ~  |		.CONST	0x027e,0x0009
069a 0286 000a  |    |		.CONST	0x0286,0x000a
069c 0290 0008  |    |		.CONST	0x0290,0x0008
069e 0296 000b  |    |		.CONST	0x0296,0x000b
06a0 029b 000c  |    |		.CONST	0x029b,0x000c
06a2 02a3 000d  |    |		.CONST	0x02a3,0x000d
06a4 02a8 000e  |    |		.CONST	0x02a8,0x000e
06a6 02a9 0c01  |    |		.CONST	0x02a9,0x0c01
06a8 02ab 1001  |    |		.CONST	0x02ab,0x1001
06aa 02b2 0c01  |    |		.CONST	0x02b2,0x0c01
06ac 02b5 0c02  |    |		.CONST	0x02b5,0x0c02
06ae 02bc 000f  |    |		.CONST	0x02bc,0x000f
06b0 02bd 1401  |    |		.CONST	0x02bd,0x1401
06b2 02bf 1801  |    |		.CONST	0x02bf,0x1801
06b4 02c6 1401  |    |		.CONST	0x02c6,0x1401
06b6 02c9 1402  |    |		.CONST	0x02c9,0x1402
06b8 ; --------------------------------------------------------------------------------------
06b8 ; Debug3 Subtable 0xc
06b8 ; --------------------------------------------------------------------------------------
06b8 0003 001c  |    |		.DBG3TAB	0x0003,0x001c
06ba 02d3 ffff  |    |		.CONST	0x02d3,0xffff
06bc 02d7 fffe  |    |		.CONST	0x02d7,0xfffe
06be 02d7 fffd  |    |		.CONST	0x02d7,0xfffd
06c0 02d7 0001  |    |		.CONST	0x02d7,0x0001
06c2 02de 0002  |    |		.CONST	0x02de,0x0002
06c4 02df 0401  |    |		.CONST	0x02df,0x0401
06c6 02e1 0801  |    |		.CONST	0x02e1,0x0801
06c8 02e8 0401  |    |		.CONST	0x02e8,0x0401
06ca 02eb 0402  |    |		.CONST	0x02eb,0x0402
06cc 02f0 0003  |    |		.CONST	0x02f0,0x0003
06ce 02f8 0004  |    |		.CONST	0x02f8,0x0004
06d0 02fe 0005  |    |		.CONST	0x02fe,0x0005
06d2 0302 0006  |    |		.CONST	0x0302,0x0006
06d4 030b 0007  |    |		.CONST	0x030b,0x0007
06d6 0316 0009  |    |		.CONST	0x0316,0x0009
06d8 031e 000a  |    |		.CONST	0x031e,0x000a
06da 0327 000b  | '  |		.CONST	0x0327,0x000b
06dc 032b 0008  | +  |		.CONST	0x032b,0x0008
06de 0331 000c  | 1  |		.CONST	0x0331,0x000c
06e0 0336 000d  | 6  |		.CONST	0x0336,0x000d
06e2 033e 000e  | >  |		.CONST	0x033e,0x000e
06e4 0343 000f  | C  |		.CONST	0x0343,0x000f
06e6 0344 0c01  | D  |		.CONST	0x0344,0x0c01
06e8 0346 1001  | F  |		.CONST	0x0346,0x1001
06ea 034d 0c01  | M  |		.CONST	0x034d,0x0c01
06ec 0350 0c02  | P  |		.CONST	0x0350,0x0c02
06ee 0357 0010  | W  |		.CONST	0x0357,0x0010
06f0 0358 1401  | X  |		.CONST	0x0358,0x1401
06f2 035a 1801  | Z  |		.CONST	0x035a,0x1801
06f4 0361 1401  | a  |		.CONST	0x0361,0x1401
06f6 0364 1402  | d  |		.CONST	0x0364,0x1402
06f8 ; --------------------------------------------------------------------------------------
06f8 ; Debug3 Subtable 0xd
06f8 ; --------------------------------------------------------------------------------------
06f8 0001 000e  |    |		.DBG3TAB	0x0001,0x000e
06fa 0373 ffff  | s  |		.CONST	0x0373,0xffff
06fc 0377 0001  | w  |		.CONST	0x0377,0x0001
06fe 0383 0002  |    |		.CONST	0x0383,0x0002
0700 0387 0003  |    |		.CONST	0x0387,0x0003
0702 038a 0004  |    |		.CONST	0x038a,0x0004
0704 038b 0401  |    |		.CONST	0x038b,0x0401
0706 038d 0801  |    |		.CONST	0x038d,0x0801
0708 0394 0401  |    |		.CONST	0x0394,0x0401
070a 0397 0402  |    |		.CONST	0x0397,0x0402
070c 039c 0005  |    |		.CONST	0x039c,0x0005
070e 03a5 0006  |    |		.CONST	0x03a5,0x0006
0710 03a6 0c01  |    |		.CONST	0x03a6,0x0c01
0712 03a8 1001  |    |		.CONST	0x03a8,0x1001
0714 03af 0c01  |    |		.CONST	0x03af,0x0c01
0716 03b2 0c02  |    |		.CONST	0x03b2,0x0c02
0718 ; --------------------------------------------------------------------------------------
0718 ; Debug3 Subtable 0xe
0718 ; --------------------------------------------------------------------------------------
0718 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
071a ; --------------------------------------------------------------------------------------
071a ; Debug3 Subtable 0xf
071a ; --------------------------------------------------------------------------------------
071a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
071c 03d3 0001  |    |		.CONST	0x03d3,0x0001
071e ; --------------------------------------------------------------------------------------
071e ; Debug3 Subtable 0x10
071e ; --------------------------------------------------------------------------------------
071e 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0720 ; --------------------------------------------------------------------------------------
0720 ; Debug3 Subtable 0x11
0720 ; --------------------------------------------------------------------------------------
0720 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0722 ; --------------------------------------------------------------------------------------
0722 ; Debug3 Subtable 0x12
0722 ; --------------------------------------------------------------------------------------
0722 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0724 042b ffff  | +  |		.CONST	0x042b,0xffff
0726 042b 0001  | +  |		.CONST	0x042b,0x0001
0728 042f 0002  | /  |		.CONST	0x042f,0x0002
072a 0436 0003  | 6  |		.CONST	0x0436,0x0003
072c 043b 0004  | ;  |		.CONST	0x043b,0x0004
072e ; --------------------------------------------------------------------------------------
072e ; Debug3 Subtable 0x13
072e ; --------------------------------------------------------------------------------------
072e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0730 044b 0001  | K  |		.CONST	0x044b,0x0001
0732 ; --------------------------------------------------------------------------------------
0732 ; Debug3 Subtable 0x14
0732 ; --------------------------------------------------------------------------------------
0732 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0734 045b 0001  | [  |		.CONST	0x045b,0x0001
0736 0463 0002  | c  |		.CONST	0x0463,0x0002
0738 046a 0003  | j  |		.CONST	0x046a,0x0003
073a ; --------------------------------------------------------------------------------------
073a ; Debug3 Subtable 0x15
073a ; --------------------------------------------------------------------------------------
073a 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
073c 047b 0001  | {  |		.CONST	0x047b,0x0001
073e 0483 0002  |    |		.CONST	0x0483,0x0002
0740 048a 0003  |    |		.CONST	0x048a,0x0003
0742 ; --------------------------------------------------------------------------------------
0742 ; Debug3 Subtable 0x16
0742 ; --------------------------------------------------------------------------------------
0742 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0744 049b 0001  |    |		.CONST	0x049b,0x0001
0746 ; --------------------------------------------------------------------------------------
0746 ; Debug3 Subtable 0x17
0746 ; --------------------------------------------------------------------------------------
0746 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0748 04a3 0001  |    |		.CONST	0x04a3,0x0001
074a 0000 0000  |    |		.BLANK	0000[0xb6]