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

⟦503931d70⟧

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

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 06d0       |    |		.CONST	0x06d0								; 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 0004       |    |		.CONST	0x0004								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0139       | 9  |		.CONST	0x0139								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0049       | I  |		.CONST	0x0049								; Number of locals
000b			INIT_0008:
000b 00e9       |    |		Load_Encached	String_Cache						; Debug Table 0x0 = .DEBUG	0x000b,0x07b2,0x8000,0x0000,0x0056,0xefe5,0x0000,0x0011
													; Debug Table 0x0.0x0 = 0xb,0xffff
													; Debug Table 0x0.0x1 = 0xb,0xfffe
													; Debug Table 0x0.0x2 = 0xb,0xfffd
000c 0129       | )  |		Execute	Any,Make_Visible
000d 029a 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0xd,0xfffc
000f 029a 0153  |   S|		Declare_Subprogram	INIT_0150,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0xf,0xfffb
0011 029a 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x11,0xfffa
0013 029a 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x13,0xfff9
0015 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x15,0xfff8
0017 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x17,0xfff7
0019 029a 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x19,0xfff6
001b 029a 0293  |    |		Declare_Subprogram	INIT_0290,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1b,0xfff5
001d 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x0.0xb = 0x1d,0xfff4
001e 0129       | )  |		Execute	Any,Make_Visible
001f 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x0.0xc = 0x1f,0xfff3
0020 0129       | )  |		Execute	Any,Make_Visible
0021 029a 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x21,0xfff2
0023 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0xe = 0x23,0xfff1
0024 1926       | &  |		Execute	Package,Field_Reference,Field_Number 0x26
0025 0129       | )  |		Execute	Any,Make_Visible
0026 029a 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x26,0xfff0
0028 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x10 = 0x28,0xffef
0029 1934       | 4  |		Execute	Package,Field_Reference,Field_Number 0x34
002a 0129       | )  |		Execute	Any,Make_Visible
002b e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x11 = 0x2b,0xffee
002c 1935       | 5  |		Execute	Package,Field_Reference,Field_Number 0x35
002d 0129       | )  |		Execute	Any,Make_Visible
002e e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x12 = 0x2e,0xffed
002f 1936       | 6  |		Execute	Package,Field_Reference,Field_Number 0x36
0030 0129       | )  |		Execute	Any,Make_Visible
0031 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x13 = 0x31,0xffec
0032 1931       | 1  |		Execute	Package,Field_Reference,Field_Number 0x31
0033 0129       | )  |		Execute	Any,Make_Visible
0034 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x14 = 0x34,0xffeb
0035 1932       | 2  |		Execute	Package,Field_Reference,Field_Number 0x32
0036 0129       | )  |		Execute	Any,Make_Visible
0037 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x15 = 0x37,0xffea
0038 1933       | 3  |		Execute	Package,Field_Reference,Field_Number 0x33
0039 0129       | )  |		Execute	Any,Make_Visible
003a 029a 030b  |    |		Declare_Subprogram	INIT_0308,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x16 = 0x3a,0xffe9
003c 029a 032b  |   +|		Declare_Subprogram	INIT_0328,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x17 = 0x3c,0xffe8
003e 029a 034b  |   K|		Declare_Subprogram	INIT_0348,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x18 = 0x3e,0xffe7
0040 029a 041b  |    |		Declare_Subprogram	INIT_0418,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x19 = 0x40,0xffe6
0042 029a 042b  |   +|		Declare_Subprogram	INIT_0428,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1a = 0x42,0xffe5
0044 029a 043b  |   ;|		Declare_Subprogram	INIT_0438,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1b = 0x44,0xffe4
0046 029a 0453  |   S|		Declare_Subprogram	INIT_0450,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1c = 0x46,0xffe3
0048 029a 048b  |    |		Declare_Subprogram	INIT_0488,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1d = 0x48,0xffe2
004a 00bf       |    |		Action	Accept_Activation
004b e002       |    |		Load	0x0,0x2								; Debug Table 0x1 = .DEBUG	0x004b,0x07f0,0x8000,0x0000,0x0056,0xf2b5,0x0000,0x0015
													; Debug Table 0x1.0x0 = 0x4b,0xffff
													; Debug Table 0x1.0x1 = 0x4b,0xfffe
													; Debug Table 0x1.0x2 = 0x4b,0xfffd
004c 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
004d 0266       | f  |		Execute	Discrete,Bounds
004e 4801       |H   |		Short_Literal	0x1
004f 4804       |H   |		Short_Literal	0x4
0050 00e9       |    |		Load_Encached	String_Cache
0051 035b       | [  |		Declare_Type	Array,Constrained
0052 02a0       |    |		Declare_Subprogram	Null_Subprogram
0053 4801       |H   |		Short_Literal	0x1
0054 035d       | ]  |		Declare_Type	Array,Defined
0055 00d8       |    |		Load_Top	At_Offset_0
0056 0337       | 7  |		Declare_Variable	Array
0057 00d8       |    |		Load_Top	At_Offset_0
0058 0337       | 7  |		Declare_Variable	Array
0059 0092 0683  |    |		Action	Push_String_Extended,0x683					; "::: "
005b 00da       |    |		Load_Top	At_Offset_2
005c 01d8       |    |		Execute	Vector,Element_Type
005d 0119       |    |		Execute	Any,Check_In_Formal_Type
005e 4800       |H   |		Short_Literal	0x0
005f 00da       |    |		Load_Top	At_Offset_2
0060 01d6       |    |		Execute	Vector,Field_Write
0061 0092 0684  |    |		Action	Push_String_Extended,0x684					; "??? "
0063 00da       |    |		Load_Top	At_Offset_2
0064 01d8       |    |		Execute	Vector,Element_Type
0065 0119       |    |		Execute	Any,Check_In_Formal_Type
0066 4801       |H   |		Short_Literal	0x1
0067 00da       |    |		Load_Top	At_Offset_2
0068 01d6       |    |		Execute	Vector,Field_Write
0069 0092 0685  |    |		Action	Push_String_Extended,0x685					; "--- "
006b 00da       |    |		Load_Top	At_Offset_2
006c 01d8       |    |		Execute	Vector,Element_Type
006d 0119       |    |		Execute	Any,Check_In_Formal_Type
006e 4802       |H   |		Short_Literal	0x2
006f 00da       |    |		Load_Top	At_Offset_2
0070 01d6       |    |		Execute	Vector,Field_Write
0071 0092 0686  |    |		Action	Push_String_Extended,0x686					; "+++ "
0073 00da       |    |		Load_Top	At_Offset_2
0074 01d8       |    |		Execute	Vector,Element_Type
0075 0119       |    |		Execute	Any,Check_In_Formal_Type
0076 4803       |H   |		Short_Literal	0x3
0077 00da       |    |		Load_Top	At_Offset_2
0078 01d6       |    |		Execute	Vector,Field_Write
0079 0092 0687  |    |		Action	Push_String_Extended,0x687					; ">>> "
007b 00da       |    |		Load_Top	At_Offset_2
007c 01d8       |    |		Execute	Vector,Element_Type
007d 0119       |    |		Execute	Any,Check_In_Formal_Type
007e 4804       |H   |		Short_Literal	0x4
007f 00da       |    |		Load_Top	At_Offset_2
0080 01d6       |    |		Execute	Vector,Field_Write
0081 0092 0688  |    |		Action	Push_String_Extended,0x688					; "++* "
0083 00da       |    |		Load_Top	At_Offset_2
0084 01d8       |    |		Execute	Vector,Element_Type
0085 0119       |    |		Execute	Any,Check_In_Formal_Type
0086 4805       |H   |		Short_Literal	0x5
0087 00da       |    |		Load_Top	At_Offset_2
0088 01d6       |    |		Execute	Vector,Field_Write
0089 0092 0689  |    |		Action	Push_String_Extended,0x689					; "!!! "
008b 00da       |    |		Load_Top	At_Offset_2
008c 01d8       |    |		Execute	Vector,Element_Type
008d 0119       |    |		Execute	Any,Check_In_Formal_Type
008e 4806       |H   |		Short_Literal	0x6
008f 00da       |    |		Load_Top	At_Offset_2
0090 01d6       |    |		Execute	Vector,Field_Write
0091 0092 068a  |    |		Action	Push_String_Extended,0x68a					; "*** "
0093 00da       |    |		Load_Top	At_Offset_2
0094 01d8       |    |		Execute	Vector,Element_Type
0095 0119       |    |		Execute	Any,Check_In_Formal_Type
0096 4807       |H   |		Short_Literal	0x7
0097 00da       |    |		Load_Top	At_Offset_2
0098 01d6       |    |		Execute	Vector,Field_Write
0099 0092 068b  |    |		Action	Push_String_Extended,0x68b					; "%%% "
009b 00da       |    |		Load_Top	At_Offset_2
009c 01d8       |    |		Execute	Vector,Element_Type
009d 0119       |    |		Execute	Any,Check_In_Formal_Type
009e 4808       |H   |		Short_Literal	0x8
009f 00da       |    |		Load_Top	At_Offset_2
00a0 01d6       |    |		Execute	Vector,Field_Write
00a1 0092 068c  |    |		Action	Push_String_Extended,0x68c					; "### "
00a3 00da       |    |		Load_Top	At_Offset_2
00a4 01d8       |    |		Execute	Vector,Element_Type
00a5 0119       |    |		Execute	Any,Check_In_Formal_Type
00a6 4809       |H   |		Short_Literal	0x9
00a7 00da       |    |		Load_Top	At_Offset_2
00a8 01d6       |    |		Execute	Vector,Field_Write
00a9 0092 068d  |    |		Action	Push_String_Extended,0x68d					; "@@@ "
00ab 00da       |    |		Load_Top	At_Offset_2
00ac 01d8       |    |		Execute	Vector,Element_Type
00ad 0119       |    |		Execute	Any,Check_In_Formal_Type
00ae 480a       |H   |		Short_Literal	0xa
00af 00da       |    |		Load_Top	At_Offset_2
00b0 01d6       |    |		Execute	Vector,Field_Write
00b1 0092 068e  |    |		Action	Push_String_Extended,0x68e					; "$$$ "
00b3 00da       |    |		Load_Top	At_Offset_2
00b4 01d8       |    |		Execute	Vector,Element_Type
00b5 0119       |    |		Execute	Any,Check_In_Formal_Type
00b6 480b       |H   |		Short_Literal	0xb
00b7 00da       |    |		Load_Top	At_Offset_2
00b8 01d6       |    |		Execute	Vector,Field_Write
00b9 00d9       |    |		Load_Top	At_Offset_1
00ba 01d4       |    |		Execute	Vector,Structure_Write
00bb e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0x3 = 0xbb,0xfffc
00bc 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00bd 0266       | f  |		Execute	Discrete,Bounds
00be e002       |    |		Load	0x0,0x2
00bf 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
00c0 02a0       |    |		Declare_Subprogram	Null_Subprogram
00c1 4801       |H   |		Short_Literal	0x1
00c2 035d       | ]  |		Declare_Type	Array,Defined
00c3 00d8       |    |		Load_Top	At_Offset_0
00c4 0337       | 7  |		Declare_Variable	Array
00c5 00d8       |    |		Load_Top	At_Offset_0
00c6 0337       | 7  |		Declare_Variable	Array
00c7 4802       |H   |		Short_Literal	0x2
00c8 4800       |H   |		Short_Literal	0x0
00c9 00da       |    |		Load_Top	At_Offset_2
00ca 01d6       |    |		Execute	Vector,Field_Write
00cb 4806       |H   |		Short_Literal	0x6
00cc 4801       |H   |		Short_Literal	0x1
00cd 00da       |    |		Load_Top	At_Offset_2
00ce 01d6       |    |		Execute	Vector,Field_Write
00cf 4807       |H   |		Short_Literal	0x7
00d0 4802       |H   |		Short_Literal	0x2
00d1 00da       |    |		Load_Top	At_Offset_2
00d2 01d6       |    |		Execute	Vector,Field_Write
00d3 4807       |H   |		Short_Literal	0x7
00d4 4803       |H   |		Short_Literal	0x3
00d5 00da       |    |		Load_Top	At_Offset_2
00d6 01d6       |    |		Execute	Vector,Field_Write
00d7 00d9       |    |		Load_Top	At_Offset_1
00d8 01d4       |    |		Execute	Vector,Structure_Write
00d9 029d 0493  |    |		Declare_Subprogram	INIT_0490,For_Outer_Call			; Debug Table 0x1.0x4 = 0xd9,0xfffb
00db 029d 04db  |    |		Declare_Subprogram	INIT_04d8,For_Outer_Call			; Debug Table 0x1.0x5 = 0xdb,0xfffa
00dd 029d 053b  |   ;|		Declare_Subprogram	INIT_0538,For_Outer_Call			; Debug Table 0x1.0x6 = 0xdd,0xfff9
00df 029d 0583  |    |		Declare_Subprogram	INIT_0580,For_Outer_Call			; Debug Table 0x1.0x7 = 0xdf,0xfff8
00e1 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x8 = 0xe1,0xfff7
00e2 00c7       |    |		Action	Elaborate_Subprogram
00e3 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23				; Debug Table 0x1.0x9 = 0xe3,0xfff6
00e4 00c7       |    |		Action	Elaborate_Subprogram
00e5 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23				; Debug Table 0x1.0xa = 0xe5,0xfff5
00e6 00c6       |    |		Action	Check_Subprogram_Elaborated
00e7 e004       |    |		Load	0x0,0x4
00e8 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00e9 e004       |    |		Load	0x0,0x4
00ea 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00eb 193e       | >  |		Execute	Package,Field_Reference,Field_Number 0x3e
00ec e004       |    |		Load	0x0,0x4
00ed 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00ee 193b       | ;  |		Execute	Package,Field_Reference,Field_Number 0x3b
00ef e004       |    |		Load	0x0,0x4
00f0 1911       |    |		Execute	Package,Field_Reference,Field_Number 0x11
00f1 e004       |    |		Load	0x0,0x4
00f2 1910       |    |		Execute	Package,Field_Reference,Field_Number 0x10
00f3 631c       |c   |		Indirect_Literal	Discrete,0x410,{0x00000000, 0x0056f2b5}
00f4 6317       |c   |		Indirect_Literal	Discrete,0x40c,{0x00000000, 0x00000596}
00f5 4800       |H   |		Short_Literal	0x0
00f6 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23				; Debug Table 0x1.0xb = 0xf6,0xfff4
00f7 00c6       |    |		Action	Check_Subprogram_Elaborated
00f8 e004       |    |		Load	0x0,0x4
00f9 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00fa e004       |    |		Load	0x0,0x4
00fb 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00fc 193f       | ?  |		Execute	Package,Field_Reference,Field_Number 0x3f
00fd e004       |    |		Load	0x0,0x4
00fe 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00ff 193c       | <  |		Execute	Package,Field_Reference,Field_Number 0x3c
0100 e004       |    |		Load	0x0,0x4
0101 1916       |    |		Execute	Package,Field_Reference,Field_Number 0x16
0102 e004       |    |		Load	0x0,0x4
0103 1915       |    |		Execute	Package,Field_Reference,Field_Number 0x15
0104 630b       |c   |		Indirect_Literal	Discrete,0x410,{0x00000000, 0x0056f2b5}
0105 6302       |c   |		Indirect_Literal	Discrete,0x408,{0x00000000, 0x000005b0}
0106 4800       |H   |		Short_Literal	0x0
0107 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23				; Debug Table 0x1.0xc = 0x107,0xfff3
0108 00c6       |    |		Action	Check_Subprogram_Elaborated
0109 00ec       |    |		Load_Encached	Diana_Tree_Cache
010a e004       |    |		Load	0x0,0x4
010b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
010c 193d       | =  |		Execute	Package,Field_Reference,Field_Number 0x3d
010d e004       |    |		Load	0x0,0x4
010e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
010f 193a       | :  |		Execute	Package,Field_Reference,Field_Number 0x3a
0110 00eb       |    |		Load_Encached	Diana_Cache
0111 1913       |    |		Execute	Package,Field_Reference,Field_Number 0x13
0112 00eb       |    |		Load_Encached	Diana_Cache
0113 1912       |    |		Execute	Package,Field_Reference,Field_Number 0x12
0114 62fb       |b   |		Indirect_Literal	Discrete,0x410,{0x00000000, 0x0056f2b5}
0115 62ee       |b   |		Indirect_Literal	Discrete,0x404,{0x00000000, 0x000005ca}
0116 4800       |H   |		Short_Literal	0x0
0117 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24				; Debug Table 0x1.0xd = 0x117,0xfff2
0118 00c7       |    |		Action	Elaborate_Subprogram
0119 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25				; Debug Table 0x1.0xe = 0x119,0xfff1
011a 00c7       |    |		Action	Elaborate_Subprogram
011b 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26				; Debug Table 0x1.0xf = 0x11b,0xfff0
011c 00c7       |    |		Action	Elaborate_Subprogram
011d 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x10 = 0x11d,0xffef
011e 00c7       |    |		Action	Elaborate_Subprogram
011f 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x11 = 0x11f,0xffee
0120 00c7       |    |		Action	Elaborate_Subprogram
0121 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x12 = 0x121,0xffed
0122 00c7       |    |		Action	Elaborate_Subprogram
0123 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x13 = 0x123,0xffec
0124 00c7       |    |		Action	Elaborate_Subprogram
0125 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x14 = 0x125,0xffeb
0126 00c7       |    |		Action	Elaborate_Subprogram
0127 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21				; Debug Table 0x1.0x15 = 0x127,0xffea
0128 00c7       |    |		Action	Elaborate_Subprogram
0129 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22				; Debug Table 0x1.0x16 = 0x129,0xffe9
012a 00c7       |    |		Action	Elaborate_Subprogram
012b 029d 05c3  |    |		Declare_Subprogram	INIT_05c0,For_Outer_Call			; Debug Table 0x1.0x17 = 0x12b,0xffe8
012d 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x18 = 0x12d,0xffe7
012e 00c7       |    |		Action	Elaborate_Subprogram
012f 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x19 = 0x12f,0xffe6
0130 00c7       |    |		Action	Elaborate_Subprogram
0131 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0x1a = 0x131,0xffe5
0132 00c7       |    |		Action	Elaborate_Subprogram
0133 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x1b = 0x133,0xffe4
0134 00c7       |    |		Action	Elaborate_Subprogram
0135 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27				; Debug Table 0x1.0x1c = 0x135,0xffe3
0136 00c7       |    |		Action	Elaborate_Subprogram
0137 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28				; Debug Table 0x1.0x1d = 0x137,0xffe2
0138 00c7       |    |		Action	Elaborate_Subprogram
0139			BODY_0008:
0139 00bc       |    |		Action	Signal_Activated
013a 00bb       |    |		Action	Signal_Completion
013b 0000 0000  |    |		.BLANK	0000[0x5]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143       | C  |		.CONST	0x0143								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0001       |    |		.CONST	0x0001								; Number of locals
0143			BODY_0140:
0143			INIT_0140:
0143 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2 = .DEBUG	0x0143,0x082e,0x0001,0x0000,0x0056,0xefe5,0x0000,0x001f
													; Debug Table 0x2.0x0 = 0x143,0x1
