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

⟦9e0de9293⟧

    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 0578       | x  |		.CONST	0x0578								; 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 0088       |    |		.CONST	0x0088								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0027       | '  |		.CONST	0x0027								; Number of locals
000b			INIT_0008:
000b 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x0 = .DEBUG	0x000b,0x061a,0x8000,0x0000,0x0056,0x5a75,0x0000,0x000c
													; Debug Table 0x0.0x0 = 0xb,0xffff
													; Debug Table 0x0.0x1 = 0xb,0xfffe
													; Debug Table 0x0.0x2 = 0xb,0xfffd
													; Debug Table 0x0.0x3 = 0xb,0xfffc
000c 00e3       |    |		Load_Encached	Natural_Cache
000d 00e3       |    |		Load_Encached	Natural_Cache
000e 02a0       |    |		Declare_Subprogram	Null_Subprogram
000f 4803       |H   |		Short_Literal	0x3
0010 032e       | .  |		Declare_Type	Record,Defined,Visible
0011 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0x0.0x4 = 0x11,0xfffb
0012 0266       | f  |		Execute	Discrete,Bounds
0013 00da       |    |		Load_Top	At_Offset_2
0014 02a0       |    |		Declare_Subprogram	Null_Subprogram
0015 4801       |H   |		Short_Literal	0x1
0016 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
0017 03a9       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible			; Debug Table 0x0.0x5 = 0x17,0xfffa
0018 00c4       |    |		Action	Make_Default							; Debug Table 0x0.0x6 = 0x18,0xfff9
0019 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 029a 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x1d,0xfff6
001f 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1f,0xfff5
0021 029a 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x21,0xfff4
0023 029a 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x23,0xfff3
0025 029a 036b  |   k|		Declare_Subprogram	INIT_0368,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x25,0xfff2
0027 029a 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x27,0xfff1
0029 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0xf = 0x29,0xfff0
002a 4802       |H   |		Short_Literal	0x2
002b 029f 037b  |   {|		Declare_Subprogram	INIT_0378,For_Call
002d 03fe       |    |		Declare_Type	Discrete,Defined,Visible
002e 4805       |H   |		Short_Literal	0x5							; Debug Table 0x0.0x10 = 0x2e,0xffef
002f 032b       | +  |		Declare_Type	Record,Incomplete,Visible
0030 029a 0393  |    |		Declare_Subprogram	INIT_0390,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x11 = 0x30,0xffee
0032 029a 03a3  |    |		Declare_Subprogram	INIT_03a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x12 = 0x32,0xffed
0034 029a 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x13 = 0x34,0xffec
0036 029a 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x14 = 0x36,0xffeb
0038 029a 046b  |   k|		Declare_Subprogram	INIT_0468,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x15 = 0x38,0xffea
003a 62f5       |b   |		Indirect_Literal	Discrete,0x330,{0x00000000, 0x565a7501}		; Debug Table 0x0.0x16 = 0x3a,0xffe9
003b 0129       | )  |		Execute	Any,Make_Visible
003c 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x0.0x17 = 0x3c,0xffe8
003d 00e3       |    |		Load_Encached	Natural_Cache
003e 02a0       |    |		Declare_Subprogram	Null_Subprogram
003f 4802       |H   |		Short_Literal	0x2
0040 032d       | -  |		Declare_Type	Record,Defined
0041 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x18 = 0x41,0xffe7
0042 0322       | "  |		Declare_Variable	Record
0043 4800       |H   |		Short_Literal	0x0
0044 00d9       |    |		Load_Top	At_Offset_1
0045 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0046 4800       |H   |		Short_Literal	0x0
0047 00d9       |    |		Load_Top	At_Offset_1
0048 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0049 62e2       |b   |		Indirect_Literal	Discrete,0x32c,{0x00000000, 0x00565a75}		; Debug Table 0x0.0x19 = 0x49,0xffe6
004a 490c       |I   |		Short_Literal	0x10c
004b 00db       |    |		Load_Top	At_Offset_3
004c 00db       |    |		Load_Top	At_Offset_3
004d 480a       |H   |		Short_Literal	0xa
004e e001       |    |		Load	0x0,0x1
004f 0387       |    |		Declare_Variable	Package
0050 00d8       |    |		Load_Top	At_Offset_0
0051 020f       |    |		Execute	Module,Activate
0052 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x1a = 0x52,0xffe5
0053 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0054 e20f       |    |		Load	0x1,0xf
0055 03a2       |    |		Complete_Type	Heap_Access,By_Renaming
0056 e20f       |    |		Load	0x1,0xf								; Debug Table 0x0.0x1b = 0x56,0xffe4
0057 039e       |    |		Declare_Variable	Heap_Access,Visible
0058 00d9       |    |		Load_Top	At_Offset_1
0059 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
005a c224       | $  |		Store	0x1,0x24
005b c210       |    |		Store	0x1,0x10
005c e20e       |    |		Load	0x1,0xe								; Debug Table 0x0.0x1c = 0x5c,0xffe3
005d 02a0       |    |		Declare_Subprogram	Null_Subprogram
005e 03ad       |    |		Declare_Type	Heap_Access,Defined
005f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x1d = 0x5f,0xffe2
													; Debug Table 0x0.0x1e = 0x5f,0xffe1
0060 00e3       |    |		Load_Encached	Natural_Cache
0061 e219       |    |		Load	0x1,0x19
0062 00e3       |    |		Load_Encached	Natural_Cache
0063 00e1       |    |		Load_Encached	Boolean_Cache
0064 02a0       |    |		Declare_Subprogram	Null_Subprogram
0065 e21a       |    |		Load	0x1,0x1a
0066 0326       | &  |		Complete_Type	Record,By_Defining
0067 00bf       |    |		Action	Accept_Activation
0068 e002       |    |		Load	0x0,0x2								; Debug Table 0x1 = .DEBUG	0x0068,0x065a,0x8000,0x0000,0x0056,0xce35,0x0000,0x0005
													; Debug Table 0x1.0x0 = 0x68,0xffff
0069 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
006a e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x1 = 0x6a,0xfffe
006b 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
006c 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x2 = 0x6c,0xfffd
													; Debug Table 0x1.0x3 = 0x6c,0xfffc
													; Debug Table 0x1.0x4 = 0x6c,0xfffb
