DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 DFS Tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400 DFS Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦284721a81⟧ SEG

    Length: 4096 (0x1000)
    Types: SEG
    Notes: 5805_R1K_CODE
    Names: »11150353.SEG«

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5805       |X   |		.CONST	0x5805								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 03b8       |    |		.CONST	0x03b8								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0103       |    |		.CONST	0x0103								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0064       | d  |		.CONST	0x0064								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0022       | "  |		.CONST	0x0022								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x047a,0x8000,0x0000,0x000e,0x1c74,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 00e4       |    |		Load_Encached	Positive_Cache
000e e001       |    |		Load	0x0,0x1
000f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0010 029f 006b  |   k|		Declare_Subprogram	INIT_0068,For_Call
0012 4800       |H   |		Short_Literal	0x0
0013 4801       |H   |		Short_Literal	0x1
0014 4801       |H   |		Short_Literal	0x1
0015 4800       |H   |		Short_Literal	0x0
0016 4801       |H   |		Short_Literal	0x1
0017 4801       |H   |		Short_Literal	0x1
0018 031e       |    |		Declare_Type	Variant_Record,Defined,Visible
0019 029a 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0x19,0xfffd
001b 029a 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x1b,0xfffc
001d 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x1d,0xfffb
001f 029a 018b  |    |		Declare_Subprogram	INIT_0188,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x1f,0xfffa
0021 029a 01ab  |    |		Declare_Subprogram	INIT_01a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x21,0xfff9
0023 029a 01c3  |    |		Declare_Subprogram	INIT_01c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x23,0xfff8
0025 029a 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x25,0xfff7
0027 029a 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x27,0xfff6
0029 029a 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x29,0xfff5
002b 029a 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x2b,0xfff4
002d 029a 0253  |   S|		Declare_Subprogram	INIT_0250,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x2d,0xfff3
002f 029a 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x2f,0xfff2
0031 029a 0293  |    |		Declare_Subprogram	INIT_0290,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x31,0xfff1
0033 029a 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x33,0xfff0
0035 029a 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x35,0xffef
0037 029a 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x11 = 0x37,0xffee
0039 00bf       |    |		Action	Accept_Activation
003a 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1 = .DEBUG	0x003a,0x04a0,0x8000,0x0000,0x000e,0x1c84,0x0000,0x0006
													; Debug Table 0x1.0x0 = 0x3a,0xffff