0144 821a       |    |		Call	0x1,0x1a
0145 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x1 = 0x145,0x2
0146 e002       |    |		Load	0x0,0x2
0147 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0148 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0149 0000 0000  |    |		.BLANK	0000[0x7]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153       | S  |		.CONST	0x0153								; Address of begin
0151 0004       |    |		.CONST	0x0004								; Address of exception handler
0152 0001       |    |		.CONST	0x0001								; Number of locals
0153			BODY_0150:
0153			INIT_0150:
0153 e005       |    |		Load	0x0,0x5								; Debug Table 0x3 = .DEBUG	0x0153,0x0834,0x0001,0x0000,0x0056,0xefe5,0x0000,0x0030
													; Debug Table 0x3.0x0 = 0x153,0x1
0154 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0155 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x1 = 0x155,0x2
0156 e002       |    |		Load	0x0,0x2
0157 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
0158 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0159 0000 0000  |    |		.BLANK	0000[0x7]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163       | c  |		.CONST	0x0163								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0001       |    |		.CONST	0x0001								; Number of locals
0163			BODY_0160:
0163			INIT_0160:
0163 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4 = .DEBUG	0x0163,0x083a,0x0001,0x0000,0x0056,0xefe5,0x0000,0x003d
													; Debug Table 0x4.0x0 = 0x163,0x1
0164 e006       |    |		Load	0x0,0x6
0165 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0166 8211       |    |		Call	0x1,0x11
0167 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 017d       | }  |		.CONST	0x017d								; Address of begin
0169 0004       |    |		.CONST	0x0004								; Address of exception handler
016a 0006       |    |		.CONST	0x0006								; Number of locals
016b			INIT_0168:
016b e003       |    |		Load	0x0,0x3								; Debug Table 0x5 = .DEBUG	0x016b,0x083e,0x0001,0x0000,0x0056,0xefe5,0x0000,0x004a
													; Debug Table 0x5.0x0 = 0x16b,0xffff
016c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
016d 02c7       |    |		Declare_Variable	Any
016e 00d8       |    |		Load_Top	At_Offset_0
016f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0170 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x5.0x1 = 0x170,0xfffe
0171 e003       |    |		Load	0x0,0x3								; Debug Table 0x5.0x2 = 0x171,0xfffd
0172 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
0173 02c7       |    |		Declare_Variable	Any
0174 00d8       |    |		Load_Top	At_Offset_0
0175 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0176 e003       |    |		Load	0x0,0x3								; Debug Table 0x5.0x3 = 0x176,0xfffc
0177 1b33       | 3  |		Execute	Package,Field_Read,Field_Number 0x33
0178 02c7       |    |		Declare_Variable	Any
0179 00d8       |    |		Load_Top	At_Offset_0
017a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
017b e002       |    |		Load	0x0,0x2								; Debug Table 0x5.0x4 = 0x17b,0xfffb
017c 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
017d			BODY_0168:
017d 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x5.0x5 = 0x17d,0x1
017e e402       |    |		Load	0x2,0x2
017f 0120       |    |		Execute	Any,Is_Value
0180 6803       |h   |		Jump_Zero	0x184
0181 e007       |    |		Load	0x0,0x7
0182 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0183 7801       |x   |		Jump	0x185
0184 e402       |    |		Load	0x2,0x2
0185 e5ff       |    |		Load	0x2,-0x1
0186 e007       |    |		Load	0x0,0x7
0187 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0188 c402       |    |		Store	0x2,0x2
0189 c403       |    |		Store	0x2,0x3
018a 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x6 = 0x18a,0x2
018b 6803       |h   |		Jump_Zero	0x18f
018c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x7 = 0x18c,0x3
018d e402       |    |		Load	0x2,0x2
018e 8212       |    |		Call	0x1,0x12
018f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x8 = 0x18f,0x4
0190 e006       |    |		Load	0x0,0x6
0191 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0192 027f       |    |		Execute	Discrete,Equal
0193 6803       |h   |		Jump_Zero	0x197
0194 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x9 = 0x194,0x5
0195 e007       |    |		Load	0x0,0x7
0196 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0197 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 01a7       |    |		.CONST	0x01a7								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0004       |    |		.CONST	0x0004								; Number of locals
019b			INIT_0198:
019b e003       |    |		Load	0x0,0x3								; Debug Table 0x6 = .DEBUG	0x019b,0x0854,0x0001,0x0000,0x0056,0xefe5,0x0000,0x005d
													; Debug Table 0x6.0x0 = 0x19b,0xffff
019c 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
019d 02c7       |    |		Declare_Variable	Any
019e 00d8       |    |		Load_Top	At_Offset_0
019f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01a0 e003       |    |		Load	0x0,0x3								; Debug Table 0x6.0x1 = 0x1a0,0xfffe
01a1 1b33       | 3  |		Execute	Package,Field_Read,Field_Number 0x33
01a2 02c7       |    |		Declare_Variable	Any
01a3 00d8       |    |		Load_Top	At_Offset_0
01a4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01a5 e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0x2 = 0x1a5,0xfffd
01a6 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
01a7			BODY_0198:
01a7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x3 = 0x1a7,0x1
01a8 e5ff       |    |		Load	0x2,-0x1
01a9 e003       |    |		Load	0x0,0x3
01aa 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
01ab c402       |    |		Store	0x2,0x2
01ac 00cf       |    |		Action	Mark_Auxiliary
01ad 783e       |x>  |		Jump	0x1ec
01ae 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x4 = 0x1ae,0x3
01af e003       |    |		Load	0x0,0x3
01b0 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
01b1 e22c       | ,  |		Load	0x1,0x2c
01b2 01d7       |    |		Execute	Vector,Field_Read
01b3 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
01b4 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x6.0x5 = 0x1b4,0x4
01b5 00da       |    |		Load_Top	At_Offset_2
01b6 4820       |H   |		Short_Literal	0x20
01b7 4820       |H   |		Short_Literal	0x20
01b8 e402       |    |		Load	0x2,0x2
01b9 e003       |    |		Load	0x0,0x3
01ba 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
01bb 01cb       |    |		Execute	Vector,Append
01bc e402       |    |		Load	0x2,0x2
01bd e003       |    |		Load	0x0,0x3
01be 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
01bf 01cc       |    |		Execute	Vector,Catenate
01c0 01cb       |    |		Execute	Vector,Append
01c1 e402       |    |		Load	0x2,0x2
01c2 e003       |    |		Load	0x0,0x3
01c3 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
01c4 01cc       |    |		Execute	Vector,Catenate
01c5 8213       |    |		Call	0x1,0x13
01c6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x6 = 0x1c6,0x5
01c7 e402       |    |		Load	0x2,0x2
01c8 e003       |    |		Load	0x0,0x3
01c9 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
01ca c403       |    |		Store	0x2,0x3
01cb 00cf       |    |		Action	Mark_Auxiliary
01cc 7815       |x   |		Jump	0x1e2
01cd e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x6.0x7 = 0x1cd,0x7
01ce 00db       |    |		Load_Top	At_Offset_3
01cf 0092 068f  |    |		Action	Push_String_Extended,0x68f					; "   "
01d1 e403       |    |		Load	0x2,0x3
01d2 e003       |    |		Load	0x0,0x3
01d3 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
01d4 01cc       |    |		Execute	Vector,Catenate
01d5 0092 0690  |    |		Action	Push_String_Extended,0x690					; " => "
01d7 01cc       |    |		Execute	Vector,Catenate
01d8 e403       |    |		Load	0x2,0x3
01d9 e003       |    |		Load	0x0,0x3
01da 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
01db 01cc       |    |		Execute	Vector,Catenate
01dc 8213       |    |		Call	0x1,0x13
01dd 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x8 = 0x1dd,0x8
01de e003       |    |		Load	0x0,0x3
01df 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
01e0 c403       |    |		Store	0x2,0x3
01e1 00c9       |    |		Action	Pop_Auxiliary_Loop
01e2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x9 = 0x1e2,0x6
01e3 e003       |    |		Load	0x0,0x3
01e4 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
01e5 6fe7       |o   |		Jump_Zero	0x1cd
01e6 00ce       |    |		Action	Pop_Auxiliary
01e7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0xa = 0x1e7,0x9
01e8 e003       |    |		Load	0x0,0x3
01e9 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
01ea c402       |    |		Store	0x2,0x2
01eb 00c9       |    |		Action	Pop_Auxiliary_Loop
01ec 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0xb = 0x1ec,0x2
01ed e003       |    |		Load	0x0,0x3
01ee 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
01ef 6fbe       |o   |		Jump_Zero	0x1ae
01f0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01f1 0000 0000  |    |		.BLANK	0000[0x7]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 0203       |    |		.CONST	0x0203								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0005       |    |		.CONST	0x0005								; Number of locals
01fb			INIT_01f8:
01fb e002       |    |		Load	0x0,0x2								; Debug Table 0x7 = .DEBUG	0x01fb,0x086e,0x0001,0x0000,0x0056,0xefe5,0x0000,0x0070
													; Debug Table 0x7.0x0 = 0x1fb,0xffff
01fc 1b2b       | +  |		Execute	Package,Field_Read,Field_Number 0x2b
01fd 0337       | 7  |		Declare_Variable	Array
01fe 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x7.0x1 = 0x1fe,0xfffe
01ff e001       |    |		Load	0x0,0x1								; Debug Table 0x7.0x2 = 0x1ff,0xfffd
0200 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0201 029f 05f3  |    |		Declare_Subprogram	INIT_05f0,For_Call				; Debug Table 0x7.0x3 = 0x201,0xfffc
0203			BODY_01f8:
0203 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x7.0x4 = 0x203,0x1
0204 e5fe       |    |		Load	0x2,-0x2
0205 e002       |    |		Load	0x0,0x2
0206 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0207 6833       |h3  |		Jump_Zero	0x23b
0208 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x7.0x5 = 0x208,0x2
0209 e002       |    |		Load	0x0,0x2
020a 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
020b e402       |    |		Load	0x2,0x2
020c 01d4       |    |		Execute	Vector,Structure_Write
020d e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x7.0x6 = 0x20d,0x3
020e e002       |    |		Load	0x0,0x2
020f 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
0210 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0211 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x7.0x7 = 0x211,0x4
0212 e002       |    |		Load	0x0,0x2
0213 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
0214 4603       |F   |		Jump_Case	0x4
0215 7803       |x   |		Jump	0x219								; case 0x0
0216 7806       |x   |		Jump	0x21d								; case 0x1
0217 7809       |x   |		Jump	0x221								; case 0x2
0218 780c       |x   |		Jump	0x225								; case 0x3
0219 e001       |    |		Load	0x0,0x1								; Debug Table 0x7.0x8 = 0x219,0x5
021a 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
021b 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
021c 780b       |x   |		Jump	0x228
021d e001       |    |		Load	0x0,0x1								; Debug Table 0x7.0x9 = 0x21d,0x6
021e 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
021f 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0220 7807       |x   |		Jump	0x228
0221 e001       |    |		Load	0x0,0x1								; Debug Table 0x7.0xa = 0x221,0x7
0222 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0223 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0224 7803       |x   |		Jump	0x228
0225 e001       |    |		Load	0x0,0x1								; Debug Table 0x7.0xb = 0x225,0x8
0226 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0227 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0228 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7.0xc = 0x228,0x9
0229 01db       |    |		Execute	Vector,Length
022a 6806       |h   |		Jump_Zero	0x231
022b e5ff       |    |		Load	0x2,-0x1
022c 01dc       |    |		Execute	Vector,Last
022d e5ff       |    |		Load	0x2,-0x1
022e 01d7       |    |		Execute	Vector,Field_Read
022f 822d       | -  |		Call	0x1,0x2d
0230 6804       |h   |		Jump_Zero	0x235
0231 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0xd = 0x231,0xa
0232 e5ff       |    |		Load	0x2,-0x1
0233 8405       |    |		Call	0x2,0x5
0234 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0235 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0xe = 0x235,0xb
0236 e5ff       |    |		Load	0x2,-0x1
0237 0092 0691  |    |		Action	Push_String_Extended,0x691					; "."
0239 01cc       |    |		Execute	Vector,Catenate
023a 8405       |    |		Call	0x2,0x5
023b 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
023c 0000 0000  |    |		.BLANK	0000[0x4]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 024b       | K  |		.CONST	0x024b								; Address of begin
0241 0278       | x  |		.CONST	0x0278								; Address of exception handler
0242 0005       |    |		.CONST	0x0005								; Number of locals
0243			INIT_0240:
0243 e001       |    |		Load	0x0,0x1								; Debug Table 0x8 = .DEBUG	0x0243,0x088e,0x0001,0x0000,0x0056,0xefe5,0x0000,0x008a
													; Debug Table 0x8.0x0 = 0x243,0xffff
