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

⟦e6cd97e9b⟧

    Length: 4096 (0x1000)
    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 0530       | 0  |		.CONST	0x0530								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0003       |    |		.CONST	0x0003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 01b2       |    |		.CONST	0x01b2								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 003f       | ?  |		.CONST	0x003f								; Number of locals
000b			INIT_0008:
000b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0 = .DEBUG	0x000b,0x05da,0x8000,0x0000,0x0056,0xca85,0x0000,0x0010
													; 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 480b       |H   |		Short_Literal	0xb
000d 029f 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Call
000f 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0010 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x4 = 0x10,0xfffb
0011 4806       |H   |		Short_Literal	0x6
0012 00da       |    |		Load_Top	At_Offset_2
0013 03f9       |    |		Declare_Type	Discrete,Constrained,Visible
0014 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x5 = 0x14,0xfffa
0015 4804       |H   |		Short_Literal	0x4
0016 029f 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Call
0018 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0019 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x0.0x6 = 0x19,0xfff9
001a 4807       |H   |		Short_Literal	0x7
001b 4800       |H   |		Short_Literal	0x0
001c 4801       |H   |		Short_Literal	0x1
001d 4815       |H   |		Short_Literal	0x15
001e 0319       |    |		Declare_Type	Variant_Record,Incomplete,Visible
001f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x7 = 0x1f,0xfff8
0020 029f 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Call
0022 4801       |H   |		Short_Literal	0x1
0023 0328       | (  |		Declare_Type	Record,Defined_Incomplete,Visible
0024 029a 0203  |    |		Declare_Subprogram	INIT_0200,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x24,0xfff7
0026 029a 021b  |    |		Declare_Subprogram	INIT_0218,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x26,0xfff6
0028 029a 0233  |   3|		Declare_Subprogram	INIT_0230,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x28,0xfff5
002a 029a 024b  |   K|		Declare_Subprogram	INIT_0248,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x2a,0xfff4
002c 029a 0263  |   c|		Declare_Subprogram	INIT_0260,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x2c,0xfff3
002e 029a 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x2e,0xfff2
0030 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x0.0xe = 0x30,0xfff1
0031 0129       | )  |		Execute	Any,Make_Visible
0032 029a 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x32,0xfff0
0034 029a 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x34,0xffef
0036 029a 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x11 = 0x36,0xffee
0038 029a 02db  |    |		Declare_Subprogram	INIT_02d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x12 = 0x38,0xffed
003a 029a 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x13 = 0x3a,0xffec
003c 029a 02eb  |    |		Declare_Subprogram	INIT_02e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x14 = 0x3c,0xffeb
003e 029a 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x15 = 0x3e,0xffea
0040 029a 040b  |    |		Declare_Subprogram	INIT_0408,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x16 = 0x40,0xffe9
0042 029a 0423  |   #|		Declare_Subprogram	INIT_0420,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x17 = 0x42,0xffe8
0044 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x18 = 0x44,0xffe7
0045 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0046 02a0       |    |		Declare_Subprogram	Null_Subprogram
0047 4818       |H   |		Short_Literal	0x18
0048 03d3       |    |		Declare_Type	Access,Defined,Accesses_Protected
0049 4801       |H   |		Short_Literal	0x1							; Debug Table 0x0.0x19 = 0x49,0xffe6
004a 00d9       |    |		Load_Top	At_Offset_1
004b 4804       |H   |		Short_Literal	0x4
004c e002       |    |		Load	0x0,0x2
004d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
004e e002       |    |		Load	0x0,0x2
004f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0050 00ed       |    |		Load_Encached	Diana_Symbol_Rep_Cache
0051 e20f       |    |		Load	0x1,0xf
0052 4803       |H   |		Short_Literal	0x3
0053 e002       |    |		Load	0x0,0x2
0054 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0055 e002       |    |		Load	0x0,0x2
0056 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0057 00eb       |    |		Load_Encached	Diana_Cache
0058 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
0059 4803       |H   |		Short_Literal	0x3
005a e002       |    |		Load	0x0,0x2
005b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
005c e002       |    |		Load	0x0,0x2
005d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
005e 00ec       |    |		Load_Encached	Diana_Tree_Cache
005f 4803       |H   |		Short_Literal	0x3
0060 e002       |    |		Load	0x0,0x2
0061 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0062 e002       |    |		Load	0x0,0x2
0063 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0064 00eb       |    |		Load_Encached	Diana_Cache
0065 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0066 4803       |H   |		Short_Literal	0x3
0067 e002       |    |		Load	0x0,0x2
0068 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0069 e002       |    |		Load	0x0,0x2
006a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
006b 00e3       |    |		Load_Encached	Natural_Cache
006c 4803       |H   |		Short_Literal	0x3
006d 00ec       |    |		Load_Encached	Diana_Tree_Cache
006e e003       |    |		Load	0x0,0x3
006f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0070 e004       |    |		Load	0x0,0x4
0071 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0072 029f 0453  |   S|		Declare_Subprogram	INIT_0450,For_Call
0074 4814       |H   |		Short_Literal	0x14
0075 4800       |H   |		Short_Literal	0x0
0076 e210       |    |		Load	0x1,0x10
0077 0307       |    |		Complete_Type	Variant_Record,By_Defining
0078 e211       |    |		Load	0x1,0x11
0079 0324       | $  |		Complete_Type	Record,By_Component_Completion
007a 00bf       |    |		Action	Accept_Activation
007b 4806       |H   |		Short_Literal	0x6							; Debug Table 0x1 = .DEBUG	0x007b,0x0610,0x8000,0x0000,0x0056,0xcad5,0x0000,0x0007
													; Debug Table 0x1.0x0 = 0x7b,0xffff
													; Debug Table 0x1.0x1 = 0x7b,0xfffe