003b 00c7       |    |		Action	Elaborate_Subprogram
003c 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x1 = 0x3c,0xfffe
003d 00c7       |    |		Action	Elaborate_Subprogram
003e 029d 031b  |    |		Declare_Subprogram	INIT_0318,For_Outer_Call			; Debug Table 0x1.0x2 = 0x3e,0xfffd
0040 029d 0343  |   C|		Declare_Subprogram	INIT_0340,For_Outer_Call			; Debug Table 0x1.0x3 = 0x40,0xfffc
0042 029d 035b  |   [|		Declare_Subprogram	INIT_0358,For_Outer_Call			; Debug Table 0x1.0x4 = 0x42,0xfffb
0044 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x5 = 0x44,0xfffa
0045 00c7       |    |		Action	Elaborate_Subprogram
0046 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x6 = 0x46,0xfff9
0047 00c7       |    |		Action	Elaborate_Subprogram
0048 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x7 = 0x48,0xfff8
0049 00c7       |    |		Action	Elaborate_Subprogram
004a 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x8 = 0x4a,0xfff7
004b 00c7       |    |		Action	Elaborate_Subprogram
004c 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x9 = 0x4c,0xfff6
004d 00c7       |    |		Action	Elaborate_Subprogram
004e 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0xa = 0x4e,0xfff5
004f 00c7       |    |		Action	Elaborate_Subprogram
0050 029d 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call			; Debug Table 0x1.0xb = 0x50,0xfff4
0052 029d 038b  |    |		Declare_Subprogram	INIT_0388,For_Outer_Call			; Debug Table 0x1.0xc = 0x52,0xfff3
0054 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0xd = 0x54,0xfff2
0055 00c7       |    |		Action	Elaborate_Subprogram
0056 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0xe = 0x56,0xfff1
0057 00c7       |    |		Action	Elaborate_Subprogram
0058 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0xf = 0x58,0xfff0
0059 00c7       |    |		Action	Elaborate_Subprogram
005a 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x10 = 0x5a,0xffef
005b 00c7       |    |		Action	Elaborate_Subprogram
005c 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x11 = 0x5c,0xffee
005d 00c7       |    |		Action	Elaborate_Subprogram
005e 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0x12 = 0x5e,0xffed
005f 00c7       |    |		Action	Elaborate_Subprogram
0060 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0x13 = 0x60,0xffec
0061 00c7       |    |		Action	Elaborate_Subprogram
0062 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x14 = 0x62,0xffeb
0063 00c7       |    |		Action	Elaborate_Subprogram
0064			BODY_0008:
0064 00bc       |    |		Action	Signal_Activated
0065 00bb       |    |		Action	Signal_Completion
0066 0000 0000  |    |		.XXX[0x2]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b       | k  |		.CONST	0x006b								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0001       |    |		.CONST	0x0001								; Number of locals
006b			BODY_0068:
006b			INIT_0068:
006b 4608       |F   |		Jump_Case	0x9							; Debug Table 0x2 = .DEBUG	0x006b,0x04cc,0x0005,0x0000,0x000e,0x1c74,0x0000,0x0009
006c 7808       |x   |		Jump	0x75								; case 0x0
006d 7810       |x   |		Jump	0x7e								; case 0x1
006e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
006f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0070 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0071 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
0072 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
0073 780d       |x   |		Jump	0x81								; case 0x7
0074 7815       |x   |		Jump	0x8a								; case 0x8
0075 e5ff       |    |		Load	0x2,-0x1
0076 2203       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x3
0077 e5ff       |    |		Load	0x2,-0x1
0078 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0079 1c00       |    |		Execute_Immediate	Run_Utility,0x0
007a 4801       |H   |		Short_Literal	0x1
007b e5ff       |    |		Load	0x2,-0x1
007c 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
007d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
007e e5ff       |    |		Load	0x2,-0x1
007f 2203       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x3
0080 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0081 e5fe       |    |		Load	0x2,-0x2
0082 e5fe       |    |		Load	0x2,-0x2
0083 e001       |    |		Load	0x0,0x1
0084 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0085 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0086 4801       |H   |		Short_Literal	0x1
0087 e5ff       |    |		Load	0x2,-0x1
0088 031b       |    |		Declare_Type	Variant_Record,Constrained
0089 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
008a e5fe       |    |		Load	0x2,-0x2
008b e5ff       |    |		Load	0x2,-0x1
008c 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
008d e5fe       |    |		Load	0x2,-0x2
008e e001       |    |		Load	0x0,0x1
008f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0090 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0091 2d03       |-   |		Execute	Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
0092 016a       | j  |		QQ_execute	Variant_Record,XXX
0093 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0094 0000 0000  |    |		.BLANK	0000[0x4]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00a6       |    |		.CONST	0x00a6								; Address of begin
0099 00ae       |    |		.CONST	0x00ae								; Address of exception handler
009a 0005       |    |		.CONST	0x0005								; Number of locals
009b			INIT_0098:
009b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3 = .DEBUG	0x009b,0x04ce,0x2801,0x0002,0x000e,0x1c74,0x0000,0x0020
													; Debug Table 0x3.0x0 = 0x9b,0xffff
009c 01dd       |    |		Execute	Vector,First
009d e5fd       |    |		Load	0x2,-0x3
009e 01d7       |    |		Execute	Vector,Field_Read
009f 00e8       |    |		Load_Encached	Character_Cache
00a0 03f1       |    |		Declare_Variable	Discrete,With_Value
00a1 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0x3.0x1 = 0xa1,0xfffe
00a2 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0x2 = 0xa2,0xfffd
00a3 0007       |    |		Action	Break_Optional
00a4 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x3.0x3 = 0xa4,0xfffc
00a5 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00a6			BODY_0098:
00a6 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3.0x4 = 0xa6,0x1
00a7 e5fe       |    |		Load	0x2,-0x2
00a8 0122       | "  |		Execute	Any,Make_Root_Type
00a9 1c02       |    |		Execute_Immediate	Run_Utility,0x2
00aa c5fc       |    |		Store	0x2,-0x4
00ab 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0x5 = 0xab,0x2
00ac a5fb       |    |		Store_Unchecked	0x2,-0x5
00ad 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00ae			TRAP_0098:
00ae 010e       |    |		Execute	Exception,Is_Constraint_Error
00af 682c       |h,  |		Jump_Zero	0xdc
00b0 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3.0x6 = 0xb0,0x3
00b1 821d       |    |		Call	0x1,0x1d
00b2 0f01       |    |		Execute_Immediate	Equal,0x1
00b3 6825       |h%  |		Jump_Zero	0xd9
00b4 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0x7 = 0xb4,0x4
00b5 026a       | j  |		Execute	Discrete,First
00b6 c404       |    |		Store	0x2,0x4
00b7 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x8 = 0xb7,0x5
00b8 e404       |    |		Load	0x2,0x4								; Debug Table 0x3.0x9 = 0xb8,0x6
00b9 e5fe       |    |		Load	0x2,-0x2
00ba 0122       | "  |		Execute	Any,Make_Root_Type
00bb 025e       | ^  |		Execute	Discrete,Convert
00bc 1c01       |    |		Execute_Immediate	Run_Utility,0x1
00bd 01dd       |    |		Execute	Vector,First
00be e404       |    |		Load	0x2,0x4
00bf e5fe       |    |		Load	0x2,-0x2
00c0 0122       | "  |		Execute	Any,Make_Root_Type
00c1 025e       | ^  |		Execute	Discrete,Convert
00c2 1c01       |    |		Execute_Immediate	Run_Utility,0x1
00c3 01d7       |    |		Execute	Vector,Field_Read
00c4 a403       |    |		Store_Unchecked	0x2,0x3
00c5 e402       |    |		Load	0x2,0x2								; Debug Table 0x3.0xa = 0xc5,0x7
00c6 e403       |    |		Load	0x2,0x3
00c7 027f       |    |		Execute	Discrete,Equal
00c8 6804       |h   |		Jump_Zero	0xcd
00c9 4801       |H   |		Short_Literal	0x1							; Debug Table 0x3.0xb = 0xc9,0x8
00ca a405       |    |		Store_Unchecked	0x2,0x5
00cb e404       |    |		Load	0x2,0x4								; Debug Table 0x3.0xc = 0xcb,0x9
00cc c5fc       |    |		Store	0x2,-0x4
00cd e405       |    |		Load	0x2,0x5								; Debug Table 0x3.0xd = 0xcd,0xa
00ce 700a       |p   |		Jump_Nonzero	0xd9
00cf e404       |    |		Load	0x2,0x4
00d0 e5fe       |    |		Load	0x2,-0x2
00d1 0269       | i  |		Execute	Discrete,Last
00d2 027f       |    |		Execute	Discrete,Equal
00d3 7005       |p   |		Jump_Nonzero	0xd9
00d4 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0xe = 0xd4,0xb
00d5 e404       |    |		Load	0x2,0x4
00d6 0268       | h  |		Execute	Discrete,Successor
00d7 c404       |    |		Store	0x2,0x4
00d8 7fdf       |    |		Jump	0xb8
00d9 e405       |    |		Load	0x2,0x5								; Debug Table 0x3.0xf = 0xd9,0xc
00da a5fb       |    |		Store_Unchecked	0x2,-0x5
00db 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00dc 0100       |    |		Execute	Exception,Raise
00dd 0000 0000  |    |		.XXX[0x3]
00df 0000       |    |
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00ec       |    |		.CONST	0x00ec								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0003       |    |		.CONST	0x0003								; Number of locals
00e3			INIT_00e0:
00e3 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4 = .DEBUG	0x00e3,0x04f0,0x0001,0x0000,0x000e,0x1c74,0x0000,0x0035
													; Debug Table 0x4.0x0 = 0xe3,0xffff
00e4 e001       |    |		Load	0x0,0x1
00e5 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
00e6 00e3       |    |		Load_Encached	Natural_Cache
00e7 03f1       |    |		Declare_Variable	Discrete,With_Value
00e8 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x1 = 0xe8,0xfffe
00e9 e402       |    |		Load	0x2,0x2
00ea 00e9       |    |		Load_Encached	String_Cache
00eb 0334       | 4  |		Declare_Variable	Array,With_Constraint
00ec			BODY_00e0:
00ec e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x2 = 0xec,0x1
00ed e5fd       |    |		Load	0x2,-0x3
00ee 01db       |    |		Execute	Vector,Length
00ef 027f       |    |		Execute	Discrete,Equal
00f0 6806       |h   |		Jump_Zero	0xf7
00f1 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x3 = 0xf1,0x2
00f2 e001       |    |		Load	0x0,0x1
00f3 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00f4 e5fd       |    |		Load	0x2,-0x3
00f5 01d4       |    |		Execute	Vector,Structure_Write
00f6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00f7 e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x4 = 0xf7,0x3
00f8 e5fd       |    |		Load	0x2,-0x3
00f9 01db       |    |		Execute	Vector,Length
00fa 027c       | |  |		Execute	Discrete,Less
00fb 681c       |h   |		Jump_Zero	0x118
00fc e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x5 = 0xfc,0x4
00fd e001       |    |		Load	0x0,0x1
00fe 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00ff e5fd       |    |		Load	0x2,-0x3
0100 01dd       |    |		Execute	Vector,First
0101 e5fd       |    |		Load	0x2,-0x3
0102 01dd       |    |		Execute	Vector,First
0103 e402       |    |		Load	0x2,0x2
0104 0273       | s  |		Execute	Discrete,Plus
0105 0aff       |    |		Execute_Immediate	Plus,-0x1
0106 0248       | H  |		Execute	Discrete,Check_In_Integer
0107 e5fd       |    |		Load	0x2,-0x3
0108 01ce       |    |		Execute	Vector,Slice_Write
0109 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x4.0x6 = 0x109,0x5
010a 01dc       |    |		Execute	Vector,Last
010b e5fd       |    |		Load	0x2,-0x3
010c 01dd       |    |		Execute	Vector,First
010d e402       |    |		Load	0x2,0x2
010e 0273       | s  |		Execute	Discrete,Plus
010f 0248       | H  |		Execute	Discrete,Check_In_Integer
0110 0263       | c  |		Execute	Discrete,Above_Bound
0111 7005       |p   |		Jump_Nonzero	0x117
0112 4820       |H   |		Short_Literal	0x20							; Debug Table 0x4.0x7 = 0x112,0x6
0113 e405       |    |		Load	0x2,0x5
0114 e5fd       |    |		Load	0x2,-0x3
0115 01d6       |    |		Execute	Vector,Field_Write
0116 3ffb       |?   |		Loop_Increasing	0x112
0117 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0118 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x8 = 0x118,0x7
0119 6802       |h   |		Jump_Zero	0x11c
011a 48e0       |H   |		Short_Literal	0xe0							; Debug Table 0x4.0x9 = 0x11a,0x8
011b 0257       | W  |		Execute	Discrete,Raise
011c e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0xa = 0x11c,0x9
011d e001       |    |		Load	0x0,0x1
011e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
011f e403       |    |		Load	0x2,0x3
0120 01d4       |    |		Execute	Vector,Structure_Write
0121 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0xb = 0x121,0xa
0122 e5fd       |    |		Load	0x2,-0x3
0123 01db       |    |		Execute	Vector,Length
0124 e403       |    |		Load	0x2,0x3
0125 01cf       |    |		Execute	Vector,Slice_Read
0126 e5fd       |    |		Load	0x2,-0x3
0127 01d4       |    |		Execute	Vector,Structure_Write
0128 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0129 0000 0000  |    |		.BLANK	0000[0x7]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0135       | 5  |		.CONST	0x0135								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0002       |    |		.CONST	0x0002								; Number of locals
0133			INIT_0130:
0133 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0x5 = .DEBUG	0x0133,0x050a,0x0001,0x0000,0x000e,0x1c74,0x0000,0x0048
													; Debug Table 0x5.0x0 = 0x133,0xffff
0134 0007       |    |		Action	Break_Optional							; Debug Table 0x5.0x1 = 0x134,0xfffe
0135			BODY_0130:
0135 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x2 = 0x135,0x1
0136 8220       |    |		Call	0x1,0x20
0137 00d1       |    |		Pop_Control	Pop_Count_1
0138 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x3 = 0x138,0x2
0139 00ea       |    |		Load_Encached	Null_String_Cache
013a e001       |    |		Load	0x0,0x1
013b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
013c 00d1       |    |		Pop_Control	Pop_Count_1
013d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x4 = 0x13d,0x3
013e 821f       |    |		Call	0x1,0x1f
013f 0f22       | "  |		Execute_Immediate	Equal,0x22
0140 6821       |h!  |		Jump_Zero	0x162
0141 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x5 = 0x141,0x4
0142 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0143 0a01       |    |		Execute_Immediate	Plus,0x1
0144 e5ff       |    |		Load	0x2,-0x1
0145 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0146 0007       |    |		Action	Break_Optional							; Debug Table 0x5.0x6 = 0x146,0x5
0147 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x7 = 0x147,0x6
0148 821f       |    |		Call	0x1,0x1f
0149 a402       |    |		Store_Unchecked	0x2,0x2
014a e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x8 = 0x14a,0x7
014b 0f22       | "  |		Execute_Immediate	Equal,0x22
014c 680a       |h   |		Jump_Zero	0x157
014d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x9 = 0x14d,0x8
014e 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
014f 0a01       |    |		Execute_Immediate	Plus,0x1
0150 e5ff       |    |		Load	0x2,-0x1
0151 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0152 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0xa = 0x152,0x9
0153 821f       |    |		Call	0x1,0x1f
0154 0e22       | "  |		Execute_Immediate	Not_Equal,0x22
0155 6801       |h   |		Jump_Zero	0x157
0156 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x5.0xb = 0x156,0xa
0157 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0xc = 0x157,0xb
0158 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0159 0a01       |    |		Execute_Immediate	Plus,0x1
015a e5ff       |    |		Load	0x2,-0x1
015b 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
015c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0xd = 0x15c,0xc
015d e402       |    |		Load	0x2,0x2
015e e001       |    |		Load	0x0,0x1
015f 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0160 00d1       |    |		Pop_Control	Pop_Count_1
0161 7fe5       |    |		Jump	0x147
0162 0007       |    |		Action	Break_Optional							; Debug Table 0x5.0xe = 0x162,0xd
0163 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0xf = 0x163,0xe
0164 821f       |    |		Call	0x1,0x1f
0165 a402       |    |		Store_Unchecked	0x2,0x2
0166 e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x10 = 0x166,0xf
0167 821e       |    |		Call	0x1,0x1e
0168 700b       |p   |		Jump_Nonzero	0x174
0169 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x11 = 0x169,0x10
016a 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
016b 0a01       |    |		Execute_Immediate	Plus,0x1
016c e5ff       |    |		Load	0x2,-0x1
016d 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
016e e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x12 = 0x16e,0x11
016f e402       |    |		Load	0x2,0x2
0170 e001       |    |		Load	0x0,0x1
0171 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0172 00d1       |    |		Pop_Control	Pop_Count_1
0173 7fef       |    |		Jump	0x163
0174 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x13 = 0x174,0x12
0175 e001       |    |		Load	0x0,0x1
0176 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0177 700a       |p   |		Jump_Nonzero	0x182
0178 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x14 = 0x178,0x13
0179 e402       |    |		Load	0x2,0x2
017a e001       |    |		Load	0x0,0x1
017b 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
017c 00d1       |    |		Pop_Control	Pop_Count_1
017d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x15 = 0x17d,0x14
017e 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
017f 0a01       |    |		Execute_Immediate	Plus,0x1
0180 e5ff       |    |		Load	0x2,-0x1
0181 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0182 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0183 0000 0000  |    |		.BLANK	0000[0x5]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 0194       |    |		.CONST	0x0194								; Address of begin
0189 0004       |    |		.CONST	0x0004								; Address of exception handler
018a 0002       |    |		.CONST	0x0002								; Number of locals
018b			INIT_0188:
018b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6 = .DEBUG	0x018b,0x0538,0x0001,0x0000,0x000e,0x1c74,0x0000,0x0056
													; Debug Table 0x6.0x0 = 0x18b,0xffff
018c 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
018d e001       |    |		Load	0x0,0x1
018e 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
018f e001       |    |		Load	0x0,0x1
0190 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0191 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0192 e402       |    |		Load	0x2,0x2
0193 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0194			BODY_0188:
0194 e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0x1 = 0x194,0x1
0195 e5ff       |    |		Load	0x2,-0x1
0196 8210       |    |		Call	0x1,0x10
0197 00d2       |    |		Pop_Control	Pop_Count_2
0198 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x6.0x2 = 0x198,0x2
0199 4801       |H   |		Short_Literal	0x1
019a e402       |    |		Load	0x2,0x2
019b 820f       |    |		Call	0x1,0xf
019c 00d1       |    |		Pop_Control	Pop_Count_1
019d e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0x3 = 0x19d,0x3
019e e001       |    |		Load	0x0,0x1
019f 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01a0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01a1 0000 0000  |    |		.BLANK	0000[0x7]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01b1       |    |		.CONST	0x01b1								; Address of begin
01a9 0004       |    |		.CONST	0x0004								; Address of exception handler
01aa 0002       |    |		.CONST	0x0002								; Number of locals
01ab			INIT_01a8:
01ab 4864       |Hd  |		Short_Literal	0x64							; Debug Table 0x7 = .DEBUG	0x01ab,0x0542,0x0001,0x0000,0x000e,0x1c74,0x0000,0x0062
													; Debug Table 0x7.0x0 = 0x1ab,0xffff
01ac e001       |    |		Load	0x0,0x1
01ad 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01ae 1c08       |    |		Execute_Immediate	Run_Utility,0x8
01af e402       |    |		Load	0x2,0x2
01b0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01b1			BODY_01a8:
01b1 e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x1 = 0x1b1,0x1
01b2 e5ff       |    |		Load	0x2,-0x1
01b3 8210       |    |		Call	0x1,0x10
01b4 00d2       |    |		Pop_Control	Pop_Count_2
01b5 e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x2 = 0x1b5,0x2
01b6 e001       |    |		Load	0x0,0x1
01b7 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01b8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01b9 0000 0000  |    |		.BLANK	0000[0x7]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c5       |    |		.CONST	0x01c5								; Address of begin
01c1 0004       |    |		.CONST	0x0004								; Address of exception handler
01c2 0003       |    |		.CONST	0x0003								; Number of locals
01c3			INIT_01c0:
01c3 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x8 = .DEBUG	0x01c3,0x054a,0x0001,0x0000,0x000e,0x1c74,0x0000,0x006a
													; Debug Table 0x8.0x0 = 0x1c3,0xffff
01c4 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x8.0x1 = 0x1c4,0xfffe
01c5			BODY_01c0:
01c5 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x8.0x2 = 0x1c5,0x1
01c6 00e2       |    |		Load_Encached	Integer_Cache
01c7 480a       |H   |		Short_Literal	0xa
01c8 e5ff       |    |		Load	0x2,-0x1
01c9 e001       |    |		Load	0x0,0x1
01ca 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01cb e002       |    |		Load	0x0,0x2
01cc 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01cd c403       |    |		Store	0x2,0x3
01ce c402       |    |		Store	0x2,0x2
01cf e402       |    |		Load	0x2,0x2								; Debug Table 0x8.0x3 = 0x1cf,0x2
01d0 680b       |h   |		Jump_Zero	0x1dc
01d1 e403       |    |		Load	0x2,0x3								; Debug Table 0x8.0x4 = 0x1d1,0x3
01d2 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
01d3 6805       |h   |		Jump_Zero	0x1d9
01d4 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0x5 = 0x1d4,0x4
01d5 a5fd       |    |		Store_Unchecked	0x2,-0x3
01d6 e403       |    |		Load	0x2,0x3								; Debug Table 0x8.0x6 = 0x1d6,0x5
01d7 c5fe       |    |		Store	0x2,-0x2
01d8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01d9 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0x7 = 0x1d9,0x6
01da a5fd       |    |		Store_Unchecked	0x2,-0x3
01db 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01dc 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0x8 = 0x1dc,0x7
01dd a5fd       |    |		Store_Unchecked	0x2,-0x3
01de 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01df 0000       |    |		.XXX[0x1]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e5       |    |		.CONST	0x01e5								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0003       |    |		.CONST	0x0003								; Number of locals
01e3			INIT_01e0:
01e3 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x9 = .DEBUG	0x01e3,0x055e,0x0001,0x0000,0x000e,0x1c74,0x0000,0x007c
													; Debug Table 0x9.0x0 = 0x1e3,0xffff
01e4 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x9.0x1 = 0x1e4,0xfffe
01e5			BODY_01e0:
01e5 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x2 = 0x1e5,0x1
01e6 a5fe       |    |		Store_Unchecked	0x2,-0x2
01e7 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x9.0x3 = 0x1e7,0x2
01e8 00e2       |    |		Load_Encached	Integer_Cache
01e9 480a       |H   |		Short_Literal	0xa
01ea e5ff       |    |		Load	0x2,-0x1
01eb e001       |    |		Load	0x0,0x1
01ec 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01ed e002       |    |		Load	0x0,0x2
01ee 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01ef c403       |    |		Store	0x2,0x3
01f0 c402       |    |		Store	0x2,0x2
01f1 e402       |    |		Load	0x2,0x2								; Debug Table 0x9.0x4 = 0x1f1,0x3
01f2 680b       |h   |		Jump_Zero	0x1fe
01f3 e403       |    |		Load	0x2,0x3								; Debug Table 0x9.0x5 = 0x1f3,0x4
01f4 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
01f5 6805       |h   |		Jump_Zero	0x1fb
01f6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0x6 = 0x1f6,0x5
01f7 a5fd       |    |		Store_Unchecked	0x2,-0x3
01f8 e403       |    |		Load	0x2,0x3								; Debug Table 0x9.0x7 = 0x1f8,0x6
01f9 c5fe       |    |		Store	0x2,-0x2
01fa 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01fb 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x8 = 0x1fb,0x7
01fc a5fd       |    |		Store_Unchecked	0x2,-0x3
01fd 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01fe 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x9 = 0x1fe,0x8
01ff a5fd       |    |		Store_Unchecked	0x2,-0x3
0200 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0201 0000 0000  |    |		.BLANK	0000[0x7]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020c       |    |		.CONST	0x020c								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0002       |    |		.CONST	0x0002								; Number of locals
020b			INIT_0208:
020b 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0xa = .DEBUG	0x020b,0x0574,0x0001,0x0000,0x000e,0x1c74,0x0000,0x008e
													; Debug Table 0xa.0x0 = 0x20b,0xffff
020c			BODY_0208:
020c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x1 = 0x20c,0x1
020d 8220       |    |		Call	0x1,0x20
020e 00d1       |    |		Pop_Control	Pop_Count_1
020f e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x2 = 0x20f,0x2
0210 821f       |    |		Call	0x1,0x1f
0211 a402       |    |		Store_Unchecked	0x2,0x2
0212 e402       |    |		Load	0x2,0x2								; Debug Table 0xa.0x3 = 0x212,0x3
0213 e5ff       |    |		Load	0x2,-0x1
0214 027f       |    |		Execute	Discrete,Equal
0215 a5fd       |    |		Store_Unchecked	0x2,-0x3
0216 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x4 = 0x216,0x4
0217 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0218 0a01       |    |		Execute_Immediate	Plus,0x1
0219 e5fe       |    |		Load	0x2,-0x2
021a 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
021b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
021c 0000 0000  |    |		.BLANK	0000[0x4]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0224       | $  |		.CONST	0x0224								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0002       |    |		.CONST	0x0002								; Number of locals
0223			INIT_0220:
0223 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xb = .DEBUG	0x0223,0x0580,0x0001,0x0000,0x000e,0x1c74,0x0000,0x009e
													; Debug Table 0xb.0x0 = 0x223,0xffff
0224			BODY_0220:
0224 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0x1 = 0x224,0x1
0225 a5f9       |    |		Store_Unchecked	0x2,-0x7
0226 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xb.0x2 = 0x226,0x2
0227 e5fe       |    |		Load	0x2,-0x2
0228 e5ff       |    |		Load	0x2,-0x1
0229 8217       |    |		Call	0x1,0x17
022a c402       |    |		Store	0x2,0x2
022b e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0x3 = 0x22b,0x3
022c 6803       |h   |		Jump_Zero	0x230
022d e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xb.0x4 = 0x22d,0x4
022e a5fa       |    |		Store_Unchecked	0x2,-0x6
022f 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0230 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xb.0x5 = 0x230,0x5
0231 e5fc       |    |		Load	0x2,-0x4
0232 e5ff       |    |		Load	0x2,-0x1
0233 8217       |    |		Call	0x1,0x17
0234 c402       |    |		Store	0x2,0x2
0235 e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0x6 = 0x235,0x6
0236 6803       |h   |		Jump_Zero	0x23a
0237 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0xb.0x7 = 0x237,0x7
0238 a5fa       |    |		Store_Unchecked	0x2,-0x6
0239 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
023a 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x8 = 0x23a,0x8
023b a5f9       |    |		Store_Unchecked	0x2,-0x7
023c 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
023d 0000 0000  |    |		.XXX[0x3]
023f 0000       |    |
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243       | C  |		.CONST	0x0243								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0001       |    |		.CONST	0x0001								; Number of locals
0243			BODY_0240:
0243			INIT_0240:
0243 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xc = .DEBUG	0x0243,0x0594,0x0001,0x0000,0x000e,0x1c74,0x0000,0x00c0
													; Debug Table 0xc.0x0 = 0x243,0x1
0244 e5fe       |    |		Load	0x2,-0x2
0245 e5ff       |    |		Load	0x2,-0x1
0246 e001       |    |		Load	0x0,0x1
0247 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0248 8218       |    |		Call	0x1,0x18
0249 c5fd       |    |		Store	0x2,-0x3
024a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
024b 0000 0000  |    |		.BLANK	0000[0x5]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253       | S  |		.CONST	0x0253								; Address of begin
0251 0004       |    |		.CONST	0x0004								; Address of exception handler
0252 0001       |    |		.CONST	0x0001								; Number of locals
0253			BODY_0250:
0253			INIT_0250:
0253 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xd = .DEBUG	0x0253,0x0598,0x0001,0x0000,0x000e,0x1c74,0x0000,0x00d2
													; Debug Table 0xd.0x0 = 0x253,0x1
0254 821c       |    |		Call	0x1,0x1c
0255 8222       | "  |		Call	0x1,0x22
0256 e5fe       |    |		Load	0x2,-0x2
0257 821c       |    |		Call	0x1,0x1c
0258 8222       | "  |		Call	0x1,0x22
0259 01df       |    |		Execute	Vector,Equal
025a 6803       |h   |		Jump_Zero	0x25e
025b 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0x1 = 0x25b,0x2
025c a5fd       |    |		Store_Unchecked	0x2,-0x3
025d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
025e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xd.0x2 = 0x25e,0x3
025f 821c       |    |		Call	0x1,0x1c
0260 8222       | "  |		Call	0x1,0x22
0261 01db       |    |		Execute	Vector,Length
0262 0f01       |    |		Execute_Immediate	Equal,0x1
0263 680d       |h   |		Jump_Zero	0x271
0264 4801       |H   |		Short_Literal	0x1
0265 e5ff       |    |		Load	0x2,-0x1
0266 01d7       |    |		Execute	Vector,Field_Read
0267 8221       | !  |		Call	0x1,0x21
0268 4801       |H   |		Short_Literal	0x1
0269 e5fe       |    |		Load	0x2,-0x2
026a 01d7       |    |		Execute	Vector,Field_Read
026b 8221       | !  |		Call	0x1,0x21
026c 027f       |    |		Execute	Discrete,Equal
026d 6803       |h   |		Jump_Zero	0x271
026e 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0x3 = 0x26e,0x4
026f a5fd       |    |		Store_Unchecked	0x2,-0x3
0270 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0271 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x4 = 0x271,0x5
0272 a5fd       |    |		Store_Unchecked	0x2,-0x3
0273 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0274 0000 0000  |    |		.BLANK	0000[0x4]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b       | {  |		.CONST	0x027b								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0001       |    |		.CONST	0x0001								; Number of locals
027b			BODY_0278:
027b			INIT_0278:
027b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xe = .DEBUG	0x027b,0x05a4,0x0002,0x0000,0x000e,0x1c74,0x0000,0x00e2
													; Debug Table 0xe.0x0 = 0x27b,0x1
027c e001       |    |		Load	0x0,0x1
027d 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
027e 01db       |    |		Execute	Vector,Length
027f 0f01       |    |		Execute_Immediate	Equal,0x1
0280 6809       |h   |		Jump_Zero	0x28a
0281 4801       |H   |		Short_Literal	0x1
0282 e5ff       |    |		Load	0x2,-0x1
0283 e001       |    |		Load	0x0,0x1
0284 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0285 8221       | !  |		Call	0x1,0x21
0286 e5fe       |    |		Load	0x2,-0x2
0287 8221       | !  |		Call	0x1,0x21
0288 027f       |    |		Execute	Discrete,Equal
0289 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
028a 4800       |H   |		Short_Literal	0x0
028b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
028c 0000 0000  |    |		.BLANK	0000[0x4]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293       |    |		.CONST	0x0293								; Address of begin
0291 0004       |    |		.CONST	0x0004								; Address of exception handler
0292 0001       |    |		.CONST	0x0001								; Number of locals
0293			BODY_0290:
0293			INIT_0290:
0293 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf = .DEBUG	0x0293,0x05a8,0x0002,0x0000,0x000e,0x1c74,0x0000,0x00f1
													; Debug Table 0xf.0x0 = 0x293,0x1
0294 821d       |    |		Call	0x1,0x1d
0295 0f01       |    |		Execute_Immediate	Equal,0x1
0296 6809       |h   |		Jump_Zero	0x2a0
0297 e5ff       |    |		Load	0x2,-0x1
0298 01dd       |    |		Execute	Vector,First
0299 e5ff       |    |		Load	0x2,-0x1
029a 01d7       |    |		Execute	Vector,Field_Read
029b 8221       | !  |		Call	0x1,0x21
029c e5fe       |    |		Load	0x2,-0x2
029d 8221       | !  |		Call	0x1,0x21
029e 027f       |    |		Execute	Discrete,Equal
029f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02a0 4800       |H   |		Short_Literal	0x0
02a1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02a2 0000 0000  |    |		.BLANK	0000[0x6]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab       |    |		.CONST	0x02ab								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0001       |    |		.CONST	0x0001								; Number of locals
02ab			BODY_02a8:
02ab			INIT_02a8:
02ab e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x10 = .DEBUG	0x02ab,0x05ac,0x0002,0x0000,0x000e,0x1c74,0x0000,0x00fe
													; Debug Table 0x10.0x0 = 0x2ab,0x1
02ac e001       |    |		Load	0x0,0x1
02ad 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
02ae e5fe       |    |		Load	0x2,-0x2
02af e001       |    |		Load	0x0,0x1
02b0 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
02b1 027f       |    |		Execute	Discrete,Equal
02b2 6814       |h   |		Jump_Zero	0x2c7
02b3 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x10.0x1 = 0x2b3,0x2
02b4 680a       |h   |		Jump_Zero	0x2bf
02b5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x10.0x2 = 0x2b5,0x3
02b6 e001       |    |		Load	0x0,0x1
02b7 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02b8 8222       | "  |		Call	0x1,0x22
02b9 e5fe       |    |		Load	0x2,-0x2
02ba e001       |    |		Load	0x0,0x1
02bb 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02bc 8222       | "  |		Call	0x1,0x22
02bd 01df       |    |		Execute	Vector,Equal
02be 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02bf e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x10.0x3 = 0x2bf,0x4
02c0 e001       |    |		Load	0x0,0x1
02c1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02c2 e5fe       |    |		Load	0x2,-0x2
02c3 e001       |    |		Load	0x0,0x1
02c4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02c5 01df       |    |		Execute	Vector,Equal
02c6 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02c7 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0x4 = 0x2c7,0x5
02c8 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02c9 0000 0000  |    |		.BLANK	0000[0x7]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d4       |    |		.CONST	0x02d4								; Address of begin
02d1 0004       |    |		.CONST	0x0004								; Address of exception handler
02d2 0002       |    |		.CONST	0x0002								; Number of locals
02d3			INIT_02d0:
02d3 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x11 = .DEBUG	0x02d3,0x05b8,0x0002,0x0000,0x000e,0x1c74,0x0000,0x0114
													; Debug Table 0x11.0x0 = 0x2d3,0xffff
02d4			BODY_02d0:
02d4 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0x1 = 0x2d4,0x1
02d5 01dc       |    |		Execute	Vector,Last
02d6 a402       |    |		Store_Unchecked	0x2,0x2
02d7 7804       |x   |		Jump	0x2dc
02d8 e402       |    |		Load	0x2,0x2								; Debug Table 0x11.0x2 = 0x2d8,0x3
02d9 0aff       |    |		Execute_Immediate	Plus,-0x1
02da 0248       | H  |		Execute	Discrete,Check_In_Integer
02db a402       |    |		Store_Unchecked	0x2,0x2
02dc e402       |    |		Load	0x2,0x2								; Debug Table 0x11.0x3 = 0x2dc,0x2
02dd e5ff       |    |		Load	0x2,-0x1
02de 01dd       |    |		Execute	Vector,First
02df 027b       | {  |		Execute	Discrete,Greater_Equal
02e0 e402       |    |		Load	0x2,0x2
02e1 e5ff       |    |		Load	0x2,-0x1
02e2 01d7       |    |		Execute	Vector,Field_Read
02e3 0f20       |    |		Execute_Immediate	Equal,0x20
02e4 0279       | y  |		Execute	Discrete,And
02e5 77f2       |w   |		Jump_Nonzero	0x2d8
02e6 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0x4 = 0x2e6,0x4
02e7 01dd       |    |		Execute	Vector,First
02e8 e5ff       |    |		Load	0x2,-0x1
02e9 01dd       |    |		Execute	Vector,First
02ea e402       |    |		Load	0x2,0x2
02eb 0273       | s  |		Execute	Discrete,Plus
02ec 0aff       |    |		Execute_Immediate	Plus,-0x1
02ed 0248       | H  |		Execute	Discrete,Check_In_Integer
02ee e5ff       |    |		Load	0x2,-0x1
02ef 01cf       |    |		Execute	Vector,Slice_Read
02f0 0335       | 5  |		Declare_Variable	Array,Duplicate
02f1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02f2 0000 0000  |    |		.BLANK	0000[0x6]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fc       |    |		.CONST	0x02fc								; Address of begin
02f9 0004       |    |		.CONST	0x0004								; Address of exception handler
02fa 0002       |    |		.CONST	0x0002								; Number of locals
02fb			INIT_02f8:
02fb 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x12 = .DEBUG	0x02fb,0x05c4,0x0002,0x0000,0x000e,0x1c74,0x0000,0x011d
													; Debug Table 0x12.0x0 = 0x2fb,0xffff
02fc			BODY_02f8:
02fc e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x12.0x1 = 0x2fc,0x1
02fd 01dc       |    |		Execute	Vector,Last
02fe a402       |    |		Store_Unchecked	0x2,0x2
02ff 7804       |x   |		Jump	0x304
0300 e402       |    |		Load	0x2,0x2								; Debug Table 0x12.0x2 = 0x300,0x3
0301 0aff       |    |		Execute_Immediate	Plus,-0x1
0302 0248       | H  |		Execute	Discrete,Check_In_Integer
0303 a402       |    |		Store_Unchecked	0x2,0x2
0304 e402       |    |		Load	0x2,0x2								; Debug Table 0x12.0x3 = 0x304,0x2
0305 e5ff       |    |		Load	0x2,-0x1
0306 01dd       |    |		Execute	Vector,First
0307 027b       | {  |		Execute	Discrete,Greater_Equal
0308 e402       |    |		Load	0x2,0x2
0309 e5ff       |    |		Load	0x2,-0x1
030a 01d7       |    |		Execute	Vector,Field_Read
030b 0f20       |    |		Execute_Immediate	Equal,0x20
030c 0279       | y  |		Execute	Discrete,And
030d 77f2       |w   |		Jump_Nonzero	0x300
030e e402       |    |		Load	0x2,0x2								; Debug Table 0x12.0x4 = 0x30e,0x4
030f e5ff       |    |		Load	0x2,-0x1
0310 01dd       |    |		Execute	Vector,First
0311 0273       | s  |		Execute	Discrete,Plus
0312 0248       | H  |		Execute	Discrete,Check_In_Integer
0313 0aff       |    |		Execute_Immediate	Plus,-0x1
0314 00e3       |    |		Load_Encached	Natural_Cache
0315 025b       | [  |		Execute	Discrete,Check_In_Type
0316 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0317 0000       |    |		.XXX[0x1]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 031b       |    |		.CONST	0x031b								; Address of begin
0319 0004       |    |		.CONST	0x0004								; Address of exception handler
031a 0001       |    |		.CONST	0x0001								; Number of locals
031b			BODY_0318:
031b			INIT_0318:
031b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x13 = .DEBUG	0x031b,0x05d0,0x0002,0x0000,0x000e,0x1c84,0x0000,0x011a
													; Debug Table 0x13.0x0 = 0x31b,0x1
031c 00d8       |    |		Load_Top	At_Offset_0
031d 4861       |Ha  |		Short_Literal	0x61
031e 487a       |Hz  |		Short_Literal	0x7a
031f 0262       | b  |		Execute	Discrete,In_Range
0320 7010       |p   |		Jump_Nonzero	0x331
0321 00d8       |    |		Load_Top	At_Offset_0
0322 4841       |HA  |		Short_Literal	0x41
0323 485a       |HZ  |		Short_Literal	0x5a
0324 0262       | b  |		Execute	Discrete,In_Range
0325 700d       |p   |		Jump_Nonzero	0x333
0326 00d8       |    |		Load_Top	At_Offset_0
0327 4830       |H0  |		Short_Literal	0x30
0328 4839       |H9  |		Short_Literal	0x39
0329 0262       | b  |		Execute	Discrete,In_Range
032a 700a       |p   |		Jump_Nonzero	0x335
032b 0b2d       | -  |		Execute_Immediate	Case_Compare,0x2d
032c 700a       |p   |		Jump_Nonzero	0x337
032d 0b5f       | _  |		Execute_Immediate	Case_Compare,0x5f
032e 700a       |p   |		Jump_Nonzero	0x339
032f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x13.0x1 = 0x32f,0x7
0330 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0331 4800       |H   |		Short_Literal	0x0							; Debug Table 0x13.0x2 = 0x331,0x2
0332 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0333 4800       |H   |		Short_Literal	0x0							; Debug Table 0x13.0x3 = 0x333,0x3
0334 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0335 4800       |H   |		Short_Literal	0x0							; Debug Table 0x13.0x4 = 0x335,0x4
0336 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0337 4800       |H   |		Short_Literal	0x0							; Debug Table 0x13.0x5 = 0x337,0x5
0338 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0339 4800       |H   |		Short_Literal	0x0							; Debug Table 0x13.0x6 = 0x339,0x6
033a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
033b 0000 0000  |    |		.BLANK	0000[0x5]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0343       | C  |		.CONST	0x0343								; Address of begin
0341 0004       |    |		.CONST	0x0004								; Address of exception handler
0342 0001       |    |		.CONST	0x0001								; Number of locals
0343			BODY_0340:
0343			INIT_0340:
0343 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x14 = .DEBUG	0x0343,0x05e0,0x0002,0x0000,0x000e,0x1c84,0x0000,0x0154
													; Debug Table 0x14.0x0 = 0x343,0x1
0344 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0345 e5ff       |    |		Load	0x2,-0x1
0346 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0347 e001       |    |		Load	0x0,0x1
0348 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0349 027d       | }  |		Execute	Discrete,Greater
034a 6802       |h   |		Jump_Zero	0x34d
034b 483b       |H;  |		Short_Literal	0x3b							; Debug Table 0x14.0x1 = 0x34b,0x2
034c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
034d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x14.0x2 = 0x34d,0x3
034e 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
034f e5ff       |    |		Load	0x2,-0x1
0350 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0351 e001       |    |		Load	0x0,0x1
0352 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0353 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0354 0000 0000  |    |		.BLANK	0000[0x4]
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 035c       | \  |		.CONST	0x035c								; Address of begin
0359 0004       |    |		.CONST	0x0004								; Address of exception handler
035a 0002       |    |		.CONST	0x0002								; Number of locals
035b			INIT_0358:
035b 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0x15 = .DEBUG	0x035b,0x05e8,0x0001,0x0000,0x000e,0x1c84,0x0000,0x0182
													; Debug Table 0x15.0x0 = 0x35b,0xffff
035c			BODY_0358:
035c 0007       |    |		Action	Break_Optional							; Debug Table 0x15.0x1 = 0x35c,0x1
035d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x15.0x2 = 0x35d,0x2
035e 821f       |    |		Call	0x1,0x1f
035f a402       |    |		Store_Unchecked	0x2,0x2
0360 e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0x3 = 0x360,0x3
0361 0e20       |    |		Execute_Immediate	Not_Equal,0x20
0362 7006       |p   |		Jump_Nonzero	0x369
0363 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x15.0x4 = 0x363,0x4
0364 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0365 0a01       |    |		Execute_Immediate	Plus,0x1
0366 e5ff       |    |		Load	0x2,-0x1
0367 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0368 7ff4       |    |		Jump	0x35d
0369 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
036a 0000 0000  |    |		.BLANK	0000[0x6]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0373       | s  |		.CONST	0x0373								; Address of begin
0371 0004       |    |		.CONST	0x0004								; Address of exception handler
0372 0001       |    |		.CONST	0x0001								; Number of locals
0373			BODY_0370:
0373			INIT_0370:
0373 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x16 = .DEBUG	0x0373,0x05f4,0x0002,0x0000,0x000e,0x1c84,0x0000,0x037e
													; Debug Table 0x16.0x0 = 0x373,0x1
0374 4861       |Ha  |		Short_Literal	0x61
0375 487a       |Hz  |		Short_Literal	0x7a
0376 0262       | b  |		Execute	Discrete,In_Range
0377 6809       |h   |		Jump_Zero	0x381
0378 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x16.0x1 = 0x378,0x2
0379 0ae0       |    |		Execute_Immediate	Plus,-0x20
037a 00d8       |    |		Load_Top	At_Offset_0
037b 00e8       |    |		Load_Encached	Character_Cache
037c 0260       | `  |		Execute	Discrete,In_Type
037d 7002       |p   |		Jump_Nonzero	0x380
037e 48e0       |H   |		Short_Literal	0xe0
037f 0257       | W  |		Execute	Discrete,Raise
0380 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0381 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x16.0x2 = 0x381,0x3
0382 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0383 0000 0000  |    |		.BLANK	0000[0x5]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 0390       |    |		.CONST	0x0390								; Address of begin
0389 0004       |    |		.CONST	0x0004								; Address of exception handler
038a 0002       |    |		.CONST	0x0002								; Number of locals
038b			INIT_0388:
038b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x17 = .DEBUG	0x038b,0x05fc,0x0002,0x0000,0x000e,0x1c84,0x0000,0x03a6
													; Debug Table 0x17.0x0 = 0x38b,0xffff
038c 01da       |    |		Execute	Vector,Bounds
038d 00e9       |    |		Load_Encached	String_Cache
038e 035b       | [  |		Declare_Type	Array,Constrained
038f 0337       | 7  |		Declare_Variable	Array
0390			BODY_0388:
0390 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x17.0x1 = 0x390,0x1
0391 01d9       |    |		Execute	Vector,Reverse_Bounds
0392 0263       | c  |		Execute	Discrete,Above_Bound
0393 701c       |p   |		Jump_Nonzero	0x3b0
0394 e404       |    |		Load	0x2,0x4								; Debug Table 0x17.0x2 = 0x394,0x2
0395 e5ff       |    |		Load	0x2,-0x1
0396 01d7       |    |		Execute	Vector,Field_Read
0397 4861       |Ha  |		Short_Literal	0x61
0398 487a       |Hz  |		Short_Literal	0x7a
0399 0262       | b  |		Execute	Discrete,In_Range
039a 680e       |h   |		Jump_Zero	0x3a9
039b e404       |    |		Load	0x2,0x4								; Debug Table 0x17.0x3 = 0x39b,0x3
039c e5ff       |    |		Load	0x2,-0x1
039d 01d7       |    |		Execute	Vector,Field_Read
039e 0ae0       |    |		Execute_Immediate	Plus,-0x20
039f 00d8       |    |		Load_Top	At_Offset_0
03a0 00e8       |    |		Load_Encached	Character_Cache
03a1 0260       | `  |		Execute	Discrete,In_Type
03a2 7002       |p   |		Jump_Nonzero	0x3a5
03a3 48e0       |H   |		Short_Literal	0xe0
03a4 0257       | W  |		Execute	Discrete,Raise
03a5 e404       |    |		Load	0x2,0x4
03a6 e402       |    |		Load	0x2,0x2
03a7 01d6       |    |		Execute	Vector,Field_Write
03a8 7806       |x   |		Jump	0x3af
03a9 e404       |    |		Load	0x2,0x4								; Debug Table 0x17.0x4 = 0x3a9,0x4
03aa e5ff       |    |		Load	0x2,-0x1
03ab 01d7       |    |		Execute	Vector,Field_Read
03ac e404       |    |		Load	0x2,0x4
03ad e402       |    |		Load	0x2,0x2
03ae 01d6       |    |		Execute	Vector,Field_Write
03af 3fe4       |?   |		Loop_Increasing	0x394
03b0 e402       |    |		Load	0x2,0x2								; Debug Table 0x17.0x5 = 0x3b0,0x5
03b1 00e9       |    |		Load_Encached	String_Cache
03b2 01c6       |    |		Execute	Vector,Convert_To_Formal
03b3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03b4 0000 0000  |    |		.BLANK	0000[0x4]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; Debug Table
03b8 ; --------------------------------------------------------------------------------------
03b8 0003 0018  |    |		.CONST	0x0003,0x0018
03ba 000b 047a  |   z|		.DEBUG	0x000b,0x047a,0x8000,0x0000,0x000e,0x1c74,0x0000,0x0005
03c2 003a 04a0  | :  |		.DEBUG	0x003a,0x04a0,0x8000,0x0000,0x000e,0x1c84,0x0000,0x0006
03ca 006b 04cc  | k  |		.DEBUG	0x006b,0x04cc,0x0005,0x0000,0x000e,0x1c74,0x0000,0x0009
03d2 009b 04ce  |    |		.DEBUG	0x009b,0x04ce,0x2801,0x0002,0x000e,0x1c74,0x0000,0x0020
03da 00e3 04f0  |    |		.DEBUG	0x00e3,0x04f0,0x0001,0x0000,0x000e,0x1c74,0x0000,0x0035
03e2 0133 050a  | 3  |		.DEBUG	0x0133,0x050a,0x0001,0x0000,0x000e,0x1c74,0x0000,0x0048
03ea 018b 0538  |   8|		.DEBUG	0x018b,0x0538,0x0001,0x0000,0x000e,0x1c74,0x0000,0x0056
03f2 01ab 0542  |   B|		.DEBUG	0x01ab,0x0542,0x0001,0x0000,0x000e,0x1c74,0x0000,0x0062
03fa 01c3 054a  |   J|		.DEBUG	0x01c3,0x054a,0x0001,0x0000,0x000e,0x1c74,0x0000,0x006a
0402 01e3 055e  |   ^|		.DEBUG	0x01e3,0x055e,0x0001,0x0000,0x000e,0x1c74,0x0000,0x007c
040a 020b 0574  |   t|		.DEBUG	0x020b,0x0574,0x0001,0x0000,0x000e,0x1c74,0x0000,0x008e
0412 0223 0580  | #  |		.DEBUG	0x0223,0x0580,0x0001,0x0000,0x000e,0x1c74,0x0000,0x009e
041a 0243 0594  | C  |		.DEBUG	0x0243,0x0594,0x0001,0x0000,0x000e,0x1c74,0x0000,0x00c0
0422 0253 0598  | S  |		.DEBUG	0x0253,0x0598,0x0001,0x0000,0x000e,0x1c74,0x0000,0x00d2
042a 027b 05a4  | {  |		.DEBUG	0x027b,0x05a4,0x0002,0x0000,0x000e,0x1c74,0x0000,0x00e2
0432 0293 05a8  |    |		.DEBUG	0x0293,0x05a8,0x0002,0x0000,0x000e,0x1c74,0x0000,0x00f1
043a 02ab 05ac  |    |		.DEBUG	0x02ab,0x05ac,0x0002,0x0000,0x000e,0x1c74,0x0000,0x00fe
0442 02d3 05b8  |    |		.DEBUG	0x02d3,0x05b8,0x0002,0x0000,0x000e,0x1c74,0x0000,0x0114
044a 02fb 05c4  |    |		.DEBUG	0x02fb,0x05c4,0x0002,0x0000,0x000e,0x1c74,0x0000,0x011d
0452 031b 05d0  |    |		.DEBUG	0x031b,0x05d0,0x0002,0x0000,0x000e,0x1c84,0x0000,0x011a
045a 0343 05e0  | C  |		.DEBUG	0x0343,0x05e0,0x0002,0x0000,0x000e,0x1c84,0x0000,0x0154
0462 035b 05e8  | [  |		.DEBUG	0x035b,0x05e8,0x0001,0x0000,0x000e,0x1c84,0x0000,0x0182
046a 0373 05f4  | s  |		.DEBUG	0x0373,0x05f4,0x0002,0x0000,0x000e,0x1c84,0x0000,0x037e
0472 038b 05fc  |    |		.DEBUG	0x038b,0x05fc,0x0002,0x0000,0x000e,0x1c84,0x0000,0x03a6
047a ; --------------------------------------------------------------------------------------
047a ; Debug3 Subtable 0x0
047a ; --------------------------------------------------------------------------------------
047a 0012 0000  |    |		.DBG3TAB	0x0012,0x0000
047c 000b ffff  |    |		.CONST	0x000b,0xffff
047e 000c fffe  |    |		.CONST	0x000c,0xfffe
0480 0019 fffd  |    |		.CONST	0x0019,0xfffd
0482 001b fffc  |    |		.CONST	0x001b,0xfffc
0484 001d fffb  |    |		.CONST	0x001d,0xfffb
0486 001f fffa  |    |		.CONST	0x001f,0xfffa
0488 0021 fff9  | !  |		.CONST	0x0021,0xfff9
048a 0023 fff8  | #  |		.CONST	0x0023,0xfff8
048c 0025 fff7  | %  |		.CONST	0x0025,0xfff7
048e 0027 fff6  | '  |		.CONST	0x0027,0xfff6
0490 0029 fff5  | )  |		.CONST	0x0029,0xfff5
0492 002b fff4  | +  |		.CONST	0x002b,0xfff4
0494 002d fff3  | -  |		.CONST	0x002d,0xfff3
0496 002f fff2  | /  |		.CONST	0x002f,0xfff2
0498 0031 fff1  | 1  |		.CONST	0x0031,0xfff1
049a 0033 fff0  | 3  |		.CONST	0x0033,0xfff0
049c 0035 ffef  | 5  |		.CONST	0x0035,0xffef
049e 0037 ffee  | 7  |		.CONST	0x0037,0xffee
04a0 ; --------------------------------------------------------------------------------------
04a0 ; Debug3 Subtable 0x1
04a0 ; --------------------------------------------------------------------------------------
04a0 0015 0000  |    |		.DBG3TAB	0x0015,0x0000
04a2 003a ffff  | :  |		.CONST	0x003a,0xffff
04a4 003c fffe  | <  |		.CONST	0x003c,0xfffe
04a6 003e fffd  | >  |		.CONST	0x003e,0xfffd
04a8 0040 fffc  | @  |		.CONST	0x0040,0xfffc
04aa 0042 fffb  | B  |		.CONST	0x0042,0xfffb
04ac 0044 fffa  | D  |		.CONST	0x0044,0xfffa
04ae 0046 fff9  | F  |		.CONST	0x0046,0xfff9
04b0 0048 fff8  | H  |		.CONST	0x0048,0xfff8
04b2 004a fff7  | J  |		.CONST	0x004a,0xfff7
04b4 004c fff6  | L  |		.CONST	0x004c,0xfff6
04b6 004e fff5  | N  |		.CONST	0x004e,0xfff5
04b8 0050 fff4  | P  |		.CONST	0x0050,0xfff4
04ba 0052 fff3  | R  |		.CONST	0x0052,0xfff3
04bc 0054 fff2  | T  |		.CONST	0x0054,0xfff2
04be 0056 fff1  | V  |		.CONST	0x0056,0xfff1
04c0 0058 fff0  | X  |		.CONST	0x0058,0xfff0
04c2 005a ffef  | Z  |		.CONST	0x005a,0xffef
04c4 005c ffee  | \  |		.CONST	0x005c,0xffee
04c6 005e ffed  | ^  |		.CONST	0x005e,0xffed
04c8 0060 ffec  | `  |		.CONST	0x0060,0xffec
04ca 0062 ffeb  | b  |		.CONST	0x0062,0xffeb
04cc ; --------------------------------------------------------------------------------------
04cc ; Debug3 Subtable 0x2
04cc ; --------------------------------------------------------------------------------------
04cc 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
04ce ; --------------------------------------------------------------------------------------
04ce ; Debug3 Subtable 0x3
04ce ; --------------------------------------------------------------------------------------
04ce 0004 000c  |    |		.DBG3TAB	0x0004,0x000c
04d0 009b ffff  |    |		.CONST	0x009b,0xffff
04d2 00a1 fffe  |    |		.CONST	0x00a1,0xfffe
04d4 00a2 fffd  |    |		.CONST	0x00a2,0xfffd
04d6 00a4 fffc  |    |		.CONST	0x00a4,0xfffc
04d8 00a6 0001  |    |		.CONST	0x00a6,0x0001
04da 00ab 0002  |    |		.CONST	0x00ab,0x0002
04dc 00b0 0003  |    |		.CONST	0x00b0,0x0003
04de 00b4 0004  |    |		.CONST	0x00b4,0x0004
04e0 00b7 0005  |    |		.CONST	0x00b7,0x0005
04e2 00b8 0006  |    |		.CONST	0x00b8,0x0006
04e4 00c5 0007  |    |		.CONST	0x00c5,0x0007
04e6 00c9 0008  |    |		.CONST	0x00c9,0x0008
04e8 00cb 0009  |    |		.CONST	0x00cb,0x0009
04ea 00cd 000a  |    |		.CONST	0x00cd,0x000a
04ec 00d4 000b  |    |		.CONST	0x00d4,0x000b
04ee 00d9 000c  |    |		.CONST	0x00d9,0x000c
04f0 ; --------------------------------------------------------------------------------------
04f0 ; Debug3 Subtable 0x4
04f0 ; --------------------------------------------------------------------------------------
04f0 0002 000a  |    |		.DBG3TAB	0x0002,0x000a
04f2 00e3 ffff  |    |		.CONST	0x00e3,0xffff
04f4 00e8 fffe  |    |		.CONST	0x00e8,0xfffe
04f6 00ec 0001  |    |		.CONST	0x00ec,0x0001
04f8 00f1 0002  |    |		.CONST	0x00f1,0x0002
04fa 00f7 0003  |    |		.CONST	0x00f7,0x0003
04fc 00fc 0004  |    |		.CONST	0x00fc,0x0004
04fe 0109 0005  |    |		.CONST	0x0109,0x0005
0500 0112 0006  |    |		.CONST	0x0112,0x0006
0502 0118 0007  |    |		.CONST	0x0118,0x0007
0504 011a 0008  |    |		.CONST	0x011a,0x0008
0506 011c 0009  |    |		.CONST	0x011c,0x0009
0508 0121 000a  | !  |		.CONST	0x0121,0x000a
050a ; --------------------------------------------------------------------------------------
050a ; Debug3 Subtable 0x5
050a ; --------------------------------------------------------------------------------------
050a 0002 0014  |    |		.DBG3TAB	0x0002,0x0014
050c 0133 ffff  | 3  |		.CONST	0x0133,0xffff
050e 0134 fffe  | 4  |		.CONST	0x0134,0xfffe
0510 0135 0001  | 5  |		.CONST	0x0135,0x0001
0512 0138 0002  | 8  |		.CONST	0x0138,0x0002
0514 013d 0003  | =  |		.CONST	0x013d,0x0003
0516 0141 0004  | A  |		.CONST	0x0141,0x0004
0518 0146 0005  | F  |		.CONST	0x0146,0x0005
051a 0147 0006  | G  |		.CONST	0x0147,0x0006
051c 014a 0007  | J  |		.CONST	0x014a,0x0007
051e 014d 0008  | M  |		.CONST	0x014d,0x0008
0520 0152 0009  | R  |		.CONST	0x0152,0x0009
0522 0156 000a  | V  |		.CONST	0x0156,0x000a
0524 0157 000b  | W  |		.CONST	0x0157,0x000b
0526 015c 000c  | \  |		.CONST	0x015c,0x000c
0528 0162 000d  | b  |		.CONST	0x0162,0x000d
052a 0163 000e  | c  |		.CONST	0x0163,0x000e
052c 0166 000f  | f  |		.CONST	0x0166,0x000f
052e 0169 0010  | i  |		.CONST	0x0169,0x0010
0530 016e 0011  | n  |		.CONST	0x016e,0x0011
0532 0174 0012  | t  |		.CONST	0x0174,0x0012
0534 0178 0013  | x  |		.CONST	0x0178,0x0013
0536 017d 0014  | }  |		.CONST	0x017d,0x0014
0538 ; --------------------------------------------------------------------------------------
0538 ; Debug3 Subtable 0x6
0538 ; --------------------------------------------------------------------------------------
0538 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
053a 018b ffff  |    |		.CONST	0x018b,0xffff
053c 0194 0001  |    |		.CONST	0x0194,0x0001
053e 0198 0002  |    |		.CONST	0x0198,0x0002
0540 019d 0003  |    |		.CONST	0x019d,0x0003
0542 ; --------------------------------------------------------------------------------------
0542 ; Debug3 Subtable 0x7
0542 ; --------------------------------------------------------------------------------------
0542 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0544 01ab ffff  |    |		.CONST	0x01ab,0xffff
0546 01b1 0001  |    |		.CONST	0x01b1,0x0001
0548 01b5 0002  |    |		.CONST	0x01b5,0x0002
054a ; --------------------------------------------------------------------------------------
054a ; Debug3 Subtable 0x8
054a ; --------------------------------------------------------------------------------------
054a 0002 0007  |    |		.DBG3TAB	0x0002,0x0007
054c 01c3 ffff  |    |		.CONST	0x01c3,0xffff
054e 01c4 fffe  |    |		.CONST	0x01c4,0xfffe
0550 01c5 0001  |    |		.CONST	0x01c5,0x0001
0552 01cf 0002  |    |		.CONST	0x01cf,0x0002
0554 01d1 0003  |    |		.CONST	0x01d1,0x0003
0556 01d4 0004  |    |		.CONST	0x01d4,0x0004
0558 01d6 0005  |    |		.CONST	0x01d6,0x0005
055a 01d9 0006  |    |		.CONST	0x01d9,0x0006
055c 01dc 0007  |    |		.CONST	0x01dc,0x0007
055e ; --------------------------------------------------------------------------------------
055e ; Debug3 Subtable 0x9
055e ; --------------------------------------------------------------------------------------
055e 0002 0008  |    |		.DBG3TAB	0x0002,0x0008
0560 01e3 ffff  |    |		.CONST	0x01e3,0xffff
0562 01e4 fffe  |    |		.CONST	0x01e4,0xfffe
0564 01e5 0001  |    |		.CONST	0x01e5,0x0001
0566 01e7 0002  |    |		.CONST	0x01e7,0x0002
0568 01f1 0003  |    |		.CONST	0x01f1,0x0003
056a 01f3 0004  |    |		.CONST	0x01f3,0x0004
056c 01f6 0005  |    |		.CONST	0x01f6,0x0005
056e 01f8 0006  |    |		.CONST	0x01f8,0x0006
0570 01fb 0007  |    |		.CONST	0x01fb,0x0007
0572 01fe 0008  |    |		.CONST	0x01fe,0x0008
0574 ; --------------------------------------------------------------------------------------
0574 ; Debug3 Subtable 0xa
0574 ; --------------------------------------------------------------------------------------
0574 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0576 020b ffff  |    |		.CONST	0x020b,0xffff
0578 020c 0001  |    |		.CONST	0x020c,0x0001
057a 020f 0002  |    |		.CONST	0x020f,0x0002
057c 0212 0003  |    |		.CONST	0x0212,0x0003
057e 0216 0004  |    |		.CONST	0x0216,0x0004
0580 ; --------------------------------------------------------------------------------------
0580 ; Debug3 Subtable 0xb
0580 ; --------------------------------------------------------------------------------------
0580 0001 0008  |    |		.DBG3TAB	0x0001,0x0008
0582 0223 ffff  | #  |		.CONST	0x0223,0xffff
0584 0224 0001  | $  |		.CONST	0x0224,0x0001
0586 0226 0002  | &  |		.CONST	0x0226,0x0002
0588 022b 0003  | +  |		.CONST	0x022b,0x0003
058a 022d 0004  | -  |		.CONST	0x022d,0x0004
058c 0230 0005  | 0  |		.CONST	0x0230,0x0005
058e 0235 0006  | 5  |		.CONST	0x0235,0x0006
0590 0237 0007  | 7  |		.CONST	0x0237,0x0007
0592 023a 0008  | :  |		.CONST	0x023a,0x0008
0594 ; --------------------------------------------------------------------------------------
0594 ; Debug3 Subtable 0xc
0594 ; --------------------------------------------------------------------------------------
0594 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0596 0243 0001  | C  |		.CONST	0x0243,0x0001
0598 ; --------------------------------------------------------------------------------------
0598 ; Debug3 Subtable 0xd
0598 ; --------------------------------------------------------------------------------------
0598 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
059a 0253 0001  | S  |		.CONST	0x0253,0x0001
059c 025b 0002  | [  |		.CONST	0x025b,0x0002
059e 025e 0003  | ^  |		.CONST	0x025e,0x0003
05a0 026e 0004  | n  |		.CONST	0x026e,0x0004
05a2 0271 0005  | q  |		.CONST	0x0271,0x0005
05a4 ; --------------------------------------------------------------------------------------
05a4 ; Debug3 Subtable 0xe
05a4 ; --------------------------------------------------------------------------------------
05a4 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
05a6 027b 0001  | {  |		.CONST	0x027b,0x0001
05a8 ; --------------------------------------------------------------------------------------
05a8 ; Debug3 Subtable 0xf
05a8 ; --------------------------------------------------------------------------------------
05a8 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
05aa 0293 0001  |    |		.CONST	0x0293,0x0001
05ac ; --------------------------------------------------------------------------------------
05ac ; Debug3 Subtable 0x10
05ac ; --------------------------------------------------------------------------------------
05ac 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
05ae 02ab 0001  |    |		.CONST	0x02ab,0x0001
05b0 02b3 0002  |    |		.CONST	0x02b3,0x0002
05b2 02b5 0003  |    |		.CONST	0x02b5,0x0003
05b4 02bf 0004  |    |		.CONST	0x02bf,0x0004
05b6 02c7 0005  |    |		.CONST	0x02c7,0x0005
05b8 ; --------------------------------------------------------------------------------------
05b8 ; Debug3 Subtable 0x11
05b8 ; --------------------------------------------------------------------------------------
05b8 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
05ba 02d3 ffff  |    |		.CONST	0x02d3,0xffff
05bc 02d4 0001  |    |		.CONST	0x02d4,0x0001
05be 02d8 0003  |    |		.CONST	0x02d8,0x0003
05c0 02dc 0002  |    |		.CONST	0x02dc,0x0002
05c2 02e6 0004  |    |		.CONST	0x02e6,0x0004
05c4 ; --------------------------------------------------------------------------------------
05c4 ; Debug3 Subtable 0x12
05c4 ; --------------------------------------------------------------------------------------
05c4 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
05c6 02fb ffff  |    |		.CONST	0x02fb,0xffff
05c8 02fc 0001  |    |		.CONST	0x02fc,0x0001
05ca 0300 0003  |    |		.CONST	0x0300,0x0003
05cc 0304 0002  |    |		.CONST	0x0304,0x0002
05ce 030e 0004  |    |		.CONST	0x030e,0x0004
05d0 ; --------------------------------------------------------------------------------------
05d0 ; Debug3 Subtable 0x13
05d0 ; --------------------------------------------------------------------------------------
05d0 0000 0007  |    |		.DBG3TAB	0x0000,0x0007
05d2 031b 0001  |    |		.CONST	0x031b,0x0001
05d4 032f 0007  | /  |		.CONST	0x032f,0x0007
05d6 0331 0002  | 1  |		.CONST	0x0331,0x0002
05d8 0333 0003  | 3  |		.CONST	0x0333,0x0003
05da 0335 0004  | 5  |		.CONST	0x0335,0x0004
05dc 0337 0005  | 7  |		.CONST	0x0337,0x0005
05de 0339 0006  | 9  |		.CONST	0x0339,0x0006
05e0 ; --------------------------------------------------------------------------------------
05e0 ; Debug3 Subtable 0x14
05e0 ; --------------------------------------------------------------------------------------
05e0 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
05e2 0343 0001  | C  |		.CONST	0x0343,0x0001
05e4 034b 0002  | K  |		.CONST	0x034b,0x0002
05e6 034d 0003  | M  |		.CONST	0x034d,0x0003
05e8 ; --------------------------------------------------------------------------------------
05e8 ; Debug3 Subtable 0x15
05e8 ; --------------------------------------------------------------------------------------
05e8 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
05ea 035b ffff  | [  |		.CONST	0x035b,0xffff
05ec 035c 0001  | \  |		.CONST	0x035c,0x0001
05ee 035d 0002  | ]  |		.CONST	0x035d,0x0002
05f0 0360 0003  | `  |		.CONST	0x0360,0x0003
05f2 0363 0004  | c  |		.CONST	0x0363,0x0004
05f4 ; --------------------------------------------------------------------------------------
05f4 ; Debug3 Subtable 0x16
05f4 ; --------------------------------------------------------------------------------------
05f4 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
05f6 0373 0001  | s  |		.CONST	0x0373,0x0001
05f8 0378 0002  | x  |		.CONST	0x0378,0x0002
05fa 0381 0003  |    |		.CONST	0x0381,0x0003
05fc ; --------------------------------------------------------------------------------------
05fc ; Debug3 Subtable 0x17
05fc ; --------------------------------------------------------------------------------------
05fc 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
05fe 038b ffff  |    |		.CONST	0x038b,0xffff
0600 0390 0001  |    |		.CONST	0x0390,0x0001
0602 0394 0002  |    |		.CONST	0x0394,0x0002
0604 039b 0003  |    |		.CONST	0x039b,0x0003
0606 03a9 0004  |    |		.CONST	0x03a9,0x0004
0608 03b0 0005  |    |		.CONST	0x03b0,0x0005
060a 0000 0000  |    |		.BLANK	0000[0x1f6]