0244 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0245 e001       |    |		Load	0x0,0x1								; Debug Table 0x8.0x1 = 0x245,0xfffe
0246 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0247 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x8.0x2 = 0x247,0xfffd
0248 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0249 029f 063b  |   ;|		Declare_Subprogram	INIT_0638,For_Call				; Debug Table 0x8.0x3 = 0x249,0xfffc
024b			BODY_0240:
024b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0x4 = 0x24b,0x1
024c 01db       |    |		Execute	Vector,Length
024d 7004       |p   |		Jump_Nonzero	0x252
024e e001       |    |		Load	0x0,0x1								; Debug Table 0x8.0x5 = 0x24e,0x2
024f 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0250 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0251 7807       |x   |		Jump	0x259
0252 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8.0x6 = 0x252,0x3
0253 00ea       |    |		Load_Encached	Null_String_Cache
0254 e5fe       |    |		Load	0x2,-0x2
0255 4801       |H   |		Short_Literal	0x1
0256 e001       |    |		Load	0x0,0x1
0257 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0258 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0259 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x7 = 0x259,0x4
025a 00ea       |    |		Load_Encached	Null_String_Cache
025b e5ff       |    |		Load	0x2,-0x1
025c 4800       |H   |		Short_Literal	0x0
025d e001       |    |		Load	0x0,0x1
025e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
025f c402       |    |		Store	0x2,0x2
0260 00cf       |    |		Action	Mark_Auxiliary
0261 7805       |x   |		Jump	0x267
0262 e402       |    |		Load	0x2,0x2								; Debug Table 0x8.0x8 = 0x262,0x6
0263 e001       |    |		Load	0x0,0x1
0264 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
0265 8405       |    |		Call	0x2,0x5
0266 00c9       |    |		Action	Pop_Auxiliary_Loop
0267 e402       |    |		Load	0x2,0x2								; Debug Table 0x8.0x9 = 0x267,0x5
0268 e001       |    |		Load	0x0,0x1
0269 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
026a 6ff7       |o   |		Jump_Zero	0x262
026b 00ce       |    |		Action	Pop_Auxiliary
026c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0xa = 0x26c,0x7
026d e001       |    |		Load	0x0,0x1
026e 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
026f c402       |    |		Store	0x2,0x2
0270 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0xb = 0x270,0x8
0271 01db       |    |		Execute	Vector,Length
0272 6804       |h   |		Jump_Zero	0x277
0273 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8.0xc = 0x273,0x9
0274 e001       |    |		Load	0x0,0x1
0275 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0276 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0277 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0278			TRAP_0240:
0278 00d8       |    |		Load_Top	At_Offset_0
0279 0107       |    |		Execute	Exception,Get_Name
027a 4950       |IP  |		Short_Literal	0x150
027b 495f       |I_  |		Short_Literal	0x15f
027c 0262       | b  |		Execute	Discrete,In_Range
027d 680c       |h   |		Jump_Zero	0x28a
027e e402       |    |		Load	0x2,0x2								; Debug Table 0x8.0xd = 0x27e,0xa
027f e001       |    |		Load	0x0,0x1
0280 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0281 c402       |    |		Store	0x2,0x2
0282 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0xe = 0x282,0xb
0283 01db       |    |		Execute	Vector,Length
0284 6804       |h   |		Jump_Zero	0x289
0285 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0xf = 0x285,0xc
0286 e001       |    |		Load	0x0,0x1
0287 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0288 c403       |    |		Store	0x2,0x3
0289 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
028a e002       |    |		Load	0x0,0x2								; Debug Table 0x8.0x10 = 0x28a,0xd
028b 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
028c 8210       |    |		Call	0x1,0x10
028d 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
028e 0000 0000  |    |		.XXX[0x2]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 02cb       |    |		.CONST	0x02cb								; Address of begin
0291 0004       |    |		.CONST	0x0004								; Address of exception handler
0292 0002       |    |		.CONST	0x0002								; Number of locals
0293			INIT_0290:
0293 e002       |    |		Load	0x0,0x2								; Debug Table 0x9 = .DEBUG	0x0293,0x08b2,0x0001,0x0000,0x0056,0xefe5,0x0000,0x00a0
													; Debug Table 0x9.0x0 = 0x293,0xffff
0294 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0295 0337       | 7  |		Declare_Variable	Array
0296 e002       |    |		Load	0x0,0x2
0297 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0298 0337       | 7  |		Declare_Variable	Array
0299 e5fd       |    |		Load	0x2,-0x3
029a 4800       |H   |		Short_Literal	0x0
029b 00da       |    |		Load_Top	At_Offset_2
029c 01d6       |    |		Execute	Vector,Field_Write
029d e5fc       |    |		Load	0x2,-0x4
029e 4801       |H   |		Short_Literal	0x1
029f 00da       |    |		Load_Top	At_Offset_2
02a0 01d6       |    |		Execute	Vector,Field_Write
02a1 e5fb       |    |		Load	0x2,-0x5
02a2 4802       |H   |		Short_Literal	0x2
02a3 00da       |    |		Load_Top	At_Offset_2
02a4 01d6       |    |		Execute	Vector,Field_Write
02a5 e5fa       |    |		Load	0x2,-0x6
02a6 4803       |H   |		Short_Literal	0x3
02a7 00da       |    |		Load_Top	At_Offset_2
02a8 01d6       |    |		Execute	Vector,Field_Write
02a9 e5f9       |    |		Load	0x2,-0x7
02aa 4805       |H   |		Short_Literal	0x5
02ab 00da       |    |		Load_Top	At_Offset_2
02ac 01d6       |    |		Execute	Vector,Field_Write
02ad e5f8       |    |		Load	0x2,-0x8
02ae 4804       |H   |		Short_Literal	0x4
02af 00da       |    |		Load_Top	At_Offset_2
02b0 01d6       |    |		Execute	Vector,Field_Write
02b1 e5f7       |    |		Load	0x2,-0x9
02b2 4806       |H   |		Short_Literal	0x6
02b3 00da       |    |		Load_Top	At_Offset_2
02b4 01d6       |    |		Execute	Vector,Field_Write
02b5 e5f6       |    |		Load	0x2,-0xa
02b6 4807       |H   |		Short_Literal	0x7
02b7 00da       |    |		Load_Top	At_Offset_2
02b8 01d6       |    |		Execute	Vector,Field_Write
02b9 e5f5       |    |		Load	0x2,-0xb
02ba 4808       |H   |		Short_Literal	0x8
02bb 00da       |    |		Load_Top	At_Offset_2
02bc 01d6       |    |		Execute	Vector,Field_Write
02bd e5f4       |    |		Load	0x2,-0xc
02be 4809       |H   |		Short_Literal	0x9
02bf 00da       |    |		Load_Top	At_Offset_2
02c0 01d6       |    |		Execute	Vector,Field_Write
02c1 e5f3       |    |		Load	0x2,-0xd
02c2 480b       |H   |		Short_Literal	0xb
02c3 00da       |    |		Load_Top	At_Offset_2
02c4 01d6       |    |		Execute	Vector,Field_Write
02c5 e5f2       |    |		Load	0x2,-0xe
02c6 480a       |H   |		Short_Literal	0xa
02c7 00da       |    |		Load_Top	At_Offset_2
02c8 01d6       |    |		Execute	Vector,Field_Write
02c9 00d9       |    |		Load_Top	At_Offset_1
02ca 01d4       |    |		Execute	Vector,Structure_Write
02cb			BODY_0290:
02cb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9.0x1 = 0x2cb,0x1
02cc 01db       |    |		Execute	Vector,Length
02cd 6806       |h   |		Jump_Zero	0x2d4
02ce 00db       |    |		Load_Top	At_Offset_3
02cf 01dd       |    |		Execute	Vector,First
02d0 e5ff       |    |		Load	0x2,-0x1
02d1 01d7       |    |		Execute	Vector,Field_Read
02d2 0e2a       | *  |		Execute_Immediate	Not_Equal,0x2a
02d3 6805       |h   |		Jump_Zero	0x2d9
02d4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x2 = 0x2d4,0x2
02d5 e5fe       |    |		Load	0x2,-0x2
02d6 e5ff       |    |		Load	0x2,-0x1
02d7 8214       |    |		Call	0x1,0x14
02d8 450f       |E   |		Exit_Suprogram	New_Top_Offset 0xf
02d9 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x3 = 0x2d9,0x3
02da 01db       |    |		Execute	Vector,Length
02db 6804       |h   |		Jump_Zero	0x2e0
02dc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x4 = 0x2dc,0x4
02dd e5fe       |    |		Load	0x2,-0x2
02de 820e       |    |		Call	0x1,0xe
02df 450f       |E   |		Exit_Suprogram	New_Top_Offset 0xf
02e0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x5 = 0x2e0,0x5
02e1 e002       |    |		Load	0x0,0x2
02e2 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
02e3 450f       |E   |		Exit_Suprogram	New_Top_Offset 0xf
02e4 0000 0000  |    |		.BLANK	0000[0x4]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb       |    |		.CONST	0x02eb								; Address of begin
02e9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ea 0001       |    |		.CONST	0x0001								; Number of locals
02eb			BODY_02e8:
02eb			INIT_02e8:
02eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa = .DEBUG	0x02eb,0x08c0,0x0001,0x0000,0x0056,0xefe5,0x0000,0x017f
													; Debug Table 0xa.0x0 = 0x2eb,0x1
02ec e001       |    |		Load	0x0,0x1
02ed 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
02ee 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x1 = 0x2ee,0x2
02ef e002       |    |		Load	0x0,0x2
02f0 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
02f1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02f2 0000 0000  |    |		.BLANK	0000[0x6]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fb       |    |		.CONST	0x02fb								; Address of begin
02f9 0004       |    |		.CONST	0x0004								; Address of exception handler
02fa 0001       |    |		.CONST	0x0001								; Number of locals
02fb			BODY_02f8:
02fb			INIT_02f8:
02fb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x02fb,0x08c6,0x0001,0x0000,0x0056,0xefe5,0x0000,0x0193
													; Debug Table 0xb.0x0 = 0x2fb,0x1
02fc e001       |    |		Load	0x0,0x1
02fd 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
02fe 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x1 = 0x2fe,0x2
02ff e002       |    |		Load	0x0,0x2
0300 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0301 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0302 0000 0000  |    |		.BLANK	0000[0x6]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b       |    |		.CONST	0x030b								; Address of begin
0309 0004       |    |		.CONST	0x0004								; Address of exception handler
030a 0001       |    |		.CONST	0x0001								; Number of locals
030b			BODY_0308:
030b			INIT_0308:
030b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc = .DEBUG	0x030b,0x08cc,0x0001,0x0000,0x0056,0xefe5,0x0000,0x01cb
													; Debug Table 0xc.0x0 = 0x30b,0x1
030c e002       |    |		Load	0x0,0x2
030d 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
030e 4603       |F   |		Jump_Case	0x4
030f 7803       |x   |		Jump	0x313								; case 0x0
0310 7807       |x   |		Jump	0x318								; case 0x1
0311 780b       |x   |		Jump	0x31d								; case 0x2
0312 780f       |x   |		Jump	0x322								; case 0x3
0313 e001       |    |		Load	0x0,0x1								; Debug Table 0xc.0x1 = 0x313,0x2
0314 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0315 e001       |    |		Load	0x0,0x1
0316 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0317 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0318 e001       |    |		Load	0x0,0x1								; Debug Table 0xc.0x2 = 0x318,0x3
0319 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
031a e001       |    |		Load	0x0,0x1
031b 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
031c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
031d e001       |    |		Load	0x0,0x1								; Debug Table 0xc.0x3 = 0x31d,0x4
031e 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
031f e001       |    |		Load	0x0,0x1
0320 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0321 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0322 e001       |    |		Load	0x0,0x1								; Debug Table 0xc.0x4 = 0x322,0x5
0323 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0324 e001       |    |		Load	0x0,0x1
0325 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0326 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0327 0000       |    |		.XXX[0x1]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b       | +  |		.CONST	0x032b								; Address of begin
0329 0004       |    |		.CONST	0x0004								; Address of exception handler
032a 0001       |    |		.CONST	0x0001								; Number of locals
032b			BODY_0328:
032b			INIT_0328:
032b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd = .DEBUG	0x032b,0x08d8,0x0001,0x0000,0x0056,0xefe5,0x0000,0x01d8
													; Debug Table 0xd.0x0 = 0x32b,0x1
032c e002       |    |		Load	0x0,0x2
032d 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
032e 4603       |F   |		Jump_Case	0x4
032f 7803       |x   |		Jump	0x333								; case 0x0
0330 7807       |x   |		Jump	0x338								; case 0x1
0331 780b       |x   |		Jump	0x33d								; case 0x2
0332 780f       |x   |		Jump	0x342								; case 0x3
0333 e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x1 = 0x333,0x2
0334 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0335 e001       |    |		Load	0x0,0x1
0336 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0337 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0338 e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x2 = 0x338,0x3
0339 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
033a e001       |    |		Load	0x0,0x1
033b 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
033c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
033d e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x3 = 0x33d,0x4
033e 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
033f e001       |    |		Load	0x0,0x1
0340 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0341 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0342 e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x4 = 0x342,0x5
0343 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0344 e001       |    |		Load	0x0,0x1
0345 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0346 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0347 0000       |    |		.XXX[0x1]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 0361       | a  |		.CONST	0x0361								; Address of begin
0349 0004       |    |		.CONST	0x0004								; Address of exception handler
034a 0006       |    |		.CONST	0x0006								; Number of locals
034b			INIT_0348:
034b 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe = .DEBUG	0x034b,0x08e4,0x2801,0x0002,0x0056,0xefe5,0x0000,0x01e5
													; Debug Table 0xe.0x0 = 0x34b,0xffff