006d 00c7       |    |		Action	Elaborate_Subprogram
006e 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x5 = 0x6e,0xfffa
006f 00c7       |    |		Action	Elaborate_Subprogram
0070 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x6 = 0x70,0xfff9
0071 00c7       |    |		Action	Elaborate_Subprogram
0072 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x7 = 0x72,0xfff8
0073 00c7       |    |		Action	Elaborate_Subprogram
0074 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x8 = 0x74,0xfff7
0075 00c7       |    |		Action	Elaborate_Subprogram
0076 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x9 = 0x76,0xfff6
0077 00c7       |    |		Action	Elaborate_Subprogram
0078 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xa = 0x78,0xfff5
0079 00c7       |    |		Action	Elaborate_Subprogram
007a 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0xb = 0x7a,0xfff4
007b 00c7       |    |		Action	Elaborate_Subprogram
007c 029d 047b  |   {|		Declare_Subprogram	INIT_0478,For_Outer_Call			; Debug Table 0x1.0xc = 0x7c,0xfff3
007e 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0xd = 0x7e,0xfff2
007f 00c7       |    |		Action	Elaborate_Subprogram
0080 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0xe = 0x80,0xfff1
0081 00c7       |    |		Action	Elaborate_Subprogram
0082 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0xf = 0x82,0xfff0
0083 00c7       |    |		Action	Elaborate_Subprogram
0084 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x1.0x10 = 0x84,0xffef
0085 00c7       |    |		Action	Elaborate_Subprogram
0086 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f				; Debug Table 0x1.0x11 = 0x86,0xffee
0087 00c7       |    |		Action	Elaborate_Subprogram
0088			BODY_0008:
0088 00bc       |    |		Action	Signal_Activated
0089 00bb       |    |		Action	Signal_Completion
008a 0000 0000  |    |		.BLANK	0000[0x6]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093       |    |		.CONST	0x0093								; Address of begin
0091 0004       |    |		.CONST	0x0004								; Address of exception handler
0092 0001       |    |		.CONST	0x0001								; Number of locals
0093			BODY_0090:
0093			INIT_0090:
0093 e223       | #  |		Load	0x1,0x23							; Debug Table 0x2 = .DEBUG	0x0093,0x0680,0x0001,0x0000,0x0056,0x5a75,0x0000,0x003e
													; Debug Table 0x2.0x0 = 0x93,0x1
0094 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
0095 00db       |    |		Load_Top	At_Offset_3
0096 e223       | #  |		Load	0x1,0x23
0097 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0098 c5fe       |    |		Store	0x2,-0x2
0099 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
009a 0000 0000  |    |		.BLANK	0000[0x6]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3       |    |		.CONST	0x00a3								; Address of begin
00a1 0004       |    |		.CONST	0x0004								; Address of exception handler
00a2 0001       |    |		.CONST	0x0001								; Number of locals
00a3			BODY_00a0:
00a3			INIT_00a0:
00a3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x00a3,0x0684,0x0001,0x0000,0x0056,0x5a75,0x0000,0x004c
													; Debug Table 0x3.0x0 = 0xa3,0x1
00a4 e223       | #  |		Load	0x1,0x23
00a5 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
00a6 0216       |    |		Execute	Heap_Access,Convert
00a7 e223       | #  |		Load	0x1,0x23
00a8 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00a9 e20f       |    |		Load	0x1,0xf
00aa 0216       |    |		Execute	Heap_Access,Convert
00ab 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
00ac 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00ad 0000 0000  |    |		.XXX[0x3]
00af 0000       |    |
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3       |    |		.CONST	0x00b3								; Address of begin
00b1 0004       |    |		.CONST	0x0004								; Address of exception handler
00b2 0001       |    |		.CONST	0x0001								; Number of locals
00b3			BODY_00b0:
00b3			INIT_00b0:
00b3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4 = .DEBUG	0x00b3,0x0688,0x0002,0x0000,0x0056,0x5a75,0x0000,0x0054
													; Debug Table 0x4.0x0 = 0xb3,0x1
00b4 e223       | #  |		Load	0x1,0x23
00b5 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
00b6 0f01       |    |		Execute_Immediate	Equal,0x1
00b7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00c9       |    |		.CONST	0x00c9								; Address of begin
00b9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ba 0008       |    |		.CONST	0x0008								; Number of locals
00bb			INIT_00b8:
00bb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x00bb,0x068c,0x0001,0x0000,0x0056,0x5a75,0x0000,0x005d
													; Debug Table 0x5.0x0 = 0xbb,0xffff
00bc 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00bd 00e3       |    |		Load_Encached	Natural_Cache
00be 03f1       |    |		Declare_Variable	Discrete,With_Value
00bf 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x1 = 0xbf,0xfffe
00c0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
00c1 00e3       |    |		Load_Encached	Natural_Cache
00c2 03f1       |    |		Declare_Variable	Discrete,With_Value
00c3 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x5.0x2 = 0xc3,0xfffd
00c4 e221       | !  |		Load	0x1,0x21							; Debug Table 0x5.0x3 = 0xc4,0xfffc
00c5 0322       | "  |		Declare_Variable	Record
00c6 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x5.0x4 = 0xc6,0xfffb
00c7 03e9       |    |		Declare_Variable	Discrete,Duplicate
00c8 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x5.0x5 = 0xc8,0xfffa
00c9			BODY_00b8:
00c9 e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x6 = 0xc9,0x1
00ca 7003       |p   |		Jump_Nonzero	0xce
00cb e403       |    |		Load	0x2,0x3
00cc 7001       |p   |		Jump_Nonzero	0xce
00cd 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x5.0x7 = 0xcd,0x2
00ce 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0x5.0x8 = 0xce,0x3
00cf e5ff       |    |		Load	0x2,-0x1
00d0 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00d1 0a01       |    |		Execute_Immediate	Plus,0x1
00d2 00e4       |    |		Load_Encached	Positive_Cache
00d3 025b       | [  |		Execute	Discrete,Check_In_Type
00d4 e5fe       |    |		Load	0x2,-0x2
00d5 e223       | #  |		Load	0x1,0x23
00d6 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00d7 c404       |    |		Store	0x2,0x4
00d8 e404       |    |		Load	0x2,0x4								; Debug Table 0x5.0x9 = 0xd8,0x4
00d9 0aff       |    |		Execute_Immediate	Plus,-0x1
00da c404       |    |		Store	0x2,0x4
00db 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0xa = 0xdb,0x5
00dc e5fe       |    |		Load	0x2,-0x2
00dd e223       | #  |		Load	0x1,0x23
00de 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00df 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
00e0 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0xb = 0xe0,0x6
00e1 e5fe       |    |		Load	0x2,-0x2
00e2 e223       | #  |		Load	0x1,0x23
00e3 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00e4 e405       |    |		Load	0x2,0x5
00e5 017d       | }  |		Execute	Record,Structure_Write
00e6 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0xc = 0xe6,0x7
00e7 704f       |pO  |		Jump_Nonzero	0x137
00e8 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0xd = 0xe8,0x8
00e9 e222       | "  |		Load	0x1,0x22
00ea 017f       |    |		Execute	Record,Equal
00eb 680e       |h   |		Jump_Zero	0xfa
00ec 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0xe = 0xec,0x9
00ed e5fe       |    |		Load	0x2,-0x2
00ee e223       | #  |		Load	0x1,0x23
00ef 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
00f0 e404       |    |		Load	0x2,0x4								; Debug Table 0x5.0xf = 0xf0,0xa
00f1 4800       |H   |		Short_Literal	0x0
00f2 e5fe       |    |		Load	0x2,-0x2
00f3 e223       | #  |		Load	0x1,0x23
00f4 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
00f5 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x10 = 0xf5,0xb
00f6 e5fe       |    |		Load	0x2,-0x2
00f7 e223       | #  |		Load	0x1,0x23
00f8 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
00f9 7830       |x0  |		Jump	0x12a
00fa 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x11 = 0xfa,0xc
													; Debug Table 0x5.0x12 = 0xfa,0xfbff
00fb 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00fc e404       |    |		Load	0x2,0x4
00fd 0272       | r  |		Execute	Discrete,Minus
00fe 0248       | H  |		Execute	Discrete,Check_In_Integer
00ff e402       |    |		Load	0x2,0x2
0100 8225       | %  |		Call	0x1,0x25
0101 00e2       |    |		Load_Encached	Integer_Cache
0102 03f1       |    |		Declare_Variable	Discrete,With_Value
0103 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x13 = 0x103,0x401
0104 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
0105 6811       |h   |		Jump_Zero	0x117
0106 e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x14 = 0x106,0x402
0107 e405       |    |		Load	0x2,0x5
0108 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0109 0273       | s  |		Execute	Discrete,Plus
010a 0248       | H  |		Execute	Discrete,Check_In_Integer
010b 00d9       |    |		Load_Top	At_Offset_1
010c 0272       | r  |		Execute	Discrete,Minus
010d c402       |    |		Store	0x2,0x2
010e e403       |    |		Load	0x2,0x3								; Debug Table 0x5.0x15 = 0x10e,0x403
010f e405       |    |		Load	0x2,0x5
0110 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0111 0273       | s  |		Execute	Discrete,Plus
0112 0248       | H  |		Execute	Discrete,Check_In_Integer
0113 00d9       |    |		Load_Top	At_Offset_1
0114 0272       | r  |		Execute	Discrete,Minus
0115 c403       |    |		Store	0x2,0x3
0116 7812       |x   |		Jump	0x129
0117 e405       |    |		Load	0x2,0x5								; Debug Table 0x5.0x16 = 0x117,0x404
0118 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0119 00d9       |    |		Load_Top	At_Offset_1
011a 0272       | r  |		Execute	Discrete,Minus
011b 00e3       |    |		Load_Encached	Natural_Cache
011c 025b       | [  |		Execute	Discrete,Check_In_Type
011d 4800       |H   |		Short_Literal	0x0
011e e5fe       |    |		Load	0x2,-0x2
011f e223       | #  |		Load	0x1,0x23
0120 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0121 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x17 = 0x121,0x405
0122 e5fe       |    |		Load	0x2,-0x2
0123 e223       | #  |		Load	0x1,0x23
0124 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0125 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x18 = 0x125,0x406
0126 e5fe       |    |		Load	0x2,-0x2
0127 e223       | #  |		Load	0x1,0x23
0128 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0129 00d1       |    |		Pop_Control	Pop_Count_1
012a e221       | !  |		Load	0x1,0x21							; Debug Table 0x5.0x19 = 0x12a,0xd
012b 0322       | "  |		Declare_Variable	Record
012c e402       |    |		Load	0x2,0x2
012d 00d9       |    |		Load_Top	At_Offset_1
012e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
012f e403       |    |		Load	0x2,0x3
0130 00d9       |    |		Load_Top	At_Offset_1
0131 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0132 4800       |H   |		Short_Literal	0x0
0133 e5fe       |    |		Load	0x2,-0x2
0134 e223       | #  |		Load	0x1,0x23
0135 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0136 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x5.0x1a = 0x136,0xe
0137 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x1b = 0x137,0xf
0138 e222       | "  |		Load	0x1,0x22
0139 017f       |    |		Execute	Record,Equal
013a 6822       |h"  |		Jump_Zero	0x15d
013b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x1c = 0x13b,0x10
013c e404       |    |		Load	0x2,0x4
013d 0272       | r  |		Execute	Discrete,Minus
013e 005a       | Z  |		Store_Top	Discrete,At_Offset_2
013f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x1d = 0x13f,0x11
0140 e5fe       |    |		Load	0x2,-0x2
0141 e223       | #  |		Load	0x1,0x23
0142 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0143 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x1e = 0x143,0x12
0144 4801       |H   |		Short_Literal	0x1
0145 e223       | #  |		Load	0x1,0x23
0146 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0147 0334       | 4  |		Declare_Variable	Array,With_Constraint
0148 e404       |    |		Load	0x2,0x4
0149 4800       |H   |		Short_Literal	0x0
014a 00da       |    |		Load_Top	At_Offset_2
014b 01d6       |    |		Execute	Vector,Field_Write
014c 00da       |    |		Load_Top	At_Offset_2
014d 4801       |H   |		Short_Literal	0x1
014e 00da       |    |		Load_Top	At_Offset_2
014f 01d6       |    |		Execute	Vector,Field_Write
0150 e5fe       |    |		Load	0x2,-0x2
0151 e223       | #  |		Load	0x1,0x23
0152 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0153 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x1f = 0x153,0x13
0154 e5fe       |    |		Load	0x2,-0x2
0155 e223       | #  |		Load	0x1,0x23
0156 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0157 e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x20 = 0x157,0x14
0158 00da       |    |		Load_Top	At_Offset_2
0159 0272       | r  |		Execute	Discrete,Minus
015a 0248       | H  |		Execute	Discrete,Check_In_Integer
015b 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
015c 7854       |xT  |		Jump	0x1b1
015d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x21 = 0x15d,0x15
													; Debug Table 0x5.0x22 = 0x15d,0xf7ff
015e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
015f e404       |    |		Load	0x2,0x4
0160 0272       | r  |		Execute	Discrete,Minus
0161 0248       | H  |		Execute	Discrete,Check_In_Integer
0162 e402       |    |		Load	0x2,0x2
0163 8225       | %  |		Call	0x1,0x25
0164 00e2       |    |		Load_Encached	Integer_Cache
0165 03f1       |    |		Declare_Variable	Discrete,With_Value
0166 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x23 = 0x166,0x801
0167 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
0168 681c       |h   |		Jump_Zero	0x185
0169 e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x24 = 0x169,0x802
016a e404       |    |		Load	0x2,0x4
016b 0273       | s  |		Execute	Discrete,Plus
016c 0248       | H  |		Execute	Discrete,Check_In_Integer
016d e405       |    |		Load	0x2,0x5
016e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
016f 8226       | &  |		Call	0x1,0x26
0170 00db       |    |		Load_Top	At_Offset_3
0171 0272       | r  |		Execute	Discrete,Minus
0172 0248       | H  |		Execute	Discrete,Check_In_Integer
0173 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0174 e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x25 = 0x174,0x803
0175 e405       |    |		Load	0x2,0x5
0176 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0177 0273       | s  |		Execute	Discrete,Plus
0178 0248       | H  |		Execute	Discrete,Check_In_Integer
0179 00d9       |    |		Load_Top	At_Offset_1
017a 0272       | r  |		Execute	Discrete,Minus
017b c402       |    |		Store	0x2,0x2
017c e403       |    |		Load	0x2,0x3								; Debug Table 0x5.0x26 = 0x17c,0x804
017d e405       |    |		Load	0x2,0x5
017e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
017f 0273       | s  |		Execute	Discrete,Plus
0180 0248       | H  |		Execute	Discrete,Check_In_Integer
0181 00d9       |    |		Load_Top	At_Offset_1
0182 0272       | r  |		Execute	Discrete,Minus
0183 c403       |    |		Store	0x2,0x3
0184 782b       |x+  |		Jump	0x1b0
0185 e405       |    |		Load	0x2,0x5								; Debug Table 0x5.0x27 = 0x185,0x805
													; Debug Table 0x5.0x28 = 0x185,0xf3ff
0186 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0187 00d9       |    |		Load_Top	At_Offset_1
0188 0272       | r  |		Execute	Discrete,Minus
0189 00e3       |    |		Load_Encached	Natural_Cache
018a 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
018b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x29 = 0x18b,0xc01
018c 00d9       |    |		Load_Top	At_Offset_1
018d 0272       | r  |		Execute	Discrete,Minus
018e c407       |    |		Store	0x2,0x7
018f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x2a = 0x18f,0xc02
0190 e5fe       |    |		Load	0x2,-0x2
0191 e223       | #  |		Load	0x1,0x23
0192 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0193 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x2b = 0x193,0xc03
0194 4801       |H   |		Short_Literal	0x1
0195 e223       | #  |		Load	0x1,0x23
0196 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0197 0334       | 4  |		Declare_Variable	Array,With_Constraint
0198 00d9       |    |		Load_Top	At_Offset_1
0199 4800       |H   |		Short_Literal	0x0
019a 00da       |    |		Load_Top	At_Offset_2
019b 01d6       |    |		Execute	Vector,Field_Write
019c e407       |    |		Load	0x2,0x7
019d 4801       |H   |		Short_Literal	0x1
019e 00da       |    |		Load_Top	At_Offset_2
019f 01d6       |    |		Execute	Vector,Field_Write
01a0 e5fe       |    |		Load	0x2,-0x2
01a1 e223       | #  |		Load	0x1,0x23
01a2 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
01a3 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x2c = 0x1a3,0xc04
01a4 e5fe       |    |		Load	0x2,-0x2
01a5 e223       | #  |		Load	0x1,0x23
01a6 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
01a7 e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x2d = 0x1a7,0xc05
01a8 e407       |    |		Load	0x2,0x7
01a9 0272       | r  |		Execute	Discrete,Minus
01aa 0248       | H  |		Execute	Discrete,Check_In_Integer
01ab 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
01ac e222       | "  |		Load	0x1,0x22							; Debug Table 0x5.0x2e = 0x1ac,0xc06
01ad e405       |    |		Load	0x2,0x5
01ae 017d       | }  |		Execute	Record,Structure_Write
01af 00d1       |    |		Pop_Control	Pop_Count_1
01b0 00d1       |    |		Pop_Control	Pop_Count_1
01b1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x2f = 0x1b1,0x16
01b2 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
01b3 7865       |xe  |		Jump	0x219
01b4 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x30 = 0x1b4,0x18
01b5 e5fe       |    |		Load	0x2,-0x2
01b6 e223       | #  |		Load	0x1,0x23
01b7 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01b8 e405       |    |		Load	0x2,0x5
01b9 017d       | }  |		Execute	Record,Structure_Write
01ba 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x31 = 0x1ba,0x19
01bb e5fe       |    |		Load	0x2,-0x2
01bc e223       | #  |		Load	0x1,0x23
01bd 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01be 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
01bf 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x32 = 0x1bf,0x1a
01c0 e405       |    |		Load	0x2,0x5
01c1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01c2 027a       | z  |		Execute	Discrete,Less_Equal
01c3 6817       |h   |		Jump_Zero	0x1db
01c4 e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x33 = 0x1c4,0x1b
01c5 e405       |    |		Load	0x2,0x5
01c6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01c7 0273       | s  |		Execute	Discrete,Plus
01c8 0248       | H  |		Execute	Discrete,Check_In_Integer
01c9 00d9       |    |		Load_Top	At_Offset_1
01ca 0272       | r  |		Execute	Discrete,Minus
01cb c402       |    |		Store	0x2,0x2
01cc e403       |    |		Load	0x2,0x3								; Debug Table 0x5.0x34 = 0x1cc,0x1c
01cd e405       |    |		Load	0x2,0x5
01ce 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01cf 0273       | s  |		Execute	Discrete,Plus
01d0 0248       | H  |		Execute	Discrete,Check_In_Integer
01d1 00d9       |    |		Load_Top	At_Offset_1
01d2 0272       | r  |		Execute	Discrete,Minus
01d3 c403       |    |		Store	0x2,0x3
01d4 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x35 = 0x1d4,0x1d
01d5 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01d6 00da       |    |		Load_Top	At_Offset_2
01d7 0272       | r  |		Execute	Discrete,Minus
01d8 0248       | H  |		Execute	Discrete,Check_In_Integer
01d9 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
01da 780e       |x   |		Jump	0x1e9
01db e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x36 = 0x1db,0x1e
01dc e405       |    |		Load	0x2,0x5
01dd 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01de 0273       | s  |		Execute	Discrete,Plus
01df 0248       | H  |		Execute	Discrete,Check_In_Integer
01e0 e405       |    |		Load	0x2,0x5
01e1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01e2 0272       | r  |		Execute	Discrete,Minus
01e3 c402       |    |		Store	0x2,0x2
01e4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x37 = 0x1e4,0x1f
01e5 00da       |    |		Load_Top	At_Offset_2
01e6 0272       | r  |		Execute	Discrete,Minus
01e7 0248       | H  |		Execute	Discrete,Check_In_Integer
01e8 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
01e9 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x38 = 0x1e9,0x20
01ea 7016       |p   |		Jump_Nonzero	0x201
01eb 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x39 = 0x1eb,0x21
01ec 4800       |H   |		Short_Literal	0x0
01ed e5fe       |    |		Load	0x2,-0x2
01ee e223       | #  |		Load	0x1,0x23
01ef 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01f0 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x3a = 0x1f0,0x22
01f1 e5fe       |    |		Load	0x2,-0x2
01f2 e223       | #  |		Load	0x1,0x23
01f3 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
01f4 e221       | !  |		Load	0x1,0x21							; Debug Table 0x5.0x3b = 0x1f4,0x23
01f5 0322       | "  |		Declare_Variable	Record
01f6 e402       |    |		Load	0x2,0x2
01f7 00d9       |    |		Load_Top	At_Offset_1
01f8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01f9 e403       |    |		Load	0x2,0x3
01fa 00d9       |    |		Load_Top	At_Offset_1
01fb 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01fc 4800       |H   |		Short_Literal	0x0
01fd e5fe       |    |		Load	0x2,-0x2
01fe e223       | #  |		Load	0x1,0x23
01ff 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0200 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x5.0x3c = 0x200,0x24
0201 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x3d = 0x201,0x25
0202 00da       |    |		Load_Top	At_Offset_2
0203 0273       | s  |		Execute	Discrete,Plus
0204 005b       | [  |		Store_Top	Discrete,At_Offset_3
0205 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x3e = 0x205,0x26
0206 4801       |H   |		Short_Literal	0x1
0207 e223       | #  |		Load	0x1,0x23
0208 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0209 0334       | 4  |		Declare_Variable	Array,With_Constraint
020a 00db       |    |		Load_Top	At_Offset_3
020b 4800       |H   |		Short_Literal	0x0
020c 00da       |    |		Load_Top	At_Offset_2
020d 01d6       |    |		Execute	Vector,Field_Write
020e 4800       |H   |		Short_Literal	0x0
020f 4801       |H   |		Short_Literal	0x1
0210 00da       |    |		Load_Top	At_Offset_2
0211 01d6       |    |		Execute	Vector,Field_Write
0212 e5fe       |    |		Load	0x2,-0x2
0213 e223       | #  |		Load	0x1,0x23
0214 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0215 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5.0x3f = 0x215,0x27
0216 e5fe       |    |		Load	0x2,-0x2
0217 e223       | #  |		Load	0x1,0x23
0218 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0219 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x40 = 0x219,0x17
021a 0c00       |    |		Execute_Immediate	Greater_Equal,0x0
021b 7798       |w   |		Jump_Nonzero	0x1b4
021c e221       | !  |		Load	0x1,0x21							; Debug Table 0x5.0x41 = 0x21c,0x28
021d 0322       | "  |		Declare_Variable	Record
021e e402       |    |		Load	0x2,0x2
021f 00d9       |    |		Load_Top	At_Offset_1
0220 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0221 e403       |    |		Load	0x2,0x3
0222 00d9       |    |		Load_Top	At_Offset_1
0223 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0224 4800       |H   |		Short_Literal	0x0
0225 e5fe       |    |		Load	0x2,-0x2
0226 e223       | #  |		Load	0x1,0x23
0227 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0228 e403       |    |		Load	0x2,0x3								; Debug Table 0x5.0x42 = 0x228,0x29
0229 00d9       |    |		Load_Top	At_Offset_1
022a 0272       | r  |		Execute	Discrete,Minus
022b 00e3       |    |		Load_Encached	Natural_Cache
022c 025b       | [  |		Execute	Discrete,Check_In_Type
022d 4800       |H   |		Short_Literal	0x0
022e e5fe       |    |		Load	0x2,-0x2
022f e223       | #  |		Load	0x1,0x23
0230 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0231 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0232 0000 0000  |    |		.BLANK	0000[0x6]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023f       | ?  |		.CONST	0x023f								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0004       |    |		.CONST	0x0004								; Number of locals
023b			INIT_0238:
023b 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x6 = .DEBUG	0x023b,0x0714,0x0001,0x0000,0x0056,0x5a75,0x0000,0x0069
													; Debug Table 0x6.0x0 = 0x23b,0xffff
023c e221       | !  |		Load	0x1,0x21							; Debug Table 0x6.0x1 = 0x23c,0xfffe
023d 0322       | "  |		Declare_Variable	Record
023e 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x6.0x2 = 0x23e,0xfffd
023f			BODY_0238:
023f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6.0x3 = 0x23f,0x1
0240 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0241 7004       |p   |		Jump_Nonzero	0x246
0242 e5ff       |    |		Load	0x2,-0x1
0243 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0244 7001       |p   |		Jump_Nonzero	0x246
0245 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x6.0x4 = 0x245,0x2
0246 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0x6.0x5 = 0x246,0x3
0247 e5ff       |    |		Load	0x2,-0x1
0248 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0249 0a01       |    |		Execute_Immediate	Plus,0x1
024a 00e4       |    |		Load_Encached	Positive_Cache
024b 025b       | [  |		Execute	Discrete,Check_In_Type
024c e5fe       |    |		Load	0x2,-0x2
024d e223       | #  |		Load	0x1,0x23
024e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
024f 005b       | [  |		Store_Top	Discrete,At_Offset_3
0250 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x6 = 0x250,0x4
0251 0aff       |    |		Execute_Immediate	Plus,-0x1
0252 005b       | [  |		Store_Top	Discrete,At_Offset_3
0253 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x7 = 0x253,0x5
0254 e5fe       |    |		Load	0x2,-0x2
0255 e223       | #  |		Load	0x1,0x23
0256 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0257 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0258 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x8 = 0x258,0x6
0259 e5fe       |    |		Load	0x2,-0x2
025a e223       | #  |		Load	0x1,0x23
025b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
025c 00da       |    |		Load_Top	At_Offset_2
025d 017d       | }  |		Execute	Record,Structure_Write
025e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x9 = 0x25e,0x7
025f 7019       |p   |		Jump_Nonzero	0x279
0260 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0xa = 0x260,0x8
0261 e222       | "  |		Load	0x1,0x22
0262 017f       |    |		Execute	Record,Equal
0263 6803       |h   |		Jump_Zero	0x267
0264 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0xb = 0x264,0x9
0265 7020       |p   |		Jump_Nonzero	0x286
0266 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x6.0xc = 0x266,0xa
0267 4fff       |O   |		Short_Literal	-0x1							; Debug Table 0x6.0xd = 0x267,0xb
0268 e5fe       |    |		Load	0x2,-0x2
0269 e223       | #  |		Load	0x1,0x23
026a 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
026b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0xe = 0x26b,0xc
026c e5fe       |    |		Load	0x2,-0x2
026d e223       | #  |		Load	0x1,0x23
026e 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
026f 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0270 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0xf = 0x270,0xd
0271 e5fe       |    |		Load	0x2,-0x2
0272 e223       | #  |		Load	0x1,0x23
0273 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0274 00da       |    |		Load_Top	At_Offset_2
0275 017d       | }  |		Execute	Record,Structure_Write
0276 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x10 = 0x276,0xe
0277 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0278 780d       |x   |		Jump	0x286
0279 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x11 = 0x279,0xf
027a 00da       |    |		Load_Top	At_Offset_2
027b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
027c 027c       | |  |		Execute	Discrete,Less
027d 6805       |h   |		Jump_Zero	0x283
027e e5ff       |    |		Load	0x2,-0x1
027f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0280 6802       |h   |		Jump_Zero	0x283
0281 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x6.0x12 = 0x281,0x10
0282 0257       | W  |		Execute	Discrete,Raise
0283 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x13 = 0x283,0x11
0284 7001       |p   |		Jump_Nonzero	0x286
0285 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x6.0x14 = 0x285,0x12
0286 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6.0x15 = 0x286,0x13
													; Debug Table 0x6.0x16 = 0x286,0xfbff
0287 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0288 00db       |    |		Load_Top	At_Offset_3
0289 0273       | s  |		Execute	Discrete,Plus
028a 00e3       |    |		Load_Encached	Natural_Cache
028b 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
028c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x17 = 0x28c,0xfbfe
028d 00e3       |    |		Load_Encached	Natural_Cache
028e 03f1       |    |		Declare_Variable	Discrete,With_Value
028f e221       | !  |		Load	0x1,0x21							; Debug Table 0x6.0x18 = 0x28f,0xfbfd
0290 0322       | "  |		Declare_Variable	Record
0291 e403       |    |		Load	0x2,0x3
0292 00d9       |    |		Load_Top	At_Offset_1
0293 017d       | }  |		Execute	Record,Structure_Write
0294 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x19 = 0x294,0x401
													; Debug Table 0x6.0x1a = 0x294,0x402
0295 e404       |    |		Load	0x2,0x4
0296 027c       | |  |		Execute	Discrete,Less
0297 6807       |h   |		Jump_Zero	0x29f
0298 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x1b = 0x298,0x403
0299 e403       |    |		Load	0x2,0x3
029a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
029b 027c       | |  |		Execute	Discrete,Less
029c 683d       |h=  |		Jump_Zero	0x2da
029d 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x6.0x1c = 0x29d,0x404
029e 0257       | W  |		Execute	Discrete,Raise
029f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x1d = 0x29f,0x406
02a0 e5fe       |    |		Load	0x2,-0x2
02a1 e223       | #  |		Load	0x1,0x23
02a2 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
02a3 e403       |    |		Load	0x2,0x3
02a4 017d       | }  |		Execute	Record,Structure_Write
02a5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x1e = 0x2a5,0x407
02a6 e404       |    |		Load	0x2,0x4
02a7 027f       |    |		Execute	Discrete,Equal
02a8 6803       |h   |		Jump_Zero	0x2ac
02a9 e403       |    |		Load	0x2,0x3								; Debug Table 0x6.0x1f = 0x2a9,0x408
02aa 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02ab 702e       |p.  |		Jump_Nonzero	0x2da
02ac 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x20 = 0x2ac,0x409
02ad e404       |    |		Load	0x2,0x4
02ae 0272       | r  |		Execute	Discrete,Minus
02af 005b       | [  |		Store_Top	Discrete,At_Offset_3
02b0 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x21 = 0x2b0,0x40a
02b1 e5fe       |    |		Load	0x2,-0x2
02b2 e223       | #  |		Load	0x1,0x23
02b3 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02b4 a404       |    |		Store_Unchecked	0x2,0x4
02b5 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x22 = 0x2b5,0x40b
02b6 700a       |p   |		Jump_Nonzero	0x2c1
02b7 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x23 = 0x2b7,0x40c
02b8 4800       |H   |		Short_Literal	0x0
02b9 e5fe       |    |		Load	0x2,-0x2
02ba e223       | #  |		Load	0x1,0x23
02bb 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
02bc 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x24 = 0x2bc,0x40d
02bd e5fe       |    |		Load	0x2,-0x2
02be e223       | #  |		Load	0x1,0x23
02bf 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
02c0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x6.0x25 = 0x2c0,0x40e
02c1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x26 = 0x2c1,0x40f
02c2 e404       |    |		Load	0x2,0x4
02c3 0273       | s  |		Execute	Discrete,Plus
02c4 005a       | Z  |		Store_Top	Discrete,At_Offset_2
02c5 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x27 = 0x2c5,0x410
02c6 4801       |H   |		Short_Literal	0x1
02c7 e223       | #  |		Load	0x1,0x23
02c8 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
02c9 0334       | 4  |		Declare_Variable	Array,With_Constraint
02ca 00da       |    |		Load_Top	At_Offset_2
02cb 4800       |H   |		Short_Literal	0x0
02cc 00da       |    |		Load_Top	At_Offset_2
02cd 01d6       |    |		Execute	Vector,Field_Write
02ce 4800       |H   |		Short_Literal	0x0
02cf 4801       |H   |		Short_Literal	0x1
02d0 00da       |    |		Load_Top	At_Offset_2
02d1 01d6       |    |		Execute	Vector,Field_Write
02d2 e5fe       |    |		Load	0x2,-0x2
02d3 e223       | #  |		Load	0x1,0x23
02d4 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
02d5 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x28 = 0x2d5,0x411
02d6 e5fe       |    |		Load	0x2,-0x2
02d7 e223       | #  |		Load	0x1,0x23
02d8 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
02d9 7fba       |    |		Jump	0x294
02da e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0x29 = 0x2da,0x412
													; Debug Table 0x6.0x2a = 0x2da,0xf7ff
02db e5ff       |    |		Load	0x2,-0x1
02dc 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
02dd 0273       | s  |		Execute	Discrete,Plus
02de 0248       | H  |		Execute	Discrete,Check_In_Integer
02df e404       |    |		Load	0x2,0x4
02e0 e405       |    |		Load	0x2,0x5
02e1 0272       | r  |		Execute	Discrete,Minus
02e2 0248       | H  |		Execute	Discrete,Check_In_Integer
02e3 0273       | s  |		Execute	Discrete,Plus
02e4 00e3       |    |		Load_Encached	Natural_Cache
02e5 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
02e6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x2b = 0x2e6,0x801
02e7 00da       |    |		Load_Top	At_Offset_2
02e8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02e9 027f       |    |		Execute	Discrete,Equal
02ea 6839       |h9  |		Jump_Zero	0x324
02eb 00d9       |    |		Load_Top	At_Offset_1
02ec e222       | "  |		Load	0x1,0x22
02ed 017e       | ~  |		Execute	Record,Not_Equal
02ee 6835       |h5  |		Jump_Zero	0x324
02ef 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x2c = 0x2ef,0x802
02f0 4801       |H   |		Short_Literal	0x1
02f1 e5fe       |    |		Load	0x2,-0x2
02f2 e223       | #  |		Load	0x1,0x23
02f3 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02f4 0273       | s  |		Execute	Discrete,Plus
02f5 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02f6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x2d = 0x2f6,0x803
02f7 e5fe       |    |		Load	0x2,-0x2
02f8 e223       | #  |		Load	0x1,0x23
02f9 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
02fa e403       |    |		Load	0x2,0x3
02fb 017d       | }  |		Execute	Record,Structure_Write
02fc 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x2e = 0x2fc,0x804
02fd 4801       |H   |		Short_Literal	0x1
02fe e223       | #  |		Load	0x1,0x23
02ff 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0300 0334       | 4  |		Declare_Variable	Array,With_Constraint
0301 00d9       |    |		Load_Top	At_Offset_1
0302 4800       |H   |		Short_Literal	0x0
0303 00da       |    |		Load_Top	At_Offset_2
0304 01d6       |    |		Execute	Vector,Field_Write
0305 4800       |H   |		Short_Literal	0x0
0306 4801       |H   |		Short_Literal	0x1
0307 00da       |    |		Load_Top	At_Offset_2
0308 01d6       |    |		Execute	Vector,Field_Write
0309 e5fe       |    |		Load	0x2,-0x2
030a e223       | #  |		Load	0x1,0x23
030b 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
030c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x2f = 0x30c,0x805
030d e5fe       |    |		Load	0x2,-0x2
030e e223       | #  |		Load	0x1,0x23
030f 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0310 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x30 = 0x310,0x806
0311 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0312 e403       |    |		Load	0x2,0x3
0313 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0314 0273       | s  |		Execute	Discrete,Plus
0315 00da       |    |		Load_Top	At_Offset_2
0316 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0317 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x31 = 0x317,0x807
0318 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0319 e403       |    |		Load	0x2,0x3
031a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
031b 0273       | s  |		Execute	Discrete,Plus
031c 00da       |    |		Load_Top	At_Offset_2
031d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
031e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x32 = 0x31e,0x808
031f 4800       |H   |		Short_Literal	0x0
0320 e5fe       |    |		Load	0x2,-0x2
0321 e223       | #  |		Load	0x1,0x23
0322 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0323 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0324 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x33 = 0x324,0x809
0325 4800       |H   |		Short_Literal	0x0
0326 e5fe       |    |		Load	0x2,-0x2
0327 e223       | #  |		Load	0x1,0x23
0328 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0329 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
032a 0000 0000  |    |		.XXX[0x2]
032c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00565a75}
0330 0000 0000  |    |		.LITERAL	{0x00000000, 0x565a7501}
0334 0000 0000  |    |		.BLANK	0000[0x4]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 0353       | S  |		.CONST	0x0353								; Address of begin
0339 0004       |    |		.CONST	0x0004								; Address of exception handler
033a 000a       |    |		.CONST	0x000a								; Number of locals
033b			INIT_0338:
033b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x033b,0x077e,0x0002,0x0000,0x0056,0x5a75,0x0000,0x0075
													; Debug Table 0x7.0x0 = 0x33b,0xffff