007c e210       |    |		Load	0x1,0x10
007d 1c08       |    |		Execute_Immediate	Run_Utility,0x8
007e 4809       |H   |		Short_Literal	0x9							; Debug Table 0x1.0x2 = 0x7e,0xfffd
007f e210       |    |		Load	0x1,0x10
0080 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0081 480a       |H   |		Short_Literal	0xa							; Debug Table 0x1.0x3 = 0x81,0xfffc
0082 e210       |    |		Load	0x1,0x10
0083 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0084 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x4 = 0x84,0xfffb
0085 191b       |    |		Execute	Package,Field_Reference,Field_Number 0x1b
0086 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x5 = 0x86,0xfffa
0087 1911       |    |		Execute	Package,Field_Reference,Field_Number 0x11
0088 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x6 = 0x88,0xfff9
0089 1912       |    |		Execute	Package,Field_Reference,Field_Number 0x12
008a e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x7 = 0x8a,0xfff8
008b 1913       |    |		Execute	Package,Field_Reference,Field_Number 0x13
008c e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0x8 = 0x8c,0xfff7
008d 1928       | (  |		Execute	Package,Field_Reference,Field_Number 0x28
008e 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1.0x9 = 0x8e,0xfff6
008f e210       |    |		Load	0x1,0x10
0090 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0091 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1.0xa = 0x91,0xfff5
													; Debug Table 0x1.0xb = 0x91,0xfff4
0092 e210       |    |		Load	0x1,0x10
0093 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0094 4800       |H   |		Short_Literal	0x0
0095 00d9       |    |		Load_Top	At_Offset_1
0096 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0097 4800       |H   |		Short_Literal	0x0
0098 00d9       |    |		Load_Top	At_Offset_1
0099 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
009a 00eb       |    |		Load_Encached	Diana_Cache
009b 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
009c 00ed       |    |		Load_Encached	Diana_Symbol_Rep_Cache
009d 0119       |    |		Execute	Any,Check_In_Formal_Type
009e 00d9       |    |		Load_Top	At_Offset_1
009f 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
00a0 4800       |H   |		Short_Literal	0x0
00a1 00d9       |    |		Load_Top	At_Offset_1
00a2 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
00a3 00d9       |    |		Load_Top	At_Offset_1
00a4 0162       | b  |		Execute	Variant_Record,Check_In_Type
00a5 0092 04e2  |    |		Action	Push_String_Extended,0x4e2					; "0"
													; Debug Table 0x1.0xc = 0xa5,0xfff3
00a7 00eb       |    |		Load_Encached	Diana_Cache
00a8 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
00a9 00eb       |    |		Load_Encached	Diana_Cache
00aa 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
00ab 011e       |    |		Execute	Any,Convert
00ac 4802       |H   |		Short_Literal	0x2							; Debug Table 0x1.0xd = 0xac,0xfff2
00ad e210       |    |		Load	0x1,0x10
00ae 1c07       |    |		Execute_Immediate	Run_Utility,0x7
00af 4802       |H   |		Short_Literal	0x2							; Debug Table 0x1.0xe = 0xaf,0xfff1
00b0 e210       |    |		Load	0x1,0x10
00b1 1c08       |    |		Execute_Immediate	Run_Utility,0x8
00b2 4800       |H   |		Short_Literal	0x0
00b3 00d9       |    |		Load_Top	At_Offset_1
00b4 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
00b5 4800       |H   |		Short_Literal	0x0
00b6 00d9       |    |		Load_Top	At_Offset_1
00b7 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
00b8 00da       |    |		Load_Top	At_Offset_2
00b9 00eb       |    |		Load_Encached	Diana_Cache
00ba 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
00bb 0119       |    |		Execute	Any,Check_In_Formal_Type
00bc 00d9       |    |		Load_Top	At_Offset_1
00bd 2a09       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9
00be 00d9       |    |		Load_Top	At_Offset_1
00bf 0162       | b  |		Execute	Variant_Record,Check_In_Type
00c0 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1.0xf = 0xc0,0xfff0
00c1 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
00c2 00ea       |    |		Load_Encached	Null_String_Cache
00c3 e005       |    |		Load	0x0,0x5								; Debug Table 0x1.0x10 = 0xc3,0xfbff
00c4 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00c5 02c7       |    |		Declare_Variable	Any
00c6 e006       |    |		Load	0x0,0x6
00c7 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
00c8 4800       |H   |		Short_Literal	0x0
00c9 49ac       |I   |		Short_Literal	0x1ac
00ca 00eb       |    |		Load_Encached	Diana_Cache
00cb 0096       |    |		Execute	Package,Entry
00cc e007       |    |		Load	0x0,0x7
00cd 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00ce 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00cf c232       | 2  |		Store	0x1,0x32
00d0 00f2       |    |		Load_Encached	Diana_Attr_List						; Debug Table 0x1.0x11 = 0xd0,0xfbfe
00d1 480a       |H   |		Short_Literal	0xa
00d2 480d       |H   |		Short_Literal	0xd
00d3 00f2       |    |		Load_Encached	Diana_Attr_List
00d4 e006       |    |		Load	0x0,0x6
00d5 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
00d6 4800       |H   |		Short_Literal	0x0
00d7 49ac       |I   |		Short_Literal	0x1ac
00d8 00eb       |    |		Load_Encached	Diana_Cache
00d9 0096       |    |		Execute	Package,Entry
00da 039a       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Constraint
00db 00d8       |    |		Load_Top	At_Offset_0
00dc 0217       |    |		Execute	Heap_Access,All_Reference
00dd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00de 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00df 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x12 = 0xdf,0xfbfd
													; Debug Table 0x1.0x13 = 0xdf,0x401
00e0 00d9       |    |		Load_Top	At_Offset_1
00e1 0217       |    |		Execute	Heap_Access,All_Reference
00e2 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00e3 4973       |Is  |		Short_Literal	0x173							; Debug Table 0x1.0x14 = 0xe3,0x402
00e4 00eb       |    |		Load_Encached	Diana_Cache
00e5 0098       |    |		Execute	Package,Field_Read_Dynamic
00e6 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
00e7 00d9       |    |		Load_Top	At_Offset_1
00e8 0217       |    |		Execute	Heap_Access,All_Reference
00e9 2803       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
00ea 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1.0x15 = 0xea,0x403
00eb 00da       |    |		Load_Top	At_Offset_2
00ec e231       | 1  |		Load	0x1,0x31
00ed e005       |    |		Load	0x0,0x5
00ee 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
00ef 00d9       |    |		Load_Top	At_Offset_1
00f0 0217       |    |		Execute	Heap_Access,All_Reference
00f1 2a10       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10
00f2 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x16 = 0xf2,0x404
00f3 00d9       |    |		Load_Top	At_Offset_1
00f4 0217       |    |		Execute	Heap_Access,All_Reference
00f5 2a11       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x11
00f6 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x17 = 0xf6,0x405
00f7 00d9       |    |		Load_Top	At_Offset_1
00f8 0217       |    |		Execute	Heap_Access,All_Reference
00f9 2a12       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x12
00fa 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x18 = 0xfa,0x406
00fb 00d9       |    |		Load_Top	At_Offset_1
00fc 0217       |    |		Execute	Heap_Access,All_Reference
00fd 2a13       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x13
00fe 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x19 = 0xfe,0x407
00ff 00d0       |    |		Action	Swap_Control
0100 00d1       |    |		Pop_Control	Pop_Count_1
0101 00d0       |    |		Action	Swap_Control
0102 00d1       |    |		Pop_Control	Pop_Count_1
0103 00d0       |    |		Action	Swap_Control
0104 00d1       |    |		Pop_Control	Pop_Count_1
0105 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1					; Debug Table 0x1.0x1a = 0x105,0xfff0
0106 4804       |H   |		Short_Literal	0x4							; Debug Table 0x1.0x1b = 0x106,0xffef
0107 e210       |    |		Load	0x1,0x10
0108 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0109 4804       |H   |		Short_Literal	0x4							; Debug Table 0x1.0x1c = 0x109,0xffee
010a e210       |    |		Load	0x1,0x10
010b 1c08       |    |		Execute_Immediate	Run_Utility,0x8
010c 4800       |H   |		Short_Literal	0x0
010d 00d9       |    |		Load_Top	At_Offset_1
010e 2a0d       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd
010f 4800       |H   |		Short_Literal	0x0
0110 00d9       |    |		Load_Top	At_Offset_1
0111 2a0e       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe
0112 00da       |    |		Load_Top	At_Offset_2
0113 00d9       |    |		Load_Top	At_Offset_1
0114 2a0f       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf
0115 00d9       |    |		Load_Top	At_Offset_1
0116 0162       | b  |		Execute	Variant_Record,Check_In_Type
0117 4805       |H   |		Short_Literal	0x5							; Debug Table 0x1.0x1d = 0x117,0xffed
0118 e210       |    |		Load	0x1,0x10
0119 1c07       |    |		Execute_Immediate	Run_Utility,0x7
011a 4805       |H   |		Short_Literal	0x5							; Debug Table 0x1.0x1e = 0x11a,0xffec
011b e210       |    |		Load	0x1,0x10
011c 1c08       |    |		Execute_Immediate	Run_Utility,0x8
011d 4800       |H   |		Short_Literal	0x0
011e 00d9       |    |		Load_Top	At_Offset_1
011f 2a10       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10
0120 4800       |H   |		Short_Literal	0x0
0121 00d9       |    |		Load_Top	At_Offset_1
0122 2a11       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x11
0123 4801       |H   |		Short_Literal	0x1
0124 00d9       |    |		Load_Top	At_Offset_1
0125 2a12       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x12
0126 00d9       |    |		Load_Top	At_Offset_1
0127 0162       | b  |		Execute	Variant_Record,Check_In_Type
0128 4803       |H   |		Short_Literal	0x3							; Debug Table 0x1.0x1f = 0x128,0xffeb
0129 e210       |    |		Load	0x1,0x10
012a 1c07       |    |		Execute_Immediate	Run_Utility,0x7
012b 4803       |H   |		Short_Literal	0x3							; Debug Table 0x1.0x20 = 0x12b,0xffea
012c e210       |    |		Load	0x1,0x10
012d 1c08       |    |		Execute_Immediate	Run_Utility,0x8
012e 4800       |H   |		Short_Literal	0x0
012f 00d9       |    |		Load_Top	At_Offset_1
0130 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
0131 4800       |H   |		Short_Literal	0x0
0132 00d9       |    |		Load_Top	At_Offset_1
0133 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0134 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1.0x21 = 0x134,0x801
0135 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1.0x22 = 0x135,0xffea
0136 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
0137 00d9       |    |		Load_Top	At_Offset_1
0138 0162       | b  |		Execute	Variant_Record,Check_In_Type
0139 4807       |H   |		Short_Literal	0x7							; Debug Table 0x1.0x23 = 0x139,0xffe9
013a e210       |    |		Load	0x1,0x10
013b 1c07       |    |		Execute_Immediate	Run_Utility,0x7
013c 4807       |H   |		Short_Literal	0x7							; Debug Table 0x1.0x24 = 0x13c,0xffe8
013d e210       |    |		Load	0x1,0x10
013e 1c08       |    |		Execute_Immediate	Run_Utility,0x8
013f 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1.0x25 = 0x13f,0xc01
0140 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1.0x26 = 0x140,0xffe8
0141 2a13       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x13
0142 e003       |    |		Load	0x0,0x3
0143 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0144 00d9       |    |		Load_Top	At_Offset_1
0145 2a14       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x14
0146 e004       |    |		Load	0x0,0x4
0147 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0148 00d9       |    |		Load_Top	At_Offset_1
0149 2a15       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x15
014a 00d9       |    |		Load_Top	At_Offset_1
014b 0162       | b  |		Execute	Variant_Record,Check_In_Type
014c 4808       |H   |		Short_Literal	0x8							; Debug Table 0x1.0x27 = 0x14c,0xffe7
014d e210       |    |		Load	0x1,0x10
014e 1c07       |    |		Execute_Immediate	Run_Utility,0x7
014f 4808       |H   |		Short_Literal	0x8							; Debug Table 0x1.0x28 = 0x14f,0xffe6
0150 e210       |    |		Load	0x1,0x10
0151 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0152 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1.0x29 = 0x152,0x1001
0153 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1.0x2a = 0x153,0xffe6
0154 2a13       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x13
0155 e003       |    |		Load	0x0,0x3
0156 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0157 00d9       |    |		Load_Top	At_Offset_1
0158 2a14       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x14
0159 e004       |    |		Load	0x0,0x4
015a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
015b 00d9       |    |		Load_Top	At_Offset_1
015c 2a15       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x15
015d 00d9       |    |		Load_Top	At_Offset_1
015e 0162       | b  |		Execute	Variant_Record,Check_In_Type
015f 480b       |H   |		Short_Literal	0xb							; Debug Table 0x1.0x2b = 0x15f,0xffe5
0160 e210       |    |		Load	0x1,0x10
0161 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0162 480b       |H   |		Short_Literal	0xb							; Debug Table 0x1.0x2c = 0x162,0xffe4
0163 e210       |    |		Load	0x1,0x10
0164 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0165 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1.0x2d = 0x165,0x1401
0166 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1.0x2e = 0x166,0xffe4
0167 2a13       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x13
0168 e003       |    |		Load	0x0,0x3
0169 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
016a 00d9       |    |		Load_Top	At_Offset_1
016b 2a14       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x14
016c e004       |    |		Load	0x0,0x4
016d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
016e 00d9       |    |		Load_Top	At_Offset_1
016f 2a15       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x15
0170 00d9       |    |		Load_Top	At_Offset_1
0171 0162       | b  |		Execute	Variant_Record,Check_In_Type
0172 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21				; Debug Table 0x1.0x2f = 0x172,0xffe3
0173 00c7       |    |		Action	Elaborate_Subprogram
0174 e008       |    |		Load	0x0,0x8								; Debug Table 0x1.0x30 = 0x174,0xffe2
0175 1915       |    |		Execute	Package,Field_Reference,Field_Number 0x15
0176 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x31 = 0x176,0xffe1
													; Debug Table 0x1.0x32 = 0x176,0xffe0
													; Debug Table 0x1.0x33 = 0x176,0xffdf
0177 e210       |    |		Load	0x1,0x10
0178 1c07       |    |		Execute_Immediate	Run_Utility,0x7
0179 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x34 = 0x179,0xffde
017a e210       |    |		Load	0x1,0x10
017b 1c08       |    |		Execute_Immediate	Run_Utility,0x8
017c e001       |    |		Load	0x0,0x1
017d 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
017e e222       | "  |		Load	0x1,0x22							; Debug Table 0x1.0x35 = 0x17e,0xe7ff
017f 00d9       |    |		Load_Top	At_Offset_1
0180 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0181 e001       |    |		Load	0x0,0x1
0182 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0183 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0184 e222       | "  |		Load	0x1,0x22
0185 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0186 00d8       |    |		Load_Top	At_Offset_0
0187 0227       | '  |		Execute	Access,All_Reference
0188 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0189 0039       | 9  |		Store_Top	Access,At_Offset_1
018a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1.0x36 = 0x18a,0x1801
018b 00d9       |    |		Load_Top	At_Offset_1
018c 0228       | (  |		Execute	Access,All_Write
018d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x37 = 0x18d,0x1802
018e 00d0       |    |		Action	Swap_Control
018f 00d1       |    |		Pop_Control	Pop_Count_1
0190 00d0       |    |		Action	Swap_Control
0191 00d1       |    |		Pop_Control	Pop_Count_1
0192 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1.0x38 = 0x192,0xffde
0193 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0194 00d9       |    |		Load_Top	At_Offset_1
0195 0162       | b  |		Execute	Variant_Record,Check_In_Type
0196 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x39 = 0x196,0xffdd
													; Debug Table 0x1.0x3a = 0x196,0xffdc
													; Debug Table 0x1.0x3b = 0x196,0xffdb
													; Debug Table 0x1.0x3c = 0x196,0xffda
													; Debug Table 0x1.0x3d = 0x196,0xffd9
													; Debug Table 0x1.0x3e = 0x196,0xffd8
													; Debug Table 0x1.0x3f = 0x196,0xffd7
													; Debug Table 0x1.0x40 = 0x196,0xffd6
													; Debug Table 0x1.0x41 = 0x196,0xffd5
0197 00c7       |    |		Action	Elaborate_Subprogram
0198 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x42 = 0x198,0xffd4
0199 00c7       |    |		Action	Elaborate_Subprogram
019a 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x43 = 0x19a,0xffd3
019b 00c7       |    |		Action	Elaborate_Subprogram
019c 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x44 = 0x19c,0xffd2
019d 00c7       |    |		Action	Elaborate_Subprogram
019e 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x45 = 0x19e,0xffd1
019f 00c7       |    |		Action	Elaborate_Subprogram
01a0 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x46 = 0x1a0,0xffd0
01a1 00c7       |    |		Action	Elaborate_Subprogram
01a2 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0x47 = 0x1a2,0xffcf
01a3 00c7       |    |		Action	Elaborate_Subprogram
01a4 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0x48 = 0x1a4,0xffce
01a5 00c7       |    |		Action	Elaborate_Subprogram
01a6 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20				; Debug Table 0x1.0x49 = 0x1a6,0xffcd
01a7 00c7       |    |		Action	Elaborate_Subprogram
01a8 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x4a = 0x1a8,0xffcc
01a9 00c7       |    |		Action	Elaborate_Subprogram
01aa 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x4b = 0x1aa,0xffcb
01ab 00c7       |    |		Action	Elaborate_Subprogram
01ac 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0x4c = 0x1ac,0xffca
01ad 00c7       |    |		Action	Elaborate_Subprogram
01ae 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x1.0x4d = 0x1ae,0xffc9
01af 00c7       |    |		Action	Elaborate_Subprogram
01b0 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f				; Debug Table 0x1.0x4e = 0x1b0,0xffc8
01b1 00c7       |    |		Action	Elaborate_Subprogram
01b2			BODY_0008:
01b2 00bc       |    |		Action	Signal_Activated
01b3 00bb       |    |		Action	Signal_Completion
01b4 0000 0000  |    |		.BLANK	0000[0x4]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb       |    |		.CONST	0x01bb								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0001       |    |		.CONST	0x0001								; Number of locals
01bb			BODY_01b8:
01bb			INIT_01b8:
01bb 4603       |F   |		Jump_Case	0x4							; Debug Table 0x2 = .DEBUG	0x01bb,0x06b0,0x0005,0x0000,0x0056,0xca85,0x0000,0x001e
01bc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
01bd 7802       |x   |		Jump	0x1c0								; case 0x1
01be 7805       |x   |		Jump	0x1c4								; case 0x2
01bf 7809       |x   |		Jump	0x1c9								; case 0x3
01c0 00da       |    |		Load_Top	At_Offset_2
01c1 0091 04d1  |    |		Action	Push_String_Extended_Indexed,0x4d1				; "LEAVES"
01c3 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01c4 00db       |    |		Load_Top	At_Offset_3
01c5 00db       |    |		Load_Top	At_Offset_3
01c6 00e0       |    |		Load_Encached	Standard_Cache
01c7 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01c8 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01c9 00da       |    |		Load_Top	At_Offset_2
01ca 00e0       |    |		Load_Encached	Standard_Cache
01cb 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01cc 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01cd 0000 0000  |    |		.XXX[0x3]
01cf 0000       |    |
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3       |    |		.CONST	0x01d3								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0001       |    |		.CONST	0x0001								; Number of locals
01d3			BODY_01d0:
01d3			INIT_01d0:
01d3 4603       |F   |		Jump_Case	0x4							; Debug Table 0x3 = .DEBUG	0x01d3,0x06b2,0x0005,0x0000,0x0056,0xca85,0x0000,0x0035
01d4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
01d5 7802       |x   |		Jump	0x1d8								; case 0x1
01d6 7805       |x   |		Jump	0x1dc								; case 0x2
01d7 7809       |x   |		Jump	0x1e1								; case 0x3
01d8 00da       |    |		Load_Top	At_Offset_2
01d9 0091 04dd  |    |		Action	Push_String_Extended_Indexed,0x4dd				; "ORIGINAL"
01db 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01dc 00db       |    |		Load_Top	At_Offset_3
01dd 00db       |    |		Load_Top	At_Offset_3
01de 00e0       |    |		Load_Encached	Standard_Cache
01df 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01e0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01e1 00da       |    |		Load_Top	At_Offset_2
01e2 00e0       |    |		Load_Encached	Standard_Cache
01e3 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01e4 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01e5 0000 0000  |    |		.XXX[0x3]
01e7 0000       |    |
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb       |    |		.CONST	0x01eb								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0001       |    |		.CONST	0x0001								; Number of locals
01eb			BODY_01e8:
01eb			INIT_01e8:
01eb 4608       |F   |		Jump_Case	0x9							; Debug Table 0x4 = .DEBUG	0x01eb,0x06b4,0x0005,0x0000,0x0056,0xca85,0x0000,0x0047
01ec 7808       |x   |		Jump	0x1f5								; case 0x0
01ed 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
01ee 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
01ef 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
01f0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
01f1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
01f2 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
01f3 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
01f4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
01f5 00da       |    |		Load_Top	At_Offset_2
01f6 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
01f7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01f8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
01f9 0000 0000  |    |		.BLANK	0000[0x7]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0208       |    |		.CONST	0x0208								; Address of begin
0201 0004       |    |		.CONST	0x0004								; Address of exception handler
0202 0002       |    |		.CONST	0x0002								; Number of locals
0203			INIT_0200:
0203 e22b       | +  |		Load	0x1,0x2b							; Debug Table 0x5 = .DEBUG	0x0203,0x06b6,0x0002,0x0000,0x0056,0xca85,0x0000,0x0050
													; Debug Table 0x5.0x0 = 0x203,0xffff
0204 02ff       |    |		Declare_Variable	Variant_Record
0205 e22c       | ,  |		Load	0x1,0x2c
0206 00d9       |    |		Load_Top	At_Offset_1
0207 016d       | m  |		Execute	Variant_Record,Structure_Write
0208			BODY_0200:
0208 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x1 = 0x208,0x1
0209 00d9       |    |		Load_Top	At_Offset_1
020a 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
020b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x2 = 0x20b,0x2
020c 00d9       |    |		Load_Top	At_Offset_1
020d 2a06       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x6
020e e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x3 = 0x20e,0x3
020f 00d9       |    |		Load_Top	At_Offset_1
0210 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0211 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x5.0x4 = 0x211,0x4
0212 00d9       |    |		Load_Top	At_Offset_1
0213 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0214 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x5 = 0x214,0x5
0215 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0216 0000 0000  |    |		.XXX[0x2]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0220       |    |		.CONST	0x0220								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0002       |    |		.CONST	0x0002								; Number of locals
021b			INIT_0218:
021b e22e       | .  |		Load	0x1,0x2e							; Debug Table 0x6 = .DEBUG	0x021b,0x06c4,0x0002,0x0000,0x0056,0xca85,0x0000,0x0072
													; Debug Table 0x6.0x0 = 0x21b,0xffff
021c 02ff       |    |		Declare_Variable	Variant_Record
021d e22f       | /  |		Load	0x1,0x2f
021e 00d9       |    |		Load_Top	At_Offset_1
021f 016d       | m  |		Execute	Variant_Record,Structure_Write
0220			BODY_0218:
0220 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x1 = 0x220,0x1
0221 00d9       |    |		Load_Top	At_Offset_1
0222 2a09       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x9
0223 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x6.0x2 = 0x223,0x2
0224 00d9       |    |		Load_Top	At_Offset_1
0225 2a07       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x7
0226 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x6.0x3 = 0x226,0x3
0227 00d9       |    |		Load_Top	At_Offset_1
0228 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
0229 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x4 = 0x229,0x4
022a 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
022b 0000 0000  |    |		.BLANK	0000[0x5]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0238       | 8  |		.CONST	0x0238								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 0002       |    |		.CONST	0x0002								; Number of locals
0233			INIT_0230:
0233 e231       | 1  |		Load	0x1,0x31							; Debug Table 0x7 = .DEBUG	0x0233,0x06d0,0x0002,0x0000,0x0056,0xca85,0x0000,0x008f
													; Debug Table 0x7.0x0 = 0x233,0xffff
0234 02ff       |    |		Declare_Variable	Variant_Record
0235 e232       | 2  |		Load	0x1,0x32
0236 00d9       |    |		Load_Top	At_Offset_1
0237 016d       | m  |		Execute	Variant_Record,Structure_Write
0238			BODY_0230:
0238 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x1 = 0x238,0x1
0239 00d9       |    |		Load_Top	At_Offset_1
023a 2a0f       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xf
023b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x2 = 0x23b,0x2
023c 00d9       |    |		Load_Top	At_Offset_1
023d 2a0d       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xd
023e e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x7.0x3 = 0x23e,0x3
023f 00d9       |    |		Load_Top	At_Offset_1
0240 2a0e       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe
0241 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x4 = 0x241,0x4
0242 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0243 0000 0000  |    |		.BLANK	0000[0x5]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 0250       | P  |		.CONST	0x0250								; Address of begin
0249 0004       |    |		.CONST	0x0004								; Address of exception handler
024a 0002       |    |		.CONST	0x0002								; Number of locals
024b			INIT_0248:
024b e233       | 3  |		Load	0x1,0x33							; Debug Table 0x8 = .DEBUG	0x024b,0x06dc,0x0002,0x0000,0x0056,0xca85,0x0000,0x00ac
													; Debug Table 0x8.0x0 = 0x24b,0xffff
024c 02ff       |    |		Declare_Variable	Variant_Record
024d e234       | 4  |		Load	0x1,0x34
024e 00d9       |    |		Load_Top	At_Offset_1
024f 016d       | m  |		Execute	Variant_Record,Structure_Write
0250			BODY_0248:
0250 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x1 = 0x250,0x1
0251 00d9       |    |		Load_Top	At_Offset_1
0252 2a12       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x12
0253 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0x2 = 0x253,0x2
0254 00d9       |    |		Load_Top	At_Offset_1
0255 2a10       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10
0256 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x8.0x3 = 0x256,0x3
0257 00d9       |    |		Load_Top	At_Offset_1
0258 2a11       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x11
0259 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x4 = 0x259,0x4
025a 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
025b 0000 0000  |    |		.BLANK	0000[0x5]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0268       | h  |		.CONST	0x0268								; Address of begin
0261 0004       |    |		.CONST	0x0004								; Address of exception handler
0262 0002       |    |		.CONST	0x0002								; Number of locals
0263			INIT_0260:
0263 e235       | 5  |		Load	0x1,0x35							; Debug Table 0x9 = .DEBUG	0x0263,0x06e8,0x0002,0x0000,0x0056,0xca85,0x0000,0x00c8
													; Debug Table 0x9.0x0 = 0x263,0xffff
0264 02ff       |    |		Declare_Variable	Variant_Record
0265 e236       | 6  |		Load	0x1,0x36
0266 00d9       |    |		Load_Top	At_Offset_1
0267 016d       | m  |		Execute	Variant_Record,Structure_Write
0268			BODY_0260:
0268 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9.0x1 = 0x268,0x1
0269 00d9       |    |		Load_Top	At_Offset_1
026a 2a0c       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xc
026b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x2 = 0x26b,0x2
026c 00d9       |    |		Load_Top	At_Offset_1
026d 2a0a       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xa
026e e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x9.0x3 = 0x26e,0x3
026f 00d9       |    |		Load_Top	At_Offset_1
0270 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0271 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x4 = 0x271,0x4
0272 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0273 0000 0000  |    |		.BLANK	0000[0x5]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 0280       |    |		.CONST	0x0280								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0002       |    |		.CONST	0x0002								; Number of locals
027b			INIT_0278:
027b e23e       | >  |		Load	0x1,0x3e							; Debug Table 0xa = .DEBUG	0x027b,0x06f4,0x0002,0x0000,0x0056,0xca85,0x0000,0x00e5
													; Debug Table 0xa.0x0 = 0x27b,0xffff
027c 02ff       |    |		Declare_Variable	Variant_Record
027d e23f       | ?  |		Load	0x1,0x3f
027e 00d9       |    |		Load_Top	At_Offset_1
027f 016d       | m  |		Execute	Variant_Record,Structure_Write
0280			BODY_0278:
0280 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x1 = 0x280,0x1
0281 e222       | "  |		Load	0x1,0x22							; Debug Table 0xa.0x2 = 0x281,0xfbff
0282 00d9       |    |		Load_Top	At_Offset_1
0283 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0284 e001       |    |		Load	0x0,0x1
0285 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0286 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0287 e222       | "  |		Load	0x1,0x22
0288 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0289 00d8       |    |		Load_Top	At_Offset_0
028a 0227       | '  |		Execute	Access,All_Reference
028b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
028c 0039       | 9  |		Store_Top	Access,At_Offset_1
028d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0x3 = 0x28d,0x401
028e 00d9       |    |		Load_Top	At_Offset_1
028f 0228       | (  |		Execute	Access,All_Write
0290 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x4 = 0x290,0x402
0291 00d0       |    |		Action	Swap_Control
0292 00d1       |    |		Pop_Control	Pop_Count_1
0293 00d0       |    |		Action	Swap_Control
0294 00d1       |    |		Pop_Control	Pop_Count_1
0295 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0x5 = 0x295,0x1
0296 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0297 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x6 = 0x297,0x2
0298 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0299 0000 0000  |    |		.BLANK	0000[0x7]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a8       |    |		.CONST	0x02a8								; Address of begin
02a1 0004       |    |		.CONST	0x0004								; Address of exception handler
02a2 0002       |    |		.CONST	0x0002								; Number of locals
02a3			INIT_02a0:
02a3 e237       | 7  |		Load	0x1,0x37							; Debug Table 0xb = .DEBUG	0x02a3,0x0704,0x0002,0x0000,0x0056,0xca85,0x0000,0x00fd
													; Debug Table 0xb.0x0 = 0x2a3,0xffff
02a4 02ff       |    |		Declare_Variable	Variant_Record
02a5 e238       | 8  |		Load	0x1,0x38
02a6 00d9       |    |		Load_Top	At_Offset_1
02a7 016d       | m  |		Execute	Variant_Record,Structure_Write
02a8			BODY_02a0:
02a8 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x1 = 0x2a8,0x1
02a9 00d9       |    |		Load_Top	At_Offset_1
02aa 2a13       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x13
02ab e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x2 = 0x2ab,0x2
02ac 00d9       |    |		Load_Top	At_Offset_1
02ad 2a14       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x14
02ae e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xb.0x3 = 0x2ae,0x3
02af 00d9       |    |		Load_Top	At_Offset_1
02b0 2a15       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x15
02b1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x4 = 0x2b1,0x4
02b2 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02b3 0000 0000  |    |		.BLANK	0000[0x5]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02c0       |    |		.CONST	0x02c0								; Address of begin
02b9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ba 0002       |    |		.CONST	0x0002								; Number of locals
02bb			INIT_02b8:
02bb e239       | 9  |		Load	0x1,0x39							; Debug Table 0xc = .DEBUG	0x02bb,0x0710,0x0002,0x0000,0x0056,0xca85,0x0000,0x0114
													; Debug Table 0xc.0x0 = 0x2bb,0xffff
02bc 02ff       |    |		Declare_Variable	Variant_Record
02bd e23a       | :  |		Load	0x1,0x3a
02be 00d9       |    |		Load_Top	At_Offset_1
02bf 016d       | m  |		Execute	Variant_Record,Structure_Write
02c0			BODY_02b8:
02c0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x1 = 0x2c0,0x1
02c1 00d9       |    |		Load_Top	At_Offset_1
02c2 2a13       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x13
02c3 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xc.0x2 = 0x2c3,0x2
02c4 00d9       |    |		Load_Top	At_Offset_1
02c5 2a14       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x14
02c6 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xc.0x3 = 0x2c6,0x3
02c7 00d9       |    |		Load_Top	At_Offset_1
02c8 2a15       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x15
02c9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x4 = 0x2c9,0x4
02ca 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
02cb 0000 0000  |    |		.BLANK	0000[0x5]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d3       |    |		.CONST	0x02d3								; Address of begin
02d1 0004       |    |		.CONST	0x0004								; Address of exception handler
02d2 0001       |    |		.CONST	0x0001								; Number of locals
02d3			BODY_02d0:
02d3			INIT_02d0:
02d3 e223       | #  |		Load	0x1,0x23							; Debug Table 0xd = .DEBUG	0x02d3,0x071c,0x0002,0x0000,0x0056,0xca85,0x0000,0x012b
													; Debug Table 0xd.0x0 = 0x2d3,0x1
02d4 00ca       |    |		Action	Exit_Nullary_Function
02d5 0000 0000  |    |		.XXX[0x3]
02d7 0000       |    |
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db       |    |		.CONST	0x02db								; Address of begin
02d9 0004       |    |		.CONST	0x0004								; Address of exception handler
02da 0001       |    |		.CONST	0x0001								; Number of locals
02db			BODY_02d8:
02db			INIT_02d8:
02db e224       | $  |		Load	0x1,0x24							; Debug Table 0xe = .DEBUG	0x02db,0x0720,0x0002,0x0000,0x0056,0xca85,0x0000,0x0130
													; Debug Table 0xe.0x0 = 0x2db,0x1
02dc 00ca       |    |		Action	Exit_Nullary_Function
02dd 0000 0000  |    |		.XXX[0x3]
02df 0000       |    |
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e3       |    |		.CONST	0x02e3								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0001       |    |		.CONST	0x0001								; Number of locals
02e3			BODY_02e0:
02e3			INIT_02e0:
02e3 e225       | %  |		Load	0x1,0x25							; Debug Table 0xf = .DEBUG	0x02e3,0x0724,0x0002,0x0000,0x0056,0xca85,0x0000,0x0135
													; Debug Table 0xf.0x0 = 0x2e3,0x1
02e4 00ca       |    |		Action	Exit_Nullary_Function
02e5 0000 0000  |    |		.XXX[0x3]
02e7 0000       |    |
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb       |    |		.CONST	0x02eb								; Address of begin
02e9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ea 0001       |    |		.CONST	0x0001								; Number of locals
02eb			BODY_02e8:
02eb			INIT_02e8:
02eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10 = .DEBUG	0x02eb,0x0728,0x0002,0x0000,0x0056,0xca85,0x0000,0x013a
													; Debug Table 0x10.0x0 = 0x2eb,0x1
02ec 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
02ed 460b       |F   |		Jump_Case	0xc
02ee 780b       |x   |		Jump	0x2fa								; case 0x0
02ef 7854       |xT  |		Jump	0x344								; case 0x1
02f0 781c       |x   |		Jump	0x30d								; case 0x2
02f1 7826       |x&  |		Jump	0x318								; case 0x3
02f2 7830       |x0  |		Jump	0x323								; case 0x4
02f3 780b       |x   |		Jump	0x2ff								; case 0x5
02f4 7813       |x   |		Jump	0x308								; case 0x6
02f5 78f8       |x   |		Jump	0x3ee								; case 0x7
02f6 78f7       |x   |		Jump	0x3ee								; case 0x8
02f7 78f6       |x   |		Jump	0x3ee								; case 0x9
02f8 78f5       |x   |		Jump	0x3ee								; case 0xa
02f9 78f4       |x   |		Jump	0x3ee								; case 0xb
02fa 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x1 = 0x2fa,0x2
02fb 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
02fc 0227       | '  |		Execute	Access,All_Reference
02fd 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
02fe 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02ff 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x2 = 0x2ff,0x3
0300 2e11       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x11
0301 00db       |    |		Load_Top	At_Offset_3
0302 2e10       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x10
0303 e5ff       |    |		Load	0x2,-0x1
0304 2e12       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x12
0305 8228       | (  |		Call	0x1,0x28
0306 822a       | *  |		Call	0x1,0x2a
0307 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0308 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0x3 = 0x308,0x4
0309 4800       |H   |		Short_Literal	0x0
030a 8229       | )  |		Call	0x1,0x29
030b 822a       | *  |		Call	0x1,0x2a
030c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
030d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x4 = 0x30d,0x5
030e 2e08       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x8
030f 00db       |    |		Load_Top	At_Offset_3
0310 2e07       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x7
0311 e5ff       |    |		Load	0x2,-0x1
0312 2e09       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x9
0313 00eb       |    |		Load_Encached	Diana_Cache
0314 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0315 8227       | '  |		Call	0x1,0x27
0316 822a       | *  |		Call	0x1,0x2a
0317 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0318 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x5 = 0x318,0x6
0319 2e0b       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xb
031a 00db       |    |		Load_Top	At_Offset_3
031b 2e0a       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xa
031c e5ff       |    |		Load	0x2,-0x1
031d 2e0c       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xc
031e e009       |    |		Load	0x0,0x9
031f 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0320 8227       | '  |		Call	0x1,0x27
0321 822a       | *  |		Call	0x1,0x2a
0322 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0323 0092 04e3  |    |		Action	Push_String_Extended,0x4e3					; "--"
													; Debug Table 0x10.0x6 = 0x323,0x7
													; Debug Table 0x10.0x7 = 0x323,0xfbff
0325 4820       |H   |		Short_Literal	0x20
0326 e5ff       |    |		Load	0x2,-0x1
0327 2e0f       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xf
0328 e00a       |    |		Load	0x0,0xa
0329 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
032a e008       |    |		Load	0x0,0x8
032b 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
032c 01cc       |    |		Execute	Vector,Catenate
032d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x10.0x8 = 0x32d,0x401
032e 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
032f 0f02       |    |		Execute_Immediate	Equal,0x2
0330 680b       |h   |		Jump_Zero	0x33c
0331 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x10.0x9 = 0x331,0x402
0332 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
0333 e5ff       |    |		Load	0x2,-0x1
0334 2e0d       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd
0335 00da       |    |		Load_Top	At_Offset_2
0336 0092 04e4  |    |		Action	Push_String_Extended,0x4e4					; " ..."
0338 01cc       |    |		Execute	Vector,Catenate
0339 8227       | '  |		Call	0x1,0x27
033a 822a       | *  |		Call	0x1,0x2a
033b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
033c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x10.0xa = 0x33c,0x403
033d 2e0e       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xe
033e e5ff       |    |		Load	0x2,-0x1
033f 2e0d       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0xd
0340 00da       |    |		Load_Top	At_Offset_2
0341 8227       | '  |		Call	0x1,0x27
0342 822a       | *  |		Call	0x1,0x2a
0343 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0344 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0xb = 0x344,0x8
0345 2e06       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x6
0346 4604       |F   |		Jump_Case	0x5
0347 7804       |x   |		Jump	0x34c								; case 0x0
0348 780e       |x   |		Jump	0x357								; case 0x1
0349 781b       |x   |		Jump	0x365								; case 0x2
034a 7829       |x)  |		Jump	0x374								; case 0x3
034b 7865       |xe  |		Jump	0x3b1								; case 0x4
034c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0xc = 0x34c,0x9
034d 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
034e 00db       |    |		Load_Top	At_Offset_3
034f 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0350 e5ff       |    |		Load	0x2,-0x1
0351 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0352 00eb       |    |		Load_Encached	Diana_Cache
0353 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0354 8227       | '  |		Call	0x1,0x27
0355 822a       | *  |		Call	0x1,0x2a
0356 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0357 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0xd = 0x357,0xa
0358 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0359 00db       |    |		Load_Top	At_Offset_3
035a 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
035b e5ff       |    |		Load	0x2,-0x1
035c 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
035d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0xe = 0x35d,0x801
035e 00eb       |    |		Load_Encached	Diana_Cache
035f 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0360 00d0       |    |		Action	Swap_Control
0361 00d1       |    |		Pop_Control	Pop_Count_1
0362 8227       | '  |		Call	0x1,0x27							; Debug Table 0x10.0xf = 0x362,0xa
0363 822a       | *  |		Call	0x1,0x2a
0364 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0365 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x10 = 0x365,0xb
0366 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0367 00db       |    |		Load_Top	At_Offset_3
0368 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0369 e5ff       |    |		Load	0x2,-0x1
036a 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
036b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x11 = 0x36b,0xc01
036c 00eb       |    |		Load_Encached	Diana_Cache
036d 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
036e 823d       | =  |		Call	0x1,0x3d
036f 00d0       |    |		Action	Swap_Control
0370 00d1       |    |		Pop_Control	Pop_Count_1
0371 8227       | '  |		Call	0x1,0x27							; Debug Table 0x10.0x12 = 0x371,0xb
0372 822a       | *  |		Call	0x1,0x2a
0373 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0374 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x13 = 0x374,0xc
0375 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0376 00db       |    |		Load_Top	At_Offset_3
0377 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0378 e5ff       |    |		Load	0x2,-0x1
0379 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
037a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x14 = 0x37a,0xefff
037b 00d9       |    |		Load_Top	At_Offset_1
037c 00eb       |    |		Load_Encached	Diana_Cache
037d 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
037e 00e9       |    |		Load_Encached	String_Cache
037f 0334       | 4  |		Declare_Variable	Array,With_Constraint
0380 00d9       |    |		Load_Top	At_Offset_1
0381 00eb       |    |		Load_Encached	Diana_Cache
0382 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0383 00d9       |    |		Load_Top	At_Offset_1
0384 01d4       |    |		Execute	Vector,Structure_Write
0385 00e8       |    |		Load_Encached	Character_Cache						; Debug Table 0x10.0x15 = 0x385,0xeffe
0386 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x16 = 0x386,0x1001
0387 00da       |    |		Load_Top	At_Offset_2
0388 01d7       |    |		Execute	Vector,Field_Read
0389 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
038a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x17 = 0x38a,0x1002
038b 01dc       |    |		Execute	Vector,Last
038c 4802       |H   |		Short_Literal	0x2
038d 0263       | c  |		Execute	Discrete,Above_Bound
038e 7018       |p   |		Jump_Nonzero	0x3a7
038f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x18 = 0x38f,0x1003
													; Debug Table 0x10.0x19 = 0x38f,0xebff
0390 e405       |    |		Load	0x2,0x5
0391 01d5       |    |		Execute	Vector,Field_Reference
0392 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x10.0x1a = 0x392,0x1401
0393 0e5f       | _  |		Execute_Immediate	Not_Equal,0x5f
0394 680e       |h   |		Jump_Zero	0x3a3
0395 00d8       |    |		Load_Top	At_Offset_0
0396 4841       |HA  |		Short_Literal	0x41
0397 485a       |HZ  |		Short_Literal	0x5a
0398 0262       | b  |		Execute	Discrete,In_Range
0399 6809       |h   |		Jump_Zero	0x3a3
039a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x1b = 0x39a,0x1402
039b 0a20       |    |		Execute_Immediate	Plus,0x20
039c 00d8       |    |		Load_Top	At_Offset_0
039d 00e8       |    |		Load_Encached	Character_Cache
039e 0260       | `  |		Execute	Discrete,In_Type
039f 7002       |p   |		Jump_Nonzero	0x3a2
03a0 48e0       |H   |		Short_Literal	0xe0
03a1 0257       | W  |		Execute	Discrete,Raise
03a2 a409       |    |		Store_Unchecked	0x2,0x9
03a3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x1c = 0x3a3,0x1403
03a4 a406       |    |		Store_Unchecked	0x2,0x6
03a5 00d1       |    |		Pop_Control	Pop_Count_1
03a6 3fe8       |?   |		Loop_Increasing	0x38f
03a7 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x1d = 0x3a7,0x1004
03a8 00d0       |    |		Action	Swap_Control
03a9 00d1       |    |		Pop_Control	Pop_Count_1
03aa 00d0       |    |		Action	Swap_Control
03ab 00d1       |    |		Pop_Control	Pop_Count_1
03ac 00d0       |    |		Action	Swap_Control
03ad 00d1       |    |		Pop_Control	Pop_Count_1
03ae 8227       | '  |		Call	0x1,0x27							; Debug Table 0x10.0x1e = 0x3ae,0xc
03af 822a       | *  |		Call	0x1,0x2a
03b0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03b1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x1f = 0x3b1,0xd
03b2 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
03b3 00db       |    |		Load_Top	At_Offset_3
03b4 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
03b5 e5ff       |    |		Load	0x2,-0x1
03b6 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
03b7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x20 = 0x3b7,0xe7ff
03b8 00eb       |    |		Load_Encached	Diana_Cache
03b9 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
03ba 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x21 = 0x3ba,0xe7fe
03bb 00d9       |    |		Load_Top	At_Offset_1
03bc 01db       |    |		Execute	Vector,Length
03bd 0901       |    |		Execute_Immediate	Binary_Scale,0x1
03be 0248       | H  |		Execute	Discrete,Check_In_Integer
03bf 00e9       |    |		Load_Encached	String_Cache
03c0 0334       | 4  |		Declare_Variable	Array,With_Constraint
03c1 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x10.0x22 = 0x3c1,0xe7fd
03c2 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
03c3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x23 = 0x3c3,0x1801
03c4 01dc       |    |		Execute	Vector,Last
03c5 00db       |    |		Load_Top	At_Offset_3
03c6 01dd       |    |		Execute	Vector,First
03c7 0263       | c  |		Execute	Discrete,Above_Bound
03c8 7016       |p   |		Jump_Nonzero	0x3df
03c9 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x24 = 0x3c9,0x1802
03ca 0a01       |    |		Execute_Immediate	Plus,0x1
03cb 005b       | [  |		Store_Top	Discrete,At_Offset_3
03cc 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x25 = 0x3cc,0x1803
													; Debug Table 0x10.0x26 = 0x3cc,0xe3ff
03cd e406       |    |		Load	0x2,0x6
03ce 01d5       |    |		Execute	Vector,Field_Reference
03cf 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x27 = 0x3cf,0x1c01
03d0 e405       |    |		Load	0x2,0x5
03d1 01d7       |    |		Execute	Vector,Field_Read
03d2 a40a       |    |		Store_Unchecked	0x2,0xa
03d3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x28 = 0x3d3,0x1c02
03d4 0f22       | "  |		Execute_Immediate	Equal,0x22
03d5 6807       |h   |		Jump_Zero	0x3dd
03d6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x10.0x29 = 0x3d6,0x1c03
03d7 0a01       |    |		Execute_Immediate	Plus,0x1
03d8 c407       |    |		Store	0x2,0x7
03d9 4822       |H"  |		Short_Literal	0x22							; Debug Table 0x10.0x2a = 0x3d9,0x1c04
03da e407       |    |		Load	0x2,0x7
03db e406       |    |		Load	0x2,0x6
03dc 01d6       |    |		Execute	Vector,Field_Write
03dd 00d1       |    |		Pop_Control	Pop_Count_1
03de 3fea       |?   |		Loop_Increasing	0x3c9
03df 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x2b = 0x3df,0x1804
03e0 00d9       |    |		Load_Top	At_Offset_1
03e1 00db       |    |		Load_Top	At_Offset_3
03e2 01cf       |    |		Execute	Vector,Slice_Read
03e3 00d0       |    |		Action	Swap_Control
03e4 00d1       |    |		Pop_Control	Pop_Count_1
03e5 00d0       |    |		Action	Swap_Control
03e6 00d1       |    |		Pop_Control	Pop_Count_1
03e7 00d0       |    |		Action	Swap_Control
03e8 00d1       |    |		Pop_Control	Pop_Count_1
03e9 00d0       |    |		Action	Swap_Control
03ea 00d1       |    |		Pop_Control	Pop_Count_1
03eb 8227       | '  |		Call	0x1,0x27							; Debug Table 0x10.0x2c = 0x3eb,0xd
03ec 822a       | *  |		Call	0x1,0x2a
03ed 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03ee e001       |    |		Load	0x0,0x1								; Debug Table 0x10.0x2d = 0x3ee,0xe
03ef 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
03f0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03f1 0000 0000  |    |		.BLANK	0000[0x7]
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 0x11 = .DEBUG	0x03fb,0x0786,0x0001,0x0000,0x0056,0xca85,0x0000,0x0145
													; Debug Table 0x11.0x0 = 0x3fb,0x1
03fc 2e13       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x13
03fd a5fe       |    |		Store_Unchecked	0x2,-0x2
03fe 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0x1 = 0x3fe,0x2
03ff 2614       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x14
0400 e5fd       |    |		Load	0x2,-0x3
0401 016d       | m  |		Execute	Variant_Record,Structure_Write
0402 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0x2 = 0x402,0x3
0403 2615       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x15
0404 e5fc       |    |		Load	0x2,-0x4
0405 017d       | }  |		Execute	Record,Structure_Write
0406 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0407 0000       |    |		.XXX[0x1]
0408 ; --------------------------------------------------------------------------------------
0408 ; SUBPROGRAM
0408 ; --------------------------------------------------------------------------------------
0408 0410       |    |		.CONST	0x0410								; Address of begin
0409 0004       |    |		.CONST	0x0004								; Address of exception handler
040a 0002       |    |		.CONST	0x0002								; Number of locals
040b			INIT_0408:
040b e23b       | ;  |		Load	0x1,0x3b							; Debug Table 0x12 = .DEBUG	0x040b,0x078e,0x0002,0x0000,0x0056,0xca85,0x0000,0x015f
													; Debug Table 0x12.0x0 = 0x40b,0xffff
040c 02ff       |    |		Declare_Variable	Variant_Record
040d e23c       | <  |		Load	0x1,0x3c
040e 00d9       |    |		Load_Top	At_Offset_1
040f 016d       | m  |		Execute	Variant_Record,Structure_Write
0410			BODY_0408:
0410 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x1 = 0x410,0x1
0411 00d9       |    |		Load_Top	At_Offset_1
0412 2a13       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x13
0413 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x12.0x2 = 0x413,0x2
0414 00d9       |    |		Load_Top	At_Offset_1
0415 2a14       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x14
0416 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x12.0x3 = 0x416,0x3
0417 00d9       |    |		Load_Top	At_Offset_1
0418 2a15       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x15
0419 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x4 = 0x419,0x4
041a 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
041b 0000 0000  |    |		.BLANK	0000[0x5]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0428       | (  |		.CONST	0x0428								; Address of begin
0421 0004       |    |		.CONST	0x0004								; Address of exception handler
0422 0002       |    |		.CONST	0x0002								; Number of locals
0423			INIT_0420:
0423 e210       |    |		Load	0x1,0x10							; Debug Table 0x13 = .DEBUG	0x0423,0x079a,0x0002,0x0000,0x0056,0xca85,0x0000,0x0176
													; Debug Table 0x13.0x0 = 0x423,0xffff
0424 02ff       |    |		Declare_Variable	Variant_Record
0425 00db       |    |		Load_Top	At_Offset_3
0426 00d9       |    |		Load_Top	At_Offset_1
0427 016d       | m  |		Execute	Variant_Record,Structure_Write
0428			BODY_0420:
0428 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x1 = 0x428,0x1
0429 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
042a 460b       |F   |		Jump_Case	0xc
042b 781e       |x   |		Jump	0x44a								; case 0x0
042c 780a       |x   |		Jump	0x437								; case 0x1
042d 780d       |x   |		Jump	0x43b								; case 0x2
042e 7810       |x   |		Jump	0x43f								; case 0x3
042f 7813       |x   |		Jump	0x443								; case 0x4
0430 7816       |x   |		Jump	0x447								; case 0x5
0431 7818       |x   |		Jump	0x44a								; case 0x6
0432 7817       |x   |		Jump	0x44a								; case 0x7
0433 7816       |x   |		Jump	0x44a								; case 0x8
0434 7815       |x   |		Jump	0x44a								; case 0x9
0435 7814       |x   |		Jump	0x44a								; case 0xa
0436 7813       |x   |		Jump	0x44a								; case 0xb
0437 4802       |H   |		Short_Literal	0x2							; Debug Table 0x13.0x2 = 0x437,0x2
0438 00d9       |    |		Load_Top	At_Offset_1
0439 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
043a 780f       |x   |		Jump	0x44a
043b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x13.0x3 = 0x43b,0x3
043c 00d9       |    |		Load_Top	At_Offset_1
043d 2a08       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x8
043e 780b       |x   |		Jump	0x44a
043f 4802       |H   |		Short_Literal	0x2							; Debug Table 0x13.0x4 = 0x43f,0x4
0440 00d9       |    |		Load_Top	At_Offset_1
0441 2a0b       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xb
0442 7807       |x   |		Jump	0x44a
0443 4802       |H   |		Short_Literal	0x2							; Debug Table 0x13.0x5 = 0x443,0x5
0444 00d9       |    |		Load_Top	At_Offset_1
0445 2a0e       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0xe
0446 7803       |x   |		Jump	0x44a
0447 4802       |H   |		Short_Literal	0x2							; Debug Table 0x13.0x6 = 0x447,0x6
0448 00d9       |    |		Load_Top	At_Offset_1
0449 2a11       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x11
044a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x7 = 0x44a,0x8
044b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
044c 0000 0000  |    |		.BLANK	0000[0x4]
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 0453       | S  |		.CONST	0x0453								; Address of begin
0451 0004       |    |		.CONST	0x0004								; Address of exception handler
0452 0001       |    |		.CONST	0x0001								; Number of locals
0453			BODY_0450:
0453			INIT_0450:
0453 4608       |F   |		Jump_Case	0x9							; Debug Table 0x14 = .DEBUG	0x0453,0x07ac,0x0005,0x0000,0x0056,0xca85,0x0000,0x0188
0454 7808       |x   |		Jump	0x45d								; case 0x0
0455 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0456 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
0457 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0458 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0459 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
045a 7830       |x0  |		Jump	0x48b								; case 0x6
045b 784d       |xM  |		Jump	0x4a9								; case 0x7
045c 786d       |xm  |		Jump	0x4ca								; case 0x8
045d 00da       |    |		Load_Top	At_Offset_2
045e 016c       | l  |		Execute	Variant_Record,Is_Constrained
045f 7009       |p   |		Jump_Nonzero	0x469
0460 00cf       |    |		Action	Mark_Auxiliary
0461 480a       |H   |		Short_Literal	0xa
0462 e5ff       |    |		Load	0x2,-0x1
0463 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0464 00d8       |    |		Load_Top	At_Offset_0
0465 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0466 c5ff       |    |		Store	0x2,-0x1
0467 00ce       |    |		Action	Pop_Auxiliary
0468 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0469 00da       |    |		Load_Top	At_Offset_2
046a 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
046b 460b       |F   |		Jump_Case	0xc
046c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
046d 780a       |x   |		Jump	0x478								; case 0x1
046e 780f       |x   |		Jump	0x47e								; case 0x2
046f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0470 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0471 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
0472 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
0473 7810       |x   |		Jump	0x484								; case 0x7
0474 780f       |x   |		Jump	0x484								; case 0x8
0475 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x9
0476 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0xa
0477 780c       |x   |		Jump	0x484								; case 0xb
0478 00da       |    |		Load_Top	At_Offset_2
0479 2205       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x5
047a 00da       |    |		Load_Top	At_Offset_2
047b 2605       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x5
047c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
047d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
047e 00da       |    |		Load_Top	At_Offset_2
047f 2209       |"   |		Execute	Variant_Record,Field_Constrain,Field_Number 0x9
0480 00da       |    |		Load_Top	At_Offset_2
0481 2609       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x9
0482 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0483 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0484 00da       |    |		Load_Top	At_Offset_2
0485 2614       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x14
0486 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0487 00da       |    |		Load_Top	At_Offset_2
0488 2615       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x15
0489 1c00       |    |		Execute_Immediate	Run_Utility,0x0
048a 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
048b 00db       |    |		Load_Top	At_Offset_3
048c 460b       |F   |		Jump_Case	0xc
048d 780b       |x   |		Jump	0x499								; case 0x0
048e 780c       |x   |		Jump	0x49b								; case 0x1
048f 780d       |x   |		Jump	0x49d								; case 0x2
0490 780e       |x   |		Jump	0x49f								; case 0x3
0491 780f       |x   |		Jump	0x4a1								; case 0x4
0492 7810       |x   |		Jump	0x4a3								; case 0x5
0493 7813       |x   |		Jump	0x4a7								; case 0x6
0494 7810       |x   |		Jump	0x4a5								; case 0x7
0495 780f       |x   |		Jump	0x4a5								; case 0x8
0496 7810       |x   |		Jump	0x4a7								; case 0x9
0497 780f       |x   |		Jump	0x4a7								; case 0xa
0498 780c       |x   |		Jump	0x4a5								; case 0xb
0499 4801       |H   |		Short_Literal	0x1
049a 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
049b 4802       |H   |		Short_Literal	0x2
049c 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
049d 4803       |H   |		Short_Literal	0x3
049e 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
049f 4804       |H   |		Short_Literal	0x4
04a0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04a1 4805       |H   |		Short_Literal	0x5
04a2 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04a3 4806       |H   |		Short_Literal	0x6
04a4 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04a5 4807       |H   |		Short_Literal	0x7
04a6 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04a7 48ff       |H   |		Short_Literal	0xff
04a8 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04a9 00db       |    |		Load_Top	At_Offset_3
04aa e5fe       |    |		Load	0x2,-0x2
04ab 460b       |F   |		Jump_Case	0xc
04ac 780b       |x   |		Jump	0x4b8								; case 0x0
04ad 780c       |x   |		Jump	0x4ba								; case 0x1
04ae 780d       |x   |		Jump	0x4bc								; case 0x2
04af 780e       |x   |		Jump	0x4be								; case 0x3
04b0 780f       |x   |		Jump	0x4c0								; case 0x4
04b1 7810       |x   |		Jump	0x4c2								; case 0x5
04b2 7813       |x   |		Jump	0x4c6								; case 0x6
04b3 7810       |x   |		Jump	0x4c4								; case 0x7
04b4 780f       |x   |		Jump	0x4c4								; case 0x8
04b5 7810       |x   |		Jump	0x4c6								; case 0x9
04b6 780f       |x   |		Jump	0x4c6								; case 0xa
04b7 780c       |x   |		Jump	0x4c4								; case 0xb
04b8 4801       |H   |		Short_Literal	0x1
04b9 780d       |x   |		Jump	0x4c7
04ba 4802       |H   |		Short_Literal	0x2
04bb 780b       |x   |		Jump	0x4c7
04bc 4803       |H   |		Short_Literal	0x3
04bd 7809       |x   |		Jump	0x4c7
04be 4804       |H   |		Short_Literal	0x4
04bf 7807       |x   |		Jump	0x4c7
04c0 4805       |H   |		Short_Literal	0x5
04c1 7805       |x   |		Jump	0x4c7
04c2 4806       |H   |		Short_Literal	0x6
04c3 7803       |x   |		Jump	0x4c7
04c4 4807       |H   |		Short_Literal	0x7
04c5 7801       |x   |		Jump	0x4c7
04c6 48ff       |H   |		Short_Literal	0xff
04c7 e5ff       |    |		Load	0x2,-0x1
04c8 031b       |    |		Declare_Type	Variant_Record,Constrained
04c9 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04ca 00db       |    |		Load_Top	At_Offset_3
04cb e5fe       |    |		Load	0x2,-0x2
04cc e5ff       |    |		Load	0x2,-0x1
04cd 1c06       |    |		Execute_Immediate	Run_Utility,0x6
04ce e5ff       |    |		Load	0x2,-0x1
04cf 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
04d0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04d1 ; --------------------------------------------------------------------------------------
04d1 ; STRING TABLE
04d1 ; --------------------------------------------------------------------------------------
04d1 002a       | *  |		.STRTAB	0x002a->0x04e6							; "LEAVES"
04d2 002e       | .  |		.STRTAB	0x002e->0x04e9							; "SYMREP"
04d3 0032       | 2  |		.STRTAB	0x0032->0x04ec							; "NUMREP"
04d4 0036       | 6  |		.STRTAB	0x0036->0x04ef							; "TOKEN"
04d5 0039       | 9  |		.STRTAB	0x0039->0x04f1							; "COMMENT"
04d6 003e       | >  |		.STRTAB	0x003e->0x04f5							; "SPACE"
04d7 0041       | A  |		.STRTAB	0x0041->0x04f7							; "NL"
04d8 0041       | A  |		.STRTAB	0x0041->0x04f8							; "SUB_OBJECT"
04d9 0049       | I  |		.STRTAB	0x0049->0x04fd							; "OBJECT_START"
04da 0053       | S  |		.STRTAB	0x0053->0x0503							; "OBJECT_END"
04db 005b       | [  |		.STRTAB	0x005b->0x0508							; "END_OF_INPUT"
04dc 0065       | e  |		.STRTAB	0x0065->0x050e							; "UNPARSED_OBJECT"
04dd 0072       | r  |		.STRTAB	0x0072->0x0516							; "ORIGINAL"
04de 0078       | x  |		.STRTAB	0x0078->0x051a							; "UPPERCASE"
04df 007f       |    |		.STRTAB	0x007f->0x051e							; "LOWERCASE"
04e0 0086       |    |		.STRTAB	0x0086->0x0523							; "CAPITALIZE"
04e1 008e       |    |		.STRTAB	0x008e->0x0528							; "TEXT"
04e2 0090       |    |		.STRTAB	0x0090->0x052a							; "0"
04e3 008f       |    |		.STRTAB	0x008f->0x052a							; "--"
04e4 008f       |    |		.STRTAB	0x008f->0x052b							; " ..."
04e5 0091       |    |		.STREND 0x0091->0x052d
04e6 4c45 4156  |LEAV|		.STRTAB_STRINGS
052e 0000 0000  |    |		.XXX[0x2]
0530 ; --------------------------------------------------------------------------------------
0530 ; Debug Table
0530 ; --------------------------------------------------------------------------------------
0530 0003 0015  |    |		.CONST	0x0003,0x0015
0532 000b 05da  |    |		.DEBUG	0x000b,0x05da,0x8000,0x0000,0x0056,0xca85,0x0000,0x0010
053a 007b 0610  | {  |		.DEBUG	0x007b,0x0610,0x8000,0x0000,0x0056,0xcad5,0x0000,0x0007
0542 01bb 06b0  |    |		.DEBUG	0x01bb,0x06b0,0x0005,0x0000,0x0056,0xca85,0x0000,0x001e
054a 01d3 06b2  |    |		.DEBUG	0x01d3,0x06b2,0x0005,0x0000,0x0056,0xca85,0x0000,0x0035
0552 01eb 06b4  |    |		.DEBUG	0x01eb,0x06b4,0x0005,0x0000,0x0056,0xca85,0x0000,0x0047
055a 0203 06b6  |    |		.DEBUG	0x0203,0x06b6,0x0002,0x0000,0x0056,0xca85,0x0000,0x0050
0562 021b 06c4  |    |		.DEBUG	0x021b,0x06c4,0x0002,0x0000,0x0056,0xca85,0x0000,0x0072
056a 0233 06d0  | 3  |		.DEBUG	0x0233,0x06d0,0x0002,0x0000,0x0056,0xca85,0x0000,0x008f
0572 024b 06dc  | K  |		.DEBUG	0x024b,0x06dc,0x0002,0x0000,0x0056,0xca85,0x0000,0x00ac
057a 0263 06e8  | c  |		.DEBUG	0x0263,0x06e8,0x0002,0x0000,0x0056,0xca85,0x0000,0x00c8
0582 027b 06f4  | {  |		.DEBUG	0x027b,0x06f4,0x0002,0x0000,0x0056,0xca85,0x0000,0x00e5
058a 02a3 0704  |    |		.DEBUG	0x02a3,0x0704,0x0002,0x0000,0x0056,0xca85,0x0000,0x00fd
0592 02bb 0710  |    |		.DEBUG	0x02bb,0x0710,0x0002,0x0000,0x0056,0xca85,0x0000,0x0114
059a 02d3 071c  |    |		.DEBUG	0x02d3,0x071c,0x0002,0x0000,0x0056,0xca85,0x0000,0x012b
05a2 02db 0720  |    |		.DEBUG	0x02db,0x0720,0x0002,0x0000,0x0056,0xca85,0x0000,0x0130
05aa 02e3 0724  |   $|		.DEBUG	0x02e3,0x0724,0x0002,0x0000,0x0056,0xca85,0x0000,0x0135
05b2 02eb 0728  |   (|		.DEBUG	0x02eb,0x0728,0x0002,0x0000,0x0056,0xca85,0x0000,0x013a
05ba 03fb 0786  |    |		.DEBUG	0x03fb,0x0786,0x0001,0x0000,0x0056,0xca85,0x0000,0x0145
05c2 040b 078e  |    |		.DEBUG	0x040b,0x078e,0x0002,0x0000,0x0056,0xca85,0x0000,0x015f
05ca 0423 079a  | #  |		.DEBUG	0x0423,0x079a,0x0002,0x0000,0x0056,0xca85,0x0000,0x0176
05d2 0453 07ac  | S  |		.DEBUG	0x0453,0x07ac,0x0005,0x0000,0x0056,0xca85,0x0000,0x0188
05da ; --------------------------------------------------------------------------------------
05da ; Debug3 Subtable 0x0
05da ; --------------------------------------------------------------------------------------
05da 001a 0000  |    |		.DBG3TAB	0x001a,0x0000
05dc 000b ffff  |    |		.CONST	0x000b,0xffff
05de 000b fffe  |    |		.CONST	0x000b,0xfffe
05e0 000b fffd  |    |		.CONST	0x000b,0xfffd
05e2 000b fffc  |    |		.CONST	0x000b,0xfffc
05e4 0010 fffb  |    |		.CONST	0x0010,0xfffb
05e6 0014 fffa  |    |		.CONST	0x0014,0xfffa
05e8 0019 fff9  |    |		.CONST	0x0019,0xfff9
05ea 001f fff8  |    |		.CONST	0x001f,0xfff8
05ec 0024 fff7  | $  |		.CONST	0x0024,0xfff7
05ee 0026 fff6  | &  |		.CONST	0x0026,0xfff6
05f0 0028 fff5  | (  |		.CONST	0x0028,0xfff5
05f2 002a fff4  | *  |		.CONST	0x002a,0xfff4
05f4 002c fff3  | ,  |		.CONST	0x002c,0xfff3
05f6 002e fff2  | .  |		.CONST	0x002e,0xfff2
05f8 0030 fff1  | 0  |		.CONST	0x0030,0xfff1
05fa 0032 fff0  | 2  |		.CONST	0x0032,0xfff0
05fc 0034 ffef  | 4  |		.CONST	0x0034,0xffef
05fe 0036 ffee  | 6  |		.CONST	0x0036,0xffee
0600 0038 ffed  | 8  |		.CONST	0x0038,0xffed
0602 003a ffec  | :  |		.CONST	0x003a,0xffec
0604 003c ffeb  | <  |		.CONST	0x003c,0xffeb
0606 003e ffea  | >  |		.CONST	0x003e,0xffea
0608 0040 ffe9  | @  |		.CONST	0x0040,0xffe9
060a 0042 ffe8  | B  |		.CONST	0x0042,0xffe8
060c 0044 ffe7  | D  |		.CONST	0x0044,0xffe7
060e 0049 ffe6  | I  |		.CONST	0x0049,0xffe6
0610 ; --------------------------------------------------------------------------------------
0610 ; Debug3 Subtable 0x1
0610 ; --------------------------------------------------------------------------------------
0610 0042 000d  | B  |		.DBG3TAB	0x0042,0x000d
0612 007b ffff  | {  |		.CONST	0x007b,0xffff
0614 007b fffe  | {  |		.CONST	0x007b,0xfffe
0616 007e fffd  | ~  |		.CONST	0x007e,0xfffd
0618 0081 fffc  |    |		.CONST	0x0081,0xfffc
061a 0084 fffb  |    |		.CONST	0x0084,0xfffb
061c 0086 fffa  |    |		.CONST	0x0086,0xfffa
061e 0088 fff9  |    |		.CONST	0x0088,0xfff9
0620 008a fff8  |    |		.CONST	0x008a,0xfff8
0622 008c fff7  |    |		.CONST	0x008c,0xfff7
0624 008e fff6  |    |		.CONST	0x008e,0xfff6
0626 0091 fff5  |    |		.CONST	0x0091,0xfff5
0628 0091 fff4  |    |		.CONST	0x0091,0xfff4
062a 00a5 fff3  |    |		.CONST	0x00a5,0xfff3
062c 00ac fff2  |    |		.CONST	0x00ac,0xfff2
062e 00af fff1  |    |		.CONST	0x00af,0xfff1
0630 00c0 fff0  |    |		.CONST	0x00c0,0xfff0
0632 00c3 fbff  |    |		.CONST	0x00c3,0xfbff
0634 00d0 fbfe  |    |		.CONST	0x00d0,0xfbfe
0636 00df fbfd  |    |		.CONST	0x00df,0xfbfd
0638 00df 0401  |    |		.CONST	0x00df,0x0401
063a 00e3 0402  |    |		.CONST	0x00e3,0x0402
063c 00ea 0403  |    |		.CONST	0x00ea,0x0403
063e 00f2 0404  |    |		.CONST	0x00f2,0x0404
0640 00f6 0405  |    |		.CONST	0x00f6,0x0405
0642 00fa 0406  |    |		.CONST	0x00fa,0x0406
0644 00fe 0407  |    |		.CONST	0x00fe,0x0407
0646 0105 fff0  |    |		.CONST	0x0105,0xfff0
0648 0106 ffef  |    |		.CONST	0x0106,0xffef
064a 0109 ffee  |    |		.CONST	0x0109,0xffee
064c 0117 ffed  |    |		.CONST	0x0117,0xffed
064e 011a ffec  |    |		.CONST	0x011a,0xffec
0650 0128 ffeb  | (  |		.CONST	0x0128,0xffeb
0652 012b ffea  | +  |		.CONST	0x012b,0xffea
0654 0134 0801  | 4  |		.CONST	0x0134,0x0801
0656 0135 ffea  | 5  |		.CONST	0x0135,0xffea
0658 0139 ffe9  | 9  |		.CONST	0x0139,0xffe9
065a 013c ffe8  | <  |		.CONST	0x013c,0xffe8
065c 013f 0c01  | ?  |		.CONST	0x013f,0x0c01
065e 0140 ffe8  | @  |		.CONST	0x0140,0xffe8
0660 014c ffe7  | L  |		.CONST	0x014c,0xffe7
0662 014f ffe6  | O  |		.CONST	0x014f,0xffe6
0664 0152 1001  | R  |		.CONST	0x0152,0x1001
0666 0153 ffe6  | S  |		.CONST	0x0153,0xffe6
0668 015f ffe5  | _  |		.CONST	0x015f,0xffe5
066a 0162 ffe4  | b  |		.CONST	0x0162,0xffe4
066c 0165 1401  | e  |		.CONST	0x0165,0x1401
066e 0166 ffe4  | f  |		.CONST	0x0166,0xffe4
0670 0172 ffe3  | r  |		.CONST	0x0172,0xffe3
0672 0174 ffe2  | t  |		.CONST	0x0174,0xffe2
0674 0176 ffe1  | v  |		.CONST	0x0176,0xffe1
0676 0176 ffe0  | v  |		.CONST	0x0176,0xffe0
0678 0176 ffdf  | v  |		.CONST	0x0176,0xffdf
067a 0179 ffde  | y  |		.CONST	0x0179,0xffde
067c 017e e7ff  | ~  |		.CONST	0x017e,0xe7ff
067e 018a 1801  |    |		.CONST	0x018a,0x1801
0680 018d 1802  |    |		.CONST	0x018d,0x1802
0682 0192 ffde  |    |		.CONST	0x0192,0xffde
0684 0196 ffdd  |    |		.CONST	0x0196,0xffdd
0686 0196 ffdc  |    |		.CONST	0x0196,0xffdc
0688 0196 ffdb  |    |		.CONST	0x0196,0xffdb
068a 0196 ffda  |    |		.CONST	0x0196,0xffda
068c 0196 ffd9  |    |		.CONST	0x0196,0xffd9
068e 0196 ffd8  |    |		.CONST	0x0196,0xffd8
0690 0196 ffd7  |    |		.CONST	0x0196,0xffd7
0692 0196 ffd6  |    |		.CONST	0x0196,0xffd6
0694 0196 ffd5  |    |		.CONST	0x0196,0xffd5
0696 0198 ffd4  |    |		.CONST	0x0198,0xffd4
0698 019a ffd3  |    |		.CONST	0x019a,0xffd3
069a 019c ffd2  |    |		.CONST	0x019c,0xffd2
069c 019e ffd1  |    |		.CONST	0x019e,0xffd1
069e 01a0 ffd0  |    |		.CONST	0x01a0,0xffd0
06a0 01a2 ffcf  |    |		.CONST	0x01a2,0xffcf
06a2 01a4 ffce  |    |		.CONST	0x01a4,0xffce
06a4 01a6 ffcd  |    |		.CONST	0x01a6,0xffcd
06a6 01a8 ffcc  |    |		.CONST	0x01a8,0xffcc
06a8 01aa ffcb  |    |		.CONST	0x01aa,0xffcb
06aa 01ac ffca  |    |		.CONST	0x01ac,0xffca
06ac 01ae ffc9  |    |		.CONST	0x01ae,0xffc9
06ae 01b0 ffc8  |    |		.CONST	0x01b0,0xffc8
06b0 ; --------------------------------------------------------------------------------------
06b0 ; Debug3 Subtable 0x2
06b0 ; --------------------------------------------------------------------------------------
06b0 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
06b2 ; --------------------------------------------------------------------------------------
06b2 ; Debug3 Subtable 0x3
06b2 ; --------------------------------------------------------------------------------------
06b2 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
06b4 ; --------------------------------------------------------------------------------------
06b4 ; Debug3 Subtable 0x4
06b4 ; --------------------------------------------------------------------------------------
06b4 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
06b6 ; --------------------------------------------------------------------------------------
06b6 ; Debug3 Subtable 0x5
06b6 ; --------------------------------------------------------------------------------------
06b6 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
06b8 0203 ffff  |    |		.CONST	0x0203,0xffff
06ba 0208 0001  |    |		.CONST	0x0208,0x0001
06bc 020b 0002  |    |		.CONST	0x020b,0x0002
06be 020e 0003  |    |		.CONST	0x020e,0x0003
06c0 0211 0004  |    |		.CONST	0x0211,0x0004
06c2 0214 0005  |    |		.CONST	0x0214,0x0005
06c4 ; --------------------------------------------------------------------------------------
06c4 ; Debug3 Subtable 0x6
06c4 ; --------------------------------------------------------------------------------------
06c4 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
06c6 021b ffff  |    |		.CONST	0x021b,0xffff
06c8 0220 0001  |    |		.CONST	0x0220,0x0001
06ca 0223 0002  | #  |		.CONST	0x0223,0x0002
06cc 0226 0003  | &  |		.CONST	0x0226,0x0003
06ce 0229 0004  | )  |		.CONST	0x0229,0x0004
06d0 ; --------------------------------------------------------------------------------------
06d0 ; Debug3 Subtable 0x7
06d0 ; --------------------------------------------------------------------------------------
06d0 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
06d2 0233 ffff  | 3  |		.CONST	0x0233,0xffff
06d4 0238 0001  | 8  |		.CONST	0x0238,0x0001
06d6 023b 0002  | ;  |		.CONST	0x023b,0x0002
06d8 023e 0003  | >  |		.CONST	0x023e,0x0003
06da 0241 0004  | A  |		.CONST	0x0241,0x0004
06dc ; --------------------------------------------------------------------------------------
06dc ; Debug3 Subtable 0x8
06dc ; --------------------------------------------------------------------------------------
06dc 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
06de 024b ffff  | K  |		.CONST	0x024b,0xffff
06e0 0250 0001  | P  |		.CONST	0x0250,0x0001
06e2 0253 0002  | S  |		.CONST	0x0253,0x0002
06e4 0256 0003  | V  |		.CONST	0x0256,0x0003
06e6 0259 0004  | Y  |		.CONST	0x0259,0x0004
06e8 ; --------------------------------------------------------------------------------------
06e8 ; Debug3 Subtable 0x9
06e8 ; --------------------------------------------------------------------------------------
06e8 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
06ea 0263 ffff  | c  |		.CONST	0x0263,0xffff
06ec 0268 0001  | h  |		.CONST	0x0268,0x0001
06ee 026b 0002  | k  |		.CONST	0x026b,0x0002
06f0 026e 0003  | n  |		.CONST	0x026e,0x0003
06f2 0271 0004  | q  |		.CONST	0x0271,0x0004
06f4 ; --------------------------------------------------------------------------------------
06f4 ; Debug3 Subtable 0xa
06f4 ; --------------------------------------------------------------------------------------
06f4 0002 0005  |    |		.DBG3TAB	0x0002,0x0005
06f6 027b ffff  | {  |		.CONST	0x027b,0xffff
06f8 0280 0001  |    |		.CONST	0x0280,0x0001
06fa 0281 fbff  |    |		.CONST	0x0281,0xfbff
06fc 028d 0401  |    |		.CONST	0x028d,0x0401
06fe 0290 0402  |    |		.CONST	0x0290,0x0402
0700 0295 0001  |    |		.CONST	0x0295,0x0001
0702 0297 0002  |    |		.CONST	0x0297,0x0002
0704 ; --------------------------------------------------------------------------------------
0704 ; Debug3 Subtable 0xb
0704 ; --------------------------------------------------------------------------------------
0704 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0706 02a3 ffff  |    |		.CONST	0x02a3,0xffff
0708 02a8 0001  |    |		.CONST	0x02a8,0x0001
070a 02ab 0002  |    |		.CONST	0x02ab,0x0002
070c 02ae 0003  |    |		.CONST	0x02ae,0x0003
070e 02b1 0004  |    |		.CONST	0x02b1,0x0004
0710 ; --------------------------------------------------------------------------------------
0710 ; Debug3 Subtable 0xc
0710 ; --------------------------------------------------------------------------------------
0710 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0712 02bb ffff  |    |		.CONST	0x02bb,0xffff
0714 02c0 0001  |    |		.CONST	0x02c0,0x0001
0716 02c3 0002  |    |		.CONST	0x02c3,0x0002
0718 02c6 0003  |    |		.CONST	0x02c6,0x0003
071a 02c9 0004  |    |		.CONST	0x02c9,0x0004
071c ; --------------------------------------------------------------------------------------
071c ; Debug3 Subtable 0xd
071c ; --------------------------------------------------------------------------------------
071c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
071e 02d3 0001  |    |		.CONST	0x02d3,0x0001
0720 ; --------------------------------------------------------------------------------------
0720 ; Debug3 Subtable 0xe
0720 ; --------------------------------------------------------------------------------------
0720 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0722 02db 0001  |    |		.CONST	0x02db,0x0001
0724 ; --------------------------------------------------------------------------------------
0724 ; Debug3 Subtable 0xf
0724 ; --------------------------------------------------------------------------------------
0724 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0726 02e3 0001  |    |		.CONST	0x02e3,0x0001
0728 ; --------------------------------------------------------------------------------------
0728 ; Debug3 Subtable 0x10
0728 ; --------------------------------------------------------------------------------------
0728 0008 0026  |   &|		.DBG3TAB	0x0008,0x0026
072a 02eb 0001  |    |		.CONST	0x02eb,0x0001
072c 02fa 0002  |    |		.CONST	0x02fa,0x0002
072e 02ff 0003  |    |		.CONST	0x02ff,0x0003
0730 0308 0004  |    |		.CONST	0x0308,0x0004
0732 030d 0005  |    |		.CONST	0x030d,0x0005
0734 0318 0006  |    |		.CONST	0x0318,0x0006
0736 0323 0007  | #  |		.CONST	0x0323,0x0007
0738 0323 fbff  | #  |		.CONST	0x0323,0xfbff
073a 032d 0401  | -  |		.CONST	0x032d,0x0401
073c 0331 0402  | 1  |		.CONST	0x0331,0x0402
073e 033c 0403  | <  |		.CONST	0x033c,0x0403
0740 0344 0008  | D  |		.CONST	0x0344,0x0008
0742 034c 0009  | L  |		.CONST	0x034c,0x0009
0744 0357 000a  | W  |		.CONST	0x0357,0x000a
0746 035d 0801  | ]  |		.CONST	0x035d,0x0801
0748 0362 000a  | b  |		.CONST	0x0362,0x000a
074a 0365 000b  | e  |		.CONST	0x0365,0x000b
074c 036b 0c01  | k  |		.CONST	0x036b,0x0c01
074e 0371 000b  | q  |		.CONST	0x0371,0x000b
0750 0374 000c  | t  |		.CONST	0x0374,0x000c
0752 037a efff  | z  |		.CONST	0x037a,0xefff
0754 0385 effe  |    |		.CONST	0x0385,0xeffe
0756 0386 1001  |    |		.CONST	0x0386,0x1001
0758 038a 1002  |    |		.CONST	0x038a,0x1002
075a 038f 1003  |    |		.CONST	0x038f,0x1003
075c 038f ebff  |    |		.CONST	0x038f,0xebff
075e 0392 1401  |    |		.CONST	0x0392,0x1401
0760 039a 1402  |    |		.CONST	0x039a,0x1402
0762 03a3 1403  |    |		.CONST	0x03a3,0x1403
0764 03a7 1004  |    |		.CONST	0x03a7,0x1004
0766 03ae 000c  |    |		.CONST	0x03ae,0x000c
0768 03b1 000d  |    |		.CONST	0x03b1,0x000d
076a 03b7 e7ff  |    |		.CONST	0x03b7,0xe7ff
076c 03ba e7fe  |    |		.CONST	0x03ba,0xe7fe
076e 03c1 e7fd  |    |		.CONST	0x03c1,0xe7fd
0770 03c3 1801  |    |		.CONST	0x03c3,0x1801
0772 03c9 1802  |    |		.CONST	0x03c9,0x1802
0774 03cc 1803  |    |		.CONST	0x03cc,0x1803
0776 03cc e3ff  |    |		.CONST	0x03cc,0xe3ff
0778 03cf 1c01  |    |		.CONST	0x03cf,0x1c01
077a 03d3 1c02  |    |		.CONST	0x03d3,0x1c02
077c 03d6 1c03  |    |		.CONST	0x03d6,0x1c03
077e 03d9 1c04  |    |		.CONST	0x03d9,0x1c04
0780 03df 1804  |    |		.CONST	0x03df,0x1804
0782 03eb 000d  |    |		.CONST	0x03eb,0x000d
0784 03ee 000e  |    |		.CONST	0x03ee,0x000e
0786 ; --------------------------------------------------------------------------------------
0786 ; Debug3 Subtable 0x11
0786 ; --------------------------------------------------------------------------------------
0786 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0788 03fb 0001  |    |		.CONST	0x03fb,0x0001
078a 03fe 0002  |    |		.CONST	0x03fe,0x0002
078c 0402 0003  |    |		.CONST	0x0402,0x0003
078e ; --------------------------------------------------------------------------------------
078e ; Debug3 Subtable 0x12
078e ; --------------------------------------------------------------------------------------
078e 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0790 040b ffff  |    |		.CONST	0x040b,0xffff
0792 0410 0001  |    |		.CONST	0x0410,0x0001
0794 0413 0002  |    |		.CONST	0x0413,0x0002
0796 0416 0003  |    |		.CONST	0x0416,0x0003
0798 0419 0004  |    |		.CONST	0x0419,0x0004
079a ; --------------------------------------------------------------------------------------
079a ; Debug3 Subtable 0x13
079a ; --------------------------------------------------------------------------------------
079a 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
079c 0423 ffff  | #  |		.CONST	0x0423,0xffff
079e 0428 0001  | (  |		.CONST	0x0428,0x0001
07a0 0437 0002  | 7  |		.CONST	0x0437,0x0002
07a2 043b 0003  | ;  |		.CONST	0x043b,0x0003
07a4 043f 0004  | ?  |		.CONST	0x043f,0x0004
07a6 0443 0005  | C  |		.CONST	0x0443,0x0005
07a8 0447 0006  | G  |		.CONST	0x0447,0x0006
07aa 044a 0008  | J  |		.CONST	0x044a,0x0008
07ac ; --------------------------------------------------------------------------------------
07ac ; Debug3 Subtable 0x14
07ac ; --------------------------------------------------------------------------------------
07ac 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
07ae 0000 0000  |    |		.BLANK	0000[0x52]