034c e5f8       |    |		Load	0x2,-0x8
034d 0092 0692  |    |		Action	Push_String_Extended,0x692					; "<1>"
034f e008       |    |		Load	0x0,0x8
0350 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0351 00e2       |    |		Load_Encached	Integer_Cache
0352 03f1       |    |		Declare_Variable	Discrete,With_Value
0353 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x1 = 0x353,0xfffe
0354 e5f8       |    |		Load	0x2,-0x8
0355 0092 0693  |    |		Action	Push_String_Extended,0x693					; "<2>"
0357 e008       |    |		Load	0x0,0x8
0358 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0359 00e2       |    |		Load_Encached	Integer_Cache
035a 03f1       |    |		Declare_Variable	Discrete,With_Value
035b 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0xe.0x2 = 0x35b,0xfffd
035c 0603       |    |		Execute_Immediate	Set_Value_Unchecked,0x3
035d 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0xe.0x3 = 0x35d,0xfffc
035e 0603       |    |		Execute_Immediate	Set_Value_Unchecked,0x3
035f 029f 066b  |   k|		Declare_Subprogram	INIT_0668,For_Call				; Debug Table 0xe.0x4 = 0x35f,0xfffb
0361			BODY_0348:
0361 e5f5       |    |		Load	0x2,-0xb							; Debug Table 0xe.0x5 = 0x361,0x1
0362 e5f6       |    |		Load	0x2,-0xa
0363 e002       |    |		Load	0x0,0x2
0364 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0365 689d       |h   |		Jump_Zero	0x403
0366 e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0x6 = 0x366,0x2
0367 7006       |p   |		Jump_Nonzero	0x36e
0368 e5f8       |    |		Load	0x2,-0x8							; Debug Table 0xe.0x7 = 0x368,0x3
0369 01dd       |    |		Execute	Vector,First
036a 0afd       |    |		Execute_Immediate	Plus,-0x3
036b 0248       | H  |		Execute	Discrete,Check_In_Integer
036c a402       |    |		Store_Unchecked	0x2,0x2
036d 781b       |x   |		Jump	0x389
036e e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0x8 = 0x36e,0x4
036f e5f8       |    |		Load	0x2,-0x8
0370 01dd       |    |		Execute	Vector,First
0371 0a01       |    |		Execute_Immediate	Plus,0x1
0372 e5f8       |    |		Load	0x2,-0x8
0373 01dc       |    |		Execute	Vector,Last
0374 0afd       |    |		Execute_Immediate	Plus,-0x3
0375 0262       | b  |		Execute	Discrete,In_Range
0376 6812       |h   |		Jump_Zero	0x389
0377 e402       |    |		Load	0x2,0x2
0378 0aff       |    |		Execute_Immediate	Plus,-0x1
0379 0248       | H  |		Execute	Discrete,Check_In_Integer
037a e402       |    |		Load	0x2,0x2
037b 0a03       |    |		Execute_Immediate	Plus,0x3
037c 0248       | H  |		Execute	Discrete,Check_In_Integer
037d e5f8       |    |		Load	0x2,-0x8
037e 01cf       |    |		Execute	Vector,Slice_Read
037f 0092 0694  |    |		Action	Push_String_Extended,0x694					; "<<1>>"
0381 01df       |    |		Execute	Vector,Equal
0382 6806       |h   |		Jump_Zero	0x389
0383 e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0x9 = 0x383,0x5
0384 0aff       |    |		Execute_Immediate	Plus,-0x1
0385 0248       | H  |		Execute	Discrete,Check_In_Integer
0386 a402       |    |		Store_Unchecked	0x2,0x2
0387 4805       |H   |		Short_Literal	0x5							; Debug Table 0xe.0xa = 0x387,0x6
0388 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0389 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0xb = 0x389,0x7
038a 7006       |p   |		Jump_Nonzero	0x391
038b e5f8       |    |		Load	0x2,-0x8							; Debug Table 0xe.0xc = 0x38b,0x8
038c 01dc       |    |		Execute	Vector,Last
038d 0a01       |    |		Execute_Immediate	Plus,0x1
038e 0248       | H  |		Execute	Discrete,Check_In_Integer
038f a403       |    |		Store_Unchecked	0x2,0x3
0390 781b       |x   |		Jump	0x3ac
0391 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0xd = 0x391,0x9
0392 e5f8       |    |		Load	0x2,-0x8
0393 01dd       |    |		Execute	Vector,First
0394 0a01       |    |		Execute_Immediate	Plus,0x1
0395 e5f8       |    |		Load	0x2,-0x8
0396 01dc       |    |		Execute	Vector,Last
0397 0afd       |    |		Execute_Immediate	Plus,-0x3
0398 0262       | b  |		Execute	Discrete,In_Range
0399 6812       |h   |		Jump_Zero	0x3ac
039a 00db       |    |		Load_Top	At_Offset_3
039b 0aff       |    |		Execute_Immediate	Plus,-0x1
039c 0248       | H  |		Execute	Discrete,Check_In_Integer
039d e403       |    |		Load	0x2,0x3
039e 0a03       |    |		Execute_Immediate	Plus,0x3
039f 0248       | H  |		Execute	Discrete,Check_In_Integer
03a0 e5f8       |    |		Load	0x2,-0x8
03a1 01cf       |    |		Execute	Vector,Slice_Read
03a2 0092 0695  |    |		Action	Push_String_Extended,0x695					; "<<2>>"
03a4 01df       |    |		Execute	Vector,Equal
03a5 6806       |h   |		Jump_Zero	0x3ac
03a6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0xe = 0x3a6,0xa
03a7 0aff       |    |		Execute_Immediate	Plus,-0x1
03a8 0248       | H  |		Execute	Discrete,Check_In_Integer
03a9 a403       |    |		Store_Unchecked	0x2,0x3
03aa 4805       |H   |		Short_Literal	0x5							; Debug Table 0xe.0xf = 0x3aa,0xb
03ab 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
03ac e402       |    |		Load	0x2,0x2								; Debug Table 0xe.0x10 = 0x3ac,0xc
03ad e403       |    |		Load	0x2,0x3
03ae 027a       | z  |		Execute	Discrete,Less_Equal
03af 682a       |h*  |		Jump_Zero	0x3da
03b0 e5f5       |    |		Load	0x2,-0xb							; Debug Table 0xe.0x11 = 0x3b0,0xd
03b1 e5f6       |    |		Load	0x2,-0xa
03b2 e5f8       |    |		Load	0x2,-0x8
03b3 01dd       |    |		Execute	Vector,First
03b4 e402       |    |		Load	0x2,0x2
03b5 0aff       |    |		Execute_Immediate	Plus,-0x1
03b6 0248       | H  |		Execute	Discrete,Check_In_Integer
03b7 e5f8       |    |		Load	0x2,-0x8
03b8 01cf       |    |		Execute	Vector,Slice_Read
03b9 e404       |    |		Load	0x2,0x4
03ba e5f9       |    |		Load	0x2,-0x7
03bb e5fa       |    |		Load	0x2,-0x6
03bc 0119       |    |		Execute	Any,Check_In_Formal_Type
03bd 8406       |    |		Call	0x2,0x6
03be 01cc       |    |		Execute	Vector,Catenate
03bf e402       |    |		Load	0x2,0x2
03c0 e404       |    |		Load	0x2,0x4
03c1 0273       | s  |		Execute	Discrete,Plus
03c2 0248       | H  |		Execute	Discrete,Check_In_Integer
03c3 e403       |    |		Load	0x2,0x3
03c4 0aff       |    |		Execute_Immediate	Plus,-0x1
03c5 0248       | H  |		Execute	Discrete,Check_In_Integer
03c6 e5f8       |    |		Load	0x2,-0x8
03c7 01cf       |    |		Execute	Vector,Slice_Read
03c8 01cc       |    |		Execute	Vector,Catenate
03c9 e405       |    |		Load	0x2,0x5
03ca e5f7       |    |		Load	0x2,-0x9
03cb e5fa       |    |		Load	0x2,-0x6
03cc 0119       |    |		Execute	Any,Check_In_Formal_Type
03cd 8406       |    |		Call	0x2,0x6
03ce 01cc       |    |		Execute	Vector,Catenate
03cf e403       |    |		Load	0x2,0x3
03d0 e405       |    |		Load	0x2,0x5
03d1 0273       | s  |		Execute	Discrete,Plus
03d2 0248       | H  |		Execute	Discrete,Check_In_Integer
03d3 e5f8       |    |		Load	0x2,-0x8
03d4 01dc       |    |		Execute	Vector,Last
03d5 e5f8       |    |		Load	0x2,-0x8
03d6 01cf       |    |		Execute	Vector,Slice_Read
03d7 01cc       |    |		Execute	Vector,Catenate
03d8 8213       |    |		Call	0x1,0x13
03d9 450c       |E   |		Exit_Suprogram	New_Top_Offset 0xc
03da e5f5       |    |		Load	0x2,-0xb							; Debug Table 0xe.0x12 = 0x3da,0xe
03db e5f6       |    |		Load	0x2,-0xa
03dc e5f8       |    |		Load	0x2,-0x8
03dd 01dd       |    |		Execute	Vector,First
03de e403       |    |		Load	0x2,0x3
03df 0aff       |    |		Execute_Immediate	Plus,-0x1
03e0 0248       | H  |		Execute	Discrete,Check_In_Integer
03e1 e5f8       |    |		Load	0x2,-0x8
03e2 01cf       |    |		Execute	Vector,Slice_Read
03e3 e405       |    |		Load	0x2,0x5
03e4 e5f7       |    |		Load	0x2,-0x9
03e5 e5fa       |    |		Load	0x2,-0x6
03e6 0119       |    |		Execute	Any,Check_In_Formal_Type
03e7 8406       |    |		Call	0x2,0x6
03e8 01cc       |    |		Execute	Vector,Catenate
03e9 e403       |    |		Load	0x2,0x3
03ea e405       |    |		Load	0x2,0x5
03eb 0273       | s  |		Execute	Discrete,Plus
03ec 0248       | H  |		Execute	Discrete,Check_In_Integer
03ed e402       |    |		Load	0x2,0x2
03ee 0aff       |    |		Execute_Immediate	Plus,-0x1
03ef 0248       | H  |		Execute	Discrete,Check_In_Integer
03f0 e5f8       |    |		Load	0x2,-0x8
03f1 01cf       |    |		Execute	Vector,Slice_Read
03f2 01cc       |    |		Execute	Vector,Catenate
03f3 e404       |    |		Load	0x2,0x4
03f4 e5f9       |    |		Load	0x2,-0x7
03f5 e5fa       |    |		Load	0x2,-0x6
03f6 0119       |    |		Execute	Any,Check_In_Formal_Type
03f7 8406       |    |		Call	0x2,0x6
03f8 01cc       |    |		Execute	Vector,Catenate
03f9 e402       |    |		Load	0x2,0x2
03fa e404       |    |		Load	0x2,0x4
03fb 0273       | s  |		Execute	Discrete,Plus
03fc 0248       | H  |		Execute	Discrete,Check_In_Integer
03fd e5f8       |    |		Load	0x2,-0x8
03fe 01dc       |    |		Execute	Vector,Last
03ff e5f8       |    |		Load	0x2,-0x8
0400 01cf       |    |		Execute	Vector,Slice_Read
0401 01cc       |    |		Execute	Vector,Catenate
0402 8213       |    |		Call	0x1,0x13
0403 450c       |E   |		Exit_Suprogram	New_Top_Offset 0xc
0404 0000 0000  |    |		.LITERAL	{0x00000000, 0x000005ca}
0408 0000 0000  |    |		.LITERAL	{0x00000000, 0x000005b0}
040c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000596}
0410 0000 0000  |    |		.LITERAL	{0x00000000, 0x0056f2b5}
0414 0000 0000  |    |		.BLANK	0000[0x4]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 041b       |    |		.CONST	0x041b								; Address of begin
0419 0004       |    |		.CONST	0x0004								; Address of exception handler
041a 0001       |    |		.CONST	0x0001								; Number of locals
041b			BODY_0418:
041b			INIT_0418:
041b e5fb       |    |		Load	0x2,-0x5							; Debug Table 0xf = .DEBUG	0x041b,0x090c,0x0001,0x0000,0x0056,0xefe5,0x0000,0x0232
													; Debug Table 0xf.0x0 = 0x41b,0x1
041c e5fc       |    |		Load	0x2,-0x4
041d e5fd       |    |		Load	0x2,-0x3
041e e5fe       |    |		Load	0x2,-0x2
041f e5ff       |    |		Load	0x2,-0x1
0420 e231       | 1  |		Load	0x1,0x31
0421 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
0422 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
0423 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
0424 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35
0425 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36
0426 8223       | #  |		Call	0x1,0x23
0427 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
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 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x10 = .DEBUG	0x042b,0x0910,0x0001,0x0000,0x0056,0xefe5,0x0000,0x025c
													; Debug Table 0x10.0x0 = 0x42b,0x1
042c e5fc       |    |		Load	0x2,-0x4
042d e5fd       |    |		Load	0x2,-0x3
042e e5fe       |    |		Load	0x2,-0x2
042f e5ff       |    |		Load	0x2,-0x1
0430 e239       | 9  |		Load	0x1,0x39
0431 1d3a       | :  |		Execute_Immediate	Reference_Lex_1,0x3a
0432 1d3b       | ;  |		Execute_Immediate	Reference_Lex_1,0x3b
0433 1d3c       | <  |		Execute_Immediate	Reference_Lex_1,0x3c
0434 1d3d       | =  |		Execute_Immediate	Reference_Lex_1,0x3d
0435 1d3e       | >  |		Execute_Immediate	Reference_Lex_1,0x3e
0436 8223       | #  |		Call	0x1,0x23
0437 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043b       | ;  |		.CONST	0x043b								; Address of begin
0439 0004       |    |		.CONST	0x0004								; Address of exception handler
043a 0001       |    |		.CONST	0x0001								; Number of locals
043b			BODY_0438:
043b			INIT_0438:
043b e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x11 = .DEBUG	0x043b,0x0914,0x0001,0x0000,0x0056,0xefe5,0x0000,0x0286
													; Debug Table 0x11.0x0 = 0x43b,0x1
043c e5fc       |    |		Load	0x2,-0x4
043d e5fd       |    |		Load	0x2,-0x3
043e e5fe       |    |		Load	0x2,-0x2
043f e5ff       |    |		Load	0x2,-0x1
0440 e241       | A  |		Load	0x1,0x41
0441 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42
0442 1d43       | C  |		Execute_Immediate	Reference_Lex_1,0x43
0443 00eb       |    |		Load_Encached	Diana_Cache
0444 1913       |    |		Execute	Package,Field_Reference,Field_Number 0x13
0445 00eb       |    |		Load_Encached	Diana_Cache
0446 1912       |    |		Execute	Package,Field_Reference,Field_Number 0x12
0447 1d46       | F  |		Execute_Immediate	Reference_Lex_1,0x46
0448 8223       | #  |		Call	0x1,0x23
0449 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
044a 0000 0000  |    |		.BLANK	0000[0x6]
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 045a       | Z  |		.CONST	0x045a								; Address of begin
0451 0004       |    |		.CONST	0x0004								; Address of exception handler
0452 0003       |    |		.CONST	0x0003								; Number of locals
0453			INIT_0450:
0453 e009       |    |		Load	0x0,0x9								; Debug Table 0x12 = .DEBUG	0x0453,0x0918,0x0001,0x0000,0x0056,0xefe5,0x0000,0x02b0
													; Debug Table 0x12.0x0 = 0x453,0xffff