033c e223       | #  |		Load	0x1,0x23
033d 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
033e 0aff       |    |		Execute_Immediate	Plus,-0x1
033f 00e3       |    |		Load_Encached	Natural_Cache
0340 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0341 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x1 = 0x341,0xfffe
0342 00d9       |    |		Load_Top	At_Offset_1
0343 e20e       |    |		Load	0x1,0xe
0344 0334       | 4  |		Declare_Variable	Array,With_Constraint
0345 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x7.0x2 = 0x345,0xfffd
0346 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0347 029f 04b3  |    |		Declare_Subprogram	INIT_04b0,For_Call				; Debug Table 0x7.0x3 = 0x347,0xfffc
0349 e223       | #  |		Load	0x1,0x23							; Debug Table 0x7.0x4 = 0x349,0xfffb
034a 1926       | &  |		Execute	Package,Field_Reference,Field_Number 0x26
034b 00c6       |    |		Action	Check_Subprogram_Elaborated
034c 00e1       |    |		Load_Encached	Boolean_Cache
034d 4805       |H   |		Short_Literal	0x5
034e 4802       |H   |		Short_Literal	0x2
034f 0099       |    |		Action	Reference_Dynamic
0350 6217       |b   |		Indirect_Literal	Discrete,0x568,{0x00000000, 0x0056ce35}
0351 48e1       |H   |		Short_Literal	0xe1
0352 480a       |H   |		Short_Literal	0xa
0353			BODY_0338:
0353 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7.0x5 = 0x353,0x1
													; Debug Table 0x7.0x6 = 0x353,0xfbff
0354 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
0355 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x7 = 0x355,0x401
0356 e5ff       |    |		Load	0x2,-0x1
0357 e406       |    |		Load	0x2,0x6
0358 4807       |H   |		Short_Literal	0x7
0359 4802       |H   |		Short_Literal	0x2
035a 0099       |    |		Action	Reference_Dynamic
035b 4808       |H   |		Short_Literal	0x8
035c 4802       |H   |		Short_Literal	0x2
035d 0099       |    |		Action	Reference_Dynamic
035e e223       | #  |		Load	0x1,0x23
035f 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0360 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0361 00d1       |    |		Pop_Control	Pop_Count_1
0362 e403       |    |		Load	0x2,0x3								; Debug Table 0x7.0x8 = 0x362,0x2
0363 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0364 0000 0000  |    |		.BLANK	0000[0x4]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036b       | k  |		.CONST	0x036b								; Address of begin
0369 0004       |    |		.CONST	0x0004								; Address of exception handler
036a 0001       |    |		.CONST	0x0001								; Number of locals
036b			BODY_0368:
036b			INIT_0368:
036b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x036b,0x0792,0x0002,0x0000,0x0056,0x5a75,0x0000,0x007e
													; Debug Table 0x8.0x0 = 0x36b,0x1
036c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
036d 0000 0000  |    |		.XXX[0x3]
036f 0000       |    |
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9 = .DEBUG	0x0373,0x0796,0x0002,0x0000,0x0056,0x5a75,0x0000,0x008b
													; Debug Table 0x9.0x0 = 0x373,0x1