0454 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0455 02c7       |    |		Declare_Variable	Any
0456 00db       |    |		Load_Top	At_Offset_3
0457 c402       |    |		Store	0x2,0x2
0458 e002       |    |		Load	0x0,0x2								; Debug Table 0x12.0x1 = 0x458,0xfffe
0459 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
045a			BODY_0450:
045a 00cf       |    |		Action	Mark_Auxiliary
045b 7824       |x$  |		Jump	0x480
045c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12.0x2 = 0x45c,0x2
045d e009       |    |		Load	0x0,0x9
045e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
045f 4604       |F   |		Jump_Case	0x5
0460 7804       |x   |		Jump	0x465								; case 0x0
0461 7806       |x   |		Jump	0x468								; case 0x1
0462 7808       |x   |		Jump	0x46b								; case 0x2
0463 7807       |x   |		Jump	0x46b								; case 0x3
0464 7809       |x   |		Jump	0x46e								; case 0x4
0465 4802       |H   |		Short_Literal	0x2							; Debug Table 0x12.0x3 = 0x465,0x3
0466 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0467 7808       |x   |		Jump	0x470
0468 4806       |H   |		Short_Literal	0x6							; Debug Table 0x12.0x4 = 0x468,0x4
0469 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
046a 7805       |x   |		Jump	0x470
046b 4807       |H   |		Short_Literal	0x7							; Debug Table 0x12.0x5 = 0x46b,0x5
046c 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
046d 7802       |x   |		Jump	0x470
046e 4808       |H   |		Short_Literal	0x8							; Debug Table 0x12.0x6 = 0x46e,0x6
046f 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0470 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x12.0x7 = 0x470,0x7
0471 00da       |    |		Load_Top	At_Offset_2
0472 e002       |    |		Load	0x0,0x2
0473 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0474 6806       |h   |		Jump_Zero	0x47b
0475 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x12.0x8 = 0x475,0x8
0476 00da       |    |		Load_Top	At_Offset_2
0477 e402       |    |		Load	0x2,0x2
0478 e009       |    |		Load	0x0,0x9
0479 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
047a 8213       |    |		Call	0x1,0x13
047b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12.0x9 = 0x47b,0x9
047c e009       |    |		Load	0x0,0x9
047d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
047e c402       |    |		Store	0x2,0x2
047f 00c9       |    |		Action	Pop_Auxiliary_Loop
0480 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12.0xa = 0x480,0x1
0481 e009       |    |		Load	0x0,0x9
0482 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0483 6fd8       |o   |		Jump_Zero	0x45c
0484 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0485 0000 0000  |    |		.XXX[0x3]
0487 0000       |    |
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 048b       |    |		.CONST	0x048b								; Address of begin
0489 0004       |    |		.CONST	0x0004								; Address of exception handler
048a 0001       |    |		.CONST	0x0001								; Number of locals
048b			BODY_0488:
048b			INIT_0488:
048b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13 = .DEBUG	0x048b,0x0930,0x0002,0x0000,0x0056,0xefe5,0x0000,0x02c3
													; Debug Table 0x13.0x0 = 0x48b,0x1
048c e22a       | *  |		Load	0x1,0x2a
048d 01d5       |    |		Execute	Vector,Field_Reference
048e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
048f 0000       |    |		.XXX[0x1]
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0493       |    |		.CONST	0x0493								; Address of begin
0491 0004       |    |		.CONST	0x0004								; Address of exception handler
0492 0001       |    |		.CONST	0x0001								; Number of locals
0493			BODY_0490:
0493			INIT_0490:
0493 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14 = .DEBUG	0x0493,0x0934,0x0002,0x0000,0x0056,0xf2b5,0x0000,0x00a8
													; Debug Table 0x14.0x0 = 0x493,0x1