0374 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0375 0000 0000  |    |		.XXX[0x3]
0377 0000       |    |
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037b       | {  |		.CONST	0x037b								; Address of begin
0379 0004       |    |		.CONST	0x0004								; Address of exception handler
037a 0001       |    |		.CONST	0x0001								; Number of locals
037b			BODY_0378:
037b			INIT_0378:
037b 4603       |F   |		Jump_Case	0x4							; Debug Table 0xa = .DEBUG	0x037b,0x079a,0x0005,0x0000,0x0056,0x5a75,0x0000,0x0098
037c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
037d 7802       |x   |		Jump	0x380								; case 0x1
037e 7805       |x   |		Jump	0x384								; case 0x2
037f 7809       |x   |		Jump	0x389								; case 0x3
0380 00da       |    |		Load_Top	At_Offset_2
0381 0091 056c  |   l|		Action	Push_String_Extended_Indexed,0x56c				; "WHITE"
0383 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0384 00db       |    |		Load_Top	At_Offset_3
0385 00db       |    |		Load_Top	At_Offset_3
0386 00e0       |    |		Load_Encached	Standard_Cache
0387 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0388 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0389 00da       |    |		Load_Top	At_Offset_2
038a 00e0       |    |		Load_Encached	Standard_Cache
038b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
038c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
038d 0000 0000  |    |		.XXX[0x3]
038f 0000       |    |
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393       |    |		.CONST	0x0393								; Address of begin
0391 0004       |    |		.CONST	0x0004								; Address of exception handler
0392 0001       |    |		.CONST	0x0001								; Number of locals
0393			BODY_0390:
0393			INIT_0390:
0393 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x0393,0x079c,0x0002,0x0000,0x0056,0x5a75,0x0000,0x00a3
													; Debug Table 0xb.0x0 = 0x393,0x1
0394 8216       |    |		Call	0x1,0x16
0395 e224       | $  |		Load	0x1,0x24
0396 e5fe       |    |		Load	0x2,-0x2
0397 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
0398 8227       | '  |		Call	0x1,0x27
0399 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
039a 0000 0000  |    |		.BLANK	0000[0x6]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a9       |    |		.CONST	0x03a9								; Address of begin
03a1 0004       |    |		.CONST	0x0004								; Address of exception handler
03a2 0005       |    |		.CONST	0x0005								; Number of locals
03a3			INIT_03a0:
03a3 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xc = .DEBUG	0x03a3,0x07a0,0x0002,0x0000,0x0056,0x5a75,0x0000,0x00b2
													; Debug Table 0xc.0x0 = 0x3a3,0xffff
03a4 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0xc.0x1 = 0x3a4,0xfffe
03a5 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0xc.0x2 = 0x3a5,0xfffd
03a6 0632       | 2  |		Execute_Immediate	Set_Value_Unchecked,0x32
03a7 029f 04db  |    |		Declare_Subprogram	INIT_04d8,For_Call
03a9			BODY_03a0:
03a9 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0xc.0x3 = 0x3a9,0x1
03aa e5fe       |    |		Load	0x2,-0x2
03ab 0a01       |    |		Execute_Immediate	Plus,0x1
03ac 00e4       |    |		Load_Encached	Positive_Cache
03ad 025b       | [  |		Execute	Discrete,Check_In_Type
03ae e5ff       |    |		Load	0x2,-0x1
03af e223       | #  |		Load	0x1,0x23
03b0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03b1 c402       |    |		Store	0x2,0x2
03b2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x4 = 0x3b2,0x2
03b3 0aff       |    |		Execute_Immediate	Plus,-0x1
03b4 c402       |    |		Store	0x2,0x2
03b5 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x5 = 0x3b5,0x3
03b6 7003       |p   |		Jump_Nonzero	0x3ba
03b7 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x6 = 0x3b7,0x4
03b8 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
03b9 7825       |x%  |		Jump	0x3df
03ba 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x7 = 0x3ba,0x5
03bb 4800       |H   |		Short_Literal	0x0
03bc e5ff       |    |		Load	0x2,-0x1
03bd e223       | #  |		Load	0x1,0x23
03be 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
03bf 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03c0 027c       | |  |		Execute	Discrete,Less
03c1 6802       |h   |		Jump_Zero	0x3c4
03c2 e220       |    |		Load	0x1,0x20							; Debug Table 0xc.0x8 = 0x3c2,0x6
03c3 0257       | W  |		Execute	Discrete,Raise
03c4 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x9 = 0x3c4,0x7
													; Debug Table 0xc.0xa = 0x3c4,0xfbff
03c5 e5ff       |    |		Load	0x2,-0x1
03c6 e223       | #  |		Load	0x1,0x23
03c7 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03c8 00e3       |    |		Load_Encached	Natural_Cache
03c9 03f1       |    |		Declare_Variable	Discrete,With_Value
03ca 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xb = 0x3ca,0x401
03cb 700a       |p   |		Jump_Nonzero	0x3d6
03cc 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0xc = 0x3cc,0x402
													; Debug Table 0xc.0xd = 0x3cc,0xf7ff
03cd 4800       |H   |		Short_Literal	0x0
03ce e20e       |    |		Load	0x1,0xe
03cf 0334       | 4  |		Declare_Variable	Array,With_Constraint
03d0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xe = 0x3d0,0x801
03d1 e224       | $  |		Load	0x1,0x24
03d2 e5fc       |    |		Load	0x2,-0x4
03d3 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
03d4 8227       | '  |		Call	0x1,0x27
03d5 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
03d6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xf = 0x3d6,0x403
03d7 e402       |    |		Load	0x2,0x2
03d8 0272       | r  |		Execute	Discrete,Minus
03d9 c403       |    |		Store	0x2,0x3
03da 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x10 = 0x3da,0x404
03db e5ff       |    |		Load	0x2,-0x1
03dc e223       | #  |		Load	0x1,0x23
03dd 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
03de 00d1       |    |		Pop_Control	Pop_Count_1
03df 8405       |    |		Call	0x2,0x5								; Debug Table 0xc.0x11 = 0x3df,0x8
													; Debug Table 0xc.0x12 = 0x3df,0x9
03e0 7ffe       |    |		Jump	0x3df
03e1 0000 0000  |    |		.BLANK	0000[0x7]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb       |    |		.CONST	0x03eb								; Address of begin
03e9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ea 0001       |    |		.CONST	0x0001								; Number of locals
03eb			BODY_03e8:
03eb			INIT_03e8:
03eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd = .DEBUG	0x03eb,0x07c8,0x0002,0x0000,0x0056,0x5a75,0x0000,0x00c9
													; Debug Table 0xd.0x0 = 0x3eb,0x1
03ec e5fe       |    |		Load	0x2,-0x2
03ed 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
03ee 027a       | z  |		Execute	Discrete,Less_Equal
03ef 6803       |h   |		Jump_Zero	0x3f3
03f0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xd.0x1 = 0x3f0,0x2
03f1 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
03f2 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03f3 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0x2 = 0x3f3,0x3
03f4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
03f5 0000 0000  |    |		.XXX[0x3]
03f7 0000       |    |
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 03fb       |    |		.CONST	0x03fb								; Address of begin
03f9 0004       |    |		.CONST	0x0004								; Address of exception handler
03fa 0001       |    |		.CONST	0x0001								; Number of locals
03fb			BODY_03f8:
03fb			INIT_03f8:
03fb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe = .DEBUG	0x03fb,0x07d0,0x0001,0x0000,0x0056,0x5a75,0x0000,0x00d6
													; Debug Table 0xe.0x0 = 0x3fb,0x1
03fc e5fd       |    |		Load	0x2,-0x3
03fd 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
03fe 027c       | |  |		Execute	Discrete,Less
03ff 680f       |h   |		Jump_Zero	0x40f
0400 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0x1 = 0x400,0x2
0401 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0402 00db       |    |		Load_Top	At_Offset_3
0403 0272       | r  |		Execute	Discrete,Minus
0404 e5fd       |    |		Load	0x2,-0x3
0405 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0406 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0x2 = 0x406,0x3
0407 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0408 7005       |p   |		Jump_Nonzero	0x40e
0409 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x3 = 0x409,0x4
040a 00db       |    |		Load_Top	At_Offset_3
040b 0273       | s  |		Execute	Discrete,Plus
040c 0248       | H  |		Execute	Discrete,Check_In_Integer
040d a5fe       |    |		Store_Unchecked	0x2,-0x2
040e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0xe.0x4 = 0x40e,0x5
040f e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0x5 = 0x40f,0x6
													; Debug Table 0xe.0x6 = 0x40f,0xfbff
0410 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0411 0217       |    |		Execute	Heap_Access,All_Reference
0412 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0x7 = 0x412,0xfbfe
0413 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0414 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xe.0x8 = 0x414,0xfbfd
0415 00e3       |    |		Load_Encached	Natural_Cache
0416 03f1       |    |		Declare_Variable	Discrete,With_Value
0417 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x9 = 0x417,0x401
													; Debug Table 0xe.0xa = 0x417,0x402
0418 00da       |    |		Load_Top	At_Offset_2
0419 0272       | r  |		Execute	Discrete,Minus
041a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
041b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0xb = 0x41b,0x403
041c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
041d 700f       |p   |		Jump_Nonzero	0x42d
041e 4802       |H   |		Short_Literal	0x2							; Debug Table 0xe.0xc = 0x41e,0x404
041f e5fd       |    |		Load	0x2,-0x3
0420 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0421 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xe.0xd = 0x421,0x405
0422 00da       |    |		Load_Top	At_Offset_2
0423 0273       | s  |		Execute	Discrete,Plus
0424 0248       | H  |		Execute	Discrete,Check_In_Integer
0425 a5fe       |    |		Store_Unchecked	0x2,-0x2
0426 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0xe = 0x426,0x406
0427 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0428 00db       |    |		Load_Top	At_Offset_3
0429 01d5       |    |		Execute	Vector,Field_Reference
042a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
042b a403       |    |		Store_Unchecked	0x2,0x3
042c 781e       |x   |		Jump	0x44b
042d e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0x10 = 0x42d,0xf7ff
													; Debug Table 0xe.0xf = 0x42d,0x407
042e 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
042f e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xe.0x11 = 0x42f,0x801
0430 00d9       |    |		Load_Top	At_Offset_1
0431 e402       |    |		Load	0x2,0x2
0432 01d5       |    |		Execute	Vector,Field_Reference
0433 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0434 0273       | s  |		Execute	Discrete,Plus
0435 0248       | H  |		Execute	Discrete,Check_In_Integer
0436 a5fe       |    |		Store_Unchecked	0x2,-0x2
0437 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x12 = 0x437,0x802
0438 e5fd       |    |		Load	0x2,-0x3
0439 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
043a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x13 = 0x43a,0x803
043b e402       |    |		Load	0x2,0x2
043c 01dc       |    |		Execute	Vector,Last
043d 027f       |    |		Execute	Discrete,Equal
043e 6803       |h   |		Jump_Zero	0x442
043f 6124       |a$  |		Indirect_Literal	Discrete,0x564,{0x00000000, 0x7fffffff}		; Debug Table 0xe.0x14 = 0x43f,0x804
0440 a403       |    |		Store_Unchecked	0x2,0x3
0441 7808       |x   |		Jump	0x44a
0442 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x15 = 0x442,0x805
0443 0a01       |    |		Execute_Immediate	Plus,0x1
0444 c405       |    |		Store	0x2,0x5
0445 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x16 = 0x445,0x806
0446 e402       |    |		Load	0x2,0x2
0447 01d5       |    |		Execute	Vector,Field_Reference
0448 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0449 a403       |    |		Store_Unchecked	0x2,0x3
044a 00d1       |    |		Pop_Control	Pop_Count_1
044b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x17 = 0x44b,0x408
044c 00da       |    |		Load_Top	At_Offset_2
044d 027c       | |  |		Execute	Discrete,Less
044e 680d       |h   |		Jump_Zero	0x45c
044f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0x18 = 0x44f,0x409
0450 00d9       |    |		Load_Top	At_Offset_1
0451 0272       | r  |		Execute	Discrete,Minus
0452 c403       |    |		Store	0x2,0x3
0453 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xe.0x19 = 0x453,0x40a
0454 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0455 7005       |p   |		Jump_Nonzero	0x45b
0456 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xe.0x1a = 0x456,0x40b
0457 00d9       |    |		Load_Top	At_Offset_1
0458 0273       | s  |		Execute	Discrete,Plus
0459 0248       | H  |		Execute	Discrete,Check_In_Integer
045a a5fe       |    |		Store_Unchecked	0x2,-0x2
045b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0xe.0x1b = 0x45b,0x40c
045c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x1c = 0x45c,0x40d
045d 77b9       |w   |		Jump_Nonzero	0x417
045e 00d9       |    |		Load_Top	At_Offset_1
045f 77b7       |w   |		Jump_Nonzero	0x417
0460 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0xe.0x1d = 0x460,0x40e
0461 0000 0000  |    |		.BLANK	0000[0x7]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 046d       | m  |		.CONST	0x046d								; Address of begin
0469 0004       |    |		.CONST	0x0004								; Address of exception handler
046a 0002       |    |		.CONST	0x0002								; Number of locals
046b			INIT_0468:
046b 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0xf = .DEBUG	0x046b,0x080e,0x0001,0x0000,0x0056,0x5a75,0x0000,0x00e6
													; Debug Table 0xf.0x0 = 0x46b,0xffff
046c 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
046d			BODY_0468:
046d e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xf.0x1 = 0x46d,0x1
046e 00d9       |    |		Load_Top	At_Offset_1
046f e5ff       |    |		Load	0x2,-0x1
0470 821e       |    |		Call	0x1,0x1e
0471 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0472 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0473 0000 0000  |    |		.BLANK	0000[0x5]
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047f       |    |		.CONST	0x047f								; Address of begin
0479 0004       |    |		.CONST	0x0004								; Address of exception handler
047a 0003       |    |		.CONST	0x0003								; Number of locals
047b			INIT_0478:
047b e21a       |    |		Load	0x1,0x1a							; Debug Table 0x10 = .DEBUG	0x047b,0x0814,0x0002,0x0000,0x0056,0xce35,0x0000,0x0539
													; Debug Table 0x10.0x0 = 0x47b,0xffff
047c 0322       | "  |		Declare_Variable	Record
047d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x10.0x1 = 0x47d,0xfffe
047e 0217       |    |		Execute	Heap_Access,All_Reference
047f			BODY_0478:
047f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x10.0x2 = 0x47f,0x1
0480 00da       |    |		Load_Top	At_Offset_2
0481 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0482 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x3 = 0x482,0x2
0483 00da       |    |		Load_Top	At_Offset_2
0484 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0485 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x4 = 0x485,0x3
0486 01dc       |    |		Execute	Vector,Last
0487 7007       |p   |		Jump_Nonzero	0x48f
0488 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0x5 = 0x488,0x4
0489 00da       |    |		Load_Top	At_Offset_2
048a 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
048b 60d8       |`   |		Indirect_Literal	Discrete,0x564,{0x00000000, 0x7fffffff}		; Debug Table 0x10.0x6 = 0x48b,0x5
048c 00da       |    |		Load_Top	At_Offset_2
048d 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
048e 7818       |x   |		Jump	0x4a7
048f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x7 = 0x48f,0x6
0490 00d9       |    |		Load_Top	At_Offset_1
0491 01d5       |    |		Execute	Vector,Field_Reference
0492 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0493 700a       |p   |		Jump_Nonzero	0x49e
0494 4802       |H   |		Short_Literal	0x2							; Debug Table 0x10.0x8 = 0x494,0x7
0495 00da       |    |		Load_Top	At_Offset_2
0496 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0497 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x9 = 0x497,0x8
0498 00d9       |    |		Load_Top	At_Offset_1
0499 01d5       |    |		Execute	Vector,Field_Reference
049a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
049b 00da       |    |		Load_Top	At_Offset_2
049c 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
049d 7809       |x   |		Jump	0x4a7
049e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0xa = 0x49e,0x9
049f 00da       |    |		Load_Top	At_Offset_2
04a0 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
04a1 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0xb = 0x4a1,0xa
04a2 00d9       |    |		Load_Top	At_Offset_1
04a3 01d5       |    |		Execute	Vector,Field_Reference
04a4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04a5 00da       |    |		Load_Top	At_Offset_2
04a6 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
04a7 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0xc = 0x4a7,0xb
04a8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04a9 0000 0000  |    |		.BLANK	0000[0x7]
04b0 ; --------------------------------------------------------------------------------------
04b0 ; SUBPROGRAM
04b0 ; --------------------------------------------------------------------------------------
04b0 04b3       |    |		.CONST	0x04b3								; Address of begin
04b1 0004       |    |		.CONST	0x0004								; Address of exception handler
04b2 0001       |    |		.CONST	0x0001								; Number of locals
04b3			BODY_04b0:
04b3			INIT_04b0:
04b3 e404       |    |		Load	0x2,0x4								; Debug Table 0x11 = .DEBUG	0x04b3,0x0830,0x0001,0x0000,0x0056,0xce35,0x0000,0x0090
													; Debug Table 0x11.0x0 = 0x4b3,0x1
04b4 680c       |h   |		Jump_Zero	0x4c1
04b5 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11.0x1 = 0x4b5,0x2
04b6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04b7 e404       |    |		Load	0x2,0x4
04b8 e403       |    |		Load	0x2,0x3
04b9 01d5       |    |		Execute	Vector,Field_Reference
04ba 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
04bb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11.0x2 = 0x4bb,0x3
04bc 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
04bd e404       |    |		Load	0x2,0x4
04be e403       |    |		Load	0x2,0x3
04bf 01d5       |    |		Execute	Vector,Field_Reference
04c0 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
04c1 e404       |    |		Load	0x2,0x4								; Debug Table 0x11.0x3 = 0x4c1,0x4
04c2 e402       |    |		Load	0x2,0x2
04c3 027e       | ~  |		Execute	Discrete,Not_Equal
04c4 680a       |h   |		Jump_Zero	0x4cf
04c5 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0x4 = 0x4c5,0x5
04c6 e7fe       |    |		Load	0x3,-0x2
04c7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
04c8 0272       | r  |		Execute	Discrete,Minus
04c9 e404       |    |		Load	0x2,0x4
04ca 0a01       |    |		Execute_Immediate	Plus,0x1
04cb 0248       | H  |		Execute	Discrete,Check_In_Integer
04cc e403       |    |		Load	0x2,0x3
04cd 01d5       |    |		Execute	Vector,Field_Reference
04ce 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
04cf e404       |    |		Load	0x2,0x4								; Debug Table 0x11.0x5 = 0x4cf,0x6
04d0 0a01       |    |		Execute_Immediate	Plus,0x1
04d1 c404       |    |		Store	0x2,0x4
04d2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04d3 0000 0000  |    |		.BLANK	0000[0x5]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04f5       |    |		.CONST	0x04f5								; Address of begin
04d9 0509       |    |		.CONST	0x0509								; Address of exception handler
04da 000b       |    |		.CONST	0x000b								; Number of locals
04db			INIT_04d8:
04db 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12 = .DEBUG	0x04db,0x083e,0x0004,0x0000,0x0056,0xce35,0x0000,0x0734
													; Debug Table 0x12.0x0 = 0x4db,0xffff
04dc e404       |    |		Load	0x2,0x4
04dd e20e       |    |		Load	0x1,0xe
04de 0334       | 4  |		Declare_Variable	Array,With_Constraint
04df 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0x12.0x1 = 0x4df,0xfffe
04e0 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
04e1 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x12.0x2 = 0x4e1,0xfffd
04e2 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
04e3 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x12.0x3 = 0x4e3,0xfffc
04e4 e403       |    |		Load	0x2,0x3
04e5 0272       | r  |		Execute	Discrete,Minus
04e6 0248       | H  |		Execute	Discrete,Check_In_Integer
04e7 00e2       |    |		Load_Encached	Integer_Cache
04e8 03f1       |    |		Declare_Variable	Discrete,With_Value
04e9 029f 0523  |   #|		Declare_Subprogram	INIT_0520,For_Call				; Debug Table 0x12.0x4 = 0x4e9,0xfffb
04eb e223       | #  |		Load	0x1,0x23							; Debug Table 0x12.0x5 = 0x4eb,0xfffa
04ec 1927       | '  |		Execute	Package,Field_Reference,Field_Number 0x27
04ed 00c6       |    |		Action	Check_Subprogram_Elaborated
04ee 00e1       |    |		Load_Encached	Boolean_Cache
04ef 4806       |H   |		Short_Literal	0x6
04f0 4803       |H   |		Short_Literal	0x3
04f1 0099       |    |		Action	Reference_Dynamic
04f2 6075       |`u  |		Indirect_Literal	Discrete,0x568,{0x00000000, 0x0056ce35}
04f3 606c       |`l  |		Indirect_Literal	Discrete,0x560,{0x00000000, 0x000006ed}
04f4 480b       |H   |		Short_Literal	0xb
04f5			BODY_04d8:
04f5 e403       |    |		Load	0x2,0x3								; Debug Table 0x12.0x6 = 0x4f5,0x1
04f6 4801       |H   |		Short_Literal	0x1
04f7 e602       |    |		Load	0x3,0x2
04f8 01d5       |    |		Execute	Vector,Field_Reference
04f9 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
04fa e604       |    |		Load	0x3,0x4								; Debug Table 0x12.0x7 = 0x4fa,0x2
04fb 6068       |`h  |		Indirect_Literal	Discrete,0x564,{0x00000000, 0x7fffffff}
04fc e5ff       |    |		Load	0x2,-0x1
04fd e607       |    |		Load	0x3,0x7
04fe 4808       |H   |		Short_Literal	0x8
04ff 4803       |H   |		Short_Literal	0x3
0500 0099       |    |		Action	Reference_Dynamic
0501 4809       |H   |		Short_Literal	0x9
0502 4803       |H   |		Short_Literal	0x3
0503 0099       |    |		Action	Reference_Dynamic
0504 e223       | #  |		Load	0x1,0x23
0505 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
0506 c604       |    |		Store	0x3,0x4
0507 48e2       |H   |		Short_Literal	0xe2							; Debug Table 0x12.0x8 = 0x507,0x3
0508 0257       | W  |		Execute	Discrete,Raise
0509			TRAP_04d8:
0509 6052       |`R  |		Indirect_Literal	Discrete,0x55c,{0x00000000, 0x56ce3501}
050a 010f       |    |		Execute	Exception,Equal
050b 680a       |h   |		Jump_Zero	0x516
050c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12.0x9 = 0x50c,0x4
050d e603       |    |		Load	0x3,0x3
050e e602       |    |		Load	0x3,0x2
050f 01cf       |    |		Execute	Vector,Slice_Read
0510 e224       | $  |		Load	0x1,0x24
0511 e5fc       |    |		Load	0x2,-0x4
0512 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
0513 8227       | '  |		Call	0x1,0x27
0514 00cb       |    |		Action	Pop_Block_With_Result
0515 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0516 6041       |`A  |		Indirect_Literal	Discrete,0x558,{0x00000000, 0x56ce3502}		; Debug Table 0x12.0xa = 0x516,0x5
0517 010f       |    |		Execute	Exception,Equal
0518 6804       |h   |		Jump_Zero	0x51d
0519 e404       |    |		Load	0x2,0x4								; Debug Table 0x12.0xb = 0x519,0x6
051a 0901       |    |		Execute_Immediate	Binary_Scale,0x1
051b c404       |    |		Store	0x2,0x4
051c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
051d 0100       |    |		Execute	Exception,Raise
051e 0000 0000  |    |		.XXX[0x2]
0520 ; --------------------------------------------------------------------------------------
0520 ; SUBPROGRAM
0520 ; --------------------------------------------------------------------------------------
0520 0523       | #  |		.CONST	0x0523								; Address of begin
0521 0004       |    |		.CONST	0x0004								; Address of exception handler
0522 0001       |    |		.CONST	0x0001								; Number of locals
0523			BODY_0520:
0523			INIT_0520:
0523 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x13 = .DEBUG	0x0523,0x0858,0x0001,0x0000,0x0056,0xce35,0x0000,0x067b
													; Debug Table 0x13.0x0 = 0x523,0x1
0524 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0525 e603       |    |		Load	0x3,0x3
0526 e602       |    |		Load	0x3,0x2
0527 01d5       |    |		Execute	Vector,Field_Reference
0528 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0529 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x13.0x1 = 0x529,0x2
052a 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
052b e603       |    |		Load	0x3,0x3
052c e602       |    |		Load	0x3,0x2
052d 01d5       |    |		Execute	Vector,Field_Reference
052e 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
052f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13.0x2 = 0x52f,0x3
0530 7002       |p   |		Jump_Nonzero	0x533
0531 602a       |`*  |		Indirect_Literal	Discrete,0x55c,{0x00000000, 0x56ce3501}		; Debug Table 0x13.0x3 = 0x531,0x4
0532 0257       | W  |		Execute	Discrete,Raise
0533 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13.0x4 = 0x533,0x5
													; Debug Table 0x13.0x5 = 0x533,0xfbff
0534 e9fe       |    |		Load	0x4,-0x2
0535 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0536 0272       | r  |		Execute	Discrete,Minus
0537 00e3       |    |		Load_Encached	Natural_Cache
0538 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0539 e605       |    |		Load	0x3,0x5								; Debug Table 0x13.0x6 = 0x539,0x401
053a e9fe       |    |		Load	0x4,-0x2
053b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
053c 0272       | r  |		Execute	Discrete,Minus
053d 00d9       |    |		Load_Top	At_Offset_1
053e 0272       | r  |		Execute	Discrete,Minus
053f 0248       | H  |		Execute	Discrete,Check_In_Integer
0540 a605       |    |		Store_Unchecked	0x3,0x5
0541 e605       |    |		Load	0x3,0x5								; Debug Table 0x13.0x7 = 0x541,0x402
0542 0d00       |    |		Execute_Immediate	Less,0x0
0543 6802       |h   |		Jump_Zero	0x546
0544 6017       |`   |		Indirect_Literal	Discrete,0x55c,{0x00000000, 0x56ce3501}		; Debug Table 0x13.0x8 = 0x544,0x403
0545 0257       | W  |		Execute	Discrete,Raise
0546 e603       |    |		Load	0x3,0x3								; Debug Table 0x13.0x9 = 0x546,0x404
0547 e404       |    |		Load	0x2,0x4
0548 027f       |    |		Execute	Discrete,Equal
0549 6802       |h   |		Jump_Zero	0x54c
054a 600d       |`   |		Indirect_Literal	Discrete,0x558,{0x00000000, 0x56ce3502}		; Debug Table 0x13.0xa = 0x54a,0x405
054b 0257       | W  |		Execute	Discrete,Raise
054c e603       |    |		Load	0x3,0x3								; Debug Table 0x13.0xb = 0x54c,0x406
054d 0a01       |    |		Execute_Immediate	Plus,0x1
054e c603       |    |		Store	0x3,0x3
054f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0xc = 0x54f,0x407
0550 e603       |    |		Load	0x3,0x3
0551 e602       |    |		Load	0x3,0x2
0552 01d5       |    |		Execute	Vector,Field_Reference
0553 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0554 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0555 0000 0000  |    |		.XXX[0x3]
0557 0000       |    |
0558 0000 0000  |    |		.LITERAL	{0x00000000, 0x56ce3502}
055c 0000 0000  |    |		.LITERAL	{0x00000000, 0x56ce3501}
0560 0000 0000  |    |		.LITERAL	{0x00000000, 0x000006ed}
0564 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
0568 0000 0000  |    |		.LITERAL	{0x00000000, 0x0056ce35}
056c ; --------------------------------------------------------------------------------------
056c ; STRING TABLE
056c ; --------------------------------------------------------------------------------------
056c 0008       |    |		.STRTAB	0x0008->0x0570							; "WHITE"
056d 000b       |    |		.STRTAB	0x000b->0x0572							; "GREY"
056e 000d       |    |		.STRTAB	0x000d->0x0574							; "BLACK"
056f 0010       |    |		.STREND 0x0010->0x0577
0570 5748 4954  |WHIT|		.STRTAB_STRINGS
0577 0000       |    |		.XXX[0x1]
0578 ; --------------------------------------------------------------------------------------
0578 ; Debug Table
0578 ; --------------------------------------------------------------------------------------
0578 0003 0014  |    |		.CONST	0x0003,0x0014
057a 000b 061a  |    |		.DEBUG	0x000b,0x061a,0x8000,0x0000,0x0056,0x5a75,0x0000,0x000c
0582 0068 065a  | h Z|		.DEBUG	0x0068,0x065a,0x8000,0x0000,0x0056,0xce35,0x0000,0x0005
058a 0093 0680  |    |		.DEBUG	0x0093,0x0680,0x0001,0x0000,0x0056,0x5a75,0x0000,0x003e
0592 00a3 0684  |    |		.DEBUG	0x00a3,0x0684,0x0001,0x0000,0x0056,0x5a75,0x0000,0x004c
059a 00b3 0688  |    |		.DEBUG	0x00b3,0x0688,0x0002,0x0000,0x0056,0x5a75,0x0000,0x0054
05a2 00bb 068c  |    |		.DEBUG	0x00bb,0x068c,0x0001,0x0000,0x0056,0x5a75,0x0000,0x005d
05aa 023b 0714  | ;  |		.DEBUG	0x023b,0x0714,0x0001,0x0000,0x0056,0x5a75,0x0000,0x0069
05b2 033b 077e  | ; ~|		.DEBUG	0x033b,0x077e,0x0002,0x0000,0x0056,0x5a75,0x0000,0x0075
05ba 036b 0792  | k  |		.DEBUG	0x036b,0x0792,0x0002,0x0000,0x0056,0x5a75,0x0000,0x007e
05c2 0373 0796  | s  |		.DEBUG	0x0373,0x0796,0x0002,0x0000,0x0056,0x5a75,0x0000,0x008b
05ca 037b 079a  | {  |		.DEBUG	0x037b,0x079a,0x0005,0x0000,0x0056,0x5a75,0x0000,0x0098
05d2 0393 079c  |    |		.DEBUG	0x0393,0x079c,0x0002,0x0000,0x0056,0x5a75,0x0000,0x00a3
05da 03a3 07a0  |    |		.DEBUG	0x03a3,0x07a0,0x0002,0x0000,0x0056,0x5a75,0x0000,0x00b2
05e2 03eb 07c8  |    |		.DEBUG	0x03eb,0x07c8,0x0002,0x0000,0x0056,0x5a75,0x0000,0x00c9
05ea 03fb 07d0  |    |		.DEBUG	0x03fb,0x07d0,0x0001,0x0000,0x0056,0x5a75,0x0000,0x00d6
05f2 046b 080e  | k  |		.DEBUG	0x046b,0x080e,0x0001,0x0000,0x0056,0x5a75,0x0000,0x00e6
05fa 047b 0814  | {  |		.DEBUG	0x047b,0x0814,0x0002,0x0000,0x0056,0xce35,0x0000,0x0539
0602 04b3 0830  |   0|		.DEBUG	0x04b3,0x0830,0x0001,0x0000,0x0056,0xce35,0x0000,0x0090
060a 04db 083e  |   >|		.DEBUG	0x04db,0x083e,0x0004,0x0000,0x0056,0xce35,0x0000,0x0734
0612 0523 0858  | # X|		.DEBUG	0x0523,0x0858,0x0001,0x0000,0x0056,0xce35,0x0000,0x067b
061a ; --------------------------------------------------------------------------------------
061a ; Debug3 Subtable 0x0
061a ; --------------------------------------------------------------------------------------
061a 001f 0000  |    |		.DBG3TAB	0x001f,0x0000
061c 000b ffff  |    |		.CONST	0x000b,0xffff
061e 000b fffe  |    |		.CONST	0x000b,0xfffe
0620 000b fffd  |    |		.CONST	0x000b,0xfffd
0622 000b fffc  |    |		.CONST	0x000b,0xfffc
0624 0011 fffb  |    |		.CONST	0x0011,0xfffb
0626 0017 fffa  |    |		.CONST	0x0017,0xfffa
0628 0018 fff9  |    |		.CONST	0x0018,0xfff9
062a 0019 fff8  |    |		.CONST	0x0019,0xfff8
062c 001b fff7  |    |		.CONST	0x001b,0xfff7
062e 001d fff6  |    |		.CONST	0x001d,0xfff6
0630 001f fff5  |    |		.CONST	0x001f,0xfff5
0632 0021 fff4  | !  |		.CONST	0x0021,0xfff4
0634 0023 fff3  | #  |		.CONST	0x0023,0xfff3
0636 0025 fff2  | %  |		.CONST	0x0025,0xfff2
0638 0027 fff1  | '  |		.CONST	0x0027,0xfff1
063a 0029 fff0  | )  |		.CONST	0x0029,0xfff0
063c 002e ffef  | .  |		.CONST	0x002e,0xffef
063e 0030 ffee  | 0  |		.CONST	0x0030,0xffee
0640 0032 ffed  | 2  |		.CONST	0x0032,0xffed
0642 0034 ffec  | 4  |		.CONST	0x0034,0xffec
0644 0036 ffeb  | 6  |		.CONST	0x0036,0xffeb
0646 0038 ffea  | 8  |		.CONST	0x0038,0xffea
0648 003a ffe9  | :  |		.CONST	0x003a,0xffe9
064a 003c ffe8  | <  |		.CONST	0x003c,0xffe8
064c 0041 ffe7  | A  |		.CONST	0x0041,0xffe7
064e 0049 ffe6  | I  |		.CONST	0x0049,0xffe6
0650 0052 ffe5  | R  |		.CONST	0x0052,0xffe5
0652 0056 ffe4  | V  |		.CONST	0x0056,0xffe4
0654 005c ffe3  | \  |		.CONST	0x005c,0xffe3
0656 005f ffe2  | _  |		.CONST	0x005f,0xffe2
0658 005f ffe1  | _  |		.CONST	0x005f,0xffe1
065a ; --------------------------------------------------------------------------------------
065a ; Debug3 Subtable 0x1
065a ; --------------------------------------------------------------------------------------
065a 0012 0000  |    |		.DBG3TAB	0x0012,0x0000
065c 0068 ffff  | h  |		.CONST	0x0068,0xffff
065e 006a fffe  | j  |		.CONST	0x006a,0xfffe
0660 006c fffd  | l  |		.CONST	0x006c,0xfffd
0662 006c fffc  | l  |		.CONST	0x006c,0xfffc
0664 006c fffb  | l  |		.CONST	0x006c,0xfffb
0666 006e fffa  | n  |		.CONST	0x006e,0xfffa
0668 0070 fff9  | p  |		.CONST	0x0070,0xfff9
066a 0072 fff8  | r  |		.CONST	0x0072,0xfff8
066c 0074 fff7  | t  |		.CONST	0x0074,0xfff7
066e 0076 fff6  | v  |		.CONST	0x0076,0xfff6
0670 0078 fff5  | x  |		.CONST	0x0078,0xfff5
0672 007a fff4  | z  |		.CONST	0x007a,0xfff4
0674 007c fff3  | |  |		.CONST	0x007c,0xfff3
0676 007e fff2  | ~  |		.CONST	0x007e,0xfff2
0678 0080 fff1  |    |		.CONST	0x0080,0xfff1
067a 0082 fff0  |    |		.CONST	0x0082,0xfff0
067c 0084 ffef  |    |		.CONST	0x0084,0xffef
067e 0086 ffee  |    |		.CONST	0x0086,0xffee
0680 ; --------------------------------------------------------------------------------------
0680 ; Debug3 Subtable 0x2
0680 ; --------------------------------------------------------------------------------------
0680 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0682 0093 0001  |    |		.CONST	0x0093,0x0001
0684 ; --------------------------------------------------------------------------------------
0684 ; Debug3 Subtable 0x3
0684 ; --------------------------------------------------------------------------------------
0684 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0686 00a3 0001  |    |		.CONST	0x00a3,0x0001
0688 ; --------------------------------------------------------------------------------------
0688 ; Debug3 Subtable 0x4
0688 ; --------------------------------------------------------------------------------------
0688 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
068a 00b3 0001  |    |		.CONST	0x00b3,0x0001
068c ; --------------------------------------------------------------------------------------
068c ; Debug3 Subtable 0x5
068c ; --------------------------------------------------------------------------------------
068c 0009 003a  |   :|		.DBG3TAB	0x0009,0x003a
068e 00bb ffff  |    |		.CONST	0x00bb,0xffff
0690 00bf fffe  |    |		.CONST	0x00bf,0xfffe
0692 00c3 fffd  |    |		.CONST	0x00c3,0xfffd
0694 00c4 fffc  |    |		.CONST	0x00c4,0xfffc
0696 00c6 fffb  |    |		.CONST	0x00c6,0xfffb
0698 00c8 fffa  |    |		.CONST	0x00c8,0xfffa
069a 00c9 0001  |    |		.CONST	0x00c9,0x0001
069c 00cd 0002  |    |		.CONST	0x00cd,0x0002
069e 00ce 0003  |    |		.CONST	0x00ce,0x0003
06a0 00d8 0004  |    |		.CONST	0x00d8,0x0004
06a2 00db 0005  |    |		.CONST	0x00db,0x0005
06a4 00e0 0006  |    |		.CONST	0x00e0,0x0006
06a6 00e6 0007  |    |		.CONST	0x00e6,0x0007
06a8 00e8 0008  |    |		.CONST	0x00e8,0x0008
06aa 00ec 0009  |    |		.CONST	0x00ec,0x0009
06ac 00f0 000a  |    |		.CONST	0x00f0,0x000a
06ae 00f5 000b  |    |		.CONST	0x00f5,0x000b
06b0 00fa 000c  |    |		.CONST	0x00fa,0x000c
06b2 00fa fbff  |    |		.CONST	0x00fa,0xfbff
06b4 0103 0401  |    |		.CONST	0x0103,0x0401
06b6 0106 0402  |    |		.CONST	0x0106,0x0402
06b8 010e 0403  |    |		.CONST	0x010e,0x0403
06ba 0117 0404  |    |		.CONST	0x0117,0x0404
06bc 0121 0405  | !  |		.CONST	0x0121,0x0405
06be 0125 0406  | %  |		.CONST	0x0125,0x0406
06c0 012a 000d  | *  |		.CONST	0x012a,0x000d
06c2 0136 000e  | 6  |		.CONST	0x0136,0x000e
06c4 0137 000f  | 7  |		.CONST	0x0137,0x000f
06c6 013b 0010  | ;  |		.CONST	0x013b,0x0010
06c8 013f 0011  | ?  |		.CONST	0x013f,0x0011
06ca 0143 0012  | C  |		.CONST	0x0143,0x0012
06cc 0153 0013  | S  |		.CONST	0x0153,0x0013
06ce 0157 0014  | W  |		.CONST	0x0157,0x0014
06d0 015d 0015  | ]  |		.CONST	0x015d,0x0015
06d2 015d f7ff  | ]  |		.CONST	0x015d,0xf7ff
06d4 0166 0801  | f  |		.CONST	0x0166,0x0801
06d6 0169 0802  | i  |		.CONST	0x0169,0x0802
06d8 0174 0803  | t  |		.CONST	0x0174,0x0803
06da 017c 0804  | |  |		.CONST	0x017c,0x0804
06dc 0185 0805  |    |		.CONST	0x0185,0x0805
06de 0185 f3ff  |    |		.CONST	0x0185,0xf3ff
06e0 018b 0c01  |    |		.CONST	0x018b,0x0c01
06e2 018f 0c02  |    |		.CONST	0x018f,0x0c02
06e4 0193 0c03  |    |		.CONST	0x0193,0x0c03
06e6 01a3 0c04  |    |		.CONST	0x01a3,0x0c04
06e8 01a7 0c05  |    |		.CONST	0x01a7,0x0c05
06ea 01ac 0c06  |    |		.CONST	0x01ac,0x0c06
06ec 01b1 0016  |    |		.CONST	0x01b1,0x0016
06ee 01b4 0018  |    |		.CONST	0x01b4,0x0018
06f0 01ba 0019  |    |		.CONST	0x01ba,0x0019
06f2 01bf 001a  |    |		.CONST	0x01bf,0x001a
06f4 01c4 001b  |    |		.CONST	0x01c4,0x001b
06f6 01cc 001c  |    |		.CONST	0x01cc,0x001c
06f8 01d4 001d  |    |		.CONST	0x01d4,0x001d
06fa 01db 001e  |    |		.CONST	0x01db,0x001e
06fc 01e4 001f  |    |		.CONST	0x01e4,0x001f
06fe 01e9 0020  |    |		.CONST	0x01e9,0x0020
0700 01eb 0021  |   !|		.CONST	0x01eb,0x0021
0702 01f0 0022  |   "|		.CONST	0x01f0,0x0022
0704 01f4 0023  |   #|		.CONST	0x01f4,0x0023
0706 0200 0024  |   $|		.CONST	0x0200,0x0024
0708 0201 0025  |   %|		.CONST	0x0201,0x0025
070a 0205 0026  |   &|		.CONST	0x0205,0x0026
070c 0215 0027  |   '|		.CONST	0x0215,0x0027
070e 0219 0017  |    |		.CONST	0x0219,0x0017
0710 021c 0028  |   (|		.CONST	0x021c,0x0028
0712 0228 0029  | ( )|		.CONST	0x0228,0x0029
0714 ; --------------------------------------------------------------------------------------
0714 ; Debug3 Subtable 0x6
0714 ; --------------------------------------------------------------------------------------
0714 0007 002d  |   -|		.DBG3TAB	0x0007,0x002d
0716 023b ffff  | ;  |		.CONST	0x023b,0xffff
0718 023c fffe  | <  |		.CONST	0x023c,0xfffe
071a 023e fffd  | >  |		.CONST	0x023e,0xfffd
071c 023f 0001  | ?  |		.CONST	0x023f,0x0001
071e 0245 0002  | E  |		.CONST	0x0245,0x0002
0720 0246 0003  | F  |		.CONST	0x0246,0x0003
0722 0250 0004  | P  |		.CONST	0x0250,0x0004
0724 0253 0005  | S  |		.CONST	0x0253,0x0005
0726 0258 0006  | X  |		.CONST	0x0258,0x0006
0728 025e 0007  | ^  |		.CONST	0x025e,0x0007
072a 0260 0008  | `  |		.CONST	0x0260,0x0008
072c 0264 0009  | d  |		.CONST	0x0264,0x0009
072e 0266 000a  | f  |		.CONST	0x0266,0x000a
0730 0267 000b  | g  |		.CONST	0x0267,0x000b
0732 026b 000c  | k  |		.CONST	0x026b,0x000c
0734 0270 000d  | p  |		.CONST	0x0270,0x000d
0736 0276 000e  | v  |		.CONST	0x0276,0x000e
0738 0279 000f  | y  |		.CONST	0x0279,0x000f
073a 0281 0010  |    |		.CONST	0x0281,0x0010
073c 0283 0011  |    |		.CONST	0x0283,0x0011
073e 0285 0012  |    |		.CONST	0x0285,0x0012
0740 0286 0013  |    |		.CONST	0x0286,0x0013
0742 0286 fbff  |    |		.CONST	0x0286,0xfbff
0744 028c fbfe  |    |		.CONST	0x028c,0xfbfe
0746 028f fbfd  |    |		.CONST	0x028f,0xfbfd
0748 0294 0401  |    |		.CONST	0x0294,0x0401
074a 0294 0402  |    |		.CONST	0x0294,0x0402
074c 0298 0403  |    |		.CONST	0x0298,0x0403
074e 029d 0404  |    |		.CONST	0x029d,0x0404
0750 029f 0406  |    |		.CONST	0x029f,0x0406
0752 02a5 0407  |    |		.CONST	0x02a5,0x0407
0754 02a9 0408  |    |		.CONST	0x02a9,0x0408
0756 02ac 0409  |    |		.CONST	0x02ac,0x0409
0758 02b0 040a  |    |		.CONST	0x02b0,0x040a
075a 02b5 040b  |    |		.CONST	0x02b5,0x040b
075c 02b7 040c  |    |		.CONST	0x02b7,0x040c
075e 02bc 040d  |    |		.CONST	0x02bc,0x040d
0760 02c0 040e  |    |		.CONST	0x02c0,0x040e
0762 02c1 040f  |    |		.CONST	0x02c1,0x040f
0764 02c5 0410  |    |		.CONST	0x02c5,0x0410
0766 02d5 0411  |    |		.CONST	0x02d5,0x0411
0768 02da 0412  |    |		.CONST	0x02da,0x0412
076a 02da f7ff  |    |		.CONST	0x02da,0xf7ff
076c 02e6 0801  |    |		.CONST	0x02e6,0x0801
076e 02ef 0802  |    |		.CONST	0x02ef,0x0802
0770 02f6 0803  |    |		.CONST	0x02f6,0x0803
0772 02fc 0804  |    |		.CONST	0x02fc,0x0804
0774 030c 0805  |    |		.CONST	0x030c,0x0805
0776 0310 0806  |    |		.CONST	0x0310,0x0806
0778 0317 0807  |    |		.CONST	0x0317,0x0807
077a 031e 0808  |    |		.CONST	0x031e,0x0808
077c 0324 0809  | $  |		.CONST	0x0324,0x0809
077e ; --------------------------------------------------------------------------------------
077e ; Debug3 Subtable 0x7
077e ; --------------------------------------------------------------------------------------
077e 0006 0003  |    |		.DBG3TAB	0x0006,0x0003
0780 033b ffff  | ;  |		.CONST	0x033b,0xffff
0782 0341 fffe  | A  |		.CONST	0x0341,0xfffe
0784 0345 fffd  | E  |		.CONST	0x0345,0xfffd
0786 0347 fffc  | G  |		.CONST	0x0347,0xfffc
0788 0349 fffb  | I  |		.CONST	0x0349,0xfffb
078a 0353 0001  | S  |		.CONST	0x0353,0x0001
078c 0353 fbff  | S  |		.CONST	0x0353,0xfbff
078e 0355 0401  | U  |		.CONST	0x0355,0x0401
0790 0362 0002  | b  |		.CONST	0x0362,0x0002
0792 ; --------------------------------------------------------------------------------------
0792 ; Debug3 Subtable 0x8
0792 ; --------------------------------------------------------------------------------------
0792 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0794 036b 0001  | k  |		.CONST	0x036b,0x0001
0796 ; --------------------------------------------------------------------------------------
0796 ; Debug3 Subtable 0x9
0796 ; --------------------------------------------------------------------------------------
0796 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0798 0373 0001  | s  |		.CONST	0x0373,0x0001
079a ; --------------------------------------------------------------------------------------
079a ; Debug3 Subtable 0xa
079a ; --------------------------------------------------------------------------------------
079a 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
079c ; --------------------------------------------------------------------------------------
079c ; Debug3 Subtable 0xb
079c ; --------------------------------------------------------------------------------------
079c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
079e 0393 0001  |    |		.CONST	0x0393,0x0001
07a0 ; --------------------------------------------------------------------------------------
07a0 ; Debug3 Subtable 0xc
07a0 ; --------------------------------------------------------------------------------------
07a0 0005 000e  |    |		.DBG3TAB	0x0005,0x000e
07a2 03a3 ffff  |    |		.CONST	0x03a3,0xffff
07a4 03a4 fffe  |    |		.CONST	0x03a4,0xfffe
07a6 03a5 fffd  |    |		.CONST	0x03a5,0xfffd
07a8 03a9 0001  |    |		.CONST	0x03a9,0x0001
07aa 03b2 0002  |    |		.CONST	0x03b2,0x0002
07ac 03b5 0003  |    |		.CONST	0x03b5,0x0003
07ae 03b7 0004  |    |		.CONST	0x03b7,0x0004
07b0 03ba 0005  |    |		.CONST	0x03ba,0x0005
07b2 03c2 0006  |    |		.CONST	0x03c2,0x0006
07b4 03c4 0007  |    |		.CONST	0x03c4,0x0007
07b6 03c4 fbff  |    |		.CONST	0x03c4,0xfbff
07b8 03ca 0401  |    |		.CONST	0x03ca,0x0401
07ba 03cc 0402  |    |		.CONST	0x03cc,0x0402
07bc 03cc f7ff  |    |		.CONST	0x03cc,0xf7ff
07be 03d0 0801  |    |		.CONST	0x03d0,0x0801
07c0 03d6 0403  |    |		.CONST	0x03d6,0x0403
07c2 03da 0404  |    |		.CONST	0x03da,0x0404
07c4 03df 0008  |    |		.CONST	0x03df,0x0008
07c6 03df 0009  |    |		.CONST	0x03df,0x0009
07c8 ; --------------------------------------------------------------------------------------
07c8 ; Debug3 Subtable 0xd
07c8 ; --------------------------------------------------------------------------------------
07c8 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
07ca 03eb 0001  |    |		.CONST	0x03eb,0x0001
07cc 03f0 0002  |    |		.CONST	0x03f0,0x0002
07ce 03f3 0003  |    |		.CONST	0x03f3,0x0003
07d0 ; --------------------------------------------------------------------------------------
07d0 ; Debug3 Subtable 0xe
07d0 ; --------------------------------------------------------------------------------------
07d0 0004 001a  |    |		.DBG3TAB	0x0004,0x001a
07d2 03fb 0001  |    |		.CONST	0x03fb,0x0001
07d4 0400 0002  |    |		.CONST	0x0400,0x0002
07d6 0406 0003  |    |		.CONST	0x0406,0x0003
07d8 0409 0004  |    |		.CONST	0x0409,0x0004
07da 040e 0005  |    |		.CONST	0x040e,0x0005
07dc 040f 0006  |    |		.CONST	0x040f,0x0006
07de 040f fbff  |    |		.CONST	0x040f,0xfbff
07e0 0412 fbfe  |    |		.CONST	0x0412,0xfbfe
07e2 0414 fbfd  |    |		.CONST	0x0414,0xfbfd
07e4 0417 0401  |    |		.CONST	0x0417,0x0401
07e6 0417 0402  |    |		.CONST	0x0417,0x0402
07e8 041b 0403  |    |		.CONST	0x041b,0x0403
07ea 041e 0404  |    |		.CONST	0x041e,0x0404
07ec 0421 0405  | !  |		.CONST	0x0421,0x0405
07ee 0426 0406  | &  |		.CONST	0x0426,0x0406
07f0 042d 0407  | -  |		.CONST	0x042d,0x0407
07f2 042d f7ff  | -  |		.CONST	0x042d,0xf7ff
07f4 042f 0801  | /  |		.CONST	0x042f,0x0801
07f6 0437 0802  | 7  |		.CONST	0x0437,0x0802
07f8 043a 0803  | :  |		.CONST	0x043a,0x0803
07fa 043f 0804  | ?  |		.CONST	0x043f,0x0804
07fc 0442 0805  | B  |		.CONST	0x0442,0x0805
07fe 0445 0806  | E  |		.CONST	0x0445,0x0806
0800 044b 0408  | K  |		.CONST	0x044b,0x0408
0802 044f 0409  | O  |		.CONST	0x044f,0x0409
0804 0453 040a  | S  |		.CONST	0x0453,0x040a
0806 0456 040b  | V  |		.CONST	0x0456,0x040b
0808 045b 040c  | [  |		.CONST	0x045b,0x040c
080a 045c 040d  | \  |		.CONST	0x045c,0x040d
080c 0460 040e  | `  |		.CONST	0x0460,0x040e
080e ; --------------------------------------------------------------------------------------
080e ; Debug3 Subtable 0xf
080e ; --------------------------------------------------------------------------------------
080e 0001 0001  |    |		.DBG3TAB	0x0001,0x0001
0810 046b ffff  | k  |		.CONST	0x046b,0xffff
0812 046d 0001  | m  |		.CONST	0x046d,0x0001
0814 ; --------------------------------------------------------------------------------------
0814 ; Debug3 Subtable 0x10
0814 ; --------------------------------------------------------------------------------------
0814 0002 000b  |    |		.DBG3TAB	0x0002,0x000b
0816 047b ffff  | {  |		.CONST	0x047b,0xffff
0818 047d fffe  | }  |		.CONST	0x047d,0xfffe
081a 047f 0001  |    |		.CONST	0x047f,0x0001
081c 0482 0002  |    |		.CONST	0x0482,0x0002
081e 0485 0003  |    |		.CONST	0x0485,0x0003
0820 0488 0004  |    |		.CONST	0x0488,0x0004
0822 048b 0005  |    |		.CONST	0x048b,0x0005
0824 048f 0006  |    |		.CONST	0x048f,0x0006
0826 0494 0007  |    |		.CONST	0x0494,0x0007
0828 0497 0008  |    |		.CONST	0x0497,0x0008
082a 049e 0009  |    |		.CONST	0x049e,0x0009
082c 04a1 000a  |    |		.CONST	0x04a1,0x000a
082e 04a7 000b  |    |		.CONST	0x04a7,0x000b
0830 ; --------------------------------------------------------------------------------------
0830 ; Debug3 Subtable 0x11
0830 ; --------------------------------------------------------------------------------------
0830 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0832 04b3 0001  |    |		.CONST	0x04b3,0x0001
0834 04b5 0002  |    |		.CONST	0x04b5,0x0002
0836 04bb 0003  |    |		.CONST	0x04bb,0x0003
0838 04c1 0004  |    |		.CONST	0x04c1,0x0004
083a 04c5 0005  |    |		.CONST	0x04c5,0x0005
083c 04cf 0006  |    |		.CONST	0x04cf,0x0006
083e ; --------------------------------------------------------------------------------------
083e ; Debug3 Subtable 0x12
083e ; --------------------------------------------------------------------------------------
083e 0006 0006  |    |		.DBG3TAB	0x0006,0x0006
0840 04db ffff  |    |		.CONST	0x04db,0xffff
0842 04df fffe  |    |		.CONST	0x04df,0xfffe
0844 04e1 fffd  |    |		.CONST	0x04e1,0xfffd
0846 04e3 fffc  |    |		.CONST	0x04e3,0xfffc
0848 04e9 fffb  |    |		.CONST	0x04e9,0xfffb
084a 04eb fffa  |    |		.CONST	0x04eb,0xfffa
084c 04f5 0001  |    |		.CONST	0x04f5,0x0001
084e 04fa 0002  |    |		.CONST	0x04fa,0x0002
0850 0507 0003  |    |		.CONST	0x0507,0x0003
0852 050c 0004  |    |		.CONST	0x050c,0x0004
0854 0516 0005  |    |		.CONST	0x0516,0x0005
0856 0519 0006  |    |		.CONST	0x0519,0x0006
0858 ; --------------------------------------------------------------------------------------
0858 ; Debug3 Subtable 0x13
0858 ; --------------------------------------------------------------------------------------
0858 0001 000c  |    |		.DBG3TAB	0x0001,0x000c
085a 0523 0001  | #  |		.CONST	0x0523,0x0001
085c 0529 0002  | )  |		.CONST	0x0529,0x0002
085e 052f 0003  | /  |		.CONST	0x052f,0x0003
0860 0531 0004  | 1  |		.CONST	0x0531,0x0004
0862 0533 0005  | 3  |		.CONST	0x0533,0x0005
0864 0533 fbff  | 3  |		.CONST	0x0533,0xfbff
0866 0539 0401  | 9  |		.CONST	0x0539,0x0401
0868 0541 0402  | A  |		.CONST	0x0541,0x0402
086a 0544 0403  | D  |		.CONST	0x0544,0x0403
086c 0546 0404  | F  |		.CONST	0x0546,0x0404
086e 054a 0405  | J  |		.CONST	0x054a,0x0405
0870 054c 0406  | L  |		.CONST	0x054c,0x0406
0872 054f 0407  | O  |		.CONST	0x054f,0x0407
0874 0000 0000  |    |		.BLANK	0000[0x18c]