0494 00d8       |    |		Load_Top	At_Offset_0
0495 4861       |Ha  |		Short_Literal	0x61
0496 487a       |Hz  |		Short_Literal	0x7a
0497 0262       | b  |		Execute	Discrete,In_Range
0498 7034       |p4  |		Jump_Nonzero	0x4cd
0499 00d8       |    |		Load_Top	At_Offset_0
049a 4841       |HA  |		Short_Literal	0x41
049b 485a       |HZ  |		Short_Literal	0x5a
049c 0262       | b  |		Execute	Discrete,In_Range
049d 702f       |p/  |		Jump_Nonzero	0x4cd
049e 00d8       |    |		Load_Top	At_Offset_0
049f 4830       |H0  |		Short_Literal	0x30
04a0 4839       |H9  |		Short_Literal	0x39
04a1 0262       | b  |		Execute	Discrete,In_Range
04a2 702a       |p*  |		Jump_Nonzero	0x4cd
04a3 0b5d       | ]  |		Execute_Immediate	Case_Compare,0x5d
04a4 7028       |p(  |		Jump_Nonzero	0x4cd
04a5 0b29       | )  |		Execute_Immediate	Case_Compare,0x29
04a6 7026       |p&  |		Jump_Nonzero	0x4cd
04a7 0b7d       | }  |		Execute_Immediate	Case_Compare,0x7d
04a8 7024       |p$  |		Jump_Nonzero	0x4cd
04a9 0b3e       | >  |		Execute_Immediate	Case_Compare,0x3e
04aa 7022       |p"  |		Jump_Nonzero	0x4cd
04ab 0b27       | '  |		Execute_Immediate	Case_Compare,0x27
04ac 7020       |p   |		Jump_Nonzero	0x4cd
04ad 0b22       | "  |		Execute_Immediate	Case_Compare,0x22
04ae 701e       |p   |		Jump_Nonzero	0x4cd
04af 0b40       | @  |		Execute_Immediate	Case_Compare,0x40
04b0 701c       |p   |		Jump_Nonzero	0x4cd
04b1 0b23       | #  |		Execute_Immediate	Case_Compare,0x23
04b2 701a       |p   |		Jump_Nonzero	0x4cd
04b3 0b24       | $  |		Execute_Immediate	Case_Compare,0x24
04b4 7018       |p   |		Jump_Nonzero	0x4cd
04b5 0b25       | %  |		Execute_Immediate	Case_Compare,0x25
04b6 7016       |p   |		Jump_Nonzero	0x4cd
04b7 0b5e       | ^  |		Execute_Immediate	Case_Compare,0x5e
04b8 7014       |p   |		Jump_Nonzero	0x4cd
04b9 0b5c       | \  |		Execute_Immediate	Case_Compare,0x5c
04ba 7012       |p   |		Jump_Nonzero	0x4cd
04bb 0b60       | `  |		Execute_Immediate	Case_Compare,0x60
04bc 7010       |p   |		Jump_Nonzero	0x4cd
04bd 0b21       | !  |		Execute_Immediate	Case_Compare,0x21
04be 7010       |p   |		Jump_Nonzero	0x4cf
04bf 0b3a       | :  |		Execute_Immediate	Case_Compare,0x3a
04c0 700e       |p   |		Jump_Nonzero	0x4cf
04c1 0b3b       | ;  |		Execute_Immediate	Case_Compare,0x3b
04c2 700c       |p   |		Jump_Nonzero	0x4cf
04c3 0b2c       | ,  |		Execute_Immediate	Case_Compare,0x2c
04c4 700a       |p   |		Jump_Nonzero	0x4cf
04c5 0b2e       | .  |		Execute_Immediate	Case_Compare,0x2e
04c6 7008       |p   |		Jump_Nonzero	0x4cf
04c7 0b20       |    |		Execute_Immediate	Case_Compare,0x20
04c8 7006       |p   |		Jump_Nonzero	0x4cf
04c9 0b3f       | ?  |		Execute_Immediate	Case_Compare,0x3f
04ca 7004       |p   |		Jump_Nonzero	0x4cf
04cb 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0x1 = 0x4cb,0x4
04cc 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04cd 4800       |H   |		Short_Literal	0x0							; Debug Table 0x14.0x2 = 0x4cd,0x2
04ce 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04cf 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0x3 = 0x4cf,0x3
04d0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04d1 0000 0000  |    |		.BLANK	0000[0x7]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04db       |    |		.CONST	0x04db								; Address of begin
04d9 0004       |    |		.CONST	0x0004								; Address of exception handler
04da 0001       |    |		.CONST	0x0001								; Number of locals
04db			BODY_04d8:
04db			INIT_04d8:
04db e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x15 = .DEBUG	0x04db,0x093e,0x0002,0x0000,0x0056,0xf2b5,0x0000,0x00e5
													; Debug Table 0x15.0x0 = 0x4db,0x1
04dc 4608       |F   |		Jump_Case	0x9
04dd 7857       |xW  |		Jump	0x535								; case 0x0
04de 7807       |x   |		Jump	0x4e6								; case 0x1
04df 7810       |x   |		Jump	0x4f0								; case 0x2
04e0 7819       |x   |		Jump	0x4fa								; case 0x3
04e1 7822       |x"  |		Jump	0x504								; case 0x4
04e2 782b       |x+  |		Jump	0x50e								; case 0x5
04e3 7834       |x4  |		Jump	0x518								; case 0x6
04e4 783d       |x=  |		Jump	0x522								; case 0x7
04e5 7846       |xF  |		Jump	0x52c								; case 0x8
04e6 4820       |H   |		Short_Literal	0x20							; Debug Table 0x15.0x1 = 0x4e6,0x2
04e7 4801       |H   |		Short_Literal	0x1
04e8 4800       |H   |		Short_Literal	0x0
04e9 4800       |H   |		Short_Literal	0x0
04ea e00a       |    |		Load	0x0,0xa
04eb 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
04ec e00a       |    |		Load	0x0,0xa
04ed 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
04ee 01cb       |    |		Execute	Vector,Append
04ef 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
04f0 4820       |H   |		Short_Literal	0x20							; Debug Table 0x15.0x2 = 0x4f0,0x3
04f1 4801       |H   |		Short_Literal	0x1
04f2 4801       |H   |		Short_Literal	0x1
04f3 4800       |H   |		Short_Literal	0x0
04f4 e00a       |    |		Load	0x0,0xa
04f5 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
04f6 e00a       |    |		Load	0x0,0xa
04f7 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
04f8 01cb       |    |		Execute	Vector,Append
04f9 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
04fa 4820       |H   |		Short_Literal	0x20							; Debug Table 0x15.0x3 = 0x4fa,0x4
04fb 4801       |H   |		Short_Literal	0x1
04fc 4802       |H   |		Short_Literal	0x2
04fd 4800       |H   |		Short_Literal	0x0
04fe e00a       |    |		Load	0x0,0xa
04ff 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0500 e00a       |    |		Load	0x0,0xa
0501 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0502 01cb       |    |		Execute	Vector,Append
0503 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0504 4820       |H   |		Short_Literal	0x20							; Debug Table 0x15.0x4 = 0x504,0x5
0505 4802       |H   |		Short_Literal	0x2
0506 4800       |H   |		Short_Literal	0x0
0507 4800       |H   |		Short_Literal	0x0
0508 e00a       |    |		Load	0x0,0xa
0509 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
050a e00a       |    |		Load	0x0,0xa
050b 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
050c 01cb       |    |		Execute	Vector,Append
050d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
050e 4820       |H   |		Short_Literal	0x20							; Debug Table 0x15.0x5 = 0x50e,0x6
050f 4802       |H   |		Short_Literal	0x2
0510 4800       |H   |		Short_Literal	0x0
0511 4801       |H   |		Short_Literal	0x1
0512 e00a       |    |		Load	0x0,0xa
0513 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0514 e00a       |    |		Load	0x0,0xa
0515 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0516 01cb       |    |		Execute	Vector,Append
0517 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0518 4820       |H   |		Short_Literal	0x20							; Debug Table 0x15.0x6 = 0x518,0x7
0519 4802       |H   |		Short_Literal	0x2
051a 4800       |H   |		Short_Literal	0x0
051b 4802       |H   |		Short_Literal	0x2
051c e00a       |    |		Load	0x0,0xa
051d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
051e e00a       |    |		Load	0x0,0xa
051f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0520 01cb       |    |		Execute	Vector,Append
0521 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0522 4820       |H   |		Short_Literal	0x20							; Debug Table 0x15.0x7 = 0x522,0x8
0523 4802       |H   |		Short_Literal	0x2
0524 4800       |H   |		Short_Literal	0x0
0525 4803       |H   |		Short_Literal	0x3
0526 e00a       |    |		Load	0x0,0xa
0527 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0528 e00a       |    |		Load	0x0,0xa
0529 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
052a 01cb       |    |		Execute	Vector,Append
052b 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
052c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15.0x8 = 0x52c,0x9
052d 6803       |h   |		Jump_Zero	0x531
052e 0092 0696  |    |		Action	Push_String_Extended,0x696					; "... "
													; Debug Table 0x15.0x9 = 0x52e,0xa
0530 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0531 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x15.0xa = 0x531,0xb
0532 e22a       | *  |		Load	0x1,0x2a
0533 01d5       |    |		Execute	Vector,Field_Reference
0534 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0535 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x15.0xb = 0x535,0xc
0536 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0537 0000       |    |		.XXX[0x1]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 053b       | ;  |		.CONST	0x053b								; Address of begin
0539 0004       |    |		.CONST	0x0004								; Address of exception handler
053a 0001       |    |		.CONST	0x0001								; Number of locals
053b			BODY_0538:
053b			INIT_0538:
053b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x16 = .DEBUG	0x053b,0x0958,0x0002,0x0000,0x0056,0xf2b5,0x0000,0x01e7
													; Debug Table 0x16.0x0 = 0x53b,0x1
053c 6827       |h'  |		Jump_Zero	0x564
053d 4801       |H   |		Short_Literal	0x1
053e e5fd       |    |		Load	0x2,-0x3
053f 01d7       |    |		Execute	Vector,Field_Read
0540 0f08       |    |		Execute_Immediate	Equal,0x8
0541 7022       |p"  |		Jump_Nonzero	0x564
0542 4802       |H   |		Short_Literal	0x2
0543 e5fd       |    |		Load	0x2,-0x3
0544 01d7       |    |		Execute	Vector,Field_Read
0545 0f08       |    |		Execute_Immediate	Equal,0x8
0546 701d       |p   |		Jump_Nonzero	0x564
0547 4803       |H   |		Short_Literal	0x3
0548 e5fd       |    |		Load	0x2,-0x3
0549 01d7       |    |		Execute	Vector,Field_Read
054a 0f08       |    |		Execute_Immediate	Equal,0x8
054b 7018       |p   |		Jump_Nonzero	0x564
054c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x16.0x1 = 0x54c,0x2
054d e5fd       |    |		Load	0x2,-0x3
054e 01d7       |    |		Execute	Vector,Field_Read
054f e5fe       |    |		Load	0x2,-0x2
0550 e5ff       |    |		Load	0x2,-0x1
0551 822e       | .  |		Call	0x1,0x2e
0552 4802       |H   |		Short_Literal	0x2
0553 e5fd       |    |		Load	0x2,-0x3
0554 01d7       |    |		Execute	Vector,Field_Read
0555 e5fe       |    |		Load	0x2,-0x2
0556 e5ff       |    |		Load	0x2,-0x1
0557 822e       | .  |		Call	0x1,0x2e
0558 01cc       |    |		Execute	Vector,Catenate
0559 4803       |H   |		Short_Literal	0x3
055a e5fd       |    |		Load	0x2,-0x3
055b 01d7       |    |		Execute	Vector,Field_Read
055c e5fe       |    |		Load	0x2,-0x2
055d e5ff       |    |		Load	0x2,-0x1
055e 822e       | .  |		Call	0x1,0x2e
055f 01cc       |    |		Execute	Vector,Catenate
0560 0092 0696  |    |		Action	Push_String_Extended,0x696					; "... "
0562 01cc       |    |		Execute	Vector,Catenate
0563 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0564 4801       |H   |		Short_Literal	0x1							; Debug Table 0x16.0x2 = 0x564,0x3
0565 e5fd       |    |		Load	0x2,-0x3
0566 01d7       |    |		Execute	Vector,Field_Read
0567 e5fe       |    |		Load	0x2,-0x2
0568 e5ff       |    |		Load	0x2,-0x1
0569 822e       | .  |		Call	0x1,0x2e
056a 4802       |H   |		Short_Literal	0x2
056b e5fd       |    |		Load	0x2,-0x3
056c 01d7       |    |		Execute	Vector,Field_Read
056d e5fe       |    |		Load	0x2,-0x2
056e e5ff       |    |		Load	0x2,-0x1
056f 822e       | .  |		Call	0x1,0x2e
0570 01cc       |    |		Execute	Vector,Catenate
0571 4803       |H   |		Short_Literal	0x3
0572 e5fd       |    |		Load	0x2,-0x3
0573 01d7       |    |		Execute	Vector,Field_Read
0574 e5fe       |    |		Load	0x2,-0x2
0575 e5ff       |    |		Load	0x2,-0x1
0576 822e       | .  |		Call	0x1,0x2e
0577 01cc       |    |		Execute	Vector,Catenate
0578 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0579 0000 0000  |    |		.BLANK	0000[0x7]
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 0583       |    |		.CONST	0x0583								; Address of begin
0581 0004       |    |		.CONST	0x0004								; Address of exception handler
0582 0001       |    |		.CONST	0x0001								; Number of locals
0583			BODY_0580:
0583			INIT_0580:
0583 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x17 = .DEBUG	0x0583,0x0960,0x0002,0x0000,0x0056,0xf2b5,0x0000,0x0272
0584 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x17.0x0 = 0x584,0x1
0585 01dd       |    |		Execute	Vector,First
0586 e5ff       |    |		Load	0x2,-0x1
0587 01dd       |    |		Execute	Vector,First
0588 e5fe       |    |		Load	0x2,-0x2
0589 0273       | s  |		Execute	Discrete,Plus
058a 0aff       |    |		Execute_Immediate	Plus,-0x1
058b 0248       | H  |		Execute	Discrete,Check_In_Integer
058c 0264       | d  |		Execute	Discrete,Below_Bound
058d 7011       |p   |		Jump_Nonzero	0x59f
058e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x1 = 0x58e,0x2
058f e5ff       |    |		Load	0x2,-0x1
0590 01d7       |    |		Execute	Vector,Field_Read
0591 0b20       |    |		Execute_Immediate	Case_Compare,0x20
0592 7007       |p   |		Jump_Nonzero	0x59a
0593 0b2c       | ,  |		Execute_Immediate	Case_Compare,0x2c
0594 7005       |p   |		Jump_Nonzero	0x59a
0595 0b2e       | .  |		Execute_Immediate	Case_Compare,0x2e
0596 7003       |p   |		Jump_Nonzero	0x59a
0597 0b3a       | :  |		Execute_Immediate	Case_Compare,0x3a
0598 7001       |p   |		Jump_Nonzero	0x59a
0599 7802       |x   |		Jump	0x59c								; Debug Table 0x17.0x2 = 0x599,0x4
059a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x17.0x3 = 0x59a,0x3
059b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
059c 00d1       |    |		Pop_Control	Pop_Count_1
059d 00c8       |    |		Action	Pop_Auxiliary_Range
059e 37ef       |7   |		Loop_Decreasing	0x58e
059f 00c9       |    |		Action	Pop_Auxiliary_Loop
05a0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x17.0x4 = 0x5a0,0x5
05a1 01dc       |    |		Execute	Vector,Last
05a2 e5ff       |    |		Load	0x2,-0x1
05a3 01dd       |    |		Execute	Vector,First
05a4 e5fe       |    |		Load	0x2,-0x2
05a5 0273       | s  |		Execute	Discrete,Plus
05a6 0248       | H  |		Execute	Discrete,Check_In_Integer
05a7 0263       | c  |		Execute	Discrete,Above_Bound
05a8 7011       |p   |		Jump_Nonzero	0x5ba
05a9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x5 = 0x5a9,0x6
05aa e5ff       |    |		Load	0x2,-0x1
05ab 01d7       |    |		Execute	Vector,Field_Read
05ac 0b20       |    |		Execute_Immediate	Case_Compare,0x20
05ad 7007       |p   |		Jump_Nonzero	0x5b5
05ae 0b2c       | ,  |		Execute_Immediate	Case_Compare,0x2c
05af 7005       |p   |		Jump_Nonzero	0x5b5
05b0 0b2e       | .  |		Execute_Immediate	Case_Compare,0x2e
05b1 7003       |p   |		Jump_Nonzero	0x5b5
05b2 0b3a       | :  |		Execute_Immediate	Case_Compare,0x3a
05b3 7001       |p   |		Jump_Nonzero	0x5b5
05b4 7802       |x   |		Jump	0x5b7								; Debug Table 0x17.0x6 = 0x5b4,0x8
05b5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x17.0x7 = 0x5b5,0x7
05b6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
05b7 00d1       |    |		Pop_Control	Pop_Count_1
05b8 00c8       |    |		Action	Pop_Auxiliary_Range
05b9 3fef       |?   |		Loop_Increasing	0x5a9
05ba 00ce       |    |		Action	Pop_Auxiliary
05bb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x17.0x8 = 0x5bb,0x9
05bc 01dc       |    |		Execute	Vector,Last
05bd 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
05be 0000 0000  |    |		.XXX[0x2]
05c0 ; --------------------------------------------------------------------------------------
05c0 ; SUBPROGRAM
05c0 ; --------------------------------------------------------------------------------------
05c0 05ce       |    |		.CONST	0x05ce								; Address of begin
05c1 0004       |    |		.CONST	0x0004								; Address of exception handler
05c2 0003       |    |		.CONST	0x0003								; Number of locals
05c3			INIT_05c0:
05c3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x18 = .DEBUG	0x05c3,0x0974,0x0001,0x0000,0x0056,0xf2b5,0x0000,0x0880
													; Debug Table 0x18.0x0 = 0x5c3,0xffff
05c4 01db       |    |		Execute	Vector,Length
05c5 00e3       |    |		Load_Encached	Natural_Cache
05c6 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
05c7 4801       |H   |		Short_Literal	0x1							; Debug Table 0x18.0x1 = 0x5c7,0xfffe
05c8 00d9       |    |		Load_Top	At_Offset_1
05c9 00e9       |    |		Load_Encached	String_Cache
05ca 0334       | 4  |		Declare_Variable	Array,With_Constraint
05cb e5ff       |    |		Load	0x2,-0x1
05cc 00d9       |    |		Load_Top	At_Offset_1
05cd 01d4       |    |		Execute	Vector,Structure_Write
05ce			BODY_05c0:
05ce 00cf       |    |		Action	Mark_Auxiliary
05cf e002       |    |		Load	0x0,0x2								; Debug Table 0x18.0x2 = 0x5cf,0x1
05d0 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
05d1 0265       | e  |		Execute	Discrete,Reverse_Bounds
05d2 4800       |H   |		Short_Literal	0x0							; Debug Table 0x18.0x3 = 0x5d2,0x2
05d3 e5ff       |    |		Load	0x2,-0x1
05d4 00da       |    |		Load_Top	At_Offset_2
05d5 e22a       | *  |		Load	0x1,0x2a
05d6 01d5       |    |		Execute	Vector,Field_Reference
05d7 e008       |    |		Load	0x0,0x8
05d8 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
05d9 6805       |h   |		Jump_Zero	0x5df
05da 4800       |H   |		Short_Literal	0x0							; Debug Table 0x18.0x4 = 0x5da,0x3
05db a5fd       |    |		Store_Unchecked	0x2,-0x3
05dc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x5 = 0x5dc,0x4
05dd a5fe       |    |		Store_Unchecked	0x2,-0x2
05de 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x18.0x6 = 0x5de,0x5
05df 00c8       |    |		Action	Pop_Auxiliary_Range
05e0 3ff1       |?   |		Loop_Increasing	0x5d2
05e1 00ce       |    |		Action	Pop_Auxiliary
05e2 4802       |H   |		Short_Literal	0x2							; Debug Table 0x18.0x7 = 0x5e2,0x6
05e3 a5fe       |    |		Store_Unchecked	0x2,-0x2
05e4 4800       |H   |		Short_Literal	0x0							; Debug Table 0x18.0x8 = 0x5e4,0x7
05e5 e5ff       |    |		Load	0x2,-0x1
05e6 0092 0696  |    |		Action	Push_String_Extended,0x696					; "... "
05e8 e008       |    |		Load	0x0,0x8
05e9 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
05ea 0e00       |    |		Execute_Immediate	Not_Equal,0x0
05eb a5fd       |    |		Store_Unchecked	0x2,-0x3
05ec 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
05ed 0000 0000  |    |		.XXX[0x3]
05ef 0000       |    |
05f0 ; --------------------------------------------------------------------------------------
05f0 ; SUBPROGRAM
05f0 ; --------------------------------------------------------------------------------------
05f0 05f3       |    |		.CONST	0x05f3								; Address of begin
05f1 0004       |    |		.CONST	0x0004								; Address of exception handler
05f2 0001       |    |		.CONST	0x0001								; Number of locals
05f3			BODY_05f0:
05f3			INIT_05f0:
05f3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19 = .DEBUG	0x05f3,0x0988,0x0001,0x0000,0x0056,0xf2b5,0x0000,0x02fd
													; Debug Table 0x19.0x0 = 0x5f3,0x1
05f4 01db       |    |		Execute	Vector,Length
05f5 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
05f6 683d       |h=  |		Jump_Zero	0x634
05f7 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x19.0x1 = 0x5f7,0x2
05f8 e402       |    |		Load	0x2,0x2								; Debug Table 0x19.0x2 = 0x5f8,0xfbff
05f9 e5fe       |    |		Load	0x2,-0x2
05fa e7fe       |    |		Load	0x3,-0x2
05fb 822f       | /  |		Call	0x1,0x2f
05fc e403       |    |		Load	0x2,0x3								; Debug Table 0x19.0x3 = 0x5fc,0xfbfe
05fd 00d9       |    |		Load_Top	At_Offset_1
05fe 01db       |    |		Execute	Vector,Length
05ff 0272       | r  |		Execute	Discrete,Minus
0600 0248       | H  |		Execute	Discrete,Check_In_Integer
0601 00e2       |    |		Load_Encached	Integer_Cache
0602 03f1       |    |		Declare_Variable	Discrete,With_Value
0603 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x19.0x4 = 0x603,0xfbfd
0604 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x19.0x5 = 0x604,0x401
0605 0d00       |    |		Execute_Immediate	Less,0x0
0606 6802       |h   |		Jump_Zero	0x609
0607 4800       |H   |		Short_Literal	0x0							; Debug Table 0x19.0x6 = 0x607,0x402
0608 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0609 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x19.0x7 = 0x609,0x403
060a 01db       |    |		Execute	Vector,Length
060b 00da       |    |		Load_Top	At_Offset_2
060c 027a       | z  |		Execute	Discrete,Less_Equal
060d 6807       |h   |		Jump_Zero	0x615
060e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19.0x8 = 0x60e,0x404
060f e7ff       |    |		Load	0x3,-0x1
0610 01cc       |    |		Execute	Vector,Catenate
0611 e404       |    |		Load	0x2,0x4
0612 e001       |    |		Load	0x0,0x1
0613 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
0614 781d       |x   |		Jump	0x632
0615 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x19.0x9 = 0x615,0x405
0616 e7ff       |    |		Load	0x3,-0x1
0617 8230       | 0  |		Call	0x1,0x30
0618 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0619 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19.0xa = 0x619,0x406
061a e7ff       |    |		Load	0x3,-0x1
061b 01dd       |    |		Execute	Vector,First
061c 00da       |    |		Load_Top	At_Offset_2
061d e7ff       |    |		Load	0x3,-0x1
061e 01cf       |    |		Execute	Vector,Slice_Read
061f 01cc       |    |		Execute	Vector,Catenate
0620 e404       |    |		Load	0x2,0x4
0621 e001       |    |		Load	0x0,0x1
0622 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
0623 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x19.0xb = 0x623,0x407
0624 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x19.0xc = 0x624,0xf7ff
0625 0a01       |    |		Execute_Immediate	Plus,0x1
0626 0248       | H  |		Execute	Discrete,Check_In_Integer
0627 e7ff       |    |		Load	0x3,-0x1
0628 01dc       |    |		Execute	Vector,Last
0629 00e9       |    |		Load_Encached	String_Cache
062a 035b       | [  |		Declare_Type	Array,Constrained
062b e7ff       |    |		Load	0x3,-0x1
062c 01cd       |    |		Execute	Vector,Slice_Reference
062d 4801       |H   |		Short_Literal	0x1							; Debug Table 0x19.0xd = 0x62d,0x801
062e 00d9       |    |		Load_Top	At_Offset_1
062f 8405       |    |		Call	0x2,0x5
0630 00d1       |    |		Pop_Control	Pop_Count_1
0631 00ce       |    |		Action	Pop_Auxiliary
0632 00d3       |    |		Pop_Control	Pop_Count_3
0633 00ce       |    |		Action	Pop_Auxiliary
0634 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0635 0000 0000  |    |		.XXX[0x3]
0637 0000       |    |
0638 ; --------------------------------------------------------------------------------------
0638 ; SUBPROGRAM
0638 ; --------------------------------------------------------------------------------------
0638 063e       | >  |		.CONST	0x063e								; Address of begin
0639 0004       |    |		.CONST	0x0004								; Address of exception handler
063a 0003       |    |		.CONST	0x0003								; Number of locals
063b			INIT_0638:
063b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1a = .DEBUG	0x063b,0x09a6,0x0001,0x0000,0x0056,0xf2b5,0x0000,0x0905
													; Debug Table 0x1a.0x0 = 0x63b,0xffff
063c e002       |    |		Load	0x0,0x2								; Debug Table 0x1a.0x1 = 0x63c,0xfffe
063d 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
063e			BODY_0638:
063e e404       |    |		Load	0x2,0x4								; Debug Table 0x1a.0x2 = 0x63e,0x1
063f 0a01       |    |		Execute_Immediate	Plus,0x1
0640 0248       | H  |		Execute	Discrete,Check_In_Integer
0641 a404       |    |		Store_Unchecked	0x2,0x4
0642 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1a.0x3 = 0x642,0x2
0643 e002       |    |		Load	0x0,0x2
0644 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0645 e7ff       |    |		Load	0x3,-0x1
0646 8249       | I  |		Call	0x1,0x49
0647 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0648 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0649 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1a.0x4 = 0x649,0x3
064a 6803       |h   |		Jump_Zero	0x64e
064b e404       |    |		Load	0x2,0x4
064c 0f01       |    |		Execute_Immediate	Equal,0x1
064d 7801       |x   |		Jump	0x64f
064e 4800       |H   |		Short_Literal	0x0
064f 7004       |p   |		Jump_Nonzero	0x654
0650 00d8       |    |		Load_Top	At_Offset_0
0651 e5fd       |    |		Load	0x2,-0x3
0652 01d7       |    |		Execute	Vector,Field_Read
0653 6807       |h   |		Jump_Zero	0x65b
0654 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1a.0x5 = 0x654,0x4
0655 e403       |    |		Load	0x2,0x3
0656 e001       |    |		Load	0x0,0x1
0657 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
0658 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1a.0x6 = 0x658,0x5
0659 a404       |    |		Store_Unchecked	0x2,0x4
065a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
065b e404       |    |		Load	0x2,0x4								; Debug Table 0x1a.0x7 = 0x65b,0x6
065c 0f02       |    |		Execute_Immediate	Equal,0x2
065d 6805       |h   |		Jump_Zero	0x663
065e 0092 0697  |    |		Action	Push_String_Extended,0x697					; "..."
													; Debug Table 0x1a.0x8 = 0x65e,0x7
0660 e403       |    |		Load	0x2,0x3
0661 e001       |    |		Load	0x0,0x1
0662 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
0663 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0664 0000 0000  |    |		.BLANK	0000[0x4]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 066b       | k  |		.CONST	0x066b								; Address of begin
0669 067f       |    |		.CONST	0x067f								; Address of exception handler
066a 0001       |    |		.CONST	0x0001								; Number of locals
066b			BODY_0668:
066b			INIT_0668:
066b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1b = .DEBUG	0x066b,0x09ba,0x0802,0x0002,0x0056,0xf2b5,0x0000,0x044a
													; Debug Table 0x1b.0x0 = 0x66b,0x1
066c e5fa       |    |		Load	0x2,-0x6
066d 0119       |    |		Execute	Any,Check_In_Formal_Type
066e 85fd       |    |		Call	0x2,-0x3
066f 6802       |h   |		Jump_Zero	0x672
0670 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x1b.0x1 = 0x670,0x2
0671 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0672 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x2 = 0x672,0x3
0673 0f03       |    |		Execute_Immediate	Equal,0x3
0674 6805       |h   |		Jump_Zero	0x67a
0675 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1b.0x3 = 0x675,0x4
0676 e5fa       |    |		Load	0x2,-0x6
0677 0119       |    |		Execute	Any,Check_In_Formal_Type
0678 85fb       |    |		Call	0x2,-0x5
0679 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
067a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1b.0x4 = 0x67a,0x5
067b e5fa       |    |		Load	0x2,-0x6
067c 0119       |    |		Execute	Any,Check_In_Formal_Type
067d 85fc       |    |		Call	0x2,-0x4
067e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
067f			TRAP_0668:
067f 0007       |    |		Action	Break_Optional
0680 0092 0698  |    |		Action	Push_String_Extended,0x698					; "[<ANONYMOUS OBJECT>]"
													; Debug Table 0x1b.0x5 = 0x680,0x6
0682 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0683 ; --------------------------------------------------------------------------------------
0683 ; STRING TABLE
0683 ; --------------------------------------------------------------------------------------
0683 002e       | .  |		.STRTAB	0x002e->0x069a							; "::: "
0684 0030       | 0  |		.STRTAB	0x0030->0x069c							; "??? "
0685 0032       | 2  |		.STRTAB	0x0032->0x069e							; "--- "
0686 0034       | 4  |		.STRTAB	0x0034->0x06a0							; "+++ "
0687 0036       | 6  |		.STRTAB	0x0036->0x06a2							; ">>> "
0688 0038       | 8  |		.STRTAB	0x0038->0x06a4							; "++* "
0689 003a       | :  |		.STRTAB	0x003a->0x06a6							; "!!! "
068a 003c       | <  |		.STRTAB	0x003c->0x06a8							; "*** "
068b 003e       | >  |		.STRTAB	0x003e->0x06aa							; "%%% "
068c 0040       | @  |		.STRTAB	0x0040->0x06ac							; "### "
068d 0042       | B  |		.STRTAB	0x0042->0x06ae							; "@@@ "
068e 0044       | D  |		.STRTAB	0x0044->0x06b0							; "$$$ "
068f 0046       | F  |		.STRTAB	0x0046->0x06b2							; "   "
0690 0047       | G  |		.STRTAB	0x0047->0x06b3							; " => "
0691 0049       | I  |		.STRTAB	0x0049->0x06b5							; "."
0692 0048       | H  |		.STRTAB	0x0048->0x06b6							; "<1>"
0693 0049       | I  |		.STRTAB	0x0049->0x06b7							; "<2>"
0694 004a       | J  |		.STRTAB	0x004a->0x06b9							; "<<1>>"
0695 004d       | M  |		.STRTAB	0x004d->0x06bb							; "<<2>>"
0696 0050       | P  |		.STRTAB	0x0050->0x06be							; "... "
0697 0052       | R  |		.STRTAB	0x0052->0x06c0							; "..."
0698 0053       | S  |		.STRTAB	0x0053->0x06c1							; "[<ANONYMOUS OBJECT>]"
0699 0065       | e  |		.STREND 0x0065->0x06cb
069a 3a3a 3a20  |::: |		.STRTAB_STRINGS
06cc 0000 0000  |    |		.BLANK	0000[0x4]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; Debug Table
06d0 ; --------------------------------------------------------------------------------------
06d0 0003 001c  |    |		.CONST	0x0003,0x001c
06d2 000b 07b2  |    |		.DEBUG	0x000b,0x07b2,0x8000,0x0000,0x0056,0xefe5,0x0000,0x0011
06da 004b 07f0  | K  |		.DEBUG	0x004b,0x07f0,0x8000,0x0000,0x0056,0xf2b5,0x0000,0x0015
06e2 0143 082e  | C .|		.DEBUG	0x0143,0x082e,0x0001,0x0000,0x0056,0xefe5,0x0000,0x001f
06ea 0153 0834  | S 4|		.DEBUG	0x0153,0x0834,0x0001,0x0000,0x0056,0xefe5,0x0000,0x0030
06f2 0163 083a  | c :|		.DEBUG	0x0163,0x083a,0x0001,0x0000,0x0056,0xefe5,0x0000,0x003d
06fa 016b 083e  | k >|		.DEBUG	0x016b,0x083e,0x0001,0x0000,0x0056,0xefe5,0x0000,0x004a
0702 019b 0854  |   T|		.DEBUG	0x019b,0x0854,0x0001,0x0000,0x0056,0xefe5,0x0000,0x005d
070a 01fb 086e  |   n|		.DEBUG	0x01fb,0x086e,0x0001,0x0000,0x0056,0xefe5,0x0000,0x0070
0712 0243 088e  | C  |		.DEBUG	0x0243,0x088e,0x0001,0x0000,0x0056,0xefe5,0x0000,0x008a
071a 0293 08b2  |    |		.DEBUG	0x0293,0x08b2,0x0001,0x0000,0x0056,0xefe5,0x0000,0x00a0
0722 02eb 08c0  |    |		.DEBUG	0x02eb,0x08c0,0x0001,0x0000,0x0056,0xefe5,0x0000,0x017f
072a 02fb 08c6  |    |		.DEBUG	0x02fb,0x08c6,0x0001,0x0000,0x0056,0xefe5,0x0000,0x0193
0732 030b 08cc  |    |		.DEBUG	0x030b,0x08cc,0x0001,0x0000,0x0056,0xefe5,0x0000,0x01cb
073a 032b 08d8  | +  |		.DEBUG	0x032b,0x08d8,0x0001,0x0000,0x0056,0xefe5,0x0000,0x01d8
0742 034b 08e4  | K  |		.DEBUG	0x034b,0x08e4,0x2801,0x0002,0x0056,0xefe5,0x0000,0x01e5
074a 041b 090c  |    |		.DEBUG	0x041b,0x090c,0x0001,0x0000,0x0056,0xefe5,0x0000,0x0232
0752 042b 0910  | +  |		.DEBUG	0x042b,0x0910,0x0001,0x0000,0x0056,0xefe5,0x0000,0x025c
075a 043b 0914  | ;  |		.DEBUG	0x043b,0x0914,0x0001,0x0000,0x0056,0xefe5,0x0000,0x0286
0762 0453 0918  | S  |		.DEBUG	0x0453,0x0918,0x0001,0x0000,0x0056,0xefe5,0x0000,0x02b0
076a 048b 0930  |   0|		.DEBUG	0x048b,0x0930,0x0002,0x0000,0x0056,0xefe5,0x0000,0x02c3
0772 0493 0934  |   4|		.DEBUG	0x0493,0x0934,0x0002,0x0000,0x0056,0xf2b5,0x0000,0x00a8
077a 04db 093e  |   >|		.DEBUG	0x04db,0x093e,0x0002,0x0000,0x0056,0xf2b5,0x0000,0x00e5
0782 053b 0958  | ; X|		.DEBUG	0x053b,0x0958,0x0002,0x0000,0x0056,0xf2b5,0x0000,0x01e7
078a 0583 0960  |   `|		.DEBUG	0x0583,0x0960,0x0002,0x0000,0x0056,0xf2b5,0x0000,0x0272
0792 05c3 0974  |   t|		.DEBUG	0x05c3,0x0974,0x0001,0x0000,0x0056,0xf2b5,0x0000,0x0880
079a 05f3 0988  |    |		.DEBUG	0x05f3,0x0988,0x0001,0x0000,0x0056,0xf2b5,0x0000,0x02fd
07a2 063b 09a6  | ;  |		.DEBUG	0x063b,0x09a6,0x0001,0x0000,0x0056,0xf2b5,0x0000,0x0905
07aa 066b 09ba  | k  |		.DEBUG	0x066b,0x09ba,0x0802,0x0002,0x0056,0xf2b5,0x0000,0x044a
07b2 ; --------------------------------------------------------------------------------------
07b2 ; Debug3 Subtable 0x0
07b2 ; --------------------------------------------------------------------------------------
07b2 001e 0000  |    |		.DBG3TAB	0x001e,0x0000
07b4 000b ffff  |    |		.CONST	0x000b,0xffff
07b6 000b fffe  |    |		.CONST	0x000b,0xfffe
07b8 000b fffd  |    |		.CONST	0x000b,0xfffd
07ba 000d fffc  |    |		.CONST	0x000d,0xfffc
07bc 000f fffb  |    |		.CONST	0x000f,0xfffb
07be 0011 fffa  |    |		.CONST	0x0011,0xfffa
07c0 0013 fff9  |    |		.CONST	0x0013,0xfff9
07c2 0015 fff8  |    |		.CONST	0x0015,0xfff8
07c4 0017 fff7  |    |		.CONST	0x0017,0xfff7
07c6 0019 fff6  |    |		.CONST	0x0019,0xfff6
07c8 001b fff5  |    |		.CONST	0x001b,0xfff5
07ca 001d fff4  |    |		.CONST	0x001d,0xfff4
07cc 001f fff3  |    |		.CONST	0x001f,0xfff3
07ce 0021 fff2  | !  |		.CONST	0x0021,0xfff2
07d0 0023 fff1  | #  |		.CONST	0x0023,0xfff1
07d2 0026 fff0  | &  |		.CONST	0x0026,0xfff0
07d4 0028 ffef  | (  |		.CONST	0x0028,0xffef
07d6 002b ffee  | +  |		.CONST	0x002b,0xffee
07d8 002e ffed  | .  |		.CONST	0x002e,0xffed
07da 0031 ffec  | 1  |		.CONST	0x0031,0xffec
07dc 0034 ffeb  | 4  |		.CONST	0x0034,0xffeb
07de 0037 ffea  | 7  |		.CONST	0x0037,0xffea
07e0 003a ffe9  | :  |		.CONST	0x003a,0xffe9
07e2 003c ffe8  | <  |		.CONST	0x003c,0xffe8
07e4 003e ffe7  | >  |		.CONST	0x003e,0xffe7
07e6 0040 ffe6  | @  |		.CONST	0x0040,0xffe6
07e8 0042 ffe5  | B  |		.CONST	0x0042,0xffe5
07ea 0044 ffe4  | D  |		.CONST	0x0044,0xffe4
07ec 0046 ffe3  | F  |		.CONST	0x0046,0xffe3
07ee 0048 ffe2  | H  |		.CONST	0x0048,0xffe2
07f0 ; --------------------------------------------------------------------------------------
07f0 ; Debug3 Subtable 0x1
07f0 ; --------------------------------------------------------------------------------------
07f0 001e 0000  |    |		.DBG3TAB	0x001e,0x0000
07f2 004b ffff  | K  |		.CONST	0x004b,0xffff
07f4 004b fffe  | K  |		.CONST	0x004b,0xfffe
07f6 004b fffd  | K  |		.CONST	0x004b,0xfffd
07f8 00bb fffc  |    |		.CONST	0x00bb,0xfffc
07fa 00d9 fffb  |    |		.CONST	0x00d9,0xfffb
07fc 00db fffa  |    |		.CONST	0x00db,0xfffa
07fe 00dd fff9  |    |		.CONST	0x00dd,0xfff9
0800 00df fff8  |    |		.CONST	0x00df,0xfff8
0802 00e1 fff7  |    |		.CONST	0x00e1,0xfff7
0804 00e3 fff6  |    |		.CONST	0x00e3,0xfff6
0806 00e5 fff5  |    |		.CONST	0x00e5,0xfff5
0808 00f6 fff4  |    |		.CONST	0x00f6,0xfff4
080a 0107 fff3  |    |		.CONST	0x0107,0xfff3
080c 0117 fff2  |    |		.CONST	0x0117,0xfff2
080e 0119 fff1  |    |		.CONST	0x0119,0xfff1
0810 011b fff0  |    |		.CONST	0x011b,0xfff0
0812 011d ffef  |    |		.CONST	0x011d,0xffef
0814 011f ffee  |    |		.CONST	0x011f,0xffee
0816 0121 ffed  | !  |		.CONST	0x0121,0xffed
0818 0123 ffec  | #  |		.CONST	0x0123,0xffec
081a 0125 ffeb  | %  |		.CONST	0x0125,0xffeb
081c 0127 ffea  | '  |		.CONST	0x0127,0xffea
081e 0129 ffe9  | )  |		.CONST	0x0129,0xffe9
0820 012b ffe8  | +  |		.CONST	0x012b,0xffe8
0822 012d ffe7  | -  |		.CONST	0x012d,0xffe7
0824 012f ffe6  | /  |		.CONST	0x012f,0xffe6
0826 0131 ffe5  | 1  |		.CONST	0x0131,0xffe5
0828 0133 ffe4  | 3  |		.CONST	0x0133,0xffe4
082a 0135 ffe3  | 5  |		.CONST	0x0135,0xffe3
082c 0137 ffe2  | 7  |		.CONST	0x0137,0xffe2
082e ; --------------------------------------------------------------------------------------
082e ; Debug3 Subtable 0x2
082e ; --------------------------------------------------------------------------------------
082e 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0830 0143 0001  | C  |		.CONST	0x0143,0x0001
0832 0145 0002  | E  |		.CONST	0x0145,0x0002
0834 ; --------------------------------------------------------------------------------------
0834 ; Debug3 Subtable 0x3
0834 ; --------------------------------------------------------------------------------------
0834 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0836 0153 0001  | S  |		.CONST	0x0153,0x0001
0838 0155 0002  | U  |		.CONST	0x0155,0x0002
083a ; --------------------------------------------------------------------------------------
083a ; Debug3 Subtable 0x4
083a ; --------------------------------------------------------------------------------------
083a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
083c 0163 0001  | c  |		.CONST	0x0163,0x0001
083e ; --------------------------------------------------------------------------------------
083e ; Debug3 Subtable 0x5
083e ; --------------------------------------------------------------------------------------
083e 0005 0005  |    |		.DBG3TAB	0x0005,0x0005
0840 016b ffff  | k  |		.CONST	0x016b,0xffff
0842 0170 fffe  | p  |		.CONST	0x0170,0xfffe
0844 0171 fffd  | q  |		.CONST	0x0171,0xfffd
0846 0176 fffc  | v  |		.CONST	0x0176,0xfffc
0848 017b fffb  | {  |		.CONST	0x017b,0xfffb
084a 017d 0001  | }  |		.CONST	0x017d,0x0001
084c 018a 0002  |    |		.CONST	0x018a,0x0002
084e 018c 0003  |    |		.CONST	0x018c,0x0003
0850 018f 0004  |    |		.CONST	0x018f,0x0004
0852 0194 0005  |    |		.CONST	0x0194,0x0005
0854 ; --------------------------------------------------------------------------------------
0854 ; Debug3 Subtable 0x6
0854 ; --------------------------------------------------------------------------------------
0854 0003 0009  |    |		.DBG3TAB	0x0003,0x0009
0856 019b ffff  |    |		.CONST	0x019b,0xffff
0858 01a0 fffe  |    |		.CONST	0x01a0,0xfffe
085a 01a5 fffd  |    |		.CONST	0x01a5,0xfffd
085c 01a7 0001  |    |		.CONST	0x01a7,0x0001
085e 01ae 0003  |    |		.CONST	0x01ae,0x0003
0860 01b4 0004  |    |		.CONST	0x01b4,0x0004
0862 01c6 0005  |    |		.CONST	0x01c6,0x0005
0864 01cd 0007  |    |		.CONST	0x01cd,0x0007
0866 01dd 0008  |    |		.CONST	0x01dd,0x0008
0868 01e2 0006  |    |		.CONST	0x01e2,0x0006
086a 01e7 0009  |    |		.CONST	0x01e7,0x0009
086c 01ec 0002  |    |		.CONST	0x01ec,0x0002
086e ; --------------------------------------------------------------------------------------
086e ; Debug3 Subtable 0x7
086e ; --------------------------------------------------------------------------------------
086e 0004 000b  |    |		.DBG3TAB	0x0004,0x000b
0870 01fb ffff  |    |		.CONST	0x01fb,0xffff
0872 01fe fffe  |    |		.CONST	0x01fe,0xfffe
0874 01ff fffd  |    |		.CONST	0x01ff,0xfffd
0876 0201 fffc  |    |		.CONST	0x0201,0xfffc
0878 0203 0001  |    |		.CONST	0x0203,0x0001
087a 0208 0002  |    |		.CONST	0x0208,0x0002
087c 020d 0003  |    |		.CONST	0x020d,0x0003
087e 0211 0004  |    |		.CONST	0x0211,0x0004
0880 0219 0005  |    |		.CONST	0x0219,0x0005
0882 021d 0006  |    |		.CONST	0x021d,0x0006
0884 0221 0007  | !  |		.CONST	0x0221,0x0007
0886 0225 0008  | %  |		.CONST	0x0225,0x0008
0888 0228 0009  | (  |		.CONST	0x0228,0x0009
088a 0231 000a  | 1  |		.CONST	0x0231,0x000a
088c 0235 000b  | 5  |		.CONST	0x0235,0x000b
088e ; --------------------------------------------------------------------------------------
088e ; Debug3 Subtable 0x8
088e ; --------------------------------------------------------------------------------------
088e 0004 000d  |    |		.DBG3TAB	0x0004,0x000d
0890 0243 ffff  | C  |		.CONST	0x0243,0xffff
0892 0245 fffe  | E  |		.CONST	0x0245,0xfffe
0894 0247 fffd  | G  |		.CONST	0x0247,0xfffd
0896 0249 fffc  | I  |		.CONST	0x0249,0xfffc
0898 024b 0001  | K  |		.CONST	0x024b,0x0001
089a 024e 0002  | N  |		.CONST	0x024e,0x0002
089c 0252 0003  | R  |		.CONST	0x0252,0x0003
089e 0259 0004  | Y  |		.CONST	0x0259,0x0004
08a0 0262 0006  | b  |		.CONST	0x0262,0x0006
08a2 0267 0005  | g  |		.CONST	0x0267,0x0005
08a4 026c 0007  | l  |		.CONST	0x026c,0x0007
08a6 0270 0008  | p  |		.CONST	0x0270,0x0008
08a8 0273 0009  | s  |		.CONST	0x0273,0x0009
08aa 027e 000a  | ~  |		.CONST	0x027e,0x000a
08ac 0282 000b  |    |		.CONST	0x0282,0x000b
08ae 0285 000c  |    |		.CONST	0x0285,0x000c
08b0 028a 000d  |    |		.CONST	0x028a,0x000d
08b2 ; --------------------------------------------------------------------------------------
08b2 ; Debug3 Subtable 0x9
08b2 ; --------------------------------------------------------------------------------------
08b2 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
08b4 0293 ffff  |    |		.CONST	0x0293,0xffff
08b6 02cb 0001  |    |		.CONST	0x02cb,0x0001
08b8 02d4 0002  |    |		.CONST	0x02d4,0x0002
08ba 02d9 0003  |    |		.CONST	0x02d9,0x0003
08bc 02dc 0004  |    |		.CONST	0x02dc,0x0004
08be 02e0 0005  |    |		.CONST	0x02e0,0x0005
08c0 ; --------------------------------------------------------------------------------------
08c0 ; Debug3 Subtable 0xa
08c0 ; --------------------------------------------------------------------------------------
08c0 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
08c2 02eb 0001  |    |		.CONST	0x02eb,0x0001
08c4 02ee 0002  |    |		.CONST	0x02ee,0x0002
08c6 ; --------------------------------------------------------------------------------------
08c6 ; Debug3 Subtable 0xb
08c6 ; --------------------------------------------------------------------------------------
08c6 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
08c8 02fb 0001  |    |		.CONST	0x02fb,0x0001
08ca 02fe 0002  |    |		.CONST	0x02fe,0x0002
08cc ; --------------------------------------------------------------------------------------
08cc ; Debug3 Subtable 0xc
08cc ; --------------------------------------------------------------------------------------
08cc 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
08ce 030b 0001  |    |		.CONST	0x030b,0x0001
08d0 0313 0002  |    |		.CONST	0x0313,0x0002
08d2 0318 0003  |    |		.CONST	0x0318,0x0003
08d4 031d 0004  |    |		.CONST	0x031d,0x0004
08d6 0322 0005  | "  |		.CONST	0x0322,0x0005
08d8 ; --------------------------------------------------------------------------------------
08d8 ; Debug3 Subtable 0xd
08d8 ; --------------------------------------------------------------------------------------
08d8 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
08da 032b 0001  | +  |		.CONST	0x032b,0x0001
08dc 0333 0002  | 3  |		.CONST	0x0333,0x0002
08de 0338 0003  | 8  |		.CONST	0x0338,0x0003
08e0 033d 0004  | =  |		.CONST	0x033d,0x0004
08e2 0342 0005  | B  |		.CONST	0x0342,0x0005
08e4 ; --------------------------------------------------------------------------------------
08e4 ; Debug3 Subtable 0xe
08e4 ; --------------------------------------------------------------------------------------
08e4 0005 000e  |    |		.DBG3TAB	0x0005,0x000e
08e6 034b ffff  | K  |		.CONST	0x034b,0xffff
08e8 0353 fffe  | S  |		.CONST	0x0353,0xfffe
08ea 035b fffd  | [  |		.CONST	0x035b,0xfffd
08ec 035d fffc  | ]  |		.CONST	0x035d,0xfffc
08ee 035f fffb  | _  |		.CONST	0x035f,0xfffb
08f0 0361 0001  | a  |		.CONST	0x0361,0x0001
08f2 0366 0002  | f  |		.CONST	0x0366,0x0002
08f4 0368 0003  | h  |		.CONST	0x0368,0x0003
08f6 036e 0004  | n  |		.CONST	0x036e,0x0004
08f8 0383 0005  |    |		.CONST	0x0383,0x0005
08fa 0387 0006  |    |		.CONST	0x0387,0x0006
08fc 0389 0007  |    |		.CONST	0x0389,0x0007
08fe 038b 0008  |    |		.CONST	0x038b,0x0008
0900 0391 0009  |    |		.CONST	0x0391,0x0009
0902 03a6 000a  |    |		.CONST	0x03a6,0x000a
0904 03aa 000b  |    |		.CONST	0x03aa,0x000b
0906 03ac 000c  |    |		.CONST	0x03ac,0x000c
0908 03b0 000d  |    |		.CONST	0x03b0,0x000d
090a 03da 000e  |    |		.CONST	0x03da,0x000e
090c ; --------------------------------------------------------------------------------------
090c ; Debug3 Subtable 0xf
090c ; --------------------------------------------------------------------------------------
090c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
090e 041b 0001  |    |		.CONST	0x041b,0x0001
0910 ; --------------------------------------------------------------------------------------
0910 ; Debug3 Subtable 0x10
0910 ; --------------------------------------------------------------------------------------
0910 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0912 042b 0001  | +  |		.CONST	0x042b,0x0001
0914 ; --------------------------------------------------------------------------------------
0914 ; Debug3 Subtable 0x11
0914 ; --------------------------------------------------------------------------------------
0914 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0916 043b 0001  | ;  |		.CONST	0x043b,0x0001
0918 ; --------------------------------------------------------------------------------------
0918 ; Debug3 Subtable 0x12
0918 ; --------------------------------------------------------------------------------------
0918 0002 0009  |    |		.DBG3TAB	0x0002,0x0009
091a 0453 ffff  | S  |		.CONST	0x0453,0xffff
091c 0458 fffe  | X  |		.CONST	0x0458,0xfffe
091e 045c 0002  | \  |		.CONST	0x045c,0x0002
0920 0465 0003  | e  |		.CONST	0x0465,0x0003
0922 0468 0004  | h  |		.CONST	0x0468,0x0004
0924 046b 0005  | k  |		.CONST	0x046b,0x0005
0926 046e 0006  | n  |		.CONST	0x046e,0x0006
0928 0470 0007  | p  |		.CONST	0x0470,0x0007
092a 0475 0008  | u  |		.CONST	0x0475,0x0008
092c 047b 0009  | {  |		.CONST	0x047b,0x0009
092e 0480 0001  |    |		.CONST	0x0480,0x0001
0930 ; --------------------------------------------------------------------------------------
0930 ; Debug3 Subtable 0x13
0930 ; --------------------------------------------------------------------------------------
0930 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0932 048b 0001  |    |		.CONST	0x048b,0x0001
0934 ; --------------------------------------------------------------------------------------
0934 ; Debug3 Subtable 0x14
0934 ; --------------------------------------------------------------------------------------
0934 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0936 0493 0001  |    |		.CONST	0x0493,0x0001
0938 04cb 0004  |    |		.CONST	0x04cb,0x0004
093a 04cd 0002  |    |		.CONST	0x04cd,0x0002
093c 04cf 0003  |    |		.CONST	0x04cf,0x0003
093e ; --------------------------------------------------------------------------------------
093e ; Debug3 Subtable 0x15
093e ; --------------------------------------------------------------------------------------
093e 0000 000c  |    |		.DBG3TAB	0x0000,0x000c
0940 04db 0001  |    |		.CONST	0x04db,0x0001
0942 04e6 0002  |    |		.CONST	0x04e6,0x0002
0944 04f0 0003  |    |		.CONST	0x04f0,0x0003
0946 04fa 0004  |    |		.CONST	0x04fa,0x0004
0948 0504 0005  |    |		.CONST	0x0504,0x0005
094a 050e 0006  |    |		.CONST	0x050e,0x0006
094c 0518 0007  |    |		.CONST	0x0518,0x0007
094e 0522 0008  | "  |		.CONST	0x0522,0x0008
0950 052c 0009  | ,  |		.CONST	0x052c,0x0009
0952 052e 000a  | .  |		.CONST	0x052e,0x000a
0954 0531 000b  | 1  |		.CONST	0x0531,0x000b
0956 0535 000c  | 5  |		.CONST	0x0535,0x000c
0958 ; --------------------------------------------------------------------------------------
0958 ; Debug3 Subtable 0x16
0958 ; --------------------------------------------------------------------------------------
0958 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
095a 053b 0001  | ;  |		.CONST	0x053b,0x0001
095c 054c 0002  | L  |		.CONST	0x054c,0x0002
095e 0564 0003  | d  |		.CONST	0x0564,0x0003
0960 ; --------------------------------------------------------------------------------------
0960 ; Debug3 Subtable 0x17
0960 ; --------------------------------------------------------------------------------------
0960 0000 0009  |    |		.DBG3TAB	0x0000,0x0009
0962 0584 0001  |    |		.CONST	0x0584,0x0001
0964 058e 0002  |    |		.CONST	0x058e,0x0002
0966 0599 0004  |    |		.CONST	0x0599,0x0004
0968 059a 0003  |    |		.CONST	0x059a,0x0003
096a 05a0 0005  |    |		.CONST	0x05a0,0x0005
096c 05a9 0006  |    |		.CONST	0x05a9,0x0006
096e 05b4 0008  |    |		.CONST	0x05b4,0x0008
0970 05b5 0007  |    |		.CONST	0x05b5,0x0007
0972 05bb 0009  |    |		.CONST	0x05bb,0x0009
0974 ; --------------------------------------------------------------------------------------
0974 ; Debug3 Subtable 0x18
0974 ; --------------------------------------------------------------------------------------
0974 0002 0007  |    |		.DBG3TAB	0x0002,0x0007
0976 05c3 ffff  |    |		.CONST	0x05c3,0xffff
0978 05c7 fffe  |    |		.CONST	0x05c7,0xfffe
097a 05cf 0001  |    |		.CONST	0x05cf,0x0001
097c 05d2 0002  |    |		.CONST	0x05d2,0x0002
097e 05da 0003  |    |		.CONST	0x05da,0x0003
0980 05dc 0004  |    |		.CONST	0x05dc,0x0004
0982 05de 0005  |    |		.CONST	0x05de,0x0005
0984 05e2 0006  |    |		.CONST	0x05e2,0x0006
0986 05e4 0007  |    |		.CONST	0x05e4,0x0007
0988 ; --------------------------------------------------------------------------------------
0988 ; Debug3 Subtable 0x19
0988 ; --------------------------------------------------------------------------------------
0988 0004 000a  |    |		.DBG3TAB	0x0004,0x000a
098a 05f3 0001  |    |		.CONST	0x05f3,0x0001
098c 05f7 0002  |    |		.CONST	0x05f7,0x0002
098e 05f8 fbff  |    |		.CONST	0x05f8,0xfbff
0990 05fc fbfe  |    |		.CONST	0x05fc,0xfbfe
0992 0603 fbfd  |    |		.CONST	0x0603,0xfbfd
0994 0604 0401  |    |		.CONST	0x0604,0x0401
0996 0607 0402  |    |		.CONST	0x0607,0x0402
0998 0609 0403  |    |		.CONST	0x0609,0x0403
099a 060e 0404  |    |		.CONST	0x060e,0x0404
099c 0615 0405  |    |		.CONST	0x0615,0x0405
099e 0619 0406  |    |		.CONST	0x0619,0x0406
09a0 0623 0407  | #  |		.CONST	0x0623,0x0407
09a2 0624 f7ff  | $  |		.CONST	0x0624,0xf7ff
09a4 062d 0801  | -  |		.CONST	0x062d,0x0801
09a6 ; --------------------------------------------------------------------------------------
09a6 ; Debug3 Subtable 0x1a
09a6 ; --------------------------------------------------------------------------------------
09a6 0002 0007  |    |		.DBG3TAB	0x0002,0x0007
09a8 063b ffff  | ;  |		.CONST	0x063b,0xffff
09aa 063c fffe  | <  |		.CONST	0x063c,0xfffe
09ac 063e 0001  | >  |		.CONST	0x063e,0x0001
09ae 0642 0002  | B  |		.CONST	0x0642,0x0002
09b0 0649 0003  | I  |		.CONST	0x0649,0x0003
09b2 0654 0004  | T  |		.CONST	0x0654,0x0004
09b4 0658 0005  | X  |		.CONST	0x0658,0x0005
09b6 065b 0006  | [  |		.CONST	0x065b,0x0006
09b8 065e 0007  | ^  |		.CONST	0x065e,0x0007
09ba ; --------------------------------------------------------------------------------------
09ba ; Debug3 Subtable 0x1b
09ba ; --------------------------------------------------------------------------------------
09ba 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
09bc 066b 0001  | k  |		.CONST	0x066b,0x0001
09be 0670 0002  | p  |		.CONST	0x0670,0x0002
09c0 0672 0003  | r  |		.CONST	0x0672,0x0003
09c2 0675 0004  | u  |		.CONST	0x0675,0x0004
09c4 067a 0005  | z  |		.CONST	0x067a,0x0005
09c6 0680 0006  |    |		.CONST	0x0680,0x0006
09c8 0000 0000  |    |		.BLANK	0000[0x38]