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

⟦aa8fdbe5b⟧

    Length: 16384 (0x4000)
    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 1660       | `  |		.CONST	0x1660								; 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 000f       |    |		.CONST	0x000f								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0062       | b  |		.CONST	0x0062								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0029       | )  |		.CONST	0x0029								; Number of locals
000b			INIT_0008:
000b 0007       |    |		Action	Break_Optional							; Debug Table 0x0 = .DEBUG	0x000b,0x1802,0x8000,0x0000,0x0058,0x5365,0x0000,0x0005
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xd,0xfffd
000f 029a 007b  |   {|		Declare_Subprogram	INIT_0078,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0xf,0xfffc
0011 029a 018b  |    |		Declare_Subprogram	INIT_0188,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x11,0xfffb
0013 029a 0263  |   c|		Declare_Subprogram	INIT_0260,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x13,0xfffa
0015 029a 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x15,0xfff9
0017 029a 0473  |   s|		Declare_Subprogram	INIT_0470,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x17,0xfff8
0019 029a 053b  |   ;|		Declare_Subprogram	INIT_0538,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x19,0xfff7
001b 029a 055b  |   [|		Declare_Subprogram	INIT_0558,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x1b,0xfff6
001d 029a 058b  |    |		Declare_Subprogram	INIT_0588,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1d,0xfff5
001f 029a 0603  |    |		Declare_Subprogram	INIT_0600,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x1f,0xfff4
0021 029a 06bb  |    |		Declare_Subprogram	INIT_06b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x21,0xfff3
0023 00bf       |    |		Action	Accept_Activation
0024 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0024,0x181e,0x8000,0x0000,0x0058,0x54a5,0x0000,0x002b
													; Debug Table 0x1.0x0 = 0x24,0xffff
0025 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x25,0xfffe
0026 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x26,0xfffd
0027 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x27,0xfffc
0028 029d 0753  |   S|		Declare_Subprogram	INIT_0750,For_Outer_Call			; Debug Table 0x1.0x4 = 0x28,0xfffb
002a 029d 075b  |   [|		Declare_Subprogram	INIT_0758,For_Outer_Call			; Debug Table 0x1.0x5 = 0x2a,0xfffa
002c 029d 0763  |   c|		Declare_Subprogram	INIT_0760,For_Outer_Call			; Debug Table 0x1.0x6 = 0x2c,0xfff9
002e 029d 0773  |   s|		Declare_Subprogram	INIT_0770,For_Outer_Call			; Debug Table 0x1.0x7 = 0x2e,0xfff8
0030 029d 0783  |    |		Declare_Subprogram	INIT_0780,For_Outer_Call			; Debug Table 0x1.0x8 = 0x30,0xfff7
0032 029d 079b  |    |		Declare_Subprogram	INIT_0798,For_Outer_Call			; Debug Table 0x1.0x9 = 0x32,0xfff6
0034 029d 07b3  |    |		Declare_Subprogram	INIT_07b0,For_Outer_Call			; Debug Table 0x1.0xa = 0x34,0xfff5
0036 029d 07d3  |    |		Declare_Subprogram	INIT_07d0,For_Outer_Call			; Debug Table 0x1.0xb = 0x36,0xfff4
0038 029d 07f3  |    |		Declare_Subprogram	INIT_07f0,For_Outer_Call			; Debug Table 0x1.0xc = 0x38,0xfff3
003a 029d 08e3  |    |		Declare_Subprogram	INIT_08e0,For_Outer_Call			; Debug Table 0x1.0xd = 0x3a,0xfff2
003c 029d 0933  |   3|		Declare_Subprogram	INIT_0930,For_Outer_Call			; Debug Table 0x1.0xe = 0x3c,0xfff1
003e 029d 0a0b  |    |		Declare_Subprogram	INIT_0a08,For_Outer_Call			; Debug Table 0x1.0xf = 0x3e,0xfff0
0040 029d 0a43  |   C|		Declare_Subprogram	INIT_0a40,For_Outer_Call			; Debug Table 0x1.0x10 = 0x40,0xffef
0042 029d 0a83  |    |		Declare_Subprogram	INIT_0a80,For_Outer_Call			; Debug Table 0x1.0x11 = 0x42,0xffee
0044 029d 0abb  |    |		Declare_Subprogram	INIT_0ab8,For_Outer_Call			; Debug Table 0x1.0x12 = 0x44,0xffed
0046 029d 0b13  |    |		Declare_Subprogram	INIT_0b10,For_Outer_Call			; Debug Table 0x1.0x13 = 0x46,0xffec
0048 029d 0beb  |    |		Declare_Subprogram	INIT_0be8,For_Outer_Call			; Debug Table 0x1.0x14 = 0x48,0xffeb
004a 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x15 = 0x4a,0xffea
004b 00c7       |    |		Action	Elaborate_Subprogram
004c 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x16 = 0x4c,0xffe9
004d 00c7       |    |		Action	Elaborate_Subprogram
004e 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x17 = 0x4e,0xffe8
004f 00c7       |    |		Action	Elaborate_Subprogram
0050 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x18 = 0x50,0xffe7
0051 00c7       |    |		Action	Elaborate_Subprogram
0052 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x19 = 0x52,0xffe6
0053 00c7       |    |		Action	Elaborate_Subprogram
0054 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x1a = 0x54,0xffe5
0055 00c7       |    |		Action	Elaborate_Subprogram
0056 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x1b = 0x56,0xffe4
0057 00c7       |    |		Action	Elaborate_Subprogram
0058 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x1c = 0x58,0xffe3
0059 00c7       |    |		Action	Elaborate_Subprogram
005a 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x1d = 0x5a,0xffe2
005b 00c7       |    |		Action	Elaborate_Subprogram
005c 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x1e = 0x5c,0xffe1
005d 00c7       |    |		Action	Elaborate_Subprogram
005e 029d 0c43  |   C|		Declare_Subprogram	INIT_0c40,For_Outer_Call			; Debug Table 0x1.0x1f = 0x5e,0xffe0
0060 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x20 = 0x60,0xffdf
0061 00c7       |    |		Action	Elaborate_Subprogram
0062			BODY_0008:
0062 00bc       |    |		Action	Signal_Activated
0063 00bb       |    |		Action	Signal_Completion
0064 0000 0000  |    |		.BLANK	0000[0x4]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006f       | o  |		.CONST	0x006f								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0003       |    |		.CONST	0x0003								; Number of locals
006b			INIT_0068:
006b 029f 0c93  |    |		Declare_Subprogram	INIT_0c90,For_Call				; Debug Table 0x2 = .DEBUG	0x006b,0x1862,0x0001,0x0000,0x0058,0x5365,0x0000,0x000f
													; Debug Table 0x2.0x0 = 0x6b,0xffff
006d 029f 0d5b  |   [|		Declare_Subprogram	INIT_0d58,For_Call				; Debug Table 0x2.0x1 = 0x6d,0xfffe
006f			BODY_0068:
006f 8403       |    |		Call	0x2,0x3								; Debug Table 0x2.0x2 = 0x6f,0x1
0070 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0071 0000 0000  |    |		.BLANK	0000[0x7]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 00c2       |    |		.CONST	0x00c2								; Address of begin
0079 0171       | q  |		.CONST	0x0171								; Address of exception handler
007a 000e       |    |		.CONST	0x000e								; Number of locals
007b			INIT_0078:
007b 0007       |    |		Action	Break_Optional							; Debug Table 0x3 = .DEBUG	0x007b,0x186a,0x0001,0x0000,0x0058,0x5365,0x0000,0x001f
													; Debug Table 0x3.0x0 = 0x7b,0xffff
007c e001       |    |		Load	0x0,0x1								; Debug Table 0x3.0x1 = 0x7c,0xfffe
007d 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
007e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
007f 02c7       |    |		Declare_Variable	Any
0080 00d8       |    |		Load_Top	At_Offset_0
0081 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0082 e002       |    |		Load	0x0,0x2								; Debug Table 0x3.0x2 = 0x82,0xfffd
0083 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0084 02c7       |    |		Declare_Variable	Any
0085 00d8       |    |		Load_Top	At_Offset_0
0086 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0087 e003       |    |		Load	0x0,0x3								; Debug Table 0x3.0x3 = 0x87,0xfffc
0088 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0089 4973       |Is  |		Short_Literal	0x173							; Debug Table 0x3.0x4 = 0x89,0xfffb
008a 00eb       |    |		Load_Encached	Diana_Cache
008b 0098       |    |		Execute	Package,Field_Read_Dynamic
008c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
008d 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3.0x5 = 0x8d,0xfffa
008e e001       |    |		Load	0x0,0x1								; Debug Table 0x3.0x6 = 0x8e,0xfff9
008f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0090 02ff       |    |		Declare_Variable	Variant_Record
0091 00d8       |    |		Load_Top	At_Offset_0
0092 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0093 e001       |    |		Load	0x0,0x1								; Debug Table 0x3.0x7 = 0x93,0xfff8
0094 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0095 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0096 02c7       |    |		Declare_Variable	Any
0097 00d8       |    |		Load_Top	At_Offset_0
0098 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0099 e004       |    |		Load	0x0,0x4								; Debug Table 0x3.0x8 = 0x99,0xfff7
009a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
009b 02c7       |    |		Declare_Variable	Any
009c e005       |    |		Load	0x0,0x5
009d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
009e e004       |    |		Load	0x0,0x4
009f 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00a0 c409       |    |		Store	0x2,0x9
00a1 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x9 = 0xa1,0xfff6
00a2 4805       |H   |		Short_Literal	0x5
00a3 029f 0e73  |   s|		Declare_Subprogram	INIT_0e70,For_Call
00a5 03fd       |    |		Declare_Type	Discrete,Defined
00a6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0xa = 0xa6,0xfff5
00a7 4801       |H   |		Short_Literal	0x1
00a8 00e1       |    |		Load_Encached	Boolean_Cache
00a9 4801       |H   |		Short_Literal	0x1
00aa 00e2       |    |		Load_Encached	Integer_Cache
00ab 4801       |H   |		Short_Literal	0x1
00ac 00ec       |    |		Load_Encached	Diana_Tree_Cache
00ad 4801       |H   |		Short_Literal	0x1
00ae 4973       |Is  |		Short_Literal	0x173
00af 00eb       |    |		Load_Encached	Diana_Cache
00b0 0098       |    |		Execute	Package,Field_Read_Dynamic
00b1 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
00b2 029f 0e93  |    |		Declare_Subprogram	INIT_0e90,For_Call
00b4 4804       |H   |		Short_Literal	0x4
00b5 4800       |H   |		Short_Literal	0x0
00b6 4804       |H   |		Short_Literal	0x4
00b7 4800       |H   |		Short_Literal	0x0
00b8 4801       |H   |		Short_Literal	0x1
00b9 031d       |    |		Declare_Type	Variant_Record,Defined
00ba 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0xb = 0xba,0xfff4
00bb 02ff       |    |		Declare_Variable	Variant_Record
00bc 00d8       |    |		Load_Top	At_Offset_0
00bd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00be 029f 0ee3  |    |		Declare_Subprogram	INIT_0ee0,For_Call				; Debug Table 0x3.0xc = 0xbe,0xfff3
00c0 029f 0f43  |   C|		Declare_Subprogram	INIT_0f40,For_Call
00c2			BODY_0078:
00c2 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3.0xd = 0xc2,0x1
00c3 840d       |    |		Call	0x2,0xd
00c4 00db       |    |		Load_Top	At_Offset_3
00c5 016d       | m  |		Execute	Variant_Record,Structure_Write
00c6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0xe = 0xc6,0x2
00c7 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00c8 7007       |p   |		Jump_Nonzero	0xd0
00c9 e409       |    |		Load	0x2,0x9								; Debug Table 0x3.0xf = 0xc9,0x3
00ca 4801       |H   |		Short_Literal	0x1
00cb 4800       |H   |		Short_Literal	0x0
00cc e004       |    |		Load	0x0,0x4
00cd 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00ce c409       |    |		Store	0x2,0x9
00cf 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x3.0x10 = 0xcf,0x4
00d0 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0x11 = 0xd0,0x5
00d1 01db       |    |		Execute	Vector,Length
00d2 700a       |p   |		Jump_Nonzero	0xdd
00d3 0092 128a  |    |		Action	Push_String_Extended,0x128a					; "on_node cannot be empty"
													; Debug Table 0x3.0x12 = 0xd3,0x6
00d5 821a       |    |		Call	0x1,0x1a
00d6 e409       |    |		Load	0x2,0x9								; Debug Table 0x3.0x13 = 0xd6,0x7
00d7 4801       |H   |		Short_Literal	0x1
00d8 4800       |H   |		Short_Literal	0x0
00d9 e004       |    |		Load	0x0,0x4
00da 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00db c409       |    |		Store	0x2,0x9
00dc 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x3.0x14 = 0xdc,0x8
00dd e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0x15 = 0xdd,0x9
00de 8215       |    |		Call	0x1,0x15
00df a406       |    |		Store_Unchecked	0x2,0x6
00e0 e406       |    |		Load	0x2,0x6								; Debug Table 0x3.0x16 = 0xe0,0xa
00e1 00eb       |    |		Load_Encached	Diana_Cache
00e2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00e3 6807       |h   |		Jump_Zero	0xeb
00e4 e409       |    |		Load	0x2,0x9								; Debug Table 0x3.0x17 = 0xe4,0xb
00e5 4801       |H   |		Short_Literal	0x1
00e6 4800       |H   |		Short_Literal	0x0
00e7 e004       |    |		Load	0x0,0x4
00e8 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00e9 c409       |    |		Store	0x2,0x9
00ea 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x3.0x18 = 0xea,0xc
00eb e406       |    |		Load	0x2,0x6								; Debug Table 0x3.0x19 = 0xeb,0xd
00ec e001       |    |		Load	0x0,0x1
00ed 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00ee 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00ef e001       |    |		Load	0x0,0x1
00f0 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00f1 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
00f2 e407       |    |		Load	0x2,0x7
00f3 016d       | m  |		Execute	Variant_Record,Structure_Write
00f4 e003       |    |		Load	0x0,0x3								; Debug Table 0x3.0x1a = 0xf4,0xe
00f5 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00f6 e403       |    |		Load	0x2,0x3
00f7 0120       |    |		Execute	Any,Is_Value
00f8 6803       |h   |		Jump_Zero	0xfc
00f9 e002       |    |		Load	0x0,0x2
00fa 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
00fb 7801       |x   |		Jump	0xfd
00fc e403       |    |		Load	0x2,0x3
00fd e402       |    |		Load	0x2,0x2
00fe 0120       |    |		Execute	Any,Is_Value
00ff 6804       |h   |		Jump_Zero	0x104
0100 e001       |    |		Load	0x0,0x1
0101 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0102 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0103 7801       |x   |		Jump	0x105
0104 e402       |    |		Load	0x2,0x2
0105 e409       |    |		Load	0x2,0x9
0106 4800       |H   |		Short_Literal	0x0
0107 4803       |H   |		Short_Literal	0x3
0108 e407       |    |		Load	0x2,0x7
0109 e001       |    |		Load	0x0,0x1
010a 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
010b c402       |    |		Store	0x2,0x2
010c c403       |    |		Store	0x2,0x3
010d c404       |    |		Store	0x2,0x4
010e e404       |    |		Load	0x2,0x4								; Debug Table 0x3.0x1b = 0x10e,0xf
010f 6813       |h   |		Jump_Zero	0x123
0110 0092 128b  |    |		Action	Push_String_Extended,0x128b					; "can't open unit for overwrite: "
													; Debug Table 0x3.0x1c = 0x110,0x10
0112 e404       |    |		Load	0x2,0x4
0113 e003       |    |		Load	0x0,0x3
0114 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0115 025e       | ^  |		Execute	Discrete,Convert
0116 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0117 01cc       |    |		Execute	Vector,Catenate
0118 0092 128c  |    |		Action	Push_String_Extended,0x128c					; ", nothing changed"
011a 01cc       |    |		Execute	Vector,Catenate
011b 821a       |    |		Call	0x1,0x1a
011c e409       |    |		Load	0x2,0x9								; Debug Table 0x3.0x1d = 0x11c,0x11
011d 4801       |H   |		Short_Literal	0x1
011e 4800       |H   |		Short_Literal	0x0
011f e004       |    |		Load	0x0,0x4
0120 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0121 c409       |    |		Store	0x2,0x9
0122 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x3.0x1e = 0x122,0x12
0123 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0x1f = 0x123,0x13
0124 e006       |    |		Load	0x0,0x6
0125 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0126 a405       |    |		Store_Unchecked	0x2,0x5
0127 e005       |    |		Load	0x0,0x5								; Debug Table 0x3.0x20 = 0x127,0x14
0128 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0129 4800       |H   |		Short_Literal	0x0
012a e001       |    |		Load	0x0,0x1
012b 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
012c 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
012d c408       |    |		Store	0x2,0x8
012e e005       |    |		Load	0x0,0x5								; Debug Table 0x3.0x21 = 0x12e,0x15
012f 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0130 4800       |H   |		Short_Literal	0x0
0131 e402       |    |		Load	0x2,0x2
0132 e001       |    |		Load	0x0,0x1
0133 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0134 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0135 840e       |    |		Call	0x2,0xe								; Debug Table 0x3.0x22 = 0x135,0x16
0136 e005       |    |		Load	0x0,0x5								; Debug Table 0x3.0x23 = 0x136,0x17
0137 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0138 4800       |H   |		Short_Literal	0x0
0139 e408       |    |		Load	0x2,0x8
013a e001       |    |		Load	0x0,0x1
013b 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
013c 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
013d e003       |    |		Load	0x0,0x3								; Debug Table 0x3.0x24 = 0x13d,0x18
013e 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
013f 4800       |H   |		Short_Literal	0x0
0140 4801       |H   |		Short_Literal	0x1
0141 e409       |    |		Load	0x2,0x9
0142 e407       |    |		Load	0x2,0x7
0143 e001       |    |		Load	0x0,0x1
0144 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0145 c404       |    |		Store	0x2,0x4
0146 e404       |    |		Load	0x2,0x4								; Debug Table 0x3.0x25 = 0x146,0x19
0147 6813       |h   |		Jump_Zero	0x15b
0148 0092 128d  |    |		Action	Push_String_Extended,0x128d					; "can't close unit: "
													; Debug Table 0x3.0x26 = 0x148,0x1a
014a e404       |    |		Load	0x2,0x4
014b e003       |    |		Load	0x0,0x3
014c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
014d 025e       | ^  |		Execute	Discrete,Convert
014e 1c01       |    |		Execute_Immediate	Run_Utility,0x1
014f 01cc       |    |		Execute	Vector,Catenate
0150 0092 128c  |    |		Action	Push_String_Extended,0x128c					; ", nothing changed"
0152 01cc       |    |		Execute	Vector,Catenate
0153 821a       |    |		Call	0x1,0x1a
0154 e409       |    |		Load	0x2,0x9								; Debug Table 0x3.0x27 = 0x154,0x1b
0155 4801       |H   |		Short_Literal	0x1
0156 4800       |H   |		Short_Literal	0x0
0157 e004       |    |		Load	0x0,0x4
0158 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0159 c409       |    |		Store	0x2,0x9
015a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x3.0x28 = 0x15a,0x1c
015b e409       |    |		Load	0x2,0x9								; Debug Table 0x3.0x29 = 0x15b,0x1d
015c 4801       |H   |		Short_Literal	0x1
015d 4801       |H   |		Short_Literal	0x1
015e e004       |    |		Load	0x0,0x4
015f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0160 c409       |    |		Store	0x2,0x9
0161 0092 128e  |    |		Action	Push_String_Extended,0x128e					; "Added "
													; Debug Table 0x3.0x2a = 0x161,0x1e
0163 e5ff       |    |		Load	0x2,-0x1
0164 01cc       |    |		Execute	Vector,Catenate
0165 0092 128f  |    |		Action	Push_String_Extended,0x128f					; " attribute to "
0167 01cc       |    |		Execute	Vector,Catenate
0168 e5fe       |    |		Load	0x2,-0x2
0169 01cc       |    |		Execute	Vector,Catenate
016a 0092 1290  |    |		Action	Push_String_Extended,0x1290					; " with value "
016c 01cc       |    |		Execute	Vector,Catenate
016d e5fd       |    |		Load	0x2,-0x3
016e 01cc       |    |		Execute	Vector,Catenate
016f 821b       |    |		Call	0x1,0x1b
0170 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0171			TRAP_0078:
0171 0007       |    |		Action	Break_Optional
0172 0092 1291  |    |		Action	Push_String_Extended,0x1291					; "Unexpected exception "
													; Debug Table 0x3.0x2b = 0x172,0x1f
0174 e007       |    |		Load	0x0,0x7
0175 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0176 01cc       |    |		Execute	Vector,Catenate
0177 0092 1292  |    |		Action	Push_String_Extended,0x1292					; " while adding attribute, nothing_changed"
0179 01cc       |    |		Execute	Vector,Catenate
017a 821a       |    |		Call	0x1,0x1a
017b e409       |    |		Load	0x2,0x9								; Debug Table 0x3.0x2c = 0x17b,0x20
017c 4801       |H   |		Short_Literal	0x1
017d 4800       |H   |		Short_Literal	0x0
017e e004       |    |		Load	0x0,0x4
017f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0180 c409       |    |		Store	0x2,0x9
0181 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0182 0000 0000  |    |		.BLANK	0000[0x6]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 01ab       |    |		.CONST	0x01ab								; Address of begin
0189 0250       | P  |		.CONST	0x0250								; Address of exception handler
018a 0008       |    |		.CONST	0x0008								; Number of locals
018b			INIT_0188:
018b 0007       |    |		Action	Break_Optional							; Debug Table 0x4 = .DEBUG	0x018b,0x18c6,0x0001,0x0000,0x0058,0x5365,0x0000,0x0030
													; Debug Table 0x4.0x0 = 0x18b,0xffff
018c e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x1 = 0x18c,0xfffe
018d 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
018e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
018f 02c7       |    |		Declare_Variable	Any
0190 00d8       |    |		Load_Top	At_Offset_0
0191 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0192 e002       |    |		Load	0x0,0x2								; Debug Table 0x4.0x2 = 0x192,0xfffd
0193 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0194 02c7       |    |		Declare_Variable	Any
0195 00d8       |    |		Load_Top	At_Offset_0
0196 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0197 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x3 = 0x197,0xfffc
0198 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0199 4973       |Is  |		Short_Literal	0x173							; Debug Table 0x4.0x4 = 0x199,0xfffb
019a 00eb       |    |		Load_Encached	Diana_Cache
019b 0098       |    |		Execute	Package,Field_Read_Dynamic
019c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
019d 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4.0x5 = 0x19d,0xfffa
019e e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0x6 = 0x19e,0xfff9
019f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01a0 02ff       |    |		Declare_Variable	Variant_Record
01a1 00d8       |    |		Load_Top	At_Offset_0
01a2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01a3 e004       |    |		Load	0x0,0x4								; Debug Table 0x4.0x7 = 0x1a3,0xfff8
01a4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01a5 02c7       |    |		Declare_Variable	Any
01a6 e005       |    |		Load	0x0,0x5
01a7 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01a8 e004       |    |		Load	0x0,0x4
01a9 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01aa c408       |    |		Store	0x2,0x8
01ab			BODY_0188:
01ab e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x8 = 0x1ab,0x1
01ac e006       |    |		Load	0x0,0x6
01ad 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01ae a405       |    |		Store_Unchecked	0x2,0x5
01af e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x9 = 0x1af,0x2
01b0 01db       |    |		Execute	Vector,Length
01b1 700a       |p   |		Jump_Nonzero	0x1bc
01b2 0092 1293  |    |		Action	Push_String_Extended,0x1293					; "from_node cannot be empty"
													; Debug Table 0x4.0xa = 0x1b2,0x3
01b4 821a       |    |		Call	0x1,0x1a
01b5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0xb = 0x1b5,0x4
01b6 4801       |H   |		Short_Literal	0x1
01b7 4800       |H   |		Short_Literal	0x0
01b8 e004       |    |		Load	0x0,0x4
01b9 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01ba c408       |    |		Store	0x2,0x8
01bb 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x4.0xc = 0x1bb,0x5
01bc e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0xd = 0x1bc,0x6
01bd 8215       |    |		Call	0x1,0x15
01be 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
01bf 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0xe = 0x1bf,0x7
01c0 00eb       |    |		Load_Encached	Diana_Cache
01c1 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
01c2 6807       |h   |		Jump_Zero	0x1ca
01c3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0xf = 0x1c3,0x8
01c4 4801       |H   |		Short_Literal	0x1
01c5 4800       |H   |		Short_Literal	0x0
01c6 e004       |    |		Load	0x0,0x4
01c7 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01c8 c408       |    |		Store	0x2,0x8
01c9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x4.0x10 = 0x1c9,0x9
01ca 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x11 = 0x1ca,0xa
01cb 00db       |    |		Load_Top	At_Offset_3
01cc 4973       |Is  |		Short_Literal	0x173
01cd 00eb       |    |		Load_Encached	Diana_Cache
01ce 0098       |    |		Execute	Package,Field_Read_Dynamic
01cf 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
01d0 700f       |p   |		Jump_Nonzero	0x1e0
01d1 0092 1294  |    |		Action	Push_String_Extended,0x1294					; "node does not have the "
													; Debug Table 0x4.0x12 = 0x1d1,0xb
01d3 e5ff       |    |		Load	0x2,-0x1
01d4 01cc       |    |		Execute	Vector,Catenate
01d5 0092 1295  |    |		Action	Push_String_Extended,0x1295					; " attribute"
01d7 01cc       |    |		Execute	Vector,Catenate
01d8 821a       |    |		Call	0x1,0x1a
01d9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x13 = 0x1d9,0xc
01da 4801       |H   |		Short_Literal	0x1
01db 4800       |H   |		Short_Literal	0x0
01dc e004       |    |		Load	0x0,0x4
01dd 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01de c408       |    |		Store	0x2,0x8
01df 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x4.0x14 = 0x1df,0xd
01e0 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4.0x15 = 0x1e0,0xe
01e1 e001       |    |		Load	0x0,0x1
01e2 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
01e3 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01e4 e001       |    |		Load	0x0,0x1
01e5 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
01e6 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
01e7 00da       |    |		Load_Top	At_Offset_2
01e8 016d       | m  |		Execute	Variant_Record,Structure_Write
01e9 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x16 = 0x1e9,0xf
01ea 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01eb e403       |    |		Load	0x2,0x3
01ec 0120       |    |		Execute	Any,Is_Value
01ed 6803       |h   |		Jump_Zero	0x1f1
01ee e002       |    |		Load	0x0,0x2
01ef 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01f0 7801       |x   |		Jump	0x1f2
01f1 e403       |    |		Load	0x2,0x3
01f2 e402       |    |		Load	0x2,0x2
01f3 0120       |    |		Execute	Any,Is_Value
01f4 6804       |h   |		Jump_Zero	0x1f9
01f5 e001       |    |		Load	0x0,0x1
01f6 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
01f7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01f8 7801       |x   |		Jump	0x1fa
01f9 e402       |    |		Load	0x2,0x2
01fa 00db       |    |		Load_Top	At_Offset_3
01fb 4800       |H   |		Short_Literal	0x0
01fc 4803       |H   |		Short_Literal	0x3
01fd e407       |    |		Load	0x2,0x7
01fe e001       |    |		Load	0x0,0x1
01ff 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0200 c402       |    |		Store	0x2,0x2
0201 c403       |    |		Store	0x2,0x3
0202 c404       |    |		Store	0x2,0x4
0203 e404       |    |		Load	0x2,0x4								; Debug Table 0x4.0x17 = 0x203,0x10
0204 6813       |h   |		Jump_Zero	0x218
0205 0092 128b  |    |		Action	Push_String_Extended,0x128b					; "can't open unit for overwrite: "
													; Debug Table 0x4.0x18 = 0x205,0x11
0207 e404       |    |		Load	0x2,0x4
0208 e003       |    |		Load	0x0,0x3
0209 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
020a 025e       | ^  |		Execute	Discrete,Convert
020b 1c01       |    |		Execute_Immediate	Run_Utility,0x1
020c 01cc       |    |		Execute	Vector,Catenate
020d 0092 128c  |    |		Action	Push_String_Extended,0x128c					; ", nothing changed"
020f 01cc       |    |		Execute	Vector,Catenate
0210 821a       |    |		Call	0x1,0x1a
0211 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x19 = 0x211,0x12
0212 4801       |H   |		Short_Literal	0x1
0213 4800       |H   |		Short_Literal	0x0
0214 e004       |    |		Load	0x0,0x4
0215 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0216 c408       |    |		Store	0x2,0x8
0217 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x4.0x1a = 0x217,0x13
0218 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x1b = 0x218,0x14
0219 00db       |    |		Load_Top	At_Offset_3
021a e403       |    |		Load	0x2,0x3
021b 00eb       |    |		Load_Encached	Diana_Cache
021c 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
021d 4973       |Is  |		Short_Literal	0x173
021e 00eb       |    |		Load_Encached	Diana_Cache
021f 0098       |    |		Execute	Package,Field_Read_Dynamic
0220 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0221 e003       |    |		Load	0x0,0x3								; Debug Table 0x4.0x1c = 0x221,0x15
0222 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0223 4800       |H   |		Short_Literal	0x0
0224 4801       |H   |		Short_Literal	0x1
0225 00db       |    |		Load_Top	At_Offset_3
0226 e407       |    |		Load	0x2,0x7
0227 e001       |    |		Load	0x0,0x1
0228 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0229 c404       |    |		Store	0x2,0x4
022a e404       |    |		Load	0x2,0x4								; Debug Table 0x4.0x1d = 0x22a,0x16
022b 6813       |h   |		Jump_Zero	0x23f
022c 0092 128d  |    |		Action	Push_String_Extended,0x128d					; "can't close unit: "
													; Debug Table 0x4.0x1e = 0x22c,0x17
022e e404       |    |		Load	0x2,0x4
022f e003       |    |		Load	0x0,0x3
0230 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0231 025e       | ^  |		Execute	Discrete,Convert
0232 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0233 01cc       |    |		Execute	Vector,Catenate
0234 0092 128c  |    |		Action	Push_String_Extended,0x128c					; ", nothing changed"
0236 01cc       |    |		Execute	Vector,Catenate
0237 821a       |    |		Call	0x1,0x1a
0238 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x1f = 0x238,0x18
0239 4801       |H   |		Short_Literal	0x1
023a 4800       |H   |		Short_Literal	0x0
023b e004       |    |		Load	0x0,0x4
023c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
023d c408       |    |		Store	0x2,0x8
023e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x4.0x20 = 0x23e,0x19
023f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x21 = 0x23f,0x1a
0240 4801       |H   |		Short_Literal	0x1
0241 4801       |H   |		Short_Literal	0x1
0242 e004       |    |		Load	0x0,0x4
0243 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0244 c408       |    |		Store	0x2,0x8
0245 0092 1296  |    |		Action	Push_String_Extended,0x1296					; "Removed "
													; Debug Table 0x4.0x22 = 0x245,0x1b
0247 e5ff       |    |		Load	0x2,-0x1
0248 01cc       |    |		Execute	Vector,Catenate
0249 0092 1297  |    |		Action	Push_String_Extended,0x1297					; " attribute from "
024b 01cc       |    |		Execute	Vector,Catenate
024c e5fe       |    |		Load	0x2,-0x2
024d 01cc       |    |		Execute	Vector,Catenate
024e 821b       |    |		Call	0x1,0x1b
024f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0250			TRAP_0188:
0250 0007       |    |		Action	Break_Optional
0251 0092 1298  |    |		Action	Push_String_Extended,0x1298					; "Unexpected exception while removing attribute"
													; Debug Table 0x4.0x23 = 0x251,0x1c
0253 821a       |    |		Call	0x1,0x1a
0254 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x24 = 0x254,0x1d
0255 4801       |H   |		Short_Literal	0x1
0256 4800       |H   |		Short_Literal	0x0
0257 e004       |    |		Load	0x0,0x4
0258 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0259 c408       |    |		Store	0x2,0x8
025a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
025b 0000 0000  |    |		.BLANK	0000[0x5]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 028d       |    |		.CONST	0x028d								; Address of begin
0261 0356       | V  |		.CONST	0x0356								; Address of exception handler
0262 000b       |    |		.CONST	0x000b								; Number of locals
0263			INIT_0260:
0263 e001       |    |		Load	0x0,0x1								; Debug Table 0x5 = .DEBUG	0x0263,0x1912,0x0001,0x0000,0x0058,0x5365,0x0000,0x003c
													; Debug Table 0x5.0x0 = 0x263,0xffff
0264 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0265 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0266 02c7       |    |		Declare_Variable	Any
0267 00d8       |    |		Load_Top	At_Offset_0
0268 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0269 e002       |    |		Load	0x0,0x2								; Debug Table 0x5.0x1 = 0x269,0xfffe
026a 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
026b 02c7       |    |		Declare_Variable	Any
026c 00d8       |    |		Load_Top	At_Offset_0
026d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
026e e003       |    |		Load	0x0,0x3								; Debug Table 0x5.0x2 = 0x26e,0xfffd
026f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0270 e008       |    |		Load	0x0,0x8								; Debug Table 0x5.0x3 = 0x270,0xfffc
0271 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0272 02ff       |    |		Declare_Variable	Variant_Record
0273 00d8       |    |		Load_Top	At_Offset_0
0274 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0275 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x5.0x4 = 0x275,0xfffb
0276 e001       |    |		Load	0x0,0x1								; Debug Table 0x5.0x5 = 0x276,0xfffa
0277 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0278 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0279 02c7       |    |		Declare_Variable	Any
027a 00d8       |    |		Load_Top	At_Offset_0
027b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
027c 4973       |Is  |		Short_Literal	0x173							; Debug Table 0x5.0x6 = 0x27c,0xfff9
027d 00eb       |    |		Load_Encached	Diana_Cache
027e 0098       |    |		Execute	Package,Field_Read_Dynamic
027f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0280 e008       |    |		Load	0x0,0x8								; Debug Table 0x5.0x7 = 0x280,0xfff8
0281 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0282 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0283 e004       |    |		Load	0x0,0x4								; Debug Table 0x5.0x8 = 0x283,0xfff7
0284 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0285 02c7       |    |		Declare_Variable	Any
0286 e005       |    |		Load	0x0,0x5
0287 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0288 e004       |    |		Load	0x0,0x4
0289 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
028a c40a       |    |		Store	0x2,0xa
028b 029f 0fa3  |    |		Declare_Subprogram	INIT_0fa0,For_Call				; Debug Table 0x5.0x9 = 0x28b,0xfff6
028d			BODY_0260:
028d e005       |    |		Load	0x0,0x5								; Debug Table 0x5.0xa = 0x28d,0x1
028e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
028f 4800       |H   |		Short_Literal	0x0
0290 e001       |    |		Load	0x0,0x1
0291 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0292 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0293 c407       |    |		Store	0x2,0x7
0294 0092 1299  |    |		Action	Push_String_Extended,0x1299					; "SM_READ_ONLY"
													; Debug Table 0x5.0xb = 0x294,0x2
0296 e006       |    |		Load	0x0,0x6
0297 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0298 a408       |    |		Store_Unchecked	0x2,0x8
0299 e008       |    |		Load	0x0,0x8								; Debug Table 0x5.0xc = 0x299,0x3
029a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
029b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
029c e405       |    |		Load	0x2,0x5
029d 62e6       |b   |		Indirect_Literal	Discrete,0x584,{0x00000000, 0x00004000}
029e e004       |    |		Load	0x0,0x4
029f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02a0 4800       |H   |		Short_Literal	0x0
02a1 e009       |    |		Load	0x0,0x9
02a2 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02a3 e008       |    |		Load	0x0,0x8
02a4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02a5 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
02a6 e5ff       |    |		Load	0x2,-0x1
02a7 e008       |    |		Load	0x0,0x8
02a8 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02a9 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
02aa 00d1       |    |		Pop_Control	Pop_Count_1
02ab 005b       | [  |		Store_Top	Discrete,At_Offset_3
02ac 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0xd = 0x2ac,0x4
02ad 6816       |h   |		Jump_Zero	0x2c4
02ae 0092 129a  |    |		Action	Push_String_Extended,0x129a					; "can't resolve \x22"
													; Debug Table 0x5.0xe = 0x2ae,0x5
02b0 e5ff       |    |		Load	0x2,-0x1
02b1 01cc       |    |		Execute	Vector,Catenate
02b2 0092 129b  |    |		Action	Push_String_Extended,0x129b					; "\x22: "
02b4 01cc       |    |		Execute	Vector,Catenate
02b5 00db       |    |		Load_Top	At_Offset_3
02b6 e008       |    |		Load	0x0,0x8
02b7 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02b8 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02b9 025e       | ^  |		Execute	Discrete,Convert
02ba 1c01       |    |		Execute_Immediate	Run_Utility,0x1
02bb 01cc       |    |		Execute	Vector,Catenate
02bc 821a       |    |		Call	0x1,0x1a
02bd 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0xf = 0x2bd,0x6
02be 4801       |H   |		Short_Literal	0x1
02bf 4800       |H   |		Short_Literal	0x0
02c0 e004       |    |		Load	0x0,0x4
02c1 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02c2 c40a       |    |		Store	0x2,0xa
02c3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x5.0x10 = 0x2c3,0x7
02c4 e003       |    |		Load	0x0,0x3								; Debug Table 0x5.0x11 = 0x2c4,0x8
02c5 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
02c6 e403       |    |		Load	0x2,0x3
02c7 0120       |    |		Execute	Any,Is_Value
02c8 6803       |h   |		Jump_Zero	0x2cc
02c9 e002       |    |		Load	0x0,0x2
02ca 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
02cb 7801       |x   |		Jump	0x2cd
02cc e403       |    |		Load	0x2,0x3
02cd e402       |    |		Load	0x2,0x2
02ce 0120       |    |		Execute	Any,Is_Value
02cf 6804       |h   |		Jump_Zero	0x2d4
02d0 e001       |    |		Load	0x0,0x1
02d1 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
02d2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02d3 7801       |x   |		Jump	0x2d5
02d4 e402       |    |		Load	0x2,0x2
02d5 e40a       |    |		Load	0x2,0xa
02d6 4800       |H   |		Short_Literal	0x0
02d7 4803       |H   |		Short_Literal	0x3
02d8 e405       |    |		Load	0x2,0x5
02d9 e001       |    |		Load	0x0,0x1
02da 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02db c402       |    |		Store	0x2,0x2
02dc c403       |    |		Store	0x2,0x3
02dd c404       |    |		Store	0x2,0x4
02de e404       |    |		Load	0x2,0x4								; Debug Table 0x5.0x12 = 0x2de,0x9
02df 6813       |h   |		Jump_Zero	0x2f3
02e0 0092 128b  |    |		Action	Push_String_Extended,0x128b					; "can't open unit for overwrite: "
													; Debug Table 0x5.0x13 = 0x2e0,0xa
02e2 e404       |    |		Load	0x2,0x4
02e3 e003       |    |		Load	0x0,0x3
02e4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02e5 025e       | ^  |		Execute	Discrete,Convert
02e6 1c01       |    |		Execute_Immediate	Run_Utility,0x1
02e7 01cc       |    |		Execute	Vector,Catenate
02e8 0092 128c  |    |		Action	Push_String_Extended,0x128c					; ", nothing changed"
02ea 01cc       |    |		Execute	Vector,Catenate
02eb 821a       |    |		Call	0x1,0x1a
02ec 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x14 = 0x2ec,0xb
02ed 4801       |H   |		Short_Literal	0x1
02ee 4800       |H   |		Short_Literal	0x0
02ef e004       |    |		Load	0x0,0x4
02f0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
02f1 c40a       |    |		Store	0x2,0xa
02f2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x5.0x15 = 0x2f2,0xc
02f3 e005       |    |		Load	0x0,0x5								; Debug Table 0x5.0x16 = 0x2f3,0xd
02f4 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
02f5 4800       |H   |		Short_Literal	0x0
02f6 e402       |    |		Load	0x2,0x2
02f7 e001       |    |		Load	0x0,0x1
02f8 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
02f9 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
02fa e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x17 = 0x2fa,0xe
02fb e001       |    |		Load	0x0,0x1
02fc 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
02fd 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
02fe a406       |    |		Store_Unchecked	0x2,0x6
02ff 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x18 = 0x2ff,0xf
0300 e406       |    |		Load	0x2,0x6
0301 4973       |Is  |		Short_Literal	0x173
0302 00eb       |    |		Load_Encached	Diana_Cache
0303 0098       |    |		Execute	Package,Field_Read_Dynamic
0304 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
0305 680f       |h   |		Jump_Zero	0x315
0306 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5.0x19 = 0x306,0x10
0307 e406       |    |		Load	0x2,0x6
0308 4973       |Is  |		Short_Literal	0x173
0309 00eb       |    |		Load_Encached	Diana_Cache
030a 0098       |    |		Execute	Package,Field_Read_Dynamic
030b 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
030c 0092 129c  |    |		Action	Push_String_Extended,0x129c					; "Removed read_only attribute from "
													; Debug Table 0x5.0x1a = 0x30c,0x11
030e e405       |    |		Load	0x2,0x5
030f e008       |    |		Load	0x0,0x8
0310 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0311 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0312 01cc       |    |		Execute	Vector,Catenate
0313 821b       |    |		Call	0x1,0x1b
0314 780b       |x   |		Jump	0x320
0315 0092 129d  |    |		Action	Push_String_Extended,0x129d					; "unit "
													; Debug Table 0x5.0x1b = 0x315,0x12
0317 e405       |    |		Load	0x2,0x5
0318 e008       |    |		Load	0x0,0x8
0319 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
031a 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
031b 01cc       |    |		Execute	Vector,Catenate
031c 0092 129e  |    |		Action	Push_String_Extended,0x129e					; " does not have a read_only attribute"
031e 01cc       |    |		Execute	Vector,Catenate
031f 821a       |    |		Call	0x1,0x1a
0320 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x1c = 0x320,0x13
0321 6801       |h   |		Jump_Zero	0x323
0322 840b       |    |		Call	0x2,0xb								; Debug Table 0x5.0x1d = 0x322,0x14
0323 e003       |    |		Load	0x0,0x3								; Debug Table 0x5.0x1e = 0x323,0x15
0324 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0325 4800       |H   |		Short_Literal	0x0
0326 4801       |H   |		Short_Literal	0x1
0327 e40a       |    |		Load	0x2,0xa
0328 e405       |    |		Load	0x2,0x5
0329 e001       |    |		Load	0x0,0x1
032a 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
032b c404       |    |		Store	0x2,0x4
032c e404       |    |		Load	0x2,0x4								; Debug Table 0x5.0x1f = 0x32c,0x16
032d 681a       |h   |		Jump_Zero	0x348
032e 0092 128d  |    |		Action	Push_String_Extended,0x128d					; "can't close unit: "
													; Debug Table 0x5.0x20 = 0x32e,0x17
0330 e404       |    |		Load	0x2,0x4
0331 e003       |    |		Load	0x0,0x3
0332 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0333 025e       | ^  |		Execute	Discrete,Convert
0334 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0335 01cc       |    |		Execute	Vector,Catenate
0336 0092 128c  |    |		Action	Push_String_Extended,0x128c					; ", nothing changed"
0338 01cc       |    |		Execute	Vector,Catenate
0339 821a       |    |		Call	0x1,0x1a
033a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x21 = 0x33a,0x18
033b 4801       |H   |		Short_Literal	0x1
033c 4800       |H   |		Short_Literal	0x0
033d e004       |    |		Load	0x0,0x4
033e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
033f c40a       |    |		Store	0x2,0xa
0340 e005       |    |		Load	0x0,0x5								; Debug Table 0x5.0x22 = 0x340,0x19
0341 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0342 4800       |H   |		Short_Literal	0x0
0343 e407       |    |		Load	0x2,0x7
0344 e001       |    |		Load	0x0,0x1
0345 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0346 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0347 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x5.0x23 = 0x347,0x1a
0348 e005       |    |		Load	0x0,0x5								; Debug Table 0x5.0x24 = 0x348,0x1b
0349 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
034a 4800       |H   |		Short_Literal	0x0
034b e407       |    |		Load	0x2,0x7
034c e001       |    |		Load	0x0,0x1
034d 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
034e 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
034f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0x25 = 0x34f,0x1c
0350 4801       |H   |		Short_Literal	0x1
0351 4801       |H   |		Short_Literal	0x1
0352 e004       |    |		Load	0x0,0x4
0353 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0354 c40a       |    |		Store	0x2,0xa
0355 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0356			TRAP_0260:
0356 0007       |    |		Action	Break_Optional
0357 0092 129f  |    |		Action	Push_String_Extended,0x129f					; "Unexpected exception while removing read_only attribute from "
													; Debug Table 0x5.0x26 = 0x357,0x1d
0359 e405       |    |		Load	0x2,0x5
035a e008       |    |		Load	0x0,0x8
035b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
035c 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
035d 01cc       |    |		Execute	Vector,Catenate
035e 821a       |    |		Call	0x1,0x1a
035f e005       |    |		Load	0x0,0x5								; Debug Table 0x5.0x27 = 0x35f,0x1e
0360 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0361 4800       |H   |		Short_Literal	0x0
0362 e407       |    |		Load	0x2,0x7
0363 e001       |    |		Load	0x0,0x1
0364 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0365 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0366 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x28 = 0x366,0x1f
0367 4801       |H   |		Short_Literal	0x1
0368 4800       |H   |		Short_Literal	0x0
0369 e004       |    |		Load	0x0,0x4
036a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
036b c40a       |    |		Store	0x2,0xa
036c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
036d 0000 0000  |    |		.XXX[0x3]
036f 0000       |    |
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 039f       |    |		.CONST	0x039f								; Address of begin
0371 0456       | V  |		.CONST	0x0456								; Address of exception handler
0372 000c       |    |		.CONST	0x000c								; Number of locals
0373			INIT_0370:
0373 e001       |    |		Load	0x0,0x1								; Debug Table 0x6 = .DEBUG	0x0373,0x1966,0x0001,0x0000,0x0058,0x5365,0x0000,0x0049
													; Debug Table 0x6.0x0 = 0x373,0xffff
0374 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0375 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0376 02c7       |    |		Declare_Variable	Any
0377 00d8       |    |		Load_Top	At_Offset_0
0378 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0379 e002       |    |		Load	0x0,0x2								; Debug Table 0x6.0x1 = 0x379,0xfffe
037a 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
037b 02c7       |    |		Declare_Variable	Any
037c 00d8       |    |		Load_Top	At_Offset_0
037d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
037e e003       |    |		Load	0x0,0x3								; Debug Table 0x6.0x2 = 0x37e,0xfffd
037f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0380 e008       |    |		Load	0x0,0x8								; Debug Table 0x6.0x3 = 0x380,0xfffc
0381 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0382 02ff       |    |		Declare_Variable	Variant_Record
0383 00d8       |    |		Load_Top	At_Offset_0
0384 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0385 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6.0x4 = 0x385,0xfffb
0386 e001       |    |		Load	0x0,0x1								; Debug Table 0x6.0x5 = 0x386,0xfffa
0387 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0388 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0389 02c7       |    |		Declare_Variable	Any
038a 00d8       |    |		Load_Top	At_Offset_0
038b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
038c 4973       |Is  |		Short_Literal	0x173							; Debug Table 0x6.0x6 = 0x38c,0xfff9
038d 00eb       |    |		Load_Encached	Diana_Cache
038e 0098       |    |		Execute	Package,Field_Read_Dynamic
038f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0390 e008       |    |		Load	0x0,0x8								; Debug Table 0x6.0x7 = 0x390,0xfff8
0391 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0392 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0393 e004       |    |		Load	0x0,0x4								; Debug Table 0x6.0x8 = 0x393,0xfff7
0394 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0395 02c7       |    |		Declare_Variable	Any
0396 e005       |    |		Load	0x0,0x5
0397 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0398 e004       |    |		Load	0x0,0x4
0399 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
039a c40a       |    |		Store	0x2,0xa
039b 029f 1043  |   C|		Declare_Subprogram	INIT_1040,For_Call				; Debug Table 0x6.0x9 = 0x39b,0xfff6
039d 029f 1053  |   S|		Declare_Subprogram	INIT_1050,For_Call				; Debug Table 0x6.0xa = 0x39d,0xfff5
039f			BODY_0370:
039f e005       |    |		Load	0x0,0x5								; Debug Table 0x6.0xb = 0x39f,0x1
03a0 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
03a1 4800       |H   |		Short_Literal	0x0
03a2 e001       |    |		Load	0x0,0x1
03a3 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
03a4 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
03a5 c407       |    |		Store	0x2,0x7
03a6 0092 1299  |    |		Action	Push_String_Extended,0x1299					; "SM_READ_ONLY"
													; Debug Table 0x6.0xc = 0x3a6,0x2
03a8 e006       |    |		Load	0x0,0x6
03a9 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
03aa a408       |    |		Store_Unchecked	0x2,0x8
03ab e008       |    |		Load	0x0,0x8								; Debug Table 0x6.0xd = 0x3ab,0x3
03ac 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03ad 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03ae e405       |    |		Load	0x2,0x5
03af 61d4       |a   |		Indirect_Literal	Discrete,0x584,{0x00000000, 0x00004000}
03b0 e004       |    |		Load	0x0,0x4
03b1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
03b2 4800       |H   |		Short_Literal	0x0
03b3 e009       |    |		Load	0x0,0x9
03b4 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03b5 e008       |    |		Load	0x0,0x8
03b6 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03b7 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03b8 e5ff       |    |		Load	0x2,-0x1
03b9 e008       |    |		Load	0x0,0x8
03ba 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03bb 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
03bc 00d1       |    |		Pop_Control	Pop_Count_1
03bd c409       |    |		Store	0x2,0x9
03be 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0xe = 0x3be,0x4
03bf 6816       |h   |		Jump_Zero	0x3d6
03c0 0092 129a  |    |		Action	Push_String_Extended,0x129a					; "can't resolve \x22"
													; Debug Table 0x6.0xf = 0x3c0,0x5
03c2 e5ff       |    |		Load	0x2,-0x1
03c3 01cc       |    |		Execute	Vector,Catenate
03c4 0092 129b  |    |		Action	Push_String_Extended,0x129b					; "\x22: "
03c6 01cc       |    |		Execute	Vector,Catenate
03c7 e409       |    |		Load	0x2,0x9
03c8 e008       |    |		Load	0x0,0x8
03c9 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03ca 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03cb 025e       | ^  |		Execute	Discrete,Convert
03cc 1c01       |    |		Execute_Immediate	Run_Utility,0x1
03cd 01cc       |    |		Execute	Vector,Catenate
03ce 821a       |    |		Call	0x1,0x1a
03cf 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x10 = 0x3cf,0x6
03d0 4801       |H   |		Short_Literal	0x1
03d1 4800       |H   |		Short_Literal	0x0
03d2 e004       |    |		Load	0x0,0x4
03d3 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
03d4 c40a       |    |		Store	0x2,0xa
03d5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x6.0x11 = 0x3d5,0x7
03d6 e003       |    |		Load	0x0,0x3								; Debug Table 0x6.0x12 = 0x3d6,0x8
03d7 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
03d8 e403       |    |		Load	0x2,0x3
03d9 0120       |    |		Execute	Any,Is_Value
03da 6803       |h   |		Jump_Zero	0x3de
03db e002       |    |		Load	0x0,0x2
03dc 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
03dd 7801       |x   |		Jump	0x3df
03de e403       |    |		Load	0x2,0x3
03df e402       |    |		Load	0x2,0x2
03e0 0120       |    |		Execute	Any,Is_Value
03e1 6804       |h   |		Jump_Zero	0x3e6
03e2 e001       |    |		Load	0x0,0x1
03e3 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
03e4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03e5 7801       |x   |		Jump	0x3e7
03e6 e402       |    |		Load	0x2,0x2
03e7 e40a       |    |		Load	0x2,0xa
03e8 4800       |H   |		Short_Literal	0x0
03e9 4803       |H   |		Short_Literal	0x3
03ea e405       |    |		Load	0x2,0x5
03eb e001       |    |		Load	0x0,0x1
03ec 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03ed c402       |    |		Store	0x2,0x2
03ee c403       |    |		Store	0x2,0x3
03ef c404       |    |		Store	0x2,0x4
03f0 e404       |    |		Load	0x2,0x4								; Debug Table 0x6.0x13 = 0x3f0,0x9
03f1 6813       |h   |		Jump_Zero	0x405
03f2 0092 128b  |    |		Action	Push_String_Extended,0x128b					; "can't open unit for overwrite: "
													; Debug Table 0x6.0x14 = 0x3f2,0xa
03f4 e404       |    |		Load	0x2,0x4
03f5 e003       |    |		Load	0x0,0x3
03f6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03f7 025e       | ^  |		Execute	Discrete,Convert
03f8 1c01       |    |		Execute_Immediate	Run_Utility,0x1
03f9 01cc       |    |		Execute	Vector,Catenate
03fa 0092 128c  |    |		Action	Push_String_Extended,0x128c					; ", nothing changed"
03fc 01cc       |    |		Execute	Vector,Catenate
03fd 821a       |    |		Call	0x1,0x1a
03fe 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x15 = 0x3fe,0xb
03ff 4801       |H   |		Short_Literal	0x1
0400 4800       |H   |		Short_Literal	0x0
0401 e004       |    |		Load	0x0,0x4
0402 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0403 c40a       |    |		Store	0x2,0xa
0404 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x6.0x16 = 0x404,0xc
0405 e005       |    |		Load	0x0,0x5								; Debug Table 0x6.0x17 = 0x405,0xd
0406 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0407 4800       |H   |		Short_Literal	0x0
0408 e402       |    |		Load	0x2,0x2
0409 e001       |    |		Load	0x0,0x1
040a 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
040b 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
040c e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0x18 = 0x40c,0xe
040d e001       |    |		Load	0x0,0x1
040e 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
040f 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0410 a406       |    |		Store_Unchecked	0x2,0x6
0411 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x19 = 0x411,0xf
0412 e408       |    |		Load	0x2,0x8
0413 e406       |    |		Load	0x2,0x6
0414 4973       |Is  |		Short_Literal	0x173
0415 00eb       |    |		Load_Encached	Diana_Cache
0416 0098       |    |		Execute	Package,Field_Read_Dynamic
0417 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0418 0092 12a0  |    |		Action	Push_String_Extended,0x12a0					; "added read_only attribute to "
													; Debug Table 0x6.0x1a = 0x418,0x10
041a e405       |    |		Load	0x2,0x5
041b e008       |    |		Load	0x0,0x8
041c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
041d 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
041e 01cc       |    |		Execute	Vector,Catenate
041f 821b       |    |		Call	0x1,0x1b
0420 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x6.0x1b = 0x420,0x11
0421 6801       |h   |		Jump_Zero	0x423
0422 840c       |    |		Call	0x2,0xc								; Debug Table 0x6.0x1c = 0x422,0x12
0423 e003       |    |		Load	0x0,0x3								; Debug Table 0x6.0x1d = 0x423,0x13
0424 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0425 4800       |H   |		Short_Literal	0x0
0426 4801       |H   |		Short_Literal	0x1
0427 e40a       |    |		Load	0x2,0xa
0428 e405       |    |		Load	0x2,0x5
0429 e001       |    |		Load	0x0,0x1
042a 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
042b c404       |    |		Store	0x2,0x4
042c e404       |    |		Load	0x2,0x4								; Debug Table 0x6.0x1e = 0x42c,0x14
042d 681a       |h   |		Jump_Zero	0x448
042e 0092 128d  |    |		Action	Push_String_Extended,0x128d					; "can't close unit: "
													; Debug Table 0x6.0x1f = 0x42e,0x15
0430 e404       |    |		Load	0x2,0x4
0431 e003       |    |		Load	0x0,0x3
0432 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0433 025e       | ^  |		Execute	Discrete,Convert
0434 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0435 01cc       |    |		Execute	Vector,Catenate
0436 0092 128c  |    |		Action	Push_String_Extended,0x128c					; ", nothing changed"
0438 01cc       |    |		Execute	Vector,Catenate
0439 821a       |    |		Call	0x1,0x1a
043a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x20 = 0x43a,0x16
043b 4801       |H   |		Short_Literal	0x1
043c 4800       |H   |		Short_Literal	0x0
043d e004       |    |		Load	0x0,0x4
043e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
043f c40a       |    |		Store	0x2,0xa
0440 e005       |    |		Load	0x0,0x5								; Debug Table 0x6.0x21 = 0x440,0x17
0441 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0442 4800       |H   |		Short_Literal	0x0
0443 e407       |    |		Load	0x2,0x7
0444 e001       |    |		Load	0x0,0x1
0445 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0446 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0447 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x6.0x22 = 0x447,0x18
0448 e005       |    |		Load	0x0,0x5								; Debug Table 0x6.0x23 = 0x448,0x19
0449 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
044a 4800       |H   |		Short_Literal	0x0
044b e407       |    |		Load	0x2,0x7
044c e001       |    |		Load	0x0,0x1
044d 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
044e 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
044f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x24 = 0x44f,0x1a
0450 4801       |H   |		Short_Literal	0x1
0451 4801       |H   |		Short_Literal	0x1
0452 e004       |    |		Load	0x0,0x4
0453 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0454 c40a       |    |		Store	0x2,0xa
0455 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0456			TRAP_0370:
0456 0007       |    |		Action	Break_Optional
0457 0092 12a1  |    |		Action	Push_String_Extended,0x12a1					; "Unexpected exception while adding read_only attribute to "
													; Debug Table 0x6.0x25 = 0x457,0x1b
0459 e405       |    |		Load	0x2,0x5
045a e008       |    |		Load	0x0,0x8
045b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
045c 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
045d 01cc       |    |		Execute	Vector,Catenate
045e 821a       |    |		Call	0x1,0x1a
045f e005       |    |		Load	0x0,0x5								; Debug Table 0x6.0x26 = 0x45f,0x1c
0460 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0461 4800       |H   |		Short_Literal	0x0
0462 e407       |    |		Load	0x2,0x7
0463 e001       |    |		Load	0x0,0x1
0464 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0465 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0466 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x27 = 0x466,0x1d
0467 4801       |H   |		Short_Literal	0x1
0468 4800       |H   |		Short_Literal	0x0
0469 e004       |    |		Load	0x0,0x4
046a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
046b c40a       |    |		Store	0x2,0xa
046c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
046d 0000 0000  |    |		.XXX[0x3]
046f 0000       |    |
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0491       |    |		.CONST	0x0491								; Address of begin
0471 051d       |    |		.CONST	0x051d								; Address of exception handler
0472 0007       |    |		.CONST	0x0007								; Number of locals
0473			INIT_0470:
0473 0007       |    |		Action	Break_Optional							; Debug Table 0x7 = .DEBUG	0x0473,0x19b8,0x0001,0x0000,0x0058,0x5365,0x0000,0x0056
													; Debug Table 0x7.0x0 = 0x473,0xffff
0474 e001       |    |		Load	0x0,0x1								; Debug Table 0x7.0x1 = 0x474,0xfffe
0475 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0476 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0477 02c7       |    |		Declare_Variable	Any
0478 00d8       |    |		Load_Top	At_Offset_0
0479 1c00       |    |		Execute_Immediate	Run_Utility,0x0
047a e002       |    |		Load	0x0,0x2								; Debug Table 0x7.0x2 = 0x47a,0xfffd
047b 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
047c 02c7       |    |		Declare_Variable	Any
047d 00d8       |    |		Load_Top	At_Offset_0
047e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
047f e003       |    |		Load	0x0,0x3								; Debug Table 0x7.0x3 = 0x47f,0xfffc
0480 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0481 e008       |    |		Load	0x0,0x8								; Debug Table 0x7.0x4 = 0x481,0xfffb
0482 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0483 02ff       |    |		Declare_Variable	Variant_Record
0484 00d8       |    |		Load_Top	At_Offset_0
0485 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0486 e008       |    |		Load	0x0,0x8								; Debug Table 0x7.0x5 = 0x486,0xfffa
0487 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0488 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0489 e004       |    |		Load	0x0,0x4								; Debug Table 0x7.0x6 = 0x489,0xfff9
048a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
048b 02c7       |    |		Declare_Variable	Any
048c e005       |    |		Load	0x0,0x5
048d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
048e e004       |    |		Load	0x0,0x4
048f 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0490 c407       |    |		Store	0x2,0x7
0491			BODY_0470:
0491 e008       |    |		Load	0x0,0x8								; Debug Table 0x7.0x7 = 0x491,0x1
0492 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0493 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0494 00db       |    |		Load_Top	At_Offset_3
0495 60ee       |`   |		Indirect_Literal	Discrete,0x584,{0x00000000, 0x00004000}
0496 e004       |    |		Load	0x0,0x4
0497 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0498 4800       |H   |		Short_Literal	0x0
0499 e009       |    |		Load	0x0,0x9
049a 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
049b e008       |    |		Load	0x0,0x8
049c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
049d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
049e e5ff       |    |		Load	0x2,-0x1
049f e008       |    |		Load	0x0,0x8
04a0 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
04a1 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
04a2 00d1       |    |		Pop_Control	Pop_Count_1
04a3 005a       | Z  |		Store_Top	Discrete,At_Offset_2
04a4 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x8 = 0x4a4,0x2
04a5 6816       |h   |		Jump_Zero	0x4bc
04a6 0092 129a  |    |		Action	Push_String_Extended,0x129a					; "can't resolve \x22"
													; Debug Table 0x7.0x9 = 0x4a6,0x3
04a8 e5ff       |    |		Load	0x2,-0x1
04a9 01cc       |    |		Execute	Vector,Catenate
04aa 0092 129b  |    |		Action	Push_String_Extended,0x129b					; "\x22: "
04ac 01cc       |    |		Execute	Vector,Catenate
04ad 00da       |    |		Load_Top	At_Offset_2
04ae e008       |    |		Load	0x0,0x8
04af 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
04b0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
04b1 025e       | ^  |		Execute	Discrete,Convert
04b2 1c01       |    |		Execute_Immediate	Run_Utility,0x1
04b3 01cc       |    |		Execute	Vector,Catenate
04b4 821a       |    |		Call	0x1,0x1a
04b5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0xa = 0x4b5,0x4
04b6 4801       |H   |		Short_Literal	0x1
04b7 4800       |H   |		Short_Literal	0x0
04b8 e004       |    |		Load	0x0,0x4
04b9 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04ba c407       |    |		Store	0x2,0x7
04bb 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x7.0xb = 0x4bb,0x5
04bc e003       |    |		Load	0x0,0x3								; Debug Table 0x7.0xc = 0x4bc,0x6
04bd 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
04be e403       |    |		Load	0x2,0x3
04bf 0120       |    |		Execute	Any,Is_Value
04c0 6803       |h   |		Jump_Zero	0x4c4
04c1 e002       |    |		Load	0x0,0x2
04c2 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
04c3 7801       |x   |		Jump	0x4c5
04c4 e403       |    |		Load	0x2,0x3
04c5 e402       |    |		Load	0x2,0x2
04c6 0120       |    |		Execute	Any,Is_Value
04c7 6804       |h   |		Jump_Zero	0x4cc
04c8 e001       |    |		Load	0x0,0x1
04c9 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
04ca 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04cb 7801       |x   |		Jump	0x4cd
04cc e402       |    |		Load	0x2,0x2
04cd 00db       |    |		Load_Top	At_Offset_3
04ce 4800       |H   |		Short_Literal	0x0
04cf 4803       |H   |		Short_Literal	0x3
04d0 e405       |    |		Load	0x2,0x5
04d1 e001       |    |		Load	0x0,0x1
04d2 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
04d3 c402       |    |		Store	0x2,0x2
04d4 c403       |    |		Store	0x2,0x3
04d5 c404       |    |		Store	0x2,0x4
04d6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0xd = 0x4d6,0x7
04d7 6813       |h   |		Jump_Zero	0x4eb
04d8 0092 128b  |    |		Action	Push_String_Extended,0x128b					; "can't open unit for overwrite: "
													; Debug Table 0x7.0xe = 0x4d8,0x8
04da e404       |    |		Load	0x2,0x4
04db e003       |    |		Load	0x0,0x3
04dc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04dd 025e       | ^  |		Execute	Discrete,Convert
04de 1c01       |    |		Execute_Immediate	Run_Utility,0x1
04df 01cc       |    |		Execute	Vector,Catenate
04e0 0092 128c  |    |		Action	Push_String_Extended,0x128c					; ", nothing changed"
04e2 01cc       |    |		Execute	Vector,Catenate
04e3 821a       |    |		Call	0x1,0x1a
04e4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0xf = 0x4e4,0x9
04e5 4801       |H   |		Short_Literal	0x1
04e6 4800       |H   |		Short_Literal	0x0
04e7 e004       |    |		Load	0x0,0x4
04e8 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04e9 c407       |    |		Store	0x2,0x7
04ea 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x7.0x10 = 0x4ea,0xa
04eb 4802       |H   |		Short_Literal	0x2							; Debug Table 0x7.0x11 = 0x4eb,0xb
04ec e402       |    |		Load	0x2,0x2
04ed e001       |    |		Load	0x0,0x1
04ee 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
04ef 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
04f0 e003       |    |		Load	0x0,0x3								; Debug Table 0x7.0x12 = 0x4f0,0xc
04f1 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
04f2 4800       |H   |		Short_Literal	0x0
04f3 4801       |H   |		Short_Literal	0x1
04f4 00db       |    |		Load_Top	At_Offset_3
04f5 e405       |    |		Load	0x2,0x5
04f6 e001       |    |		Load	0x0,0x1
04f7 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
04f8 c404       |    |		Store	0x2,0x4
04f9 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x13 = 0x4f9,0xd
04fa 6813       |h   |		Jump_Zero	0x50e
04fb 0092 128d  |    |		Action	Push_String_Extended,0x128d					; "can't close unit: "
													; Debug Table 0x7.0x14 = 0x4fb,0xe
04fd e404       |    |		Load	0x2,0x4
04fe e003       |    |		Load	0x0,0x3
04ff 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0500 025e       | ^  |		Execute	Discrete,Convert
0501 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0502 01cc       |    |		Execute	Vector,Catenate
0503 0092 128c  |    |		Action	Push_String_Extended,0x128c					; ", nothing changed"
0505 01cc       |    |		Execute	Vector,Catenate
0506 821a       |    |		Call	0x1,0x1a
0507 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x15 = 0x507,0xf
0508 4801       |H   |		Short_Literal	0x1
0509 4800       |H   |		Short_Literal	0x0
050a e004       |    |		Load	0x0,0x4
050b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
050c c407       |    |		Store	0x2,0x7
050d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x7.0x16 = 0x50d,0x10
050e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x17 = 0x50e,0x11
050f 4801       |H   |		Short_Literal	0x1
0510 4801       |H   |		Short_Literal	0x1
0511 e004       |    |		Load	0x0,0x4
0512 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0513 c407       |    |		Store	0x2,0x7
0514 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x18 = 0x514,0x12
0515 e008       |    |		Load	0x0,0x8
0516 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0517 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0518 0092 12a2  |    |		Action	Push_String_Extended,0x12a2					; " has been changed to source"
051a 01cc       |    |		Execute	Vector,Catenate
051b 821b       |    |		Call	0x1,0x1b
051c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
051d			TRAP_0470:
051d 0007       |    |		Action	Break_Optional
051e 0092 12a3  |    |		Action	Push_String_Extended,0x12a3					; "Unexpected exception while changing "
													; Debug Table 0x7.0x19 = 0x51e,0x13
0520 e405       |    |		Load	0x2,0x5
0521 e008       |    |		Load	0x0,0x8
0522 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0523 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0524 01cc       |    |		Execute	Vector,Catenate
0525 0092 12a4  |    |		Action	Push_String_Extended,0x12a4					; " to source ("
0527 01cc       |    |		Execute	Vector,Catenate
0528 e007       |    |		Load	0x0,0x7
0529 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
052a 01cc       |    |		Execute	Vector,Catenate
052b 0092 12a5  |    |		Action	Push_String_Extended,0x12a5					; ")"
052d 01cc       |    |		Execute	Vector,Catenate
052e 821a       |    |		Call	0x1,0x1a
052f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x1a = 0x52f,0x14
0530 4801       |H   |		Short_Literal	0x1
0531 4800       |H   |		Short_Literal	0x0
0532 e004       |    |		Load	0x0,0x4
0533 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0534 c407       |    |		Store	0x2,0x7
0535 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0536 0000 0000  |    |		.XXX[0x2]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 054b       | K  |		.CONST	0x054b								; Address of begin
0539 0004       |    |		.CONST	0x0004								; Address of exception handler
053a 0004       |    |		.CONST	0x0004								; Number of locals
053b			INIT_0538:
053b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x8 = .DEBUG	0x053b,0x19f0,0x0001,0x0000,0x0058,0x5365,0x0000,0x005e
													; Debug Table 0x8.0x0 = 0x53b,0xffff
053c 029f 10eb  |    |		Declare_Subprogram	INIT_10e8,For_Call				; Debug Table 0x8.0x1 = 0x53c,0xfffe
053e 6041       |`A  |		Indirect_Literal	Discrete,0x580,{0x00000000, 0x005854a5}		; Debug Table 0x8.0x2 = 0x53e,0xfffd
053f 603c       |`<  |		Indirect_Literal	Discrete,0x57c,{0x00000000, 0x00000c9d}
0540 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
0541 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
0542 4803       |H   |		Short_Literal	0x3
0543 4802       |H   |		Short_Literal	0x2
0544 0099       |    |		Action	Reference_Dynamic
0545 4977       |Iw  |		Short_Literal	0x177
0546 00eb       |    |		Load_Encached	Diana_Cache
0547 0098       |    |		Execute	Package,Field_Read_Dynamic
0548 0387       |    |		Declare_Variable	Package
0549 00d8       |    |		Load_Top	At_Offset_0
054a 020f       |    |		Execute	Module,Activate
054b			BODY_0538:
054b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x3 = 0x54b,0x1
054c 8215       |    |		Call	0x1,0x15
054d 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
054e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8.0x4 = 0x54e,0x2
054f 00eb       |    |		Load_Encached	Diana_Cache
0550 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0551 7004       |p   |		Jump_Nonzero	0x556
0552 4801       |H   |		Short_Literal	0x1							; Debug Table 0x8.0x5 = 0x552,0x3
0553 00db       |    |		Load_Top	At_Offset_3
0554 00da       |    |		Load_Top	At_Offset_2
0555 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0556 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0557 0000       |    |		.XXX[0x1]
0558 ; --------------------------------------------------------------------------------------
0558 ; SUBPROGRAM
0558 ; --------------------------------------------------------------------------------------
0558 0560       | `  |		.CONST	0x0560								; Address of begin
0559 0579       | y  |		.CONST	0x0579								; Address of exception handler
055a 0003       |    |		.CONST	0x0003								; Number of locals
055b			INIT_0558:
055b 4973       |Is  |		Short_Literal	0x173							; Debug Table 0x9 = .DEBUG	0x055b,0x19fe,0x0002,0x0000,0x0058,0x5365,0x0000,0x0066
													; Debug Table 0x9.0x0 = 0x55b,0xffff
055c 00eb       |    |		Load_Encached	Diana_Cache
055d 0098       |    |		Execute	Package,Field_Read_Dynamic
055e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
055f 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x9.0x1 = 0x55f,0xfffe
0560			BODY_0558:
0560 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x2 = 0x560,0x1
0561 01db       |    |		Execute	Vector,Length
0562 7002       |p   |		Jump_Nonzero	0x565
0563 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x3 = 0x563,0x2
0564 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0565 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x4 = 0x565,0x3
0566 e006       |    |		Load	0x0,0x6
0567 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0568 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0569 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x5 = 0x569,0x4
056a 8215       |    |		Call	0x1,0x15
056b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
056c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x6 = 0x56c,0x5
056d 00eb       |    |		Load_Encached	Diana_Cache
056e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
056f 6802       |h   |		Jump_Zero	0x572
0570 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x7 = 0x570,0x6
0571 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0572 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x8 = 0x572,0x7
0573 00d9       |    |		Load_Top	At_Offset_1
0574 4973       |Is  |		Short_Literal	0x173
0575 00eb       |    |		Load_Encached	Diana_Cache
0576 0098       |    |		Execute	Package,Field_Read_Dynamic
0577 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
0578 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0579			TRAP_0558:
0579 0007       |    |		Action	Break_Optional
057a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x9 = 0x57a,0x8
057b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
057c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000c9d}
0580 0000 0000  |    |		.LITERAL	{0x00000000, 0x005854a5}
0584 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 058f       |    |		.CONST	0x058f								; Address of begin
0589 0004       |    |		.CONST	0x0004								; Address of exception handler
058a 0003       |    |		.CONST	0x0003								; Number of locals
058b			INIT_0588:
058b e008       |    |		Load	0x0,0x8								; Debug Table 0xa = .DEBUG	0x058b,0x1a14,0x0002,0x0000,0x0058,0x5365,0x0000,0x0073
													; Debug Table 0xa.0x0 = 0x58b,0xffff
058c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
058d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
058e 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa.0x1 = 0x58e,0xfffe
058f			BODY_0588:
058f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0x2 = 0x58f,0x1
0590 01db       |    |		Execute	Vector,Length
0591 7003       |p   |		Jump_Nonzero	0x595
0592 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0xa.0x3 = 0x592,0x2
0593 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0594 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0595 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0x4 = 0x595,0x3
0596 e008       |    |		Load	0x0,0x8
0597 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0598 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0599 682c       |h,  |		Jump_Zero	0x5c6
059a e008       |    |		Load	0x0,0x8								; Debug Table 0xa.0x5 = 0x59a,0x4
059b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
059c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
059d e008       |    |		Load	0x0,0x8
059e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
059f 67e4       |g   |		Indirect_Literal	Discrete,0x584,{0x00000000, 0x00004000}
05a0 e004       |    |		Load	0x0,0x4
05a1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
05a2 e009       |    |		Load	0x0,0x9
05a3 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
05a4 e008       |    |		Load	0x0,0x8
05a5 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05a6 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05a7 e5ff       |    |		Load	0x2,-0x1
05a8 e008       |    |		Load	0x0,0x8
05a9 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05aa 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
05ab 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
05ac 005a       | Z  |		Store_Top	Discrete,At_Offset_2
05ad 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0x6 = 0x5ad,0x5
05ae 6815       |h   |		Jump_Zero	0x5c4
05af 0092 12a6  |    |		Action	Push_String_Extended,0x12a6					; "can't resolve "
													; Debug Table 0xa.0x7 = 0x5af,0x6
05b1 e5ff       |    |		Load	0x2,-0x1
05b2 01cc       |    |		Execute	Vector,Catenate
05b3 0092 12a7  |    |		Action	Push_String_Extended,0x12a7					; " ("
05b5 01cc       |    |		Execute	Vector,Catenate
05b6 00da       |    |		Load_Top	At_Offset_2
05b7 e008       |    |		Load	0x0,0x8
05b8 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05b9 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05ba 025e       | ^  |		Execute	Discrete,Convert
05bb 1c01       |    |		Execute_Immediate	Run_Utility,0x1
05bc 01cc       |    |		Execute	Vector,Catenate
05bd 0092 12a5  |    |		Action	Push_String_Extended,0x12a5					; ")"
05bf 01cc       |    |		Execute	Vector,Catenate
05c0 821a       |    |		Call	0x1,0x1a
05c1 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0xa.0x8 = 0x5c1,0x7
05c2 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
05c3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05c4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x9 = 0x5c4,0x8
05c5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05c6 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0xa = 0x5c6,0x9
05c7 01dd       |    |		Execute	Vector,First
05c8 e5ff       |    |		Load	0x2,-0x1
05c9 01d7       |    |		Execute	Vector,Field_Read
05ca 0b21       | !  |		Execute_Immediate	Case_Compare,0x21
05cb 7005       |p   |		Jump_Nonzero	0x5d1
05cc 0b2a       | *  |		Execute_Immediate	Case_Compare,0x2a
05cd 700b       |p   |		Jump_Nonzero	0x5d9
05ce e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0xb = 0x5ce,0x10
05cf 821e       |    |		Call	0x1,0x1e
05d0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05d1 e009       |    |		Load	0x0,0x9								; Debug Table 0xa.0xc = 0x5d1,0xa
05d2 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
05d3 e008       |    |		Load	0x0,0x8
05d4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05d5 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05d6 e5ff       |    |		Load	0x2,-0x1
05d7 8228       | (  |		Call	0x1,0x28
05d8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05d9 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0xd = 0x5d9,0xb
05da 01db       |    |		Execute	Vector,Length
05db 0d02       |    |		Execute_Immediate	Less,0x2
05dc 6803       |h   |		Jump_Zero	0x5e0
05dd e00a       |    |		Load	0x0,0xa								; Debug Table 0xa.0xe = 0x5dd,0xc
05de 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
05df 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05e0 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0xf = 0x5e0,0xd
05e1 01dd       |    |		Execute	Vector,First
05e2 0a01       |    |		Execute_Immediate	Plus,0x1
05e3 0248       | H  |		Execute	Discrete,Check_In_Integer
05e4 e5ff       |    |		Load	0x2,-0x1
05e5 01d7       |    |		Execute	Vector,Field_Read
05e6 0f2e       | .  |		Execute_Immediate	Equal,0x2e
05e7 680c       |h   |		Jump_Zero	0x5f4
05e8 e00a       |    |		Load	0x0,0xa								; Debug Table 0xa.0x10 = 0x5e8,0xe
05e9 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
05ea e5ff       |    |		Load	0x2,-0x1
05eb 01dd       |    |		Execute	Vector,First
05ec 0a02       |    |		Execute_Immediate	Plus,0x2
05ed 0248       | H  |		Execute	Discrete,Check_In_Integer
05ee e5ff       |    |		Load	0x2,-0x1
05ef 01dc       |    |		Execute	Vector,Last
05f0 e5ff       |    |		Load	0x2,-0x1
05f1 01cf       |    |		Execute	Vector,Slice_Read
05f2 8228       | (  |		Call	0x1,0x28
05f3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05f4 e00a       |    |		Load	0x0,0xa								; Debug Table 0xa.0x11 = 0x5f4,0xf
05f5 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
05f6 e5ff       |    |		Load	0x2,-0x1
05f7 01dd       |    |		Execute	Vector,First
05f8 0a01       |    |		Execute_Immediate	Plus,0x1
05f9 0248       | H  |		Execute	Discrete,Check_In_Integer
05fa e5ff       |    |		Load	0x2,-0x1
05fb 01dc       |    |		Execute	Vector,Last
05fc e5ff       |    |		Load	0x2,-0x1
05fd 01cf       |    |		Execute	Vector,Slice_Read
05fe 8227       | '  |		Call	0x1,0x27
05ff 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0631       | 1  |		.CONST	0x0631								; Address of begin
0601 0699       |    |		.CONST	0x0699								; Address of exception handler
0602 000c       |    |		.CONST	0x000c								; Number of locals
0603			INIT_0600:
0603 0007       |    |		Action	Break_Optional							; Debug Table 0xb = .DEBUG	0x0603,0x1a3a,0x0001,0x0000,0x0058,0x5365,0x0000,0x007e
													; Debug Table 0xb.0x0 = 0x603,0xffff
0604 e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x1 = 0x604,0xfffe
0605 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0606 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0607 02c7       |    |		Declare_Variable	Any
0608 00d8       |    |		Load_Top	At_Offset_0
0609 1c00       |    |		Execute_Immediate	Run_Utility,0x0
060a 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xb.0x2 = 0x60a,0xfffd
060b e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x3 = 0x60b,0xfffc
060c 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
060d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
060e 02c7       |    |		Declare_Variable	Any
060f 00d8       |    |		Load_Top	At_Offset_0
0610 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0611 e008       |    |		Load	0x0,0x8								; Debug Table 0xb.0x4 = 0x611,0xfffb
0612 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0613 e008       |    |		Load	0x0,0x8								; Debug Table 0xb.0x5 = 0x613,0xfffa
0614 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0615 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0616 02c7       |    |		Declare_Variable	Any
0617 00d8       |    |		Load_Top	At_Offset_0
0618 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0619 e008       |    |		Load	0x0,0x8								; Debug Table 0xb.0x6 = 0x619,0xfff9
061a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
061b 02c7       |    |		Declare_Variable	Any
061c 00d8       |    |		Load_Top	At_Offset_0
061d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
061e e00b       |    |		Load	0x0,0xb								; Debug Table 0xb.0x7 = 0x61e,0xfff8
061f 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0620 0322       | "  |		Declare_Variable	Record
0621 00d8       |    |		Load_Top	At_Offset_0
0622 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0623 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x8 = 0x623,0xfff7
0624 e00c       |    |		Load	0x0,0xc
0625 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0626 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xb.0x9 = 0x626,0xfff6
0627 e004       |    |		Load	0x0,0x4								; Debug Table 0xb.0xa = 0x627,0xfff5
0628 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0629 02c7       |    |		Declare_Variable	Any
062a e005       |    |		Load	0x0,0x5
062b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
062c e004       |    |		Load	0x0,0x4
062d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
062e c40b       |    |		Store	0x2,0xb
062f 029f 10f3  |    |		Declare_Subprogram	INIT_10f0,For_Call
0631			BODY_0600:
0631 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0xb = 0x631,0x1
0632 01db       |    |		Execute	Vector,Length
0633 700a       |p   |		Jump_Nonzero	0x63e
0634 0092 128a  |    |		Action	Push_String_Extended,0x128a					; "on_node cannot be empty"
													; Debug Table 0xb.0xc = 0x634,0x2
0636 821a       |    |		Call	0x1,0x1a
0637 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0xd = 0x637,0x3
0638 4801       |H   |		Short_Literal	0x1
0639 4800       |H   |		Short_Literal	0x0
063a e004       |    |		Load	0x0,0x4
063b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
063c c40b       |    |		Store	0x2,0xb
063d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xb.0xe = 0x63d,0x4
063e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0xf = 0x63e,0x5
063f 8215       |    |		Call	0x1,0x15
0640 a403       |    |		Store_Unchecked	0x2,0x3
0641 e403       |    |		Load	0x2,0x3								; Debug Table 0xb.0x10 = 0x641,0x6
0642 00eb       |    |		Load_Encached	Diana_Cache
0643 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0644 6807       |h   |		Jump_Zero	0x64c
0645 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0x11 = 0x645,0x7
0646 4801       |H   |		Short_Literal	0x1
0647 4800       |H   |		Short_Literal	0x0
0648 e004       |    |		Load	0x0,0x4
0649 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
064a c40b       |    |		Store	0x2,0xb
064b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xb.0x12 = 0x64b,0x8
064c e008       |    |		Load	0x0,0x8								; Debug Table 0xb.0x13 = 0x64c,0x9
064d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
064e e406       |    |		Load	0x2,0x6
064f 0120       |    |		Execute	Any,Is_Value
0650 6804       |h   |		Jump_Zero	0x655
0651 e008       |    |		Load	0x0,0x8
0652 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0653 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0654 7801       |x   |		Jump	0x656
0655 e406       |    |		Load	0x2,0x6
0656 e403       |    |		Load	0x2,0x3
0657 e008       |    |		Load	0x0,0x8
0658 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0659 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
065a c406       |    |		Store	0x2,0x6
065b c405       |    |		Store	0x2,0x5
065c 0092 12a8  |    |		Action	Push_String_Extended,0x12a8					; "getting object from tree"
													; Debug Table 0xb.0x14 = 0x65c,0xa
065e e405       |    |		Load	0x2,0x5
065f 821c       |    |		Call	0x1,0x1c
0660 e406       |    |		Load	0x2,0x6								; Debug Table 0xb.0x15 = 0x660,0xb
0661 e008       |    |		Load	0x0,0x8
0662 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0663 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0664 c407       |    |		Store	0x2,0x7
0665 e005       |    |		Load	0x0,0x5								; Debug Table 0xb.0x16 = 0x665,0xc
0666 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0667 4800       |H   |		Short_Literal	0x0
0668 e001       |    |		Load	0x0,0x1
0669 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
066a 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
066b c404       |    |		Store	0x2,0x4
066c 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xb.0x17 = 0x66c,0xd
066d e408       |    |		Load	0x2,0x8
066e e00d       |    |		Load	0x0,0xd
066f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0670 4803       |H   |		Short_Literal	0x3
0671 e40b       |    |		Load	0x2,0xb
0672 e407       |    |		Load	0x2,0x7
0673 e00b       |    |		Load	0x0,0xb
0674 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0675 00d1       |    |		Pop_Control	Pop_Count_1
0676 005b       | [  |		Store_Top	Discrete,At_Offset_3
0677 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x18 = 0x677,0xe
0678 7002       |p   |		Jump_Nonzero	0x67b
0679 6262       |bb  |		Indirect_Literal	Discrete,0x8dc,{0x00000000, 0x5854a501}		; Debug Table 0xb.0x19 = 0x679,0xf
067a 0257       | W  |		Execute	Discrete,Raise
067b 840c       |    |		Call	0x2,0xc								; Debug Table 0xb.0x1a = 0x67b,0x10
067c e005       |    |		Load	0x0,0x5								; Debug Table 0xb.0x1b = 0x67c,0x11
067d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
067e 4800       |H   |		Short_Literal	0x0
067f e404       |    |		Load	0x2,0x4
0680 e001       |    |		Load	0x0,0x1
0681 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0682 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0683 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xb.0x1c = 0x683,0x12
0684 e408       |    |		Load	0x2,0x8
0685 e00d       |    |		Load	0x0,0xd
0686 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0687 e00b       |    |		Load	0x0,0xb
0688 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0689 00d1       |    |		Pop_Control	Pop_Count_1
068a 005b       | [  |		Store_Top	Discrete,At_Offset_3
068b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0x1d = 0x68b,0x13
068c 4801       |H   |		Short_Literal	0x1
068d e40a       |    |		Load	0x2,0xa
068e e004       |    |		Load	0x0,0x4
068f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0690 c40b       |    |		Store	0x2,0xb
0691 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x1e = 0x691,0x14
0692 6805       |h   |		Jump_Zero	0x698
0693 0092 12a9  |    |		Action	Push_String_Extended,0x12a9					; "Changed symrep to "
													; Debug Table 0xb.0x1f = 0x693,0x15
0695 e409       |    |		Load	0x2,0x9
0696 01cc       |    |		Execute	Vector,Catenate
0697 821b       |    |		Call	0x1,0x1b
0698 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0699			TRAP_0600:
0699 6242       |bB  |		Indirect_Literal	Discrete,0x8dc,{0x00000000, 0x5854a501}
069a 010f       |    |		Execute	Exception,Equal
069b 6807       |h   |		Jump_Zero	0x6a3
069c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x20 = 0x69c,0x16
069d 4801       |H   |		Short_Literal	0x1
069e 4800       |H   |		Short_Literal	0x0
069f e004       |    |		Load	0x0,0x4
06a0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
06a1 c40b       |    |		Store	0x2,0xb
06a2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
06a3 0092 1291  |    |		Action	Push_String_Extended,0x1291					; "Unexpected exception "
													; Debug Table 0xb.0x21 = 0x6a3,0x17
06a5 e007       |    |		Load	0x0,0x7
06a6 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
06a7 01cc       |    |		Execute	Vector,Catenate
06a8 0092 12aa  |    |		Action	Push_String_Extended,0x12aa					; ", nothing_changed"
06aa 01cc       |    |		Execute	Vector,Catenate
06ab 821a       |    |		Call	0x1,0x1a
06ac 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x22 = 0x6ac,0x18
06ad 4801       |H   |		Short_Literal	0x1
06ae 4800       |H   |		Short_Literal	0x0
06af e004       |    |		Load	0x0,0x4
06b0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
06b1 c40b       |    |		Store	0x2,0xb
06b2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
06b3 0000 0000  |    |		.BLANK	0000[0x5]
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06d8       |    |		.CONST	0x06d8								; Address of begin
06b9 0735       | 5  |		.CONST	0x0735								; Address of exception handler
06ba 0008       |    |		.CONST	0x0008								; Number of locals
06bb			INIT_06b8:
06bb 0007       |    |		Action	Break_Optional							; Debug Table 0xc = .DEBUG	0x06bb,0x1a82,0x0001,0x0000,0x0058,0x5365,0x0000,0x008a
													; Debug Table 0xc.0x0 = 0x6bb,0xffff
06bc 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xc.0x1 = 0x6bc,0xfffe
06bd e008       |    |		Load	0x0,0x8								; Debug Table 0xc.0x2 = 0x6bd,0xfffd
06be 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06bf e008       |    |		Load	0x0,0x8								; Debug Table 0xc.0x3 = 0x6bf,0xfffc
06c0 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
06c1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
06c2 02c7       |    |		Declare_Variable	Any
06c3 00d8       |    |		Load_Top	At_Offset_0
06c4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06c5 e008       |    |		Load	0x0,0x8								; Debug Table 0xc.0x4 = 0x6c5,0xfffb
06c6 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
06c7 02c7       |    |		Declare_Variable	Any
06c8 00d8       |    |		Load_Top	At_Offset_0
06c9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06ca e00b       |    |		Load	0x0,0xb								; Debug Table 0xc.0x5 = 0x6ca,0xfffa
06cb 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
06cc 0322       | "  |		Declare_Variable	Record
06cd 00d8       |    |		Load_Top	At_Offset_0
06ce 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06cf 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xc.0x6 = 0x6cf,0xfff9
06d0 e004       |    |		Load	0x0,0x4								; Debug Table 0xc.0x7 = 0x6d0,0xfff8
06d1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06d2 02c7       |    |		Declare_Variable	Any
06d3 e005       |    |		Load	0x0,0x5
06d4 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
06d5 e004       |    |		Load	0x0,0x4
06d6 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
06d7 c408       |    |		Store	0x2,0x8
06d8			BODY_06b8:
06d8 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x8 = 0x6d8,0x1
06d9 01db       |    |		Execute	Vector,Length
06da 700a       |p   |		Jump_Nonzero	0x6e5
06db 0092 12ab  |    |		Action	Push_String_Extended,0x12ab					; "item name cannot be empty"
													; Debug Table 0xc.0x9 = 0x6db,0x2
06dd 821a       |    |		Call	0x1,0x1a
06de 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xa = 0x6de,0x3
06df 4801       |H   |		Short_Literal	0x1
06e0 4800       |H   |		Short_Literal	0x0
06e1 e004       |    |		Load	0x0,0x4
06e2 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
06e3 c408       |    |		Store	0x2,0x8
06e4 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0xc.0xb = 0x6e4,0x4
06e5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0xc = 0x6e5,0x5
06e6 8215       |    |		Call	0x1,0x15
06e7 a402       |    |		Store_Unchecked	0x2,0x2
06e8 e402       |    |		Load	0x2,0x2								; Debug Table 0xc.0xd = 0x6e8,0x6
06e9 00eb       |    |		Load_Encached	Diana_Cache
06ea 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
06eb 6807       |h   |		Jump_Zero	0x6f3
06ec 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xe = 0x6ec,0x7
06ed 4801       |H   |		Short_Literal	0x1
06ee 4800       |H   |		Short_Literal	0x0
06ef e004       |    |		Load	0x0,0x4
06f0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
06f1 c408       |    |		Store	0x2,0x8
06f2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0xc.0xf = 0x6f2,0x8
06f3 e008       |    |		Load	0x0,0x8								; Debug Table 0xc.0x10 = 0x6f3,0x9
06f4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06f5 e404       |    |		Load	0x2,0x4
06f6 0120       |    |		Execute	Any,Is_Value
06f7 6804       |h   |		Jump_Zero	0x6fc
06f8 e008       |    |		Load	0x0,0x8
06f9 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
06fa 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
06fb 7801       |x   |		Jump	0x6fd
06fc e404       |    |		Load	0x2,0x4
06fd e402       |    |		Load	0x2,0x2
06fe e008       |    |		Load	0x0,0x8
06ff 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0700 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0701 c404       |    |		Store	0x2,0x4
0702 c403       |    |		Store	0x2,0x3
0703 0092 12a8  |    |		Action	Push_String_Extended,0x12a8					; "getting object from tree"
													; Debug Table 0xc.0x11 = 0x703,0xa
0705 e403       |    |		Load	0x2,0x3
0706 821c       |    |		Call	0x1,0x1c
0707 e404       |    |		Load	0x2,0x4								; Debug Table 0xc.0x12 = 0x707,0xb
0708 e008       |    |		Load	0x0,0x8
0709 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
070a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
070b c405       |    |		Store	0x2,0x5
070c 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xc.0x13 = 0x70c,0xc
070d 00db       |    |		Load_Top	At_Offset_3
070e e00d       |    |		Load	0x0,0xd
070f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0710 4803       |H   |		Short_Literal	0x3
0711 e408       |    |		Load	0x2,0x8
0712 e405       |    |		Load	0x2,0x5
0713 e00b       |    |		Load	0x0,0xb
0714 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0715 00d1       |    |		Pop_Control	Pop_Count_1
0716 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0717 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x14 = 0x717,0xd
0718 7002       |p   |		Jump_Nonzero	0x71b
0719 61c2       |a   |		Indirect_Literal	Discrete,0x8dc,{0x00000000, 0x5854a501}		; Debug Table 0xc.0x15 = 0x719,0xe
071a 0257       | W  |		Execute	Discrete,Raise
071b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc.0x16 = 0x71b,0xf
071c 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
071d e402       |    |		Load	0x2,0x2
071e e406       |    |		Load	0x2,0x6
071f 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0720 e008       |    |		Load	0x0,0x8
0721 1b40       | @  |		Execute	Package,Field_Read,Field_Number 0x40
0722 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0723 00eb       |    |		Load_Encached	Diana_Cache
0724 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0725 8229       | )  |		Call	0x1,0x29
0726 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xc.0x17 = 0x726,0x10
0727 00db       |    |		Load_Top	At_Offset_3
0728 e00d       |    |		Load	0x0,0xd
0729 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
072a e00b       |    |		Load	0x0,0xb
072b 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
072c 00d1       |    |		Pop_Control	Pop_Count_1
072d 005a       | Z  |		Store_Top	Discrete,At_Offset_2
072e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x18 = 0x72e,0x11
072f 4801       |H   |		Short_Literal	0x1
0730 00db       |    |		Load_Top	At_Offset_3
0731 e004       |    |		Load	0x0,0x4
0732 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0733 c408       |    |		Store	0x2,0x8
0734 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0735			TRAP_06b8:
0735 61a6       |a   |		Indirect_Literal	Discrete,0x8dc,{0x00000000, 0x5854a501}
0736 010f       |    |		Execute	Exception,Equal
0737 6807       |h   |		Jump_Zero	0x73f
0738 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x19 = 0x738,0x12
0739 4801       |H   |		Short_Literal	0x1
073a 4800       |H   |		Short_Literal	0x0
073b e004       |    |		Load	0x0,0x4
073c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
073d c408       |    |		Store	0x2,0x8
073e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
073f 0092 12ac  |    |		Action	Push_String_Extended,0x12ac					; "Unexpected exception: "
													; Debug Table 0xc.0x1a = 0x73f,0x13
0741 e007       |    |		Load	0x0,0x7
0742 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0743 01cc       |    |		Execute	Vector,Catenate
0744 0092 12ad  |    |		Action	Push_String_Extended,0x12ad					; " while removing item"
0746 01cc       |    |		Execute	Vector,Catenate
0747 821a       |    |		Call	0x1,0x1a
0748 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x1b = 0x748,0x14
0749 4801       |H   |		Short_Literal	0x1
074a 4800       |H   |		Short_Literal	0x0
074b e004       |    |		Load	0x0,0x4
074c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
074d c408       |    |		Store	0x2,0x8
074e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
074f 0000       |    |		.XXX[0x1]
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 0753       | S  |		.CONST	0x0753								; Address of begin
0751 0004       |    |		.CONST	0x0004								; Address of exception handler
0752 0001       |    |		.CONST	0x0001								; Number of locals
0753			BODY_0750:
0753			INIT_0750:
0753 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd = .DEBUG	0x0753,0x1abc,0x0001,0x0000,0x0058,0x54a5,0x0000,0x003f
													; Debug Table 0xd.0x0 = 0x753,0x1
0754 e00e       |    |		Load	0x0,0xe
0755 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
0756 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0757 0000       |    |		.XXX[0x1]
0758 ; --------------------------------------------------------------------------------------
0758 ; SUBPROGRAM
0758 ; --------------------------------------------------------------------------------------
0758 075b       | [  |		.CONST	0x075b								; Address of begin
0759 0004       |    |		.CONST	0x0004								; Address of exception handler
075a 0001       |    |		.CONST	0x0001								; Number of locals
075b			BODY_0758:
075b			INIT_0758:
075b 4801       |H   |		Short_Literal	0x1							; Debug Table 0xe = .DEBUG	0x075b,0x1ac0,0x0001,0x0000,0x0058,0x54a5,0x0000,0x0051
													; Debug Table 0xe.0x0 = 0x75b,0x1
075c e00e       |    |		Load	0x0,0xe
075d 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
075e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
075f 0000       |    |		.XXX[0x1]
0760 ; --------------------------------------------------------------------------------------
0760 ; SUBPROGRAM
0760 ; --------------------------------------------------------------------------------------
0760 0763       | c  |		.CONST	0x0763								; Address of begin
0761 0004       |    |		.CONST	0x0004								; Address of exception handler
0762 0001       |    |		.CONST	0x0001								; Number of locals
0763			BODY_0760:
0763			INIT_0760:
0763 0092 12ae  |    |		Action	Push_String_Extended,0x12ae					; "*** "
													; Debug Table 0xf = .DEBUG	0x0763,0x1ac4,0x0001,0x0000,0x0058,0x54a5,0x0000,0x005e
													; Debug Table 0xf.0x0 = 0x763,0x1
0765 00db       |    |		Load_Top	At_Offset_3
0766 01cc       |    |		Execute	Vector,Catenate
0767 8218       |    |		Call	0x1,0x18
0768 8219       |    |		Call	0x1,0x19							; Debug Table 0xf.0x1 = 0x768,0x2
0769 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
076a 0000 0000  |    |		.BLANK	0000[0x6]
0770 ; --------------------------------------------------------------------------------------
0770 ; SUBPROGRAM
0770 ; --------------------------------------------------------------------------------------
0770 0773       | s  |		.CONST	0x0773								; Address of begin
0771 0004       |    |		.CONST	0x0004								; Address of exception handler
0772 0001       |    |		.CONST	0x0001								; Number of locals
0773			BODY_0770:
0773			INIT_0770:
0773 0092 12af  |    |		Action	Push_String_Extended,0x12af					; "+++ "
													; Debug Table 0x10 = .DEBUG	0x0773,0x1aca,0x0001,0x0000,0x0058,0x54a5,0x0000,0x0075
													; Debug Table 0x10.0x0 = 0x773,0x1
0775 00db       |    |		Load_Top	At_Offset_3
0776 01cc       |    |		Execute	Vector,Catenate
0777 8218       |    |		Call	0x1,0x18
0778 8219       |    |		Call	0x1,0x19							; Debug Table 0x10.0x1 = 0x778,0x2
0779 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
077a 0000 0000  |    |		.BLANK	0000[0x6]
0780 ; --------------------------------------------------------------------------------------
0780 ; SUBPROGRAM
0780 ; --------------------------------------------------------------------------------------
0780 0783       |    |		.CONST	0x0783								; Address of begin
0781 0004       |    |		.CONST	0x0004								; Address of exception handler
0782 0001       |    |		.CONST	0x0001								; Number of locals
0783			BODY_0780:
0783			INIT_0780:
0783 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11 = .DEBUG	0x0783,0x1ad0,0x0001,0x0000,0x0058,0x54a5,0x0000,0x008c
													; Debug Table 0x11.0x0 = 0x783,0x1
0784 6810       |h   |		Jump_Zero	0x795
0785 0092 12b0  |    |		Action	Push_String_Extended,0x12b0					; "while "
													; Debug Table 0x11.0x1 = 0x785,0x2
0787 e5fe       |    |		Load	0x2,-0x2
0788 01cc       |    |		Execute	Vector,Catenate
0789 0092 12b1  |    |		Action	Push_String_Extended,0x12b1					; ", status = "
078b 01cc       |    |		Execute	Vector,Catenate
078c 00db       |    |		Load_Top	At_Offset_3
078d e008       |    |		Load	0x0,0x8
078e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
078f 025e       | ^  |		Execute	Discrete,Convert
0790 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0791 01cc       |    |		Execute	Vector,Catenate
0792 821a       |    |		Call	0x1,0x1a
0793 6148       |aH  |		Indirect_Literal	Discrete,0x8dc,{0x00000000, 0x5854a501}		; Debug Table 0x11.0x2 = 0x793,0x3
0794 0257       | W  |		Execute	Discrete,Raise
0795 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0796 0000 0000  |    |		.XXX[0x2]
0798 ; --------------------------------------------------------------------------------------
0798 ; SUBPROGRAM
0798 ; --------------------------------------------------------------------------------------
0798 079b       |    |		.CONST	0x079b								; Address of begin
0799 0004       |    |		.CONST	0x0004								; Address of exception handler
079a 0001       |    |		.CONST	0x0001								; Number of locals
079b			BODY_0798:
079b			INIT_0798:
079b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12 = .DEBUG	0x079b,0x1ad8,0x0001,0x0000,0x0058,0x54a5,0x0000,0x00c2
													; Debug Table 0x12.0x0 = 0x79b,0x1
079c 6810       |h   |		Jump_Zero	0x7ad
079d 0092 12b0  |    |		Action	Push_String_Extended,0x12b0					; "while "
													; Debug Table 0x12.0x1 = 0x79d,0x2
079f e5fe       |    |		Load	0x2,-0x2
07a0 01cc       |    |		Execute	Vector,Catenate
07a1 0092 12b1  |    |		Action	Push_String_Extended,0x12b1					; ", status = "
07a3 01cc       |    |		Execute	Vector,Catenate
07a4 00db       |    |		Load_Top	At_Offset_3
07a5 e003       |    |		Load	0x0,0x3
07a6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
07a7 025e       | ^  |		Execute	Discrete,Convert
07a8 1c01       |    |		Execute_Immediate	Run_Utility,0x1
07a9 01cc       |    |		Execute	Vector,Catenate
07aa 821a       |    |		Call	0x1,0x1a
07ab 6130       |a0  |		Indirect_Literal	Discrete,0x8dc,{0x00000000, 0x5854a501}		; Debug Table 0x12.0x2 = 0x7ab,0x3
07ac 0257       | W  |		Execute	Discrete,Raise
07ad 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
07ae 0000 0000  |    |		.XXX[0x2]
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07cc       |    |		.CONST	0x07cc								; Address of begin
07b1 0004       |    |		.CONST	0x0004								; Address of exception handler
07b2 000b       |    |		.CONST	0x000b								; Number of locals
07b3			INIT_07b0:
07b3 0007       |    |		Action	Break_Optional							; Debug Table 0x13 = .DEBUG	0x07b3,0x1ae0,0x0002,0x0000,0x0058,0x54a5,0x0000,0x00fb
													; Debug Table 0x13.0x0 = 0x7b3,0xffff
07b4 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x13.0x1 = 0x7b4,0xfffe
07b5 02a0       |    |		Declare_Subprogram	Null_Subprogram					; Debug Table 0x13.0x2 = 0x7b5,0xfffd
07b6 4800       |H   |		Short_Literal	0x0
07b7 032d       | -  |		Declare_Type	Record,Defined
07b8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x3 = 0x7b8,0xfffc
07b9 02a0       |    |		Declare_Subprogram	Null_Subprogram
07ba 03ad       |    |		Declare_Type	Heap_Access,Defined
07bb 0007       |    |		Action	Break_Optional							; Debug Table 0x13.0x4 = 0x7bb,0xfffb
07bc 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x13.0x5 = 0x7bc,0xfffa
07bd e402       |    |		Load	0x2,0x2								; Debug Table 0x13.0x6 = 0x7bd,0xfff9
07be 0007       |    |		Action	Break_Optional
07bf e002       |    |		Load	0x0,0x2								; Debug Table 0x13.0x7 = 0x7bf,0xfff8
07c0 1919       |    |		Execute	Package,Field_Reference,Field_Number 0x19
07c1 00c6       |    |		Action	Check_Subprogram_Elaborated
07c2 00d9       |    |		Load_Top	At_Offset_1
07c3 00d9       |    |		Load_Top	At_Offset_1
07c4 65bb       |e   |		Indirect_Literal	Discrete,0x580,{0x00000000, 0x005854a5}
07c5 493e       |I>  |		Short_Literal	0x13e
07c6 4809       |H   |		Short_Literal	0x9
07c7 0007       |    |		Action	Break_Optional
07c8 029f 1123  |   #|		Declare_Subprogram	INIT_1120,For_Call				; Debug Table 0x13.0x8 = 0x7c8,0xfff7
07ca 029f 1133  |   3|		Declare_Subprogram	INIT_1130,For_Call				; Debug Table 0x13.0x9 = 0x7ca,0xfff6
07cc			BODY_07b0:
07cc e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x13.0xa = 0x7cc,0x1
07cd 840b       |    |		Call	0x2,0xb
07ce 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07cf 0000       |    |		.XXX[0x1]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07d6       |    |		.CONST	0x07d6								; Address of begin
07d1 0004       |    |		.CONST	0x0004								; Address of exception handler
07d2 0003       |    |		.CONST	0x0003								; Number of locals
07d3			INIT_07d0:
07d3 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x14 = .DEBUG	0x07d3,0x1af8,0x0001,0x0000,0x0058,0x54a5,0x0000,0x028f
													; Debug Table 0x14.0x0 = 0x7d3,0xffff
07d4 029f 11b3  |    |		Declare_Subprogram	INIT_11b0,For_Call
07d6			BODY_07d0:
07d6 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0x1 = 0x7d6,0x1
07d7 a5fd       |    |		Store_Unchecked	0x2,-0x3
07d8 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x14.0x2 = 0x7d8,0x2
07d9 01dc       |    |		Execute	Vector,Last
07da a5fe       |    |		Store_Unchecked	0x2,-0x2
07db 00cf       |    |		Action	Mark_Auxiliary
07dc e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x14.0x3 = 0x7dc,0x3
07dd 01d9       |    |		Execute	Vector,Reverse_Bounds
07de 0263       | c  |		Execute	Discrete,Above_Bound
07df 700d       |p   |		Jump_Nonzero	0x7ed
07e0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x4 = 0x7e0,0x4
07e1 e5ff       |    |		Load	0x2,-0x1
07e2 01d7       |    |		Execute	Vector,Field_Read
07e3 0f27       | '  |		Execute_Immediate	Equal,0x27
07e4 6806       |h   |		Jump_Zero	0x7eb
07e5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x5 = 0x7e5,0x5
07e6 0aff       |    |		Execute_Immediate	Plus,-0x1
07e7 0248       | H  |		Execute	Discrete,Check_In_Integer
07e8 a5fe       |    |		Store_Unchecked	0x2,-0x2
07e9 8403       |    |		Call	0x2,0x3								; Debug Table 0x14.0x6 = 0x7e9,0x6
07ea 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x14.0x7 = 0x7ea,0x7
07eb 00c8       |    |		Action	Pop_Auxiliary_Range
07ec 3ff3       |?   |		Loop_Increasing	0x7e0
07ed 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
07ee 0000 0000  |    |		.XXX[0x2]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07ff       |    |		.CONST	0x07ff								; Address of begin
07f1 08d2       |    |		.CONST	0x08d2								; Address of exception handler
07f2 0007       |    |		.CONST	0x0007								; Number of locals
07f3			INIT_07f0:
07f3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x15 = .DEBUG	0x07f3,0x1b0a,0x0002,0x0000,0x0058,0x54a5,0x0000,0x0312
													; Debug Table 0x15.0x0 = 0x7f3,0xffff
07f4 00db       |    |		Load_Top	At_Offset_3
07f5 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
07f6 00ef       |    |		Load_Encached	Diana_Sequence_Cache					; Debug Table 0x15.0x1 = 0x7f6,0xfffe
07f7 e00f       |    |		Load	0x0,0xf								; Debug Table 0x15.0x2 = 0x7f7,0xfffd
07f8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
07f9 02c7       |    |		Declare_Variable	Any
07fa 00d8       |    |		Load_Top	At_Offset_0
07fb 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07fc 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x15.0x3 = 0x7fc,0xfffc
07fd 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x15.0x4 = 0x7fd,0xfffb
07fe 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x15.0x5 = 0x7fe,0xfffa
07ff			BODY_07f0:
07ff 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x15.0x6 = 0x7ff,0x1
0800 00e2       |    |		Load_Encached	Integer_Cache
0801 e5fe       |    |		Load	0x2,-0x2
0802 821f       |    |		Call	0x1,0x1f
0803 005b       | [  |		Store_Top	Discrete,At_Offset_3
0804 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0805 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x7 = 0x805,0x2
0806 4fff       |O   |		Short_Literal	-0x1
0807 027f       |    |		Execute	Discrete,Equal
0808 6803       |h   |		Jump_Zero	0x80c
0809 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x15.0x8 = 0x809,0x3
080a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
080b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
080c 00cf       |    |		Action	Mark_Auxiliary
080d 0007       |    |		Action	Break_Optional							; Debug Table 0x15.0x9 = 0x80d,0x4
080e e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0xa = 0x80e,0x5
080f 00eb       |    |		Load_Encached	Diana_Cache
0810 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0811 0ba8       |    |		Execute_Immediate	Case_Compare,0xa8
0812 701a       |p   |		Jump_Nonzero	0x82d
0813 0b49       | I  |		Execute_Immediate	Case_Compare,0x49
0814 701d       |p   |		Jump_Nonzero	0x832
0815 0b47       | G  |		Execute_Immediate	Case_Compare,0x47
0816 7020       |p   |		Jump_Nonzero	0x837
0817 0b48       | H  |		Execute_Immediate	Case_Compare,0x48
0818 701e       |p   |		Jump_Nonzero	0x837
0819 0b46       | F  |		Execute_Immediate	Case_Compare,0x46
081a 701c       |p   |		Jump_Nonzero	0x837
081b 0b3e       | >  |		Execute_Immediate	Case_Compare,0x3e
081c 701f       |p   |		Jump_Nonzero	0x83c
081d 0b41       | A  |		Execute_Immediate	Case_Compare,0x41
081e 7022       |p"  |		Jump_Nonzero	0x841
081f 0b7c       | |  |		Execute_Immediate	Case_Compare,0x7c
0820 7025       |p%  |		Jump_Nonzero	0x846
0821 0b4e       | N  |		Execute_Immediate	Case_Compare,0x4e
0822 7028       |p(  |		Jump_Nonzero	0x84b
0823 0b7a       | z  |		Execute_Immediate	Case_Compare,0x7a
0824 702b       |p+  |		Jump_Nonzero	0x850
0825 0b7b       | {  |		Execute_Immediate	Case_Compare,0x7b
0826 7029       |p)  |		Jump_Nonzero	0x850
0827 0b79       | y  |		Execute_Immediate	Case_Compare,0x79
0828 7027       |p'  |		Jump_Nonzero	0x850
0829 0b94       |    |		Execute_Immediate	Case_Compare,0x94
082a 702a       |p*  |		Jump_Nonzero	0x855
082b 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x15.0xb = 0x82b,0x19
082c 786a       |xj  |		Jump	0x897
082d e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0xc = 0x82d,0x6
082e 00eb       |    |		Load_Encached	Diana_Cache
082f 18e9       |    |		Execute	Package,Field_Execute,Field_Number 0xe9
0830 a402       |    |		Store_Unchecked	0x2,0x2
0831 7862       |xb  |		Jump	0x894
0832 e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0xd = 0x832,0x7
0833 00eb       |    |		Load_Encached	Diana_Cache
0834 18e5       |    |		Execute	Package,Field_Execute,Field_Number 0xe5
0835 a402       |    |		Store_Unchecked	0x2,0x2
0836 785d       |x]  |		Jump	0x894
0837 e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0xe = 0x837,0x8
0838 00eb       |    |		Load_Encached	Diana_Cache
0839 18b6       |    |		Execute	Package,Field_Execute,Field_Number 0xb6
083a a402       |    |		Store_Unchecked	0x2,0x2
083b 7858       |xX  |		Jump	0x894
083c e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0xf = 0x83c,0x9
083d 00eb       |    |		Load_Encached	Diana_Cache
083e 18d8       |    |		Execute	Package,Field_Execute,Field_Number 0xd8
083f a402       |    |		Store_Unchecked	0x2,0x2
0840 7853       |xS  |		Jump	0x894
0841 e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0x10 = 0x841,0xa
0842 00eb       |    |		Load_Encached	Diana_Cache
0843 18cc       |    |		Execute	Package,Field_Execute,Field_Number 0xcc
0844 a402       |    |		Store_Unchecked	0x2,0x2
0845 784e       |xN  |		Jump	0x894
0846 e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0x11 = 0x846,0xb
0847 00eb       |    |		Load_Encached	Diana_Cache
0848 18bd       |    |		Execute	Package,Field_Execute,Field_Number 0xbd
0849 a402       |    |		Store_Unchecked	0x2,0x2
084a 7849       |xI  |		Jump	0x894
084b e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0x12 = 0x84b,0xc
084c 00eb       |    |		Load_Encached	Diana_Cache
084d 18d1       |    |		Execute	Package,Field_Execute,Field_Number 0xd1
084e a402       |    |		Store_Unchecked	0x2,0x2
084f 7844       |xD  |		Jump	0x894
0850 e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0x13 = 0x850,0xd
0851 00eb       |    |		Load_Encached	Diana_Cache
0852 18da       |    |		Execute	Package,Field_Execute,Field_Number 0xda
0853 a402       |    |		Store_Unchecked	0x2,0x2
0854 783f       |x?  |		Jump	0x894
0855 e404       |    |		Load	0x2,0x4								; Debug Table 0x15.0x14 = 0x855,0xe
0856 0120       |    |		Execute	Any,Is_Value
0857 6803       |h   |		Jump_Zero	0x85b
0858 e00f       |    |		Load	0x0,0xf
0859 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
085a 7801       |x   |		Jump	0x85c
085b e404       |    |		Load	0x2,0x4
085c e402       |    |		Load	0x2,0x2
085d e00f       |    |		Load	0x0,0xf
085e 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
085f c404       |    |		Store	0x2,0x4
0860 00cf       |    |		Action	Mark_Auxiliary
0861 7825       |x%  |		Jump	0x887
0862 e404       |    |		Load	0x2,0x4								; Debug Table 0x15.0x15 = 0x862,0x10
0863 e00f       |    |		Load	0x0,0xf
0864 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0865 a405       |    |		Store_Unchecked	0x2,0x5
0866 e405       |    |		Load	0x2,0x5								; Debug Table 0x15.0x16 = 0x866,0x11
0867 00eb       |    |		Load_Encached	Diana_Cache
0868 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0869 00eb       |    |		Load_Encached	Diana_Cache
086a 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
086b e00c       |    |		Load	0x0,0xc
086c 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
086d e5fe       |    |		Load	0x2,-0x2
086e 01dd       |    |		Execute	Vector,First
086f e406       |    |		Load	0x2,0x6
0870 e5fe       |    |		Load	0x2,-0x2
0871 01cf       |    |		Execute	Vector,Slice_Read
0872 01de       |    |		Execute	Vector,Not_Equal
0873 6805       |h   |		Jump_Zero	0x879
0874 e404       |    |		Load	0x2,0x4								; Debug Table 0x15.0x17 = 0x874,0x12
0875 e00f       |    |		Load	0x0,0xf
0876 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0877 c404       |    |		Store	0x2,0x4
0878 780d       |x   |		Jump	0x886
0879 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x15.0x18 = 0x879,0x13
087a 0f01       |    |		Execute_Immediate	Equal,0x1
087b 6802       |h   |		Jump_Zero	0x87e
087c e405       |    |		Load	0x2,0x5								; Debug Table 0x15.0x19 = 0x87c,0x14
087d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
087e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x15.0x1a = 0x87e,0x15
087f 0aff       |    |		Execute_Immediate	Plus,-0x1
0880 0248       | H  |		Execute	Discrete,Check_In_Integer
0881 a407       |    |		Store_Unchecked	0x2,0x7
0882 e404       |    |		Load	0x2,0x4								; Debug Table 0x15.0x1b = 0x882,0x16
0883 e00f       |    |		Load	0x0,0xf
0884 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0885 c404       |    |		Store	0x2,0x4
0886 00c9       |    |		Action	Pop_Auxiliary_Loop
0887 e404       |    |		Load	0x2,0x4								; Debug Table 0x15.0x1c = 0x887,0xf
0888 e00f       |    |		Load	0x0,0xf
0889 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
088a 6fd7       |o   |		Jump_Zero	0x862
088b 00ce       |    |		Action	Pop_Auxiliary
088c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x15.0x1d = 0x88c,0x17
088d 0092 12b2  |    |		Action	Push_String_Extended,0x12b2					; " cannot be identified"
088f 01cc       |    |		Execute	Vector,Catenate
0890 821a       |    |		Call	0x1,0x1a
0891 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x15.0x1e = 0x891,0x18
0892 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0893 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0894 00d1       |    |		Pop_Control	Pop_Count_1
0895 00c9       |    |		Action	Pop_Auxiliary_Loop
0896 7f77       | w  |		Jump	0x80e
0897 00ce       |    |		Action	Pop_Auxiliary
0898 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x15.0x1f = 0x898,0x1a
0899 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
089a e5fe       |    |		Load	0x2,-0x2
089b e402       |    |		Load	0x2,0x2
089c 4972       |Ir  |		Short_Literal	0x172
089d 00eb       |    |		Load_Encached	Diana_Cache
089e 0098       |    |		Execute	Package,Field_Read_Dynamic
089f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
08a0 a403       |    |		Store_Unchecked	0x2,0x3
08a1 e403       |    |		Load	0x2,0x3								; Debug Table 0x15.0x20 = 0x8a1,0x1b
08a2 00eb       |    |		Load_Encached	Diana_Cache
08a3 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
08a4 6808       |h   |		Jump_Zero	0x8ad
08a5 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x15.0x21 = 0x8a5,0x1c
08a6 0092 12b2  |    |		Action	Push_String_Extended,0x12b2					; " cannot be identified"
08a8 01cc       |    |		Execute	Vector,Catenate
08a9 821a       |    |		Call	0x1,0x1a
08aa 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x15.0x22 = 0x8aa,0x1d
08ab 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
08ac 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
08ad 00cf       |    |		Action	Mark_Auxiliary
08ae 0007       |    |		Action	Break_Optional							; Debug Table 0x15.0x23 = 0x8ae,0x1e
08af 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x15.0x24 = 0x8af,0x1f
08b0 0f01       |    |		Execute_Immediate	Equal,0x1
08b1 6804       |h   |		Jump_Zero	0x8b6
08b2 e403       |    |		Load	0x2,0x3								; Debug Table 0x15.0x25 = 0x8b2,0x20
08b3 00eb       |    |		Load_Encached	Diana_Cache
08b4 1865       | e  |		Execute	Package,Field_Execute,Field_Number 0x65
08b5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
08b6 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x15.0x26 = 0x8b6,0x21
08b7 0aff       |    |		Execute_Immediate	Plus,-0x1
08b8 0248       | H  |		Execute	Discrete,Check_In_Integer
08b9 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
08ba e403       |    |		Load	0x2,0x3								; Debug Table 0x15.0x27 = 0x8ba,0x22
08bb 00eb       |    |		Load_Encached	Diana_Cache
08bc 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
08bd a403       |    |		Store_Unchecked	0x2,0x3
08be e403       |    |		Load	0x2,0x3								; Debug Table 0x15.0x28 = 0x8be,0x23
08bf 00eb       |    |		Load_Encached	Diana_Cache
08c0 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
08c1 7002       |p   |		Jump_Nonzero	0x8c4
08c2 00c9       |    |		Action	Pop_Auxiliary_Loop
08c3 7feb       |    |		Jump	0x8af
08c4 00ce       |    |		Action	Pop_Auxiliary
08c5 0092 12b3  |    |		Action	Push_String_Extended,0x12b3					; "attr "
													; Debug Table 0x15.0x29 = 0x8c5,0x24
08c7 00d9       |    |		Load_Top	At_Offset_1
08c8 00e0       |    |		Load_Encached	Standard_Cache
08c9 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
08ca 01cc       |    |		Execute	Vector,Catenate
08cb 0092 12b4  |    |		Action	Push_String_Extended,0x12b4					; " is too large"
08cd 01cc       |    |		Execute	Vector,Catenate
08ce 821a       |    |		Call	0x1,0x1a
08cf 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x15.0x2a = 0x8cf,0x25
08d0 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
08d1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
08d2			TRAP_07f0:
08d2 0007       |    |		Action	Break_Optional
08d3 0092 12b5  |    |		Action	Push_String_Extended,0x12b5					; "bad context to look for "
													; Debug Table 0x15.0x2b = 0x8d3,0x26
08d5 e5fe       |    |		Load	0x2,-0x2
08d6 01cc       |    |		Execute	Vector,Catenate
08d7 821a       |    |		Call	0x1,0x1a
08d8 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x15.0x2c = 0x8d8,0x27
08d9 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
08da 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
08db 0000       |    |		.XXX[0x1]
08dc 0000 0000  |    |		.LITERAL	{0x00000000, 0x5854a501}
08e0 ; --------------------------------------------------------------------------------------
08e0 ; SUBPROGRAM
08e0 ; --------------------------------------------------------------------------------------
08e0 08eb       |    |		.CONST	0x08eb								; Address of begin
08e1 0004       |    |		.CONST	0x0004								; Address of exception handler
08e2 0005       |    |		.CONST	0x0005								; Number of locals
08e3			INIT_08e0:
08e3 00ef       |    |		Load_Encached	Diana_Sequence_Cache					; Debug Table 0x16 = .DEBUG	0x08e3,0x1b66,0x0002,0x0000,0x0058,0x54a5,0x0000,0x04c8
													; Debug Table 0x16.0x0 = 0x8e3,0xffff
08e4 00db       |    |		Load_Top	At_Offset_3
08e5 e010       |    |		Load	0x0,0x10
08e6 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
08e7 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
08e8 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x16.0x1 = 0x8e8,0xfffe
08e9 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x16.0x2 = 0x8e9,0xfffd
08ea 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x16.0x3 = 0x8ea,0xfffc
08eb			BODY_08e0:
08eb 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x16.0x4 = 0x8eb,0x1
08ec 00e2       |    |		Load_Encached	Integer_Cache
08ed e5fe       |    |		Load	0x2,-0x2
08ee 821f       |    |		Call	0x1,0x1f
08ef 005b       | [  |		Store_Top	Discrete,At_Offset_3
08f0 0059       | Y  |		Store_Top	Discrete,At_Offset_1
08f1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x5 = 0x8f1,0x2
08f2 4fff       |O   |		Short_Literal	-0x1
08f3 027f       |    |		Execute	Discrete,Equal
08f4 6803       |h   |		Jump_Zero	0x8f8
08f5 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x16.0x6 = 0x8f5,0x3
08f6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
08f7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
08f8 00cf       |    |		Action	Mark_Auxiliary
08f9 7825       |x%  |		Jump	0x91f
08fa e402       |    |		Load	0x2,0x2								; Debug Table 0x16.0x7 = 0x8fa,0x5
08fb 00eb       |    |		Load_Encached	Diana_Cache
08fc 1865       | e  |		Execute	Package,Field_Execute,Field_Number 0x65
08fd a403       |    |		Store_Unchecked	0x2,0x3
08fe 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x16.0x8 = 0x8fe,0x6
08ff 00eb       |    |		Load_Encached	Diana_Cache
0900 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0901 00eb       |    |		Load_Encached	Diana_Cache
0902 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0903 e00c       |    |		Load	0x0,0xc
0904 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0905 e5fe       |    |		Load	0x2,-0x2
0906 01dd       |    |		Execute	Vector,First
0907 e404       |    |		Load	0x2,0x4
0908 e5fe       |    |		Load	0x2,-0x2
0909 01cf       |    |		Execute	Vector,Slice_Read
090a 01de       |    |		Execute	Vector,Not_Equal
090b 6805       |h   |		Jump_Zero	0x911
090c e402       |    |		Load	0x2,0x2								; Debug Table 0x16.0x9 = 0x90c,0x7
090d 00eb       |    |		Load_Encached	Diana_Cache
090e 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
090f a402       |    |		Store_Unchecked	0x2,0x2
0910 780d       |x   |		Jump	0x91e
0911 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0xa = 0x911,0x8
0912 0f01       |    |		Execute_Immediate	Equal,0x1
0913 6802       |h   |		Jump_Zero	0x916
0914 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x16.0xb = 0x914,0x9
0915 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0916 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0xc = 0x916,0xa
0917 0aff       |    |		Execute_Immediate	Plus,-0x1
0918 0248       | H  |		Execute	Discrete,Check_In_Integer
0919 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
091a e402       |    |		Load	0x2,0x2								; Debug Table 0x16.0xd = 0x91a,0xb
091b 00eb       |    |		Load_Encached	Diana_Cache
091c 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
091d a402       |    |		Store_Unchecked	0x2,0x2
091e 00c9       |    |		Action	Pop_Auxiliary_Loop
091f e402       |    |		Load	0x2,0x2								; Debug Table 0x16.0xe = 0x91f,0x4
0920 00eb       |    |		Load_Encached	Diana_Cache
0921 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0922 6fd7       |o   |		Jump_Zero	0x8fa
0923 00ce       |    |		Action	Pop_Auxiliary
0924 0092 12b6  |    |		Action	Push_String_Extended,0x12b6					; "op "
													; Debug Table 0x16.0xf = 0x924,0xc
0926 e5fe       |    |		Load	0x2,-0x2
0927 01cc       |    |		Execute	Vector,Catenate
0928 0092 12b7  |    |		Action	Push_String_Extended,0x12b7					; " not found"
092a 01cc       |    |		Execute	Vector,Catenate
092b 821a       |    |		Call	0x1,0x1a
092c 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x16.0x10 = 0x92c,0xd
092d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
092e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
092f 0000       |    |		.XXX[0x1]
0930 ; --------------------------------------------------------------------------------------
0930 ; SUBPROGRAM
0930 ; --------------------------------------------------------------------------------------
0930 0936       | 6  |		.CONST	0x0936								; Address of begin
0931 09f2       |    |		.CONST	0x09f2								; Address of exception handler
0932 0002       |    |		.CONST	0x0002								; Number of locals
0933			INIT_0930:
0933 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x17 = .DEBUG	0x0933,0x1b8a,0x0002,0x0000,0x0058,0x54a5,0x0000,0x0573
													; Debug Table 0x17.0x0 = 0x933,0xffff
0934 e00c       |    |		Load	0x0,0xc
0935 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0936			BODY_0930:
0936 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x1 = 0x936,0x1
0937 0092 12b8  |    |		Action	Push_String_Extended,0x12b8					; "SM_DEFN"
0939 01df       |    |		Execute	Vector,Equal
093a 6804       |h   |		Jump_Zero	0x93f
093b e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x2 = 0x93b,0x2
093c 00eb       |    |		Load_Encached	Diana_Cache
093d 18fa       |    |		Execute	Package,Field_Execute,Field_Number 0xfa
093e 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
093f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x3 = 0x93f,0x3
0940 0092 12b9  |    |		Action	Push_String_Extended,0x12b9					; "SM_EXP_TYPE"
0942 01df       |    |		Execute	Vector,Equal
0943 6804       |h   |		Jump_Zero	0x948
0944 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x4 = 0x944,0x4
0945 00eb       |    |		Load_Encached	Diana_Cache
0946 18fc       |    |		Execute	Package,Field_Execute,Field_Number 0xfc
0947 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0948 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x5 = 0x948,0x5
0949 0092 12ba  |    |		Action	Push_String_Extended,0x12ba					; "SM_TYPE_SPEC"
094b 01df       |    |		Execute	Vector,Equal
094c 6805       |h   |		Jump_Zero	0x952
094d e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x6 = 0x94d,0x6
094e 4907       |I   |		Short_Literal	0x107
094f 00eb       |    |		Load_Encached	Diana_Cache
0950 0096       |    |		Execute	Package,Entry
0951 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0952 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x7 = 0x952,0x7
0953 0092 12bb  |    |		Action	Push_String_Extended,0x12bb					; "SM_DISCRIMINANTS"
0955 01df       |    |		Execute	Vector,Equal
0956 6804       |h   |		Jump_Zero	0x95b
0957 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x8 = 0x957,0x8
0958 00eb       |    |		Load_Encached	Diana_Cache
0959 18fb       |    |		Execute	Package,Field_Execute,Field_Number 0xfb
095a 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
095b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x9 = 0x95b,0x9
095c 0092 12bc  |    |		Action	Push_String_Extended,0x12bc					; "SM_BASE_TYPE"
095e 01df       |    |		Execute	Vector,Equal
095f 6804       |h   |		Jump_Zero	0x964
0960 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0xa = 0x960,0xa
0961 00eb       |    |		Load_Encached	Diana_Cache
0962 18f7       |    |		Execute	Package,Field_Execute,Field_Number 0xf7
0963 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0964 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0xb = 0x964,0xb
0965 0092 12bd  |    |		Action	Push_String_Extended,0x12bd					; "SM_TYPE_STRUCT"
0967 01df       |    |		Execute	Vector,Equal
0968 6805       |h   |		Jump_Zero	0x96e
0969 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0xc = 0x969,0xc
096a 4908       |I   |		Short_Literal	0x108
096b 00eb       |    |		Load_Encached	Diana_Cache
096c 0096       |    |		Execute	Package,Entry
096d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
096e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0xd = 0x96e,0xd
096f 0092 12be  |    |		Action	Push_String_Extended,0x12be					; "SM_CONSTRAINT"
0971 01df       |    |		Execute	Vector,Equal
0972 6804       |h   |		Jump_Zero	0x977
0973 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0xe = 0x973,0xe
0974 00eb       |    |		Load_Encached	Diana_Cache
0975 18f9       |    |		Execute	Package,Field_Execute,Field_Number 0xf9
0976 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0977 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0xf = 0x977,0xf
0978 0092 12bf  |    |		Action	Push_String_Extended,0x12bf					; "SM_FIRST"
097a 01df       |    |		Execute	Vector,Equal
097b 6805       |h   |		Jump_Zero	0x981
097c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x10 = 0x97c,0x10
097d 490b       |I   |		Short_Literal	0x10b
097e 00eb       |    |		Load_Encached	Diana_Cache
097f 0096       |    |		Execute	Package,Entry
0980 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0981 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x11 = 0x981,0x11
0982 0092 12c0  |    |		Action	Push_String_Extended,0x12c0					; "SM_BODY"
0984 01df       |    |		Execute	Vector,Equal
0985 6804       |h   |		Jump_Zero	0x98a
0986 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x12 = 0x986,0x12
0987 00eb       |    |		Load_Encached	Diana_Cache
0988 18f8       |    |		Execute	Package,Field_Execute,Field_Number 0xf8
0989 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
098a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x13 = 0x98a,0x13
098b 0092 12c1  |    |		Action	Push_String_Extended,0x12c1					; "SM_STUB"
098d 01df       |    |		Execute	Vector,Equal
098e 6805       |h   |		Jump_Zero	0x994
098f e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x14 = 0x98f,0x14
0990 490d       |I   |		Short_Literal	0x10d
0991 00eb       |    |		Load_Encached	Diana_Cache
0992 0096       |    |		Execute	Package,Entry
0993 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0994 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x15 = 0x994,0x15
0995 0092 12c2  |    |		Action	Push_String_Extended,0x12c2					; "SM_SPEC"
0997 01df       |    |		Execute	Vector,Equal
0998 6805       |h   |		Jump_Zero	0x99e
0999 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x16 = 0x999,0x16
099a 4904       |I   |		Short_Literal	0x104
099b 00eb       |    |		Load_Encached	Diana_Cache
099c 0096       |    |		Execute	Package,Entry
099d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
099e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x17 = 0x99e,0x17
099f 0092 12c3  |    |		Action	Push_String_Extended,0x12c3					; "SM_OBJ_TYPE"
09a1 01df       |    |		Execute	Vector,Equal
09a2 6805       |h   |		Jump_Zero	0x9a8
09a3 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x18 = 0x9a3,0x18
09a4 4902       |I   |		Short_Literal	0x102
09a5 00eb       |    |		Load_Encached	Diana_Cache
09a6 0096       |    |		Execute	Package,Entry
09a7 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
09a8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x19 = 0x9a8,0x19
09a9 0092 12c4  |    |		Action	Push_String_Extended,0x12c4					; "SM_OBJ_DEF"
09ab 01df       |    |		Execute	Vector,Equal
09ac 6805       |h   |		Jump_Zero	0x9b2
09ad e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x1a = 0x9ad,0x1a
09ae 4901       |I   |		Short_Literal	0x101
09af 00eb       |    |		Load_Encached	Diana_Cache
09b0 0096       |    |		Execute	Package,Entry
09b1 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
09b2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x1b = 0x9b2,0x1b
09b3 0092 12c5  |    |		Action	Push_String_Extended,0x12c5					; "SM_SIZE"
09b5 01df       |    |		Execute	Vector,Equal
09b6 6805       |h   |		Jump_Zero	0x9bc
09b7 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x1c = 0x9b7,0x1c
09b8 4903       |I   |		Short_Literal	0x103
09b9 00eb       |    |		Load_Encached	Diana_Cache
09ba 0096       |    |		Execute	Package,Entry
09bb 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
09bc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x1d = 0x9bc,0x1d
09bd 0092 12c6  |    |		Action	Push_String_Extended,0x12c6					; "SM_STORAGE_SIZE"
09bf 01df       |    |		Execute	Vector,Equal
09c0 6805       |h   |		Jump_Zero	0x9c6
09c1 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x1e = 0x9c1,0x1e
09c2 4906       |I   |		Short_Literal	0x106
09c3 00eb       |    |		Load_Encached	Diana_Cache
09c4 0096       |    |		Execute	Package,Entry
09c5 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
09c6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x1f = 0x9c6,0x1f
09c7 0092 12c7  |    |		Action	Push_String_Extended,0x12c7					; "SM_OPS"
09c9 01df       |    |		Execute	Vector,Equal
09ca 680d       |h   |		Jump_Zero	0x9d8
09cb e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x17.0x20 = 0x9cb,0x20
09cc 01db       |    |		Execute	Vector,Length
09cd 7006       |p   |		Jump_Nonzero	0x9d4
09ce 0092 12c8  |    |		Action	Push_String_Extended,0x12c8					; "sm_ops must have an argument of the form <sm_ops,id>"
													; Debug Table 0x17.0x21 = 0x9ce,0x21
09d0 821a       |    |		Call	0x1,0x1a
09d1 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x17.0x22 = 0x9d1,0x22
09d2 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
09d3 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
09d4 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x17.0x23 = 0x9d4,0x23
09d5 e5fe       |    |		Load	0x2,-0x2
09d6 8221       | !  |		Call	0x1,0x21
09d7 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
09d8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0x24 = 0x9d8,0x24
09d9 0092 12c9  |    |		Action	Push_String_Extended,0x12c9					; "GOTO"
09db 01df       |    |		Execute	Vector,Equal
09dc 680d       |h   |		Jump_Zero	0x9ea
09dd e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x17.0x25 = 0x9dd,0x25
09de 01db       |    |		Execute	Vector,Length
09df 7006       |p   |		Jump_Nonzero	0x9e6
09e0 0092 12ca  |    |		Action	Push_String_Extended,0x12ca					; "goto must have an argument of the form <goto,id>"
													; Debug Table 0x17.0x26 = 0x9e0,0x26
09e2 821a       |    |		Call	0x1,0x1a
09e3 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x17.0x27 = 0x9e3,0x27
09e4 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
09e5 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
09e6 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x17.0x28 = 0x9e6,0x28
09e7 e5fe       |    |		Load	0x2,-0x2
09e8 8220       |    |		Call	0x1,0x20
09e9 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
09ea 0092 12cb  |    |		Action	Push_String_Extended,0x12cb					; "bad attribute name: "
													; Debug Table 0x17.0x29 = 0x9ea,0x29
09ec 00d9       |    |		Load_Top	At_Offset_1
09ed 01cc       |    |		Execute	Vector,Catenate
09ee 821a       |    |		Call	0x1,0x1a
09ef 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x17.0x2a = 0x9ef,0x2a
09f0 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
09f1 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
09f2			TRAP_0930:
09f2 0007       |    |		Action	Break_Optional
09f3 0092 12cc  |    |		Action	Push_String_Extended,0x12cc					; "exception getting: "
													; Debug Table 0x17.0x2b = 0x9f3,0x2b
09f5 00da       |    |		Load_Top	At_Offset_2
09f6 01cc       |    |		Execute	Vector,Catenate
09f7 0092 12a7  |    |		Action	Push_String_Extended,0x12a7					; " ("
09f9 01cc       |    |		Execute	Vector,Catenate
09fa e007       |    |		Load	0x0,0x7
09fb 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
09fc 01cc       |    |		Execute	Vector,Catenate
09fd 0092 12a5  |    |		Action	Push_String_Extended,0x12a5					; ")"
09ff 01cc       |    |		Execute	Vector,Catenate
0a00 821a       |    |		Call	0x1,0x1a
0a01 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x17.0x2c = 0xa01,0x2c
0a02 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a03 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0a04 0000 0000  |    |		.BLANK	0000[0x4]
0a08 ; --------------------------------------------------------------------------------------
0a08 ; SUBPROGRAM
0a08 ; --------------------------------------------------------------------------------------
0a08 0a0e       |    |		.CONST	0x0a0e								; Address of begin
0a09 0a37       | 7  |		.CONST	0x0a37								; Address of exception handler
0a0a 0003       |    |		.CONST	0x0003								; Number of locals
0a0b			INIT_0a08:
0a0b 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x18 = .DEBUG	0x0a0b,0x1be6,0x0002,0x0000,0x0058,0x54a5,0x0000,0x06d4
													; Debug Table 0x18.0x0 = 0xa0b,0xffff
0a0c 029f 11e3  |    |		Declare_Subprogram	INIT_11e0,For_Call				; Debug Table 0x18.0x1 = 0xa0c,0xfffe
0a0e			BODY_0a08:
0a0e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0x2 = 0xa0e,0x1
0a0f 00eb       |    |		Load_Encached	Diana_Cache
0a10 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0a11 00eb       |    |		Load_Encached	Diana_Cache
0a12 1883       |    |		Execute	Package,Field_Execute,Field_Number 0x83
0a13 0f04       |    |		Execute_Immediate	Equal,0x4
0a14 680e       |h   |		Jump_Zero	0xa23
0a15 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0x3 = 0xa15,0x2
0a16 4975       |Iu  |		Short_Literal	0x175
0a17 00eb       |    |		Load_Encached	Diana_Cache
0a18 0098       |    |		Execute	Package,Field_Read_Dynamic
0a19 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0a1a 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0a1b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x18.0x4 = 0xa1b,0x3
0a1c 00eb       |    |		Load_Encached	Diana_Cache
0a1d 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
0a1e 7002       |p   |		Jump_Nonzero	0xa21
0a1f 8403       |    |		Call	0x2,0x3								; Debug Table 0x18.0x5 = 0xa1f,0x4
0a20 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a21 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0x6 = 0xa21,0x5
0a22 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a23 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0x7 = 0xa23,0x6
0a24 00eb       |    |		Load_Encached	Diana_Cache
0a25 1883       |    |		Execute	Package,Field_Execute,Field_Number 0x83
0a26 0f04       |    |		Execute_Immediate	Equal,0x4
0a27 680c       |h   |		Jump_Zero	0xa34
0a28 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0x8 = 0xa28,0x7
0a29 00eb       |    |		Load_Encached	Diana_Cache
0a2a 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
0a2b 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0a2c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x18.0x9 = 0xa2c,0x8
0a2d 00eb       |    |		Load_Encached	Diana_Cache
0a2e 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
0a2f 7002       |p   |		Jump_Nonzero	0xa32
0a30 8403       |    |		Call	0x2,0x3								; Debug Table 0x18.0xa = 0xa30,0x9
0a31 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a32 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0xb = 0xa32,0xa
0a33 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a34 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x18.0xc = 0xa34,0xb
0a35 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a36 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a37			TRAP_0a08:
0a37 0007       |    |		Action	Break_Optional
0a38 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x18.0xd = 0xa38,0xc
0a39 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a3a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a3b 0000 0000  |    |		.BLANK	0000[0x5]
0a40 ; --------------------------------------------------------------------------------------
0a40 ; SUBPROGRAM
0a40 ; --------------------------------------------------------------------------------------
0a40 0a47       | G  |		.CONST	0x0a47								; Address of begin
0a41 0a7a       | z  |		.CONST	0x0a7a								; Address of exception handler
0a42 0005       |    |		.CONST	0x0005								; Number of locals
0a43			INIT_0a40:
0a43 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x19 = .DEBUG	0x0a43,0x1c04,0x0002,0x0000,0x0058,0x54a5,0x0000,0x0781
													; Debug Table 0x19.0x0 = 0xa43,0xffff
0a44 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x19.0x1 = 0xa44,0xfffe
0a45 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x19.0x2 = 0xa45,0xfffd
0a46 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x19.0x3 = 0xa46,0xfffc
0a47			BODY_0a40:
0a47 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x19.0x4 = 0xa47,0x1
0a48 00eb       |    |		Load_Encached	Diana_Cache
0a49 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0a4a 00eb       |    |		Load_Encached	Diana_Cache
0a4b 1883       |    |		Execute	Package,Field_Execute,Field_Number 0x83
0a4c 0f04       |    |		Execute_Immediate	Equal,0x4
0a4d 6829       |h)  |		Jump_Zero	0xa77
0a4e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x19.0x5 = 0xa4e,0x2
0a4f 00eb       |    |		Load_Encached	Diana_Cache
0a50 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0a51 00eb       |    |		Load_Encached	Diana_Cache
0a52 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
0a53 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0a54 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x6 = 0xa54,0x3
0a55 00eb       |    |		Load_Encached	Diana_Cache
0a56 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
0a57 a402       |    |		Store_Unchecked	0x2,0x2
0a58 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x7 = 0xa58,0x4
0a59 00eb       |    |		Load_Encached	Diana_Cache
0a5a 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
0a5b 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0a5c 00cf       |    |		Action	Mark_Auxiliary
0a5d 0007       |    |		Action	Break_Optional							; Debug Table 0x19.0x8 = 0xa5d,0x5
0a5e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19.0x9 = 0xa5e,0x6
0a5f 00eb       |    |		Load_Encached	Diana_Cache
0a60 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
0a61 7014       |p   |		Jump_Nonzero	0xa76
0a62 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19.0xa = 0xa62,0x7
0a63 00eb       |    |		Load_Encached	Diana_Cache
0a64 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
0a65 a403       |    |		Store_Unchecked	0x2,0x3
0a66 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x19.0xb = 0xa66,0x8
0a67 e5ff       |    |		Load	0x2,-0x1
0a68 021f       |    |		Execute	Heap_Access,Equal
0a69 6802       |h   |		Jump_Zero	0xa6c
0a6a e402       |    |		Load	0x2,0x2								; Debug Table 0x19.0xc = 0xa6a,0x9
0a6b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a6c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x19.0xd = 0xa6c,0xa
0a6d a402       |    |		Store_Unchecked	0x2,0x2
0a6e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19.0xe = 0xa6e,0xb
0a6f 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0a70 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19.0xf = 0xa70,0xc
0a71 00eb       |    |		Load_Encached	Diana_Cache
0a72 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
0a73 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0a74 00c9       |    |		Action	Pop_Auxiliary_Loop
0a75 7fe8       |    |		Jump	0xa5e
0a76 00ce       |    |		Action	Pop_Auxiliary
0a77 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x19.0x10 = 0xa77,0xd
0a78 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a79 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a7a			TRAP_0a40:
0a7a 0007       |    |		Action	Break_Optional
0a7b 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x19.0x11 = 0xa7b,0xe
0a7c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a7d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a7e 0000 0000  |    |		.XXX[0x2]
0a80 ; --------------------------------------------------------------------------------------
0a80 ; SUBPROGRAM
0a80 ; --------------------------------------------------------------------------------------
0a80 0a84       |    |		.CONST	0x0a84								; Address of begin
0a81 0aaf       |    |		.CONST	0x0aaf								; Address of exception handler
0a82 0002       |    |		.CONST	0x0002								; Number of locals
0a83			INIT_0a80:
0a83 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x1a = .DEBUG	0x0a83,0x1c2a,0x0002,0x0000,0x0058,0x54a5,0x0000,0x081a
													; Debug Table 0x1a.0x0 = 0xa83,0xffff
0a84			BODY_0a80:
0a84 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x1 = 0xa84,0x1
0a85 00eb       |    |		Load_Encached	Diana_Cache
0a86 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0a87 00eb       |    |		Load_Encached	Diana_Cache
0a88 1883       |    |		Execute	Package,Field_Execute,Field_Number 0x83
0a89 0f04       |    |		Execute_Immediate	Equal,0x4
0a8a 6810       |h   |		Jump_Zero	0xa9b
0a8b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x2 = 0xa8b,0x2
0a8c 4975       |Iu  |		Short_Literal	0x175
0a8d 00eb       |    |		Load_Encached	Diana_Cache
0a8e 0098       |    |		Execute	Package,Field_Read_Dynamic
0a8f 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0a90 00eb       |    |		Load_Encached	Diana_Cache
0a91 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
0a92 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0a93 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0x3 = 0xa93,0x3
0a94 00eb       |    |		Load_Encached	Diana_Cache
0a95 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
0a96 7015       |p   |		Jump_Nonzero	0xaac
0a97 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0x4 = 0xa97,0x4
0a98 00eb       |    |		Load_Encached	Diana_Cache
0a99 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
0a9a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a9b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x5 = 0xa9b,0x5
0a9c 00eb       |    |		Load_Encached	Diana_Cache
0a9d 1883       |    |		Execute	Package,Field_Execute,Field_Number 0x83
0a9e 0f04       |    |		Execute_Immediate	Equal,0x4
0a9f 680c       |h   |		Jump_Zero	0xaac
0aa0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1a.0x6 = 0xaa0,0x6
0aa1 00eb       |    |		Load_Encached	Diana_Cache
0aa2 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
0aa3 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0aa4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0x7 = 0xaa4,0x7
0aa5 00eb       |    |		Load_Encached	Diana_Cache
0aa6 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
0aa7 7004       |p   |		Jump_Nonzero	0xaac
0aa8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0x8 = 0xaa8,0x8
0aa9 00eb       |    |		Load_Encached	Diana_Cache
0aaa 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
0aab 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0aac 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1a.0x9 = 0xaac,0x9
0aad 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0aae 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0aaf			TRAP_0a80:
0aaf 0007       |    |		Action	Break_Optional
0ab0 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1a.0xa = 0xab0,0xa
0ab1 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0ab2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ab3 0000 0000  |    |		.BLANK	0000[0x5]
0ab8 ; --------------------------------------------------------------------------------------
0ab8 ; SUBPROGRAM
0ab8 ; --------------------------------------------------------------------------------------
0ab8 0ac9       |    |		.CONST	0x0ac9								; Address of begin
0ab9 0b05       |    |		.CONST	0x0b05								; Address of exception handler
0aba 0005       |    |		.CONST	0x0005								; Number of locals
0abb			INIT_0ab8:
0abb e008       |    |		Load	0x0,0x8								; Debug Table 0x1b = .DEBUG	0x0abb,0x1c42,0x0002,0x0000,0x0058,0x54a5,0x0000,0x08a1
													; Debug Table 0x1b.0x0 = 0xabb,0xffff
0abc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0abd e008       |    |		Load	0x0,0x8								; Debug Table 0x1b.0x1 = 0xabd,0xfffe
0abe 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0abf 02c7       |    |		Declare_Variable	Any
0ac0 00d8       |    |		Load_Top	At_Offset_0
0ac1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0ac2 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1b.0x2 = 0xac2,0xfffd
0ac3 e008       |    |		Load	0x0,0x8								; Debug Table 0x1b.0x3 = 0xac3,0xfffc
0ac4 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0ac5 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0ac6 02c7       |    |		Declare_Variable	Any
0ac7 00d8       |    |		Load_Top	At_Offset_0
0ac8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0ac9			BODY_0ab8:
0ac9 e008       |    |		Load	0x0,0x8								; Debug Table 0x1b.0x4 = 0xac9,0x1
0aca 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0acb 00db       |    |		Load_Top	At_Offset_3
0acc 0120       |    |		Execute	Any,Is_Value
0acd 6803       |h   |		Jump_Zero	0xad1
0ace e008       |    |		Load	0x0,0x8
0acf 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0ad0 7801       |x   |		Jump	0xad2
0ad1 00db       |    |		Load_Top	At_Offset_3
0ad2 6111       |a   |		Indirect_Literal	Discrete,0xbe4,{0x00000000, 0x00004000}
0ad3 e004       |    |		Load	0x0,0x4
0ad4 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0ad5 4800       |H   |		Short_Literal	0x0
0ad6 e008       |    |		Load	0x0,0x8
0ad7 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0ad8 e5ff       |    |		Load	0x2,-0x1
0ad9 e008       |    |		Load	0x0,0x8
0ada 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0adb 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0adc c403       |    |		Store	0x2,0x3
0add c402       |    |		Store	0x2,0x2
0ade 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x5 = 0xade,0x2
0adf 7022       |p"  |		Jump_Nonzero	0xb02
0ae0 e008       |    |		Load	0x0,0x8								; Debug Table 0x1b.0x6 = 0xae0,0x3
0ae1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0ae2 00d9       |    |		Load_Top	At_Offset_1
0ae3 0120       |    |		Execute	Any,Is_Value
0ae4 6804       |h   |		Jump_Zero	0xae9
0ae5 e008       |    |		Load	0x0,0x8
0ae6 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0ae7 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0ae8 7801       |x   |		Jump	0xaea
0ae9 00d9       |    |		Load_Top	At_Offset_1
0aea e008       |    |		Load	0x0,0x8
0aeb 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0aec 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0aed 60f6       |`   |		Indirect_Literal	Discrete,0xbe4,{0x00000000, 0x00004000}
0aee 4801       |H   |		Short_Literal	0x1
0aef 4800       |H   |		Short_Literal	0x0
0af0 4800       |H   |		Short_Literal	0x0
0af1 e004       |    |		Load	0x0,0x4
0af2 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0af3 4800       |H   |		Short_Literal	0x0
0af4 e403       |    |		Load	0x2,0x3
0af5 e008       |    |		Load	0x0,0x8
0af6 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0af7 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0af8 e008       |    |		Load	0x0,0x8
0af9 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0afa 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0afb c404       |    |		Store	0x2,0x4
0afc c405       |    |		Store	0x2,0x5
0afd c402       |    |		Store	0x2,0x2
0afe 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b.0x7 = 0xafe,0x4
0aff 7002       |p   |		Jump_Nonzero	0xb02
0b00 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1b.0x8 = 0xb00,0x5
0b01 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0b02 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1b.0x9 = 0xb02,0x6
0b03 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0b04 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0b05			TRAP_0ab8:
0b05 0007       |    |		Action	Break_Optional
0b06 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1b.0xa = 0xb06,0x7
0b07 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0b08 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0b09 0000 0000  |    |		.BLANK	0000[0x7]
0b10 ; --------------------------------------------------------------------------------------
0b10 ; SUBPROGRAM
0b10 ; --------------------------------------------------------------------------------------
0b10 0b25       | %  |		.CONST	0x0b25								; Address of begin
0b11 0004       |    |		.CONST	0x0004								; Address of exception handler
0b12 000a       |    |		.CONST	0x000a								; Number of locals
0b13			INIT_0b10:
0b13 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1c = .DEBUG	0x0b13,0x1c5a,0x0002,0x0000,0x0058,0x54a5,0x0000,0x091a
													; Debug Table 0x1c.0x0 = 0xb13,0xffff
0b14 e5fe       |    |		Load	0x2,-0x2
0b15 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0b16 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x1c.0x1 = 0xb16,0xfffe
0b17 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1c.0x2 = 0xb17,0xfffd
0b18 01dd       |    |		Execute	Vector,First
0b19 00e2       |    |		Load_Encached	Integer_Cache
0b1a 03f1       |    |		Declare_Variable	Discrete,With_Value
0b1b 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x1c.0x3 = 0xb1b,0xfffc
0b1c 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x1c.0x4 = 0xb1c,0xfffb
0b1d 029f 11fb  |    |		Declare_Subprogram	INIT_11f8,For_Call
0b1f 029f 120b  |    |		Declare_Subprogram	INIT_1208,For_Call
0b21 029f 122b  |   +|		Declare_Subprogram	INIT_1228,For_Call
0b23 029f 123b  |   ;|		Declare_Subprogram	INIT_1238,For_Call
0b25			BODY_0b10:
0b25 00cf       |    |		Action	Mark_Auxiliary
0b26 78b5       |x   |		Jump	0xbdc
0b27 e404       |    |		Load	0x2,0x4								; Debug Table 0x1c.0x5 = 0xb27,0x2
0b28 e5ff       |    |		Load	0x2,-0x1
0b29 01d7       |    |		Execute	Vector,Field_Read
0b2a 0b5e       | ^  |		Execute_Immediate	Case_Compare,0x5e
0b2b 7021       |p!  |		Jump_Nonzero	0xb4d
0b2c 0b31       | 1  |		Execute_Immediate	Case_Compare,0x31
0b2d 7021       |p!  |		Jump_Nonzero	0xb4f
0b2e 0b32       | 2  |		Execute_Immediate	Case_Compare,0x32
0b2f 7021       |p!  |		Jump_Nonzero	0xb51
0b30 0b33       | 3  |		Execute_Immediate	Case_Compare,0x33
0b31 7021       |p!  |		Jump_Nonzero	0xb53
0b32 0b6c       | l  |		Execute_Immediate	Case_Compare,0x6c
0b33 7021       |p!  |		Jump_Nonzero	0xb55
0b34 0b4c       | L  |		Execute_Immediate	Case_Compare,0x4c
0b35 701f       |p   |		Jump_Nonzero	0xb55
0b36 0b5b       | [  |		Execute_Immediate	Case_Compare,0x5b
0b37 7021       |p!  |		Jump_Nonzero	0xb59
0b38 0b5d       | ]  |		Execute_Immediate	Case_Compare,0x5d
0b39 7023       |p#  |		Jump_Nonzero	0xb5d
0b3a 0b2f       | /  |		Execute_Immediate	Case_Compare,0x2f
0b3b 7025       |p%  |		Jump_Nonzero	0xb61
0b3c 0b3c       | <  |		Execute_Immediate	Case_Compare,0x3c
0b3d 7027       |p'  |		Jump_Nonzero	0xb65
0b3e 0b20       |    |		Execute_Immediate	Case_Compare,0x20
0b3f 7082       |p   |		Jump_Nonzero	0xbc2
0b40 e404       |    |		Load	0x2,0x4								; Debug Table 0x1c.0x6 = 0xb40,0x1d
0b41 e5ff       |    |		Load	0x2,-0x1
0b42 01d7       |    |		Execute	Vector,Field_Read
0b43 0092 12cd  |    |		Action	Push_String_Extended,0x12cd					; "unknown positioning character '"
0b45 01cb       |    |		Execute	Vector,Append
0b46 0092 12ce  |    |		Action	Push_String_Extended,0x12ce					; "'"
0b48 01cc       |    |		Execute	Vector,Catenate
0b49 821a       |    |		Call	0x1,0x1a
0b4a 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1c.0x7 = 0xb4a,0x1e
0b4b 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0b4c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0b4d 8407       |    |		Call	0x2,0x7								; Debug Table 0x1c.0x8 = 0xb4d,0x3
0b4e 7873       |xs  |		Jump	0xbc2
0b4f 8408       |    |		Call	0x2,0x8								; Debug Table 0x1c.0x9 = 0xb4f,0x4
0b50 7871       |xq  |		Jump	0xbc2
0b51 8409       |    |		Call	0x2,0x9								; Debug Table 0x1c.0xa = 0xb51,0x5
0b52 786f       |xo  |		Jump	0xbc2
0b53 840a       |    |		Call	0x2,0xa								; Debug Table 0x1c.0xb = 0xb53,0x6
0b54 786d       |xm  |		Jump	0xbc2
0b55 e402       |    |		Load	0x2,0x2								; Debug Table 0x1c.0xc = 0xb55,0x7
0b56 8223       | #  |		Call	0x1,0x23
0b57 a402       |    |		Store_Unchecked	0x2,0x2
0b58 7869       |xi  |		Jump	0xbc2
0b59 e402       |    |		Load	0x2,0x2								; Debug Table 0x1c.0xd = 0xb59,0x8
0b5a 8224       | $  |		Call	0x1,0x24
0b5b a402       |    |		Store_Unchecked	0x2,0x2
0b5c 7865       |xe  |		Jump	0xbc2
0b5d e402       |    |		Load	0x2,0x2								; Debug Table 0x1c.0xe = 0xb5d,0x9
0b5e 8225       | %  |		Call	0x1,0x25
0b5f a402       |    |		Store_Unchecked	0x2,0x2
0b60 7861       |xa  |		Jump	0xbc2
0b61 e402       |    |		Load	0x2,0x2								; Debug Table 0x1c.0xf = 0xb61,0xa
0b62 8226       | &  |		Call	0x1,0x26
0b63 a402       |    |		Store_Unchecked	0x2,0x2
0b64 785d       |x]  |		Jump	0xbc2
0b65 e404       |    |		Load	0x2,0x4								; Debug Table 0x1c.0x10 = 0xb65,0xb
0b66 a405       |    |		Store_Unchecked	0x2,0x5
0b67 e405       |    |		Load	0x2,0x5								; Debug Table 0x1c.0x11 = 0xb67,0xc
0b68 a406       |    |		Store_Unchecked	0x2,0x6
0b69 00cf       |    |		Action	Mark_Auxiliary
0b6a 0007       |    |		Action	Break_Optional							; Debug Table 0x1c.0x12 = 0xb6a,0xd
0b6b e404       |    |		Load	0x2,0x4								; Debug Table 0x1c.0x13 = 0xb6b,0xe
0b6c 0a01       |    |		Execute_Immediate	Plus,0x1
0b6d 0248       | H  |		Execute	Discrete,Check_In_Integer
0b6e a404       |    |		Store_Unchecked	0x2,0x4
0b6f e404       |    |		Load	0x2,0x4								; Debug Table 0x1c.0x14 = 0xb6f,0xf
0b70 e5ff       |    |		Load	0x2,-0x1
0b71 01dc       |    |		Execute	Vector,Last
0b72 027d       | }  |		Execute	Discrete,Greater
0b73 6806       |h   |		Jump_Zero	0xb7a
0b74 0092 12cf  |    |		Action	Push_String_Extended,0x12cf					; "'<' has no closing '>'"
													; Debug Table 0x1c.0x15 = 0xb74,0x10
0b76 821a       |    |		Call	0x1,0x1a
0b77 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1c.0x16 = 0xb77,0x11
0b78 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0b79 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0b7a e404       |    |		Load	0x2,0x4								; Debug Table 0x1c.0x17 = 0xb7a,0x12
0b7b e5ff       |    |		Load	0x2,-0x1
0b7c 01d7       |    |		Execute	Vector,Field_Read
0b7d 0b3e       | >  |		Execute_Immediate	Case_Compare,0x3e
0b7e 7003       |p   |		Jump_Nonzero	0xb82
0b7f 0b2c       | ,  |		Execute_Immediate	Case_Compare,0x2c
0b80 703b       |p;  |		Jump_Nonzero	0xbbc
0b81 783c       |x<  |		Jump	0xbbe								; Debug Table 0x1c.0x18 = 0xb81,0x1b
0b82 e406       |    |		Load	0x2,0x6								; Debug Table 0x1c.0x19 = 0xb82,0x13
0b83 e405       |    |		Load	0x2,0x5
0b84 027d       | }  |		Execute	Discrete,Greater
0b85 6816       |h   |		Jump_Zero	0xb9c
0b86 e406       |    |		Load	0x2,0x6								; Debug Table 0x1c.0x1a = 0xb86,0x14
0b87 0a01       |    |		Execute_Immediate	Plus,0x1
0b88 0248       | H  |		Execute	Discrete,Check_In_Integer
0b89 e404       |    |		Load	0x2,0x4
0b8a 0aff       |    |		Execute_Immediate	Plus,-0x1
0b8b 0248       | H  |		Execute	Discrete,Check_In_Integer
0b8c e5ff       |    |		Load	0x2,-0x1
0b8d 01cf       |    |		Execute	Vector,Slice_Read
0b8e e00c       |    |		Load	0x0,0xc
0b8f 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0b90 e402       |    |		Load	0x2,0x2
0b91 e405       |    |		Load	0x2,0x5
0b92 0a01       |    |		Execute_Immediate	Plus,0x1
0b93 0248       | H  |		Execute	Discrete,Check_In_Integer
0b94 e406       |    |		Load	0x2,0x6
0b95 0aff       |    |		Execute_Immediate	Plus,-0x1
0b96 0248       | H  |		Execute	Discrete,Check_In_Integer
0b97 e5ff       |    |		Load	0x2,-0x1
0b98 01cf       |    |		Execute	Vector,Slice_Read
0b99 8222       | "  |		Call	0x1,0x22
0b9a a402       |    |		Store_Unchecked	0x2,0x2
0b9b 780c       |x   |		Jump	0xba8
0b9c 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x1c.0x1b = 0xb9c,0x15
0b9d e402       |    |		Load	0x2,0x2
0b9e e405       |    |		Load	0x2,0x5
0b9f 0a01       |    |		Execute_Immediate	Plus,0x1
0ba0 0248       | H  |		Execute	Discrete,Check_In_Integer
0ba1 e404       |    |		Load	0x2,0x4
0ba2 0aff       |    |		Execute_Immediate	Plus,-0x1
0ba3 0248       | H  |		Execute	Discrete,Check_In_Integer
0ba4 e5ff       |    |		Load	0x2,-0x1
0ba5 01cf       |    |		Execute	Vector,Slice_Read
0ba6 8222       | "  |		Call	0x1,0x22
0ba7 a402       |    |		Store_Unchecked	0x2,0x2
0ba8 e402       |    |		Load	0x2,0x2								; Debug Table 0x1c.0x1c = 0xba8,0x16
0ba9 00eb       |    |		Load_Encached	Diana_Cache
0baa 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0bab 680e       |h   |		Jump_Zero	0xbba
0bac 0092 12b3  |    |		Action	Push_String_Extended,0x12b3					; "attr "
													; Debug Table 0x1c.0x1d = 0xbac,0x17
0bae e405       |    |		Load	0x2,0x5
0baf e404       |    |		Load	0x2,0x4
0bb0 e5ff       |    |		Load	0x2,-0x1
0bb1 01cf       |    |		Execute	Vector,Slice_Read
0bb2 01cc       |    |		Execute	Vector,Catenate
0bb3 0092 12d0  |    |		Action	Push_String_Extended,0x12d0					; " lands on empty node"
0bb5 01cc       |    |		Execute	Vector,Catenate
0bb6 821a       |    |		Call	0x1,0x1a
0bb7 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1c.0x1e = 0xbb7,0x18
0bb8 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0bb9 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0bba 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x1c.0x1f = 0xbba,0x19
0bbb 7805       |x   |		Jump	0xbc1
0bbc e404       |    |		Load	0x2,0x4								; Debug Table 0x1c.0x20 = 0xbbc,0x1a
0bbd a406       |    |		Store_Unchecked	0x2,0x6
0bbe 00d1       |    |		Pop_Control	Pop_Count_1
0bbf 00c9       |    |		Action	Pop_Auxiliary_Loop
0bc0 7faa       |    |		Jump	0xb6b
0bc1 00ce       |    |		Action	Pop_Auxiliary
0bc2 00d1       |    |		Pop_Control	Pop_Count_1
0bc3 e402       |    |		Load	0x2,0x2								; Debug Table 0x1c.0x21 = 0xbc3,0x1f
0bc4 00eb       |    |		Load_Encached	Diana_Cache
0bc5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0bc6 6810       |h   |		Jump_Zero	0xbd7
0bc7 e404       |    |		Load	0x2,0x4								; Debug Table 0x1c.0x22 = 0xbc7,0x20
0bc8 e5ff       |    |		Load	0x2,-0x1
0bc9 01d7       |    |		Execute	Vector,Field_Read
0bca 0092 12d1  |    |		Action	Push_String_Extended,0x12d1					; "bad positioning character "
0bcc 01cb       |    |		Execute	Vector,Append
0bcd 0092 12d2  |    |		Action	Push_String_Extended,0x12d2					; " at position"
0bcf 01cc       |    |		Execute	Vector,Catenate
0bd0 e404       |    |		Load	0x2,0x4
0bd1 00e0       |    |		Load_Encached	Standard_Cache
0bd2 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0bd3 01cc       |    |		Execute	Vector,Catenate
0bd4 821a       |    |		Call	0x1,0x1a
0bd5 e402       |    |		Load	0x2,0x2								; Debug Table 0x1c.0x23 = 0xbd5,0x21
0bd6 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0bd7 e404       |    |		Load	0x2,0x4								; Debug Table 0x1c.0x24 = 0xbd7,0x22
0bd8 0a01       |    |		Execute_Immediate	Plus,0x1
0bd9 0248       | H  |		Execute	Discrete,Check_In_Integer
0bda a404       |    |		Store_Unchecked	0x2,0x4
0bdb 00c9       |    |		Action	Pop_Auxiliary_Loop
0bdc e404       |    |		Load	0x2,0x4								; Debug Table 0x1c.0x25 = 0xbdc,0x1
0bdd e5ff       |    |		Load	0x2,-0x1
0bde 01dc       |    |		Execute	Vector,Last
0bdf 027a       | z  |		Execute	Discrete,Less_Equal
0be0 7746       |wF  |		Jump_Nonzero	0xb27
0be1 00ce       |    |		Action	Pop_Auxiliary
0be2 e402       |    |		Load	0x2,0x2								; Debug Table 0x1c.0x26 = 0xbe2,0x23
0be3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0be4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0be8 ; --------------------------------------------------------------------------------------
0be8 ; SUBPROGRAM
0be8 ; --------------------------------------------------------------------------------------
0be8 0bf3       |    |		.CONST	0x0bf3								; Address of begin
0be9 0004       |    |		.CONST	0x0004								; Address of exception handler
0bea 0004       |    |		.CONST	0x0004								; Number of locals
0beb			INIT_0be8:
0beb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1d = .DEBUG	0x0beb,0x1caa,0x0002,0x0000,0x0058,0x54a5,0x0000,0x0b01
													; Debug Table 0x1d.0x0 = 0xbeb,0xffff
0bec 01dc       |    |		Execute	Vector,Last
0bed 00e2       |    |		Load_Encached	Integer_Cache
0bee 03f1       |    |		Declare_Variable	Discrete,With_Value
0bef e008       |    |		Load	0x0,0x8								; Debug Table 0x1d.0x1 = 0xbef,0xfffe
0bf0 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0bf1 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0bf2 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1d.0x2 = 0xbf2,0xfffd
0bf3			BODY_0be8:
0bf3 00cf       |    |		Action	Mark_Auxiliary
0bf4 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1d.0x3 = 0xbf4,0x1
0bf5 01da       |    |		Execute	Vector,Bounds
0bf6 0264       | d  |		Execute	Discrete,Below_Bound
0bf7 700d       |p   |		Jump_Nonzero	0xc05
0bf8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0x4 = 0xbf8,0x2
0bf9 e5ff       |    |		Load	0x2,-0x1
0bfa 01d7       |    |		Execute	Vector,Field_Read
0bfb 0f20       |    |		Execute_Immediate	Equal,0x20
0bfc 6806       |h   |		Jump_Zero	0xc03
0bfd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0x5 = 0xbfd,0x3
0bfe 0aff       |    |		Execute_Immediate	Plus,-0x1
0bff 0248       | H  |		Execute	Discrete,Check_In_Integer
0c00 a402       |    |		Store_Unchecked	0x2,0x2
0c01 00d2       |    |		Pop_Control	Pop_Count_2						; Debug Table 0x1d.0x6 = 0xc01,0x4
0c02 7802       |x   |		Jump	0xc05
0c03 00c8       |    |		Action	Pop_Auxiliary_Range
0c04 37f3       |7   |		Loop_Decreasing	0xbf8
0c05 00ce       |    |		Action	Pop_Auxiliary
0c06 e008       |    |		Load	0x0,0x8								; Debug Table 0x1d.0x7 = 0xc06,0x5
0c07 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c08 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0c09 e008       |    |		Load	0x0,0x8
0c0a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c0b 67d8       |g   |		Indirect_Literal	Discrete,0xbe4,{0x00000000, 0x00004000}
0c0c e004       |    |		Load	0x0,0x4
0c0d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c0e e5fe       |    |		Load	0x2,-0x2
0c0f e5ff       |    |		Load	0x2,-0x1
0c10 01dd       |    |		Execute	Vector,First
0c11 e402       |    |		Load	0x2,0x2
0c12 e5ff       |    |		Load	0x2,-0x1
0c13 01cf       |    |		Execute	Vector,Slice_Read
0c14 e008       |    |		Load	0x0,0x8
0c15 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c16 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0c17 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0c18 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0c19 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1d.0x8 = 0xc19,0x6
0c1a 6819       |h   |		Jump_Zero	0xc34
0c1b 0092 12a6  |    |		Action	Push_String_Extended,0x12a6					; "can't resolve "
													; Debug Table 0x1d.0x9 = 0xc1b,0x7
0c1d e5ff       |    |		Load	0x2,-0x1
0c1e 01dd       |    |		Execute	Vector,First
0c1f e402       |    |		Load	0x2,0x2
0c20 e5ff       |    |		Load	0x2,-0x1
0c21 01cf       |    |		Execute	Vector,Slice_Read
0c22 01cc       |    |		Execute	Vector,Catenate
0c23 0092 12a7  |    |		Action	Push_String_Extended,0x12a7					; " ("
0c25 01cc       |    |		Execute	Vector,Catenate
0c26 00da       |    |		Load_Top	At_Offset_2
0c27 e008       |    |		Load	0x0,0x8
0c28 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0c29 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0c2a 025e       | ^  |		Execute	Discrete,Convert
0c2b 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0c2c 01cc       |    |		Execute	Vector,Catenate
0c2d 0092 12a5  |    |		Action	Push_String_Extended,0x12a5					; ")"
0c2f 01cc       |    |		Execute	Vector,Catenate
0c30 821a       |    |		Call	0x1,0x1a
0c31 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1d.0xa = 0xc31,0x8
0c32 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0c33 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0c34 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0xb = 0xc34,0x9
0c35 00db       |    |		Load_Top	At_Offset_3
0c36 0a02       |    |		Execute_Immediate	Plus,0x2
0c37 0248       | H  |		Execute	Discrete,Check_In_Integer
0c38 e5ff       |    |		Load	0x2,-0x1
0c39 01dc       |    |		Execute	Vector,Last
0c3a e5ff       |    |		Load	0x2,-0x1
0c3b 01cf       |    |		Execute	Vector,Slice_Read
0c3c 8227       | '  |		Call	0x1,0x27
0c3d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0c3e 0000 0000  |    |		.XXX[0x2]
0c40 ; --------------------------------------------------------------------------------------
0c40 ; SUBPROGRAM
0c40 ; --------------------------------------------------------------------------------------
0c40 0c4c       | L  |		.CONST	0x0c4c								; Address of begin
0c41 0004       |    |		.CONST	0x0004								; Address of exception handler
0c42 0004       |    |		.CONST	0x0004								; Number of locals
0c43			INIT_0c40:
0c43 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x1e = .DEBUG	0x0c43,0x1cc4,0x0001,0x0000,0x0058,0x54a5,0x0000,0x1da8
													; Debug Table 0x1e.0x0 = 0xc43,0xffff
0c44 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1e.0x1 = 0xc44,0xfffe
0c45 e5ff       |    |		Load	0x2,-0x1
0c46 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0c47 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1e.0x2 = 0xc47,0xfffd
0c48 00d9       |    |		Load_Top	At_Offset_1
0c49 00eb       |    |		Load_Encached	Diana_Cache
0c4a 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0c4b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0c4c			BODY_0c40:
0c4c 00cf       |    |		Action	Mark_Auxiliary
0c4d 0007       |    |		Action	Break_Optional							; Debug Table 0x1e.0x3 = 0xc4d,0x1
0c4e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1e.0x4 = 0xc4e,0x2
0c4f 00eb       |    |		Load_Encached	Diana_Cache
0c50 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0c51 6805       |h   |		Jump_Zero	0xc57
0c52 0092 12d3  |    |		Action	Push_String_Extended,0x12d3					; "can't find enclosing item_s"
													; Debug Table 0x1e.0x5 = 0xc52,0x3
0c54 821a       |    |		Call	0x1,0x1a
0c55 6232       |b2  |		Indirect_Literal	Discrete,0xe88,{0x00000000, 0x5854a501}		; Debug Table 0x1e.0x6 = 0xc55,0x4
0c56 0257       | W  |		Execute	Discrete,Raise
0c57 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1e.0x7 = 0xc57,0x5
0c58 00eb       |    |		Load_Encached	Diana_Cache
0c59 1883       |    |		Execute	Package,Field_Execute,Field_Number 0x83
0c5a 0f04       |    |		Execute_Immediate	Equal,0x4
0c5b 6805       |h   |		Jump_Zero	0xc61
0c5c 00d9       |    |		Load_Top	At_Offset_1
0c5d 00eb       |    |		Load_Encached	Diana_Cache
0c5e 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0c5f 0e90       |    |		Execute_Immediate	Not_Equal,-0x70
0c60 7008       |p   |		Jump_Nonzero	0xc69
0c61 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1e.0x8 = 0xc61,0x6
0c62 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0c63 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1e.0x9 = 0xc63,0x7
0c64 00eb       |    |		Load_Encached	Diana_Cache
0c65 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0c66 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0c67 00c9       |    |		Action	Pop_Auxiliary_Loop
0c68 7fe5       |    |		Jump	0xc4e
0c69 00ce       |    |		Action	Pop_Auxiliary
0c6a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0xa = 0xc6a,0x8
0c6b 00eb       |    |		Load_Encached	Diana_Cache
0c6c 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
0c6d 00da       |    |		Load_Top	At_Offset_2
0c6e 4975       |Iu  |		Short_Literal	0x175
0c6f 00eb       |    |		Load_Encached	Diana_Cache
0c70 0098       |    |		Execute	Package,Field_Read_Dynamic
0c71 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0c72 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0c73 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1e.0xb = 0xc73,0x9
0c74 4fff       |O   |		Short_Literal	-0x1
0c75 027f       |    |		Execute	Discrete,Equal
0c76 6805       |h   |		Jump_Zero	0xc7c
0c77 0092 12d4  |    |		Action	Push_String_Extended,0x12d4					; "can't find item within its parent item_s);"
													; Debug Table 0x1e.0xc = 0xc77,0xa
0c79 821a       |    |		Call	0x1,0x1a
0c7a 620d       |b   |		Indirect_Literal	Discrete,0xe88,{0x00000000, 0x5854a501}		; Debug Table 0x1e.0xd = 0xc7a,0xb
0c7b 0257       | W  |		Execute	Discrete,Raise
0c7c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1e.0xe = 0xc7c,0xc
0c7d e011       |    |		Load	0x0,0x11
0c7e 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0c7f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1e.0xf = 0xc7f,0xd
0c80 4972       |Ir  |		Short_Literal	0x172
0c81 00eb       |    |		Load_Encached	Diana_Cache
0c82 0098       |    |		Execute	Package,Field_Read_Dynamic
0c83 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0c84 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1e.0x10 = 0xc84,0xe
0c85 0a01       |    |		Execute_Immediate	Plus,0x1
0c86 00e4       |    |		Load_Encached	Positive_Cache
0c87 025b       | [  |		Execute	Discrete,Check_In_Type
0c88 00d9       |    |		Load_Top	At_Offset_1
0c89 e5fe       |    |		Load	0x2,-0x2
0c8a e012       |    |		Load	0x0,0x12
0c8b 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0c8c 0092 12d5  |    |		Action	Push_String_Extended,0x12d5					; "item has been removed"
													; Debug Table 0x1e.0x11 = 0xc8c,0xf
0c8e 821b       |    |		Call	0x1,0x1b
0c8f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0c90 ; --------------------------------------------------------------------------------------
0c90 ; SUBPROGRAM
0c90 ; --------------------------------------------------------------------------------------
0c90 0c96       |    |		.CONST	0x0c96								; Address of begin
0c91 0d45       | E  |		.CONST	0x0d45								; Address of exception handler
0c92 0002       |    |		.CONST	0x0002								; Number of locals
0c93			INIT_0c90:
0c93 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1f = .DEBUG	0x0c93,0x1cea,0x0001,0x0000,0x0058,0x54a5,0x0000,0x1817
													; Debug Table 0x1f.0x0 = 0xc93,0xffff
0c94 e00c       |    |		Load	0x0,0xc
0c95 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0c96			BODY_0c90:
0c96 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1f.0x1 = 0xc96,0x1
0c97 a7fd       |    |		Store_Unchecked	0x3,-0x3
0c98 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x2 = 0xc98,0x2
0c99 0092 12b8  |    |		Action	Push_String_Extended,0x12b8					; "SM_DEFN"
0c9b 01df       |    |		Execute	Vector,Equal
0c9c 6806       |h   |		Jump_Zero	0xca3
0c9d e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0x3 = 0xc9d,0x3
0c9e e7ff       |    |		Load	0x3,-0x1
0c9f 4959       |IY  |		Short_Literal	0x159
0ca0 00eb       |    |		Load_Encached	Diana_Cache
0ca1 0096       |    |		Execute	Package,Entry
0ca2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0ca3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x4 = 0xca3,0x4
0ca4 0092 12b9  |    |		Action	Push_String_Extended,0x12b9					; "SM_EXP_TYPE"
0ca6 01df       |    |		Execute	Vector,Equal
0ca7 6806       |h   |		Jump_Zero	0xcae
0ca8 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0x5 = 0xca8,0x5
0ca9 e7ff       |    |		Load	0x3,-0x1
0caa 495b       |I[  |		Short_Literal	0x15b
0cab 00eb       |    |		Load_Encached	Diana_Cache
0cac 0096       |    |		Execute	Package,Entry
0cad 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0cae 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x6 = 0xcae,0x6
0caf 0092 12ba  |    |		Action	Push_String_Extended,0x12ba					; "SM_TYPE_SPEC"
0cb1 01df       |    |		Execute	Vector,Equal
0cb2 6806       |h   |		Jump_Zero	0xcb9
0cb3 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0x7 = 0xcb3,0x7
0cb4 e7ff       |    |		Load	0x3,-0x1
0cb5 4966       |If  |		Short_Literal	0x166
0cb6 00eb       |    |		Load_Encached	Diana_Cache
0cb7 0096       |    |		Execute	Package,Entry
0cb8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0cb9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x8 = 0xcb9,0x8
0cba 0092 12bb  |    |		Action	Push_String_Extended,0x12bb					; "SM_DISCRIMINANTS"
0cbc 01df       |    |		Execute	Vector,Equal
0cbd 6806       |h   |		Jump_Zero	0xcc4
0cbe e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0x9 = 0xcbe,0x9
0cbf e7ff       |    |		Load	0x3,-0x1
0cc0 495a       |IZ  |		Short_Literal	0x15a
0cc1 00eb       |    |		Load_Encached	Diana_Cache
0cc2 0096       |    |		Execute	Package,Entry
0cc3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0cc4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0xa = 0xcc4,0xa
0cc5 0092 12bc  |    |		Action	Push_String_Extended,0x12bc					; "SM_BASE_TYPE"
0cc7 01df       |    |		Execute	Vector,Equal
0cc8 6806       |h   |		Jump_Zero	0xccf
0cc9 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0xb = 0xcc9,0xb
0cca e7ff       |    |		Load	0x3,-0x1
0ccb 4956       |IV  |		Short_Literal	0x156
0ccc 00eb       |    |		Load_Encached	Diana_Cache
0ccd 0096       |    |		Execute	Package,Entry
0cce 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0ccf 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0xc = 0xccf,0xc
0cd0 0092 12bd  |    |		Action	Push_String_Extended,0x12bd					; "SM_TYPE_STRUCT"
0cd2 01df       |    |		Execute	Vector,Equal
0cd3 6806       |h   |		Jump_Zero	0xcda
0cd4 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0xd = 0xcd4,0xd
0cd5 e7ff       |    |		Load	0x3,-0x1
0cd6 4967       |Ig  |		Short_Literal	0x167
0cd7 00eb       |    |		Load_Encached	Diana_Cache
0cd8 0096       |    |		Execute	Package,Entry
0cd9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0cda 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0xe = 0xcda,0xe
0cdb 0092 12be  |    |		Action	Push_String_Extended,0x12be					; "SM_CONSTRAINT"
0cdd 01df       |    |		Execute	Vector,Equal
0cde 6806       |h   |		Jump_Zero	0xce5
0cdf e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0xf = 0xcdf,0xf
0ce0 e7ff       |    |		Load	0x3,-0x1
0ce1 4958       |IX  |		Short_Literal	0x158
0ce2 00eb       |    |		Load_Encached	Diana_Cache
0ce3 0096       |    |		Execute	Package,Entry
0ce4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0ce5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x10 = 0xce5,0x10
0ce6 0092 12bf  |    |		Action	Push_String_Extended,0x12bf					; "SM_FIRST"
0ce8 01df       |    |		Execute	Vector,Equal
0ce9 6806       |h   |		Jump_Zero	0xcf0
0cea e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0x11 = 0xcea,0x11
0ceb e7ff       |    |		Load	0x3,-0x1
0cec 496a       |Ij  |		Short_Literal	0x16a
0ced 00eb       |    |		Load_Encached	Diana_Cache
0cee 0096       |    |		Execute	Package,Entry
0cef 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0cf0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x12 = 0xcf0,0x12
0cf1 0092 12c0  |    |		Action	Push_String_Extended,0x12c0					; "SM_BODY"
0cf3 01df       |    |		Execute	Vector,Equal
0cf4 6806       |h   |		Jump_Zero	0xcfb
0cf5 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0x13 = 0xcf5,0x13
0cf6 e7ff       |    |		Load	0x3,-0x1
0cf7 4957       |IW  |		Short_Literal	0x157
0cf8 00eb       |    |		Load_Encached	Diana_Cache
0cf9 0096       |    |		Execute	Package,Entry
0cfa 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0cfb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x14 = 0xcfb,0x14
0cfc 0092 12c1  |    |		Action	Push_String_Extended,0x12c1					; "SM_STUB"
0cfe 01df       |    |		Execute	Vector,Equal
0cff 6806       |h   |		Jump_Zero	0xd06
0d00 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0x15 = 0xd00,0x15
0d01 e7ff       |    |		Load	0x3,-0x1
0d02 496c       |Il  |		Short_Literal	0x16c
0d03 00eb       |    |		Load_Encached	Diana_Cache
0d04 0096       |    |		Execute	Package,Entry
0d05 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0d06 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x16 = 0xd06,0x16
0d07 0092 12c2  |    |		Action	Push_String_Extended,0x12c2					; "SM_SPEC"
0d09 01df       |    |		Execute	Vector,Equal
0d0a 6806       |h   |		Jump_Zero	0xd11
0d0b e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0x17 = 0xd0b,0x17
0d0c e7ff       |    |		Load	0x3,-0x1
0d0d 4963       |Ic  |		Short_Literal	0x163
0d0e 00eb       |    |		Load_Encached	Diana_Cache
0d0f 0096       |    |		Execute	Package,Entry
0d10 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0d11 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x18 = 0xd11,0x18
0d12 0092 12c3  |    |		Action	Push_String_Extended,0x12c3					; "SM_OBJ_TYPE"
0d14 01df       |    |		Execute	Vector,Equal
0d15 6806       |h   |		Jump_Zero	0xd1c
0d16 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0x19 = 0xd16,0x19
0d17 e7ff       |    |		Load	0x3,-0x1
0d18 4961       |Ia  |		Short_Literal	0x161
0d19 00eb       |    |		Load_Encached	Diana_Cache
0d1a 0096       |    |		Execute	Package,Entry
0d1b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0d1c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x1a = 0xd1c,0x1a
0d1d 0092 12c4  |    |		Action	Push_String_Extended,0x12c4					; "SM_OBJ_DEF"
0d1f 01df       |    |		Execute	Vector,Equal
0d20 6806       |h   |		Jump_Zero	0xd27
0d21 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0x1b = 0xd21,0x1b
0d22 e7ff       |    |		Load	0x3,-0x1
0d23 4960       |I`  |		Short_Literal	0x160
0d24 00eb       |    |		Load_Encached	Diana_Cache
0d25 0096       |    |		Execute	Package,Entry
0d26 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0d27 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x1c = 0xd27,0x1c
0d28 0092 12c5  |    |		Action	Push_String_Extended,0x12c5					; "SM_SIZE"
0d2a 01df       |    |		Execute	Vector,Equal
0d2b 6806       |h   |		Jump_Zero	0xd32
0d2c e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0x1d = 0xd2c,0x1d
0d2d e7ff       |    |		Load	0x3,-0x1
0d2e 4962       |Ib  |		Short_Literal	0x162
0d2f 00eb       |    |		Load_Encached	Diana_Cache
0d30 0096       |    |		Execute	Package,Entry
0d31 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0d32 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x1e = 0xd32,0x1e
0d33 0092 12c6  |    |		Action	Push_String_Extended,0x12c6					; "SM_STORAGE_SIZE"
0d35 01df       |    |		Execute	Vector,Equal
0d36 6806       |h   |		Jump_Zero	0xd3d
0d37 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1f.0x1f = 0xd37,0x1f
0d38 e7ff       |    |		Load	0x3,-0x1
0d39 4965       |Ie  |		Short_Literal	0x165
0d3a 00eb       |    |		Load_Encached	Diana_Cache
0d3b 0096       |    |		Execute	Package,Entry
0d3c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0d3d 0092 12cb  |    |		Action	Push_String_Extended,0x12cb					; "bad attribute name: "
													; Debug Table 0x1f.0x20 = 0xd3d,0x20
0d3f 00d9       |    |		Load_Top	At_Offset_1
0d40 01cc       |    |		Execute	Vector,Catenate
0d41 821a       |    |		Call	0x1,0x1a
0d42 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1f.0x21 = 0xd42,0x21
0d43 a7fd       |    |		Store_Unchecked	0x3,-0x3
0d44 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0d45			TRAP_0c90:
0d45 0007       |    |		Action	Break_Optional
0d46 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1f.0x22 = 0xd46,0x22
0d47 a7fd       |    |		Store_Unchecked	0x3,-0x3
0d48 0092 12d6  |    |		Action	Push_String_Extended,0x12d6					; "exception setting: "
													; Debug Table 0x1f.0x23 = 0xd48,0x23
0d4a 00da       |    |		Load_Top	At_Offset_2
0d4b 01cc       |    |		Execute	Vector,Catenate
0d4c 0092 12a7  |    |		Action	Push_String_Extended,0x12a7					; " ("
0d4e 01cc       |    |		Execute	Vector,Catenate
0d4f e007       |    |		Load	0x0,0x7
0d50 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0d51 01cc       |    |		Execute	Vector,Catenate
0d52 0092 12a5  |    |		Action	Push_String_Extended,0x12a5					; ")"
0d54 01cc       |    |		Execute	Vector,Catenate
0d55 821a       |    |		Call	0x1,0x1a
0d56 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0d57 0000       |    |		.XXX[0x1]
0d58 ; --------------------------------------------------------------------------------------
0d58 ; SUBPROGRAM
0d58 ; --------------------------------------------------------------------------------------
0d58 0d7f       |    |		.CONST	0x0d7f								; Address of begin
0d59 0e53       | S  |		.CONST	0x0e53								; Address of exception handler
0d5a 000a       |    |		.CONST	0x000a								; Number of locals
0d5b			INIT_0d58:
0d5b 0007       |    |		Action	Break_Optional							; Debug Table 0x20 = .DEBUG	0x0d5b,0x1d34,0x0001,0x0000,0x0058,0x54a5,0x0000,0x1935
													; Debug Table 0x20.0x0 = 0xd5b,0xffff
0d5c e001       |    |		Load	0x0,0x1								; Debug Table 0x20.0x1 = 0xd5c,0xfffe
0d5d 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0d5e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d5f 02c7       |    |		Declare_Variable	Any
0d60 00d8       |    |		Load_Top	At_Offset_0
0d61 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0d62 e002       |    |		Load	0x0,0x2								; Debug Table 0x20.0x2 = 0xd62,0xfffd
0d63 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0d64 02c7       |    |		Declare_Variable	Any
0d65 00d8       |    |		Load_Top	At_Offset_0
0d66 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0d67 e003       |    |		Load	0x0,0x3								; Debug Table 0x20.0x3 = 0xd67,0xfffc
0d68 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d69 e001       |    |		Load	0x0,0x1								; Debug Table 0x20.0x4 = 0xd69,0xfffb
0d6a 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0d6b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d6c 02c7       |    |		Declare_Variable	Any
0d6d 00d8       |    |		Load_Top	At_Offset_0
0d6e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0d6f 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x20.0x5 = 0xd6f,0xfffa
0d70 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x20.0x6 = 0xd70,0xfff9
0d71 e001       |    |		Load	0x0,0x1								; Debug Table 0x20.0x7 = 0xd71,0xfff8
0d72 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0d73 02ff       |    |		Declare_Variable	Variant_Record
0d74 00d8       |    |		Load_Top	At_Offset_0
0d75 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0d76 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x20.0x8 = 0xd76,0xfff7
0d77 e004       |    |		Load	0x0,0x4								; Debug Table 0x20.0x9 = 0xd77,0xfff6
0d78 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0d79 02c7       |    |		Declare_Variable	Any
0d7a e005       |    |		Load	0x0,0x5
0d7b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0d7c e004       |    |		Load	0x0,0x4
0d7d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0d7e c60a       |    |		Store	0x3,0xa
0d7f			BODY_0d58:
0d7f e005       |    |		Load	0x0,0x5								; Debug Table 0x20.0xa = 0xd7f,0x1
0d80 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0d81 4800       |H   |		Short_Literal	0x0
0d82 e001       |    |		Load	0x0,0x1
0d83 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0d84 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0d85 c605       |    |		Store	0x3,0x5
0d86 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x20.0xb = 0xd86,0x2
0d87 01db       |    |		Execute	Vector,Length
0d88 700a       |p   |		Jump_Nonzero	0xd93
0d89 0092 128a  |    |		Action	Push_String_Extended,0x128a					; "on_node cannot be empty"
													; Debug Table 0x20.0xc = 0xd89,0x3
0d8b 821a       |    |		Call	0x1,0x1a
0d8c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x20.0xd = 0xd8c,0x4
0d8d 4801       |H   |		Short_Literal	0x1
0d8e 4800       |H   |		Short_Literal	0x0
0d8f e004       |    |		Load	0x0,0x4
0d90 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0d91 c60a       |    |		Store	0x3,0xa
0d92 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x20.0xe = 0xd92,0x5
0d93 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x20.0xf = 0xd93,0x6
0d94 8215       |    |		Call	0x1,0x15
0d95 a606       |    |		Store_Unchecked	0x3,0x6
0d96 e606       |    |		Load	0x3,0x6								; Debug Table 0x20.0x10 = 0xd96,0x7
0d97 00eb       |    |		Load_Encached	Diana_Cache
0d98 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0d99 6807       |h   |		Jump_Zero	0xda1
0d9a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x20.0x11 = 0xd9a,0x8
0d9b 4801       |H   |		Short_Literal	0x1
0d9c 4800       |H   |		Short_Literal	0x0
0d9d e004       |    |		Load	0x0,0x4
0d9e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0d9f c60a       |    |		Store	0x3,0xa
0da0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x20.0x12 = 0xda0,0x9
0da1 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x13 = 0xda1,0xa
0da2 8215       |    |		Call	0x1,0x15
0da3 a607       |    |		Store_Unchecked	0x3,0x7
0da4 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x14 = 0xda4,0xb
0da5 01db       |    |		Execute	Vector,Length
0da6 680b       |h   |		Jump_Zero	0xdb2
0da7 00db       |    |		Load_Top	At_Offset_3
0da8 00eb       |    |		Load_Encached	Diana_Cache
0da9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0daa 6807       |h   |		Jump_Zero	0xdb2
0dab 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x20.0x15 = 0xdab,0xc
0dac 4801       |H   |		Short_Literal	0x1
0dad 4800       |H   |		Short_Literal	0x0
0dae e004       |    |		Load	0x0,0x4
0daf 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0db0 c60a       |    |		Store	0x3,0xa
0db1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x20.0x16 = 0xdb1,0xd
0db2 e606       |    |		Load	0x3,0x6								; Debug Table 0x20.0x17 = 0xdb2,0xe
0db3 e001       |    |		Load	0x0,0x1
0db4 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0db5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0db6 e001       |    |		Load	0x0,0x1
0db7 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0db8 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0db9 00db       |    |		Load_Top	At_Offset_3
0dba 016d       | m  |		Execute	Variant_Record,Structure_Write
0dbb e003       |    |		Load	0x0,0x3								; Debug Table 0x20.0x18 = 0xdbb,0xf
0dbc 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0dbd e603       |    |		Load	0x3,0x3
0dbe 0120       |    |		Execute	Any,Is_Value
0dbf 6803       |h   |		Jump_Zero	0xdc3
0dc0 e002       |    |		Load	0x0,0x2
0dc1 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0dc2 7801       |x   |		Jump	0xdc4
0dc3 e603       |    |		Load	0x3,0x3
0dc4 e602       |    |		Load	0x3,0x2
0dc5 0120       |    |		Execute	Any,Is_Value
0dc6 6804       |h   |		Jump_Zero	0xdcb
0dc7 e001       |    |		Load	0x0,0x1
0dc8 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0dc9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0dca 7801       |x   |		Jump	0xdcc
0dcb e602       |    |		Load	0x3,0x2
0dcc 00db       |    |		Load_Top	At_Offset_3
0dcd 4800       |H   |		Short_Literal	0x0
0dce 4803       |H   |		Short_Literal	0x3
0dcf e608       |    |		Load	0x3,0x8
0dd0 e001       |    |		Load	0x0,0x1
0dd1 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0dd2 c602       |    |		Store	0x3,0x2
0dd3 c603       |    |		Store	0x3,0x3
0dd4 c604       |    |		Store	0x3,0x4
0dd5 e604       |    |		Load	0x3,0x4								; Debug Table 0x20.0x19 = 0xdd5,0x10
0dd6 6813       |h   |		Jump_Zero	0xdea
0dd7 0092 128b  |    |		Action	Push_String_Extended,0x128b					; "can't open unit for overwrite: "
													; Debug Table 0x20.0x1a = 0xdd7,0x11
0dd9 e604       |    |		Load	0x3,0x4
0dda e003       |    |		Load	0x0,0x3
0ddb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0ddc 025e       | ^  |		Execute	Discrete,Convert
0ddd 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0dde 01cc       |    |		Execute	Vector,Catenate
0ddf 0092 128c  |    |		Action	Push_String_Extended,0x128c					; ", nothing changed"
0de1 01cc       |    |		Execute	Vector,Catenate
0de2 821a       |    |		Call	0x1,0x1a
0de3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x20.0x1b = 0xde3,0x12
0de4 4801       |H   |		Short_Literal	0x1
0de5 4800       |H   |		Short_Literal	0x0
0de6 e004       |    |		Load	0x0,0x4
0de7 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0de8 c60a       |    |		Store	0x3,0xa
0de9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x20.0x1c = 0xde9,0x13
0dea e005       |    |		Load	0x0,0x5								; Debug Table 0x20.0x1d = 0xdea,0x14
0deb 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0dec 4800       |H   |		Short_Literal	0x0
0ded e602       |    |		Load	0x3,0x2
0dee e001       |    |		Load	0x0,0x1
0def 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0df0 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0df1 e606       |    |		Load	0x3,0x6								; Debug Table 0x20.0x1e = 0xdf1,0x15
0df2 00eb       |    |		Load_Encached	Diana_Cache
0df3 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0df4 e607       |    |		Load	0x3,0x7
0df5 00eb       |    |		Load_Encached	Diana_Cache
0df6 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0df7 021f       |    |		Execute	Heap_Access,Equal
0df8 6805       |h   |		Jump_Zero	0xdfe
0df9 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x20.0x1f = 0xdf9,0x16
0dfa e603       |    |		Load	0x3,0x3
0dfb 00eb       |    |		Load_Encached	Diana_Cache
0dfc 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0dfd a607       |    |		Store_Unchecked	0x3,0x7
0dfe 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x20.0x20 = 0xdfe,0x17
0dff e607       |    |		Load	0x3,0x7
0e00 e606       |    |		Load	0x3,0x6
0e01 e603       |    |		Load	0x3,0x3
0e02 00eb       |    |		Load_Encached	Diana_Cache
0e03 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0e04 8402       |    |		Call	0x2,0x2
0e05 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0e06 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x20.0x21 = 0xe06,0x18
0e07 700e       |p   |		Jump_Nonzero	0xe16
0e08 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x20.0x22 = 0xe08,0x19
0e09 4801       |H   |		Short_Literal	0x1
0e0a 4800       |H   |		Short_Literal	0x0
0e0b e004       |    |		Load	0x0,0x4
0e0c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e0d c60a       |    |		Store	0x3,0xa
0e0e e005       |    |		Load	0x0,0x5								; Debug Table 0x20.0x23 = 0xe0e,0x1a
0e0f 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0e10 4800       |H   |		Short_Literal	0x0
0e11 e605       |    |		Load	0x3,0x5
0e12 e001       |    |		Load	0x0,0x1
0e13 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0e14 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0e15 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x20.0x24 = 0xe15,0x1b
0e16 e003       |    |		Load	0x0,0x3								; Debug Table 0x20.0x25 = 0xe16,0x1c
0e17 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0e18 4800       |H   |		Short_Literal	0x0
0e19 4801       |H   |		Short_Literal	0x1
0e1a 00db       |    |		Load_Top	At_Offset_3
0e1b e608       |    |		Load	0x3,0x8
0e1c e001       |    |		Load	0x0,0x1
0e1d 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0e1e c604       |    |		Store	0x3,0x4
0e1f e604       |    |		Load	0x3,0x4								; Debug Table 0x20.0x26 = 0xe1f,0x1d
0e20 681a       |h   |		Jump_Zero	0xe3b
0e21 0092 128d  |    |		Action	Push_String_Extended,0x128d					; "can't close unit: "
													; Debug Table 0x20.0x27 = 0xe21,0x1e
0e23 e604       |    |		Load	0x3,0x4
0e24 e003       |    |		Load	0x0,0x3
0e25 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0e26 025e       | ^  |		Execute	Discrete,Convert
0e27 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0e28 01cc       |    |		Execute	Vector,Catenate
0e29 0092 128c  |    |		Action	Push_String_Extended,0x128c					; ", nothing changed"
0e2b 01cc       |    |		Execute	Vector,Catenate
0e2c 821a       |    |		Call	0x1,0x1a
0e2d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x20.0x28 = 0xe2d,0x1f
0e2e 4801       |H   |		Short_Literal	0x1
0e2f 4800       |H   |		Short_Literal	0x0
0e30 e004       |    |		Load	0x0,0x4
0e31 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e32 c60a       |    |		Store	0x3,0xa
0e33 e005       |    |		Load	0x0,0x5								; Debug Table 0x20.0x29 = 0xe33,0x20
0e34 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0e35 4800       |H   |		Short_Literal	0x0
0e36 e605       |    |		Load	0x3,0x5
0e37 e001       |    |		Load	0x0,0x1
0e38 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0e39 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0e3a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x20.0x2a = 0xe3a,0x21
0e3b e005       |    |		Load	0x0,0x5								; Debug Table 0x20.0x2b = 0xe3b,0x22
0e3c 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0e3d 4800       |H   |		Short_Literal	0x0
0e3e e605       |    |		Load	0x3,0x5
0e3f e001       |    |		Load	0x0,0x1
0e40 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0e41 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0e42 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x20.0x2c = 0xe42,0x23
0e43 4801       |H   |		Short_Literal	0x1
0e44 4801       |H   |		Short_Literal	0x1
0e45 e004       |    |		Load	0x0,0x4
0e46 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e47 c60a       |    |		Store	0x3,0xa
0e48 0092 12d7  |    |		Action	Push_String_Extended,0x12d7					; "changed attribute "
													; Debug Table 0x20.0x2d = 0xe48,0x24
0e4a e5ff       |    |		Load	0x2,-0x1
0e4b 01cc       |    |		Execute	Vector,Catenate
0e4c 0092 12d8  |    |		Action	Push_String_Extended,0x12d8					; " on node "
0e4e 01cc       |    |		Execute	Vector,Catenate
0e4f e5fe       |    |		Load	0x2,-0x2
0e50 01cc       |    |		Execute	Vector,Catenate
0e51 821b       |    |		Call	0x1,0x1b
0e52 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0e53			TRAP_0d58:
0e53 0007       |    |		Action	Break_Optional
0e54 0092 12d9  |    |		Action	Push_String_Extended,0x12d9					; "Unexpected exception ("
													; Debug Table 0x20.0x2e = 0xe54,0x25
0e56 e007       |    |		Load	0x0,0x7
0e57 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0e58 01cc       |    |		Execute	Vector,Catenate
0e59 0092 12da  |    |		Action	Push_String_Extended,0x12da					; "), nothing changed"
0e5b 01cc       |    |		Execute	Vector,Catenate
0e5c 821a       |    |		Call	0x1,0x1a
0e5d e005       |    |		Load	0x0,0x5								; Debug Table 0x20.0x2f = 0xe5d,0x26
0e5e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0e5f 4800       |H   |		Short_Literal	0x0
0e60 e605       |    |		Load	0x3,0x5
0e61 e001       |    |		Load	0x0,0x1
0e62 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0e63 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0e64 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x20.0x30 = 0xe64,0x27
0e65 4801       |H   |		Short_Literal	0x1
0e66 4800       |H   |		Short_Literal	0x0
0e67 e004       |    |		Load	0x0,0x4
0e68 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0e69 c60a       |    |		Store	0x3,0xa
0e6a 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0e6b 0000 0000  |    |		.BLANK	0000[0x5]
0e70 ; --------------------------------------------------------------------------------------
0e70 ; SUBPROGRAM
0e70 ; --------------------------------------------------------------------------------------
0e70 0e73       | s  |		.CONST	0x0e73								; Address of begin
0e71 0004       |    |		.CONST	0x0004								; Address of exception handler
0e72 0001       |    |		.CONST	0x0001								; Number of locals
0e73			BODY_0e70:
0e73			INIT_0e70:
0e73 4603       |F   |		Jump_Case	0x4							; Debug Table 0x21 = .DEBUG	0x0e73,0x1d98,0x0005,0x0000,0x0058,0x54a5,0x0000,0x0d1d
0e74 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0e75 7802       |x   |		Jump	0xe78								; case 0x1
0e76 7805       |x   |		Jump	0xe7c								; case 0x2
0e77 7809       |x   |		Jump	0xe81								; case 0x3
0e78 00da       |    |		Load_Top	At_Offset_2
0e79 0091 1284  |    |		Action	Push_String_Extended_Indexed,0x1284				; "NO_KIND"
0e7b 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0e7c 00db       |    |		Load_Top	At_Offset_3
0e7d 00db       |    |		Load_Top	At_Offset_3
0e7e 00e0       |    |		Load_Encached	Standard_Cache
0e7f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0e80 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0e81 00da       |    |		Load_Top	At_Offset_2
0e82 00e0       |    |		Load_Encached	Standard_Cache
0e83 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0e84 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0e85 0000 0000  |    |		.XXX[0x3]
0e87 0000       |    |
0e88 0000 0000  |    |		.LITERAL	{0x00000000, 0x5854a501}
0e8c 0000 0000  |    |		.BLANK	0000[0x4]
0e90 ; --------------------------------------------------------------------------------------
0e90 ; SUBPROGRAM
0e90 ; --------------------------------------------------------------------------------------
0e90 0e93       |    |		.CONST	0x0e93								; Address of begin
0e91 0004       |    |		.CONST	0x0004								; Address of exception handler
0e92 0001       |    |		.CONST	0x0001								; Number of locals
0e93			BODY_0e90:
0e93			INIT_0e90:
0e93 4608       |F   |		Jump_Case	0x9							; Debug Table 0x22 = .DEBUG	0x0e93,0x1d9a,0x0005,0x0000,0x0058,0x54a5,0x0000,0x0d27
0e94 7808       |x   |		Jump	0xe9d								; case 0x0
0e95 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0e96 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
0e97 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0e98 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0e99 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
0e9a 7817       |x   |		Jump	0xeb2								; case 0x6
0e9b 7828       |x(  |		Jump	0xec4								; case 0x7
0e9c 783c       |x<  |		Jump	0xed9								; case 0x8
0e9d 00da       |    |		Load_Top	At_Offset_2
0e9e 016c       | l  |		Execute	Variant_Record,Is_Constrained
0e9f 7009       |p   |		Jump_Nonzero	0xea9
0ea0 00cf       |    |		Action	Mark_Auxiliary
0ea1 4800       |H   |		Short_Literal	0x0
0ea2 e7ff       |    |		Load	0x3,-0x1
0ea3 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0ea4 00d8       |    |		Load_Top	At_Offset_0
0ea5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0ea6 c7ff       |    |		Store	0x3,-0x1
0ea7 00ce       |    |		Action	Pop_Auxiliary
0ea8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0ea9 00da       |    |		Load_Top	At_Offset_2
0eaa 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0eab 4605       |F   |		Jump_Case	0x6
0eac 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
0ead 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0eae 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
0eaf 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0eb0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0eb1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
0eb2 00db       |    |		Load_Top	At_Offset_3
0eb3 4605       |F   |		Jump_Case	0x6
0eb4 780b       |x   |		Jump	0xec0								; case 0x0
0eb5 7804       |x   |		Jump	0xeba								; case 0x1
0eb6 7805       |x   |		Jump	0xebc								; case 0x2
0eb7 7806       |x   |		Jump	0xebe								; case 0x3
0eb8 7807       |x   |		Jump	0xec0								; case 0x4
0eb9 7808       |x   |		Jump	0xec2								; case 0x5
0eba 4801       |H   |		Short_Literal	0x1
0ebb 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0ebc 4802       |H   |		Short_Literal	0x2
0ebd 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0ebe 4803       |H   |		Short_Literal	0x3
0ebf 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0ec0 48ff       |H   |		Short_Literal	0xff
0ec1 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0ec2 4804       |H   |		Short_Literal	0x4
0ec3 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0ec4 00db       |    |		Load_Top	At_Offset_3
0ec5 e7fe       |    |		Load	0x3,-0x2
0ec6 4605       |F   |		Jump_Case	0x6
0ec7 780b       |x   |		Jump	0xed3								; case 0x0
0ec8 7804       |x   |		Jump	0xecd								; case 0x1
0ec9 7805       |x   |		Jump	0xecf								; case 0x2
0eca 7806       |x   |		Jump	0xed1								; case 0x3
0ecb 7807       |x   |		Jump	0xed3								; case 0x4
0ecc 7808       |x   |		Jump	0xed5								; case 0x5
0ecd 4801       |H   |		Short_Literal	0x1
0ece 7807       |x   |		Jump	0xed6
0ecf 4802       |H   |		Short_Literal	0x2
0ed0 7805       |x   |		Jump	0xed6
0ed1 4803       |H   |		Short_Literal	0x3
0ed2 7803       |x   |		Jump	0xed6
0ed3 48ff       |H   |		Short_Literal	0xff
0ed4 7801       |x   |		Jump	0xed6
0ed5 4804       |H   |		Short_Literal	0x4
0ed6 e7ff       |    |		Load	0x3,-0x1
0ed7 031b       |    |		Declare_Type	Variant_Record,Constrained
0ed8 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0ed9 00db       |    |		Load_Top	At_Offset_3
0eda e7fe       |    |		Load	0x3,-0x2
0edb e7ff       |    |		Load	0x3,-0x1
0edc 1c06       |    |		Execute_Immediate	Run_Utility,0x6
0edd e7ff       |    |		Load	0x3,-0x1
0ede 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
0edf 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0ee0 ; --------------------------------------------------------------------------------------
0ee0 ; SUBPROGRAM
0ee0 ; --------------------------------------------------------------------------------------
0ee0 0eeb       |    |		.CONST	0x0eeb								; Address of begin
0ee1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ee2 0005       |    |		.CONST	0x0005								; Number of locals
0ee3			INIT_0ee0:
0ee3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x23 = .DEBUG	0x0ee3,0x1d9c,0x0002,0x0000,0x0058,0x54a5,0x0000,0x0d68
													; Debug Table 0x23.0x0 = 0xee3,0xffff
0ee4 e00c       |    |		Load	0x0,0xc
0ee5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0ee6 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x23.0x1 = 0xee6,0xfffe
0ee7 029f 124b  |   K|		Declare_Subprogram	INIT_1248,For_Call
0ee9 029f 126b  |   k|		Declare_Subprogram	INIT_1268,For_Call
0eeb			BODY_0ee0:
0eeb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x23.0x2 = 0xeeb,0x1
0eec 0092 12db  |    |		Action	Push_String_Extended,0x12db					; "TRUE"
0eee 01df       |    |		Execute	Vector,Equal
0eef 6807       |h   |		Jump_Zero	0xef7
0ef0 4801       |H   |		Short_Literal	0x1							; Debug Table 0x23.0x3 = 0xef0,0x2
0ef1 e40b       |    |		Load	0x2,0xb
0ef2 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0ef3 4801       |H   |		Short_Literal	0x1
0ef4 00d9       |    |		Load_Top	At_Offset_1
0ef5 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0ef6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ef7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x23.0x4 = 0xef7,0x3
0ef8 0092 12dc  |    |		Action	Push_String_Extended,0x12dc					; "FALSE"
0efa 01df       |    |		Execute	Vector,Equal
0efb 6807       |h   |		Jump_Zero	0xf03
0efc 4801       |H   |		Short_Literal	0x1							; Debug Table 0x23.0x5 = 0xefc,0x4
0efd e40b       |    |		Load	0x2,0xb
0efe 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0eff 4800       |H   |		Short_Literal	0x0
0f00 00d9       |    |		Load_Top	At_Offset_1
0f01 2a02       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0f02 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0f03 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x23.0x6 = 0xf03,0x5
0f04 0092 12dd  |    |		Action	Push_String_Extended,0x12dd					; "NULL"
0f06 01df       |    |		Execute	Vector,Equal
0f07 6808       |h   |		Jump_Zero	0xf10
0f08 4803       |H   |		Short_Literal	0x3							; Debug Table 0x23.0x7 = 0xf08,0x6
0f09 e40b       |    |		Load	0x2,0xb
0f0a 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0f0b 00eb       |    |		Load_Encached	Diana_Cache
0f0c 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0f0d 00d9       |    |		Load_Top	At_Offset_1
0f0e 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0f0f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0f10 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x23.0x8 = 0xf10,0x7
0f11 0092 12de  |    |		Action	Push_String_Extended,0x12de					; "[]"
0f13 01df       |    |		Execute	Vector,Equal
0f14 6804       |h   |		Jump_Zero	0xf19
0f15 4804       |H   |		Short_Literal	0x4							; Debug Table 0x23.0x9 = 0xf15,0x8
0f16 e40b       |    |		Load	0x2,0xb
0f17 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0f18 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0f19 4800       |H   |		Short_Literal	0x0							; Debug Table 0x23.0xa = 0xf19,0x9
0f1a e602       |    |		Load	0x3,0x2
0f1b 485f       |H_  |		Short_Literal	0x5f
0f1c e00c       |    |		Load	0x0,0xc
0f1d 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0f1e 6812       |h   |		Jump_Zero	0xf31
0f1f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x23.0xb = 0xf1f,0xa
0f20 8215       |    |		Call	0x1,0x15
0f21 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0f22 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x23.0xc = 0xf22,0xb
0f23 00eb       |    |		Load_Encached	Diana_Cache
0f24 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0f25 6804       |h   |		Jump_Zero	0xf2a
0f26 4800       |H   |		Short_Literal	0x0							; Debug Table 0x23.0xd = 0xf26,0xc
0f27 e40b       |    |		Load	0x2,0xb
0f28 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0f29 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0f2a 4803       |H   |		Short_Literal	0x3							; Debug Table 0x23.0xe = 0xf2a,0xd
0f2b e40b       |    |		Load	0x2,0xb
0f2c 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0f2d 00db       |    |		Load_Top	At_Offset_3
0f2e 00d9       |    |		Load_Top	At_Offset_1
0f2f 2a04       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4
0f30 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0f31 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x23.0xf = 0xf31,0xe
0f32 01db       |    |		Execute	Vector,Length
0f33 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0f34 6808       |h   |		Jump_Zero	0xf3d
0f35 00db       |    |		Load_Top	At_Offset_3
0f36 01dd       |    |		Execute	Vector,First
0f37 e602       |    |		Load	0x3,0x2
0f38 01d7       |    |		Execute	Vector,Field_Read
0f39 0f2b       | +  |		Execute_Immediate	Equal,0x2b
0f3a 6802       |h   |		Jump_Zero	0xf3d
0f3b 8604       |    |		Call	0x3,0x4								; Debug Table 0x23.0x10 = 0xf3b,0xf
0f3c 7801       |x   |		Jump	0xf3e
0f3d 8605       |    |		Call	0x3,0x5								; Debug Table 0x23.0x11 = 0xf3d,0x10
0f3e 4831       |H1  |		Short_Literal	0x31
0f3f 0257       | W  |		Execute	Discrete,Raise
0f40 ; --------------------------------------------------------------------------------------
0f40 ; SUBPROGRAM
0f40 ; --------------------------------------------------------------------------------------
0f40 0f43       | C  |		.CONST	0x0f43								; Address of begin
0f41 0f85       |    |		.CONST	0x0f85								; Address of exception handler
0f42 0001       |    |		.CONST	0x0001								; Number of locals
0f43			BODY_0f40:
0f43			INIT_0f40:
0f43 e40c       |    |		Load	0x2,0xc								; Debug Table 0x24 = .DEBUG	0x0f43,0x1dc2,0x0004,0x0000,0x0058,0x54a5,0x0000,0x0f86
													; Debug Table 0x24.0x0 = 0xf43,0x1
0f44 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0f45 4605       |F   |		Jump_Case	0x6
0f46 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; case 0x0
0f47 781c       |x   |		Jump	0xf64								; case 0x1
0f48 7803       |x   |		Jump	0xf4c								; case 0x2
0f49 7826       |x&  |		Jump	0xf70								; case 0x3
0f4a 7831       |x1  |		Jump	0xf7c								; case 0x4
0f4b 780c       |x   |		Jump	0xf58								; case 0x5
0f4c e40c       |    |		Load	0x2,0xc								; Debug Table 0x24.0x1 = 0xf4c,0x2
0f4d 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0f4e e405       |    |		Load	0x2,0x5
0f4f e406       |    |		Load	0x2,0x6
0f50 e403       |    |		Load	0x2,0x3
0f51 00eb       |    |		Load_Encached	Diana_Cache
0f52 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0f53 4973       |Is  |		Short_Literal	0x173
0f54 00eb       |    |		Load_Encached	Diana_Cache
0f55 0098       |    |		Execute	Package,Field_Read_Dynamic
0f56 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0f57 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0f58 e40c       |    |		Load	0x2,0xc								; Debug Table 0x24.0x2 = 0xf58,0x3
0f59 2e05       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5
0f5a e405       |    |		Load	0x2,0x5
0f5b e406       |    |		Load	0x2,0x6
0f5c e403       |    |		Load	0x2,0x3
0f5d 00eb       |    |		Load_Encached	Diana_Cache
0f5e 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0f5f 4973       |Is  |		Short_Literal	0x173
0f60 00eb       |    |		Load_Encached	Diana_Cache
0f61 0098       |    |		Execute	Package,Field_Read_Dynamic
0f62 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0f63 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0f64 e40c       |    |		Load	0x2,0xc								; Debug Table 0x24.0x3 = 0xf64,0x4
0f65 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
0f66 e405       |    |		Load	0x2,0x5
0f67 e406       |    |		Load	0x2,0x6
0f68 e403       |    |		Load	0x2,0x3
0f69 00eb       |    |		Load_Encached	Diana_Cache
0f6a 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0f6b 4973       |Is  |		Short_Literal	0x173
0f6c 00eb       |    |		Load_Encached	Diana_Cache
0f6d 0098       |    |		Execute	Package,Field_Read_Dynamic
0f6e 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0f6f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0f70 e40c       |    |		Load	0x2,0xc								; Debug Table 0x24.0x4 = 0xf70,0x5
0f71 2e04       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4
0f72 e405       |    |		Load	0x2,0x5
0f73 e406       |    |		Load	0x2,0x6
0f74 e403       |    |		Load	0x2,0x3
0f75 00eb       |    |		Load_Encached	Diana_Cache
0f76 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0f77 4973       |Is  |		Short_Literal	0x173
0f78 00eb       |    |		Load_Encached	Diana_Cache
0f79 0098       |    |		Execute	Package,Field_Read_Dynamic
0f7a 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0f7b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0f7c e406       |    |		Load	0x2,0x6								; Debug Table 0x24.0x5 = 0xf7c,0x6
0f7d e403       |    |		Load	0x2,0x3
0f7e 00eb       |    |		Load_Encached	Diana_Cache
0f7f 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0f80 4972       |Ir  |		Short_Literal	0x172
0f81 00eb       |    |		Load_Encached	Diana_Cache
0f82 0098       |    |		Execute	Package,Field_Read_Dynamic
0f83 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0f84 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0f85			TRAP_0f40:
0f85 0007       |    |		Action	Break_Optional
0f86 0092 12df  |    |		Action	Push_String_Extended,0x12df					; "Exception "
													; Debug Table 0x24.0x6 = 0xf86,0x8
0f88 e007       |    |		Load	0x0,0x7
0f89 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0f8a 01cc       |    |		Execute	Vector,Catenate
0f8b 0092 1292  |    |		Action	Push_String_Extended,0x1292					; " while adding attribute, nothing_changed"
0f8d 01cc       |    |		Execute	Vector,Catenate
0f8e 821a       |    |		Call	0x1,0x1a
0f8f e409       |    |		Load	0x2,0x9								; Debug Table 0x24.0x7 = 0xf8f,0x9
0f90 4801       |H   |		Short_Literal	0x1
0f91 4800       |H   |		Short_Literal	0x0
0f92 e004       |    |		Load	0x0,0x4
0f93 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0f94 c409       |    |		Store	0x2,0x9
0f95 e005       |    |		Load	0x0,0x5								; Debug Table 0x24.0x8 = 0xf95,0xa
0f96 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0f97 4800       |H   |		Short_Literal	0x0
0f98 e408       |    |		Load	0x2,0x8
0f99 e001       |    |		Load	0x0,0x1
0f9a 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0f9b 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0f9c 00cc       |    |		Action	Pop_Block							; Debug Table 0x24.0x9 = 0xf9c,0xb
0f9d 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0f9e 0000 0000  |    |		.XXX[0x2]
0fa0 ; --------------------------------------------------------------------------------------
0fa0 ; SUBPROGRAM
0fa0 ; --------------------------------------------------------------------------------------
0fa0 0fa8       |    |		.CONST	0x0fa8								; Address of begin
0fa1 0004       |    |		.CONST	0x0004								; Address of exception handler
0fa2 0006       |    |		.CONST	0x0006								; Number of locals
0fa3			INIT_0fa0:
0fa3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x25 = .DEBUG	0x0fa3,0x1dd8,0x0001,0x0000,0x0058,0x54a5,0x0000,0x11cd
													; Debug Table 0x25.0x0 = 0xfa3,0xffff
0fa4 039d       |    |		Declare_Variable	Heap_Access,Duplicate
0fa5 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x25.0x1 = 0xfa5,0xfffe
0fa6 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x25.0x2 = 0xfa6,0xfffd
0fa7 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x25.0x3 = 0xfa7,0xfffc
0fa8			BODY_0fa0:
0fa8 e406       |    |		Load	0x2,0x6								; Debug Table 0x25.0x4 = 0xfa8,0x1
0fa9 00eb       |    |		Load_Encached	Diana_Cache
0faa 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0fab 0fa8       |    |		Execute_Immediate	Equal,-0x58
0fac 688c       |h   |		Jump_Zero	0x1039
0fad e406       |    |		Load	0x2,0x6								; Debug Table 0x25.0x5 = 0xfad,0x2
0fae 00eb       |    |		Load_Encached	Diana_Cache
0faf 18e9       |    |		Execute	Package,Field_Execute,Field_Number 0xe9
0fb0 a603       |    |		Store_Unchecked	0x3,0x3
0fb1 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x6 = 0xfb1,0x3
0fb2 00eb       |    |		Load_Encached	Diana_Cache
0fb3 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0fb4 0f49       | I  |		Execute_Immediate	Equal,0x49
0fb5 6804       |h   |		Jump_Zero	0xfba
0fb6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x7 = 0xfb6,0x4
0fb7 00eb       |    |		Load_Encached	Diana_Cache
0fb8 18e5       |    |		Execute	Package,Field_Execute,Field_Number 0xe5
0fb9 a603       |    |		Store_Unchecked	0x3,0x3
0fba 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x8 = 0xfba,0x5
0fbb 00eb       |    |		Load_Encached	Diana_Cache
0fbc 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0fbd 0f3e       | >  |		Execute_Immediate	Equal,0x3e
0fbe 687a       |hz  |		Jump_Zero	0x1039
0fbf 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x9 = 0xfbf,0x6
0fc0 00eb       |    |		Load_Encached	Diana_Cache
0fc1 18d8       |    |		Execute	Package,Field_Execute,Field_Number 0xd8
0fc2 a602       |    |		Store_Unchecked	0x3,0x2
0fc3 e602       |    |		Load	0x3,0x2								; Debug Table 0x25.0xa = 0xfc3,0x7
0fc4 00eb       |    |		Load_Encached	Diana_Cache
0fc5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0fc6 0f7c       | |  |		Execute_Immediate	Equal,0x7c
0fc7 6871       |hq  |		Jump_Zero	0x1039
0fc8 e602       |    |		Load	0x3,0x2								; Debug Table 0x25.0xb = 0xfc8,0x8
0fc9 00eb       |    |		Load_Encached	Diana_Cache
0fca 18bd       |    |		Execute	Package,Field_Execute,Field_Number 0xbd
0fcb 00eb       |    |		Load_Encached	Diana_Cache
0fcc 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
0fcd 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0fce 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25.0xc = 0xfce,0x9
0fcf 00eb       |    |		Load_Encached	Diana_Cache
0fd0 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
0fd1 7067       |pg  |		Jump_Nonzero	0x1039
0fd2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25.0xd = 0xfd2,0xa
0fd3 00eb       |    |		Load_Encached	Diana_Cache
0fd4 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
0fd5 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0fd6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25.0xe = 0xfd6,0xb
0fd7 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0fd8 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25.0xf = 0xfd8,0xc
0fd9 00eb       |    |		Load_Encached	Diana_Cache
0fda 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
0fdb 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0fdc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x25.0x10 = 0xfdc,0xd
0fdd 00eb       |    |		Load_Encached	Diana_Cache
0fde 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0fdf 0f40       | @  |		Execute_Immediate	Equal,0x40
0fe0 6820       |h   |		Jump_Zero	0x1001
0fe1 00d8       |    |		Load_Top	At_Offset_0
0fe2 00eb       |    |		Load_Encached	Diana_Cache
0fe3 18cf       |    |		Execute	Package,Field_Execute,Field_Number 0xcf
0fe4 00eb       |    |		Load_Encached	Diana_Cache
0fe5 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0fe6 00eb       |    |		Load_Encached	Diana_Cache
0fe7 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0fe8 0092 12e0  |    |		Action	Push_String_Extended,0x12e0					; "READ_ONLY"
0fea 01df       |    |		Execute	Vector,Equal
0feb 6815       |h   |		Jump_Zero	0x1001
0fec 4801       |H   |		Short_Literal	0x1							; Debug Table 0x25.0x11 = 0xfec,0xe
0fed 00d9       |    |		Load_Top	At_Offset_1
0fee 4974       |It  |		Short_Literal	0x174
0fef 00eb       |    |		Load_Encached	Diana_Cache
0ff0 0098       |    |		Execute	Package,Field_Read_Dynamic
0ff1 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0ff2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25.0x12 = 0xff2,0xf
0ff3 e602       |    |		Load	0x3,0x2
0ff4 00eb       |    |		Load_Encached	Diana_Cache
0ff5 18bd       |    |		Execute	Package,Field_Execute,Field_Number 0xbd
0ff6 00eb       |    |		Load_Encached	Diana_Cache
0ff7 1890       |    |		Execute	Package,Field_Execute,Field_Number 0x90
0ff8 0092 12e1  |    |		Action	Push_String_Extended,0x12e1					; "Removed read_only pragma from "
													; Debug Table 0x25.0x13 = 0xff8,0x10
0ffa e405       |    |		Load	0x2,0x5
0ffb e008       |    |		Load	0x0,0x8
0ffc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0ffd 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0ffe 01cc       |    |		Execute	Vector,Catenate
0fff 821b       |    |		Call	0x1,0x1b
1000 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x25.0x14 = 0x1000,0x11
1001 00cf       |    |		Action	Mark_Auxiliary
1002 7831       |x1  |		Jump	0x1034
1003 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x15 = 0x1003,0x13
1004 00eb       |    |		Load_Encached	Diana_Cache
1005 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
1006 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
1007 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x25.0x16 = 0x1007,0x14
1008 00eb       |    |		Load_Encached	Diana_Cache
1009 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
100a 0f40       | @  |		Execute_Immediate	Equal,0x40
100b 6821       |h!  |		Jump_Zero	0x102d
100c 00d9       |    |		Load_Top	At_Offset_1
100d 00eb       |    |		Load_Encached	Diana_Cache
100e 18cf       |    |		Execute	Package,Field_Execute,Field_Number 0xcf
100f 00eb       |    |		Load_Encached	Diana_Cache
1010 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
1011 00eb       |    |		Load_Encached	Diana_Cache
1012 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
1013 0092 12e0  |    |		Action	Push_String_Extended,0x12e0					; "READ_ONLY"
1015 01df       |    |		Execute	Vector,Equal
1016 6816       |h   |		Jump_Zero	0x102d
1017 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x17 = 0x1017,0x15
1018 00eb       |    |		Load_Encached	Diana_Cache
1019 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
101a a604       |    |		Store_Unchecked	0x3,0x4
101b 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x25.0x18 = 0x101b,0x16
101c 1857       | W  |		Execute	Package,Field_Execute,Field_Number 0x57
101d 00db       |    |		Load_Top	At_Offset_3
101e 00eb       |    |		Load_Encached	Diana_Cache
101f 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
1020 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x19 = 0x1020,0x17
1021 00db       |    |		Load_Top	At_Offset_3
1022 00eb       |    |		Load_Encached	Diana_Cache
1023 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
1024 0092 12e1  |    |		Action	Push_String_Extended,0x12e1					; "Removed read_only pragma from "
													; Debug Table 0x25.0x1a = 0x1024,0x18
1026 e405       |    |		Load	0x2,0x5
1027 e008       |    |		Load	0x0,0x8
1028 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
1029 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
102a 01cc       |    |		Execute	Vector,Catenate
102b 821b       |    |		Call	0x1,0x1b
102c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x25.0x1b = 0x102c,0x19
102d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x1c = 0x102d,0x1a
102e 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
102f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x1d = 0x102f,0x1b
1030 00eb       |    |		Load_Encached	Diana_Cache
1031 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
1032 a604       |    |		Store_Unchecked	0x3,0x4
1033 00c9       |    |		Action	Pop_Auxiliary_Loop
1034 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x1e = 0x1034,0x12
1035 00eb       |    |		Load_Encached	Diana_Cache
1036 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
1037 6fcb       |o   |		Jump_Zero	0x1003
1038 00ce       |    |		Action	Pop_Auxiliary
1039 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
103a 0000 0000  |    |		.BLANK	0000[0x6]
1040 ; --------------------------------------------------------------------------------------
1040 ; SUBPROGRAM
1040 ; --------------------------------------------------------------------------------------
1040 1043       | C  |		.CONST	0x1043								; Address of begin
1041 0004       |    |		.CONST	0x0004								; Address of exception handler
1042 0001       |    |		.CONST	0x0001								; Number of locals
1043			BODY_1040:
1043			INIT_1040:
1043 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x26 = .DEBUG	0x1043,0x1e18,0x0002,0x0000,0x0058,0x54a5,0x0000,0x1543
													; Debug Table 0x26.0x0 = 0x1043,0x1
1044 1857       | W  |		Execute	Package,Field_Execute,Field_Number 0x57
1045 4893       |H   |		Short_Literal	0x93
1046 00eb       |    |		Load_Encached	Diana_Cache
1047 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
1048 00db       |    |		Load_Top	At_Offset_3
1049 4817       |H   |		Short_Literal	0x17
104a 00eb       |    |		Load_Encached	Diana_Cache
104b 187a       | z  |		Execute	Package,Field_Execute,Field_Number 0x7a
104c 4840       |H@  |		Short_Literal	0x40
104d 00eb       |    |		Load_Encached	Diana_Cache
104e 187d       | }  |		Execute	Package,Field_Execute,Field_Number 0x7d
104f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1050 ; --------------------------------------------------------------------------------------
1050 ; SUBPROGRAM
1050 ; --------------------------------------------------------------------------------------
1050 1059       | Y  |		.CONST	0x1059								; Address of begin
1051 0004       |    |		.CONST	0x0004								; Address of exception handler
1052 0007       |    |		.CONST	0x0007								; Number of locals
1053			INIT_1050:
1053 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x27 = .DEBUG	0x1053,0x1e1c,0x0001,0x0000,0x0058,0x54a5,0x0000,0x156f
													; Debug Table 0x27.0x0 = 0x1053,0xffff
1054 039d       |    |		Declare_Variable	Heap_Access,Duplicate
1055 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x27.0x1 = 0x1055,0xfffe
1056 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x27.0x2 = 0x1056,0xfffd
1057 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x27.0x3 = 0x1057,0xfffc
1058 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x27.0x4 = 0x1058,0xfffb
1059			BODY_1050:
1059 e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x5 = 0x1059,0x1
105a 00eb       |    |		Load_Encached	Diana_Cache
105b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
105c 0fa8       |    |		Execute_Immediate	Equal,-0x58
105d 6882       |h   |		Jump_Zero	0x10e0
105e e406       |    |		Load	0x2,0x6								; Debug Table 0x27.0x6 = 0x105e,0x2
105f 00eb       |    |		Load_Encached	Diana_Cache
1060 18e9       |    |		Execute	Package,Field_Execute,Field_Number 0xe9
1061 a603       |    |		Store_Unchecked	0x3,0x3
1062 e603       |    |		Load	0x3,0x3								; Debug Table 0x27.0x7 = 0x1062,0x3
1063 00eb       |    |		Load_Encached	Diana_Cache
1064 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
1065 0f49       | I  |		Execute_Immediate	Equal,0x49
1066 6804       |h   |		Jump_Zero	0x106b
1067 e603       |    |		Load	0x3,0x3								; Debug Table 0x27.0x8 = 0x1067,0x4
1068 00eb       |    |		Load_Encached	Diana_Cache
1069 18e5       |    |		Execute	Package,Field_Execute,Field_Number 0xe5
106a a603       |    |		Store_Unchecked	0x3,0x3
106b e603       |    |		Load	0x3,0x3								; Debug Table 0x27.0x9 = 0x106b,0x5
106c 00eb       |    |		Load_Encached	Diana_Cache
106d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
106e 0f3e       | >  |		Execute_Immediate	Equal,0x3e
106f 6870       |hp  |		Jump_Zero	0x10e0
1070 e603       |    |		Load	0x3,0x3								; Debug Table 0x27.0xa = 0x1070,0x6
1071 00eb       |    |		Load_Encached	Diana_Cache
1072 18d8       |    |		Execute	Package,Field_Execute,Field_Number 0xd8
1073 a602       |    |		Store_Unchecked	0x3,0x2
1074 e602       |    |		Load	0x3,0x2								; Debug Table 0x27.0xb = 0x1074,0x7
1075 00eb       |    |		Load_Encached	Diana_Cache
1076 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
1077 0f7c       | |  |		Execute_Immediate	Equal,0x7c
1078 6867       |hg  |		Jump_Zero	0x10e0
1079 e602       |    |		Load	0x3,0x2								; Debug Table 0x27.0xc = 0x1079,0x8
107a 00eb       |    |		Load_Encached	Diana_Cache
107b 18bd       |    |		Execute	Package,Field_Execute,Field_Number 0xbd
107c a604       |    |		Store_Unchecked	0x3,0x4
107d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27.0xd = 0x107d,0x9
107e 00eb       |    |		Load_Encached	Diana_Cache
107f 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
1080 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
1081 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27.0xe = 0x1081,0xa
1082 00eb       |    |		Load_Encached	Diana_Cache
1083 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
1084 704f       |pO  |		Jump_Nonzero	0x10d4
1085 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27.0xf = 0x1085,0xb
1086 00eb       |    |		Load_Encached	Diana_Cache
1087 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
1088 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
1089 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27.0x10 = 0x1089,0xc
108a 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
108b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27.0x11 = 0x108b,0xd
108c 00eb       |    |		Load_Encached	Diana_Cache
108d 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
108e 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
108f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x27.0x12 = 0x108f,0xe
1090 00eb       |    |		Load_Encached	Diana_Cache
1091 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
1092 0f40       | @  |		Execute_Immediate	Equal,0x40
1093 680c       |h   |		Jump_Zero	0x10a0
1094 00d8       |    |		Load_Top	At_Offset_0
1095 00eb       |    |		Load_Encached	Diana_Cache
1096 18cf       |    |		Execute	Package,Field_Execute,Field_Number 0xcf
1097 00eb       |    |		Load_Encached	Diana_Cache
1098 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
1099 00eb       |    |		Load_Encached	Diana_Cache
109a 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
109b 0092 12e0  |    |		Action	Push_String_Extended,0x12e0					; "READ_ONLY"
109d 01df       |    |		Execute	Vector,Equal
109e 6801       |h   |		Jump_Zero	0x10a0
109f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x27.0x13 = 0x109f,0xf
10a0 00cf       |    |		Action	Mark_Auxiliary
10a1 7820       |x   |		Jump	0x10c2
10a2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27.0x14 = 0x10a2,0x11
10a3 00eb       |    |		Load_Encached	Diana_Cache
10a4 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
10a5 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
10a6 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x27.0x15 = 0x10a6,0x12
10a7 00eb       |    |		Load_Encached	Diana_Cache
10a8 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
10a9 0f40       | @  |		Execute_Immediate	Equal,0x40
10aa 6810       |h   |		Jump_Zero	0x10bb
10ab 00d9       |    |		Load_Top	At_Offset_1
10ac 00eb       |    |		Load_Encached	Diana_Cache
10ad 18cf       |    |		Execute	Package,Field_Execute,Field_Number 0xcf
10ae 00eb       |    |		Load_Encached	Diana_Cache
10af 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
10b0 00eb       |    |		Load_Encached	Diana_Cache
10b1 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
10b2 0092 12e0  |    |		Action	Push_String_Extended,0x12e0					; "READ_ONLY"
10b4 01df       |    |		Execute	Vector,Equal
10b5 6805       |h   |		Jump_Zero	0x10bb
10b6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27.0x16 = 0x10b6,0x13
10b7 00eb       |    |		Load_Encached	Diana_Cache
10b8 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
10b9 a605       |    |		Store_Unchecked	0x3,0x5
10ba 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1					; Debug Table 0x27.0x17 = 0x10ba,0x14
10bb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27.0x18 = 0x10bb,0x15
10bc 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
10bd 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27.0x19 = 0x10bd,0x16
10be 00eb       |    |		Load_Encached	Diana_Cache
10bf 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
10c0 a605       |    |		Store_Unchecked	0x3,0x5
10c1 00c9       |    |		Action	Pop_Auxiliary_Loop
10c2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27.0x1a = 0x10c2,0x10
10c3 00eb       |    |		Load_Encached	Diana_Cache
10c4 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
10c5 6fdc       |o   |		Jump_Zero	0x10a2
10c6 00ce       |    |		Action	Pop_Auxiliary
10c7 0092 12e0  |    |		Action	Push_String_Extended,0x12e0					; "READ_ONLY"
													; Debug Table 0x27.0x1b = 0x10c7,0x17
10c9 840b       |    |		Call	0x2,0xb
10ca a603       |    |		Store_Unchecked	0x3,0x3
10cb e603       |    |		Load	0x3,0x3								; Debug Table 0x27.0x1c = 0x10cb,0x18
10cc 4975       |Iu  |		Short_Literal	0x175
10cd 00eb       |    |		Load_Encached	Diana_Cache
10ce 0098       |    |		Execute	Package,Field_Read_Dynamic
10cf 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
10d0 00da       |    |		Load_Top	At_Offset_2
10d1 00eb       |    |		Load_Encached	Diana_Cache
10d2 185d       | ]  |		Execute	Package,Field_Execute,Field_Number 0x5d
10d3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
10d4 0092 12e0  |    |		Action	Push_String_Extended,0x12e0					; "READ_ONLY"
													; Debug Table 0x27.0x1d = 0x10d4,0x19
10d6 840b       |    |		Call	0x2,0xb
10d7 a603       |    |		Store_Unchecked	0x3,0x3
10d8 e603       |    |		Load	0x3,0x3								; Debug Table 0x27.0x1e = 0x10d8,0x1a
10d9 4975       |Iu  |		Short_Literal	0x175
10da 00eb       |    |		Load_Encached	Diana_Cache
10db 0098       |    |		Execute	Package,Field_Read_Dynamic
10dc 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
10dd e604       |    |		Load	0x3,0x4
10de 00eb       |    |		Load_Encached	Diana_Cache
10df 1890       |    |		Execute	Package,Field_Execute,Field_Number 0x90
10e0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
10e1 0000 0000  |    |		.BLANK	0000[0x7]
10e8 ; --------------------------------------------------------------------------------------
10e8 ; SUBPROGRAM
10e8 ; --------------------------------------------------------------------------------------
10e8 10eb       |    |		.CONST	0x10eb								; Address of begin
10e9 0004       |    |		.CONST	0x0004								; Address of exception handler
10ea 0001       |    |		.CONST	0x0001								; Number of locals
10eb			BODY_10e8:
10eb			INIT_10e8:
10eb 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x28 = .DEBUG	0x10eb,0x1e5c,0x0001,0x0000,0x0058,0x54a5,0x0000,0x0c8a
													; Debug Table 0x28.0x0 = 0x10eb,0x1
10ec 0000 0000  |    |		.BLANK	0000[0x4]
10f0 ; --------------------------------------------------------------------------------------
10f0 ; SUBPROGRAM
10f0 ; --------------------------------------------------------------------------------------
10f0 10f3       |    |		.CONST	0x10f3								; Address of begin
10f1 1103       |    |		.CONST	0x1103								; Address of exception handler
10f2 0001       |    |		.CONST	0x0001								; Number of locals
10f3			BODY_10f0:
10f3			INIT_10f0:
10f3 e409       |    |		Load	0x2,0x9								; Debug Table 0x29 = .DEBUG	0x10f3,0x1e60,0x0004,0x0000,0x0058,0x54a5,0x0000,0x1d59
													; Debug Table 0x29.0x0 = 0x10f3,0x1
10f4 00eb       |    |		Load_Encached	Diana_Cache
10f5 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
10f6 e403       |    |		Load	0x2,0x3
10f7 e408       |    |		Load	0x2,0x8
10f8 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
10f9 e008       |    |		Load	0x0,0x8
10fa 1b40       | @  |		Execute	Package,Field_Read,Field_Number 0x40
10fb 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
10fc 00eb       |    |		Load_Encached	Diana_Cache
10fd 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
10fe e408       |    |		Load	0x2,0x8
10ff 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
1100 e012       |    |		Load	0x0,0x12
1101 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
1102 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1103			TRAP_10f0:
1103 0007       |    |		Action	Break_Optional
1104 0092 12df  |    |		Action	Push_String_Extended,0x12df					; "Exception "
													; Debug Table 0x29.0x1 = 0x1104,0x2
1106 e007       |    |		Load	0x0,0x7
1107 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
1108 01cc       |    |		Execute	Vector,Catenate
1109 0092 12e2  |    |		Action	Push_String_Extended,0x12e2					; " while setting symrep, nothing_changed"
110b 01cc       |    |		Execute	Vector,Catenate
110c 821a       |    |		Call	0x1,0x1a
110d e40b       |    |		Load	0x2,0xb								; Debug Table 0x29.0x2 = 0x110d,0x3
110e 4801       |H   |		Short_Literal	0x1
110f 4800       |H   |		Short_Literal	0x0
1110 e004       |    |		Load	0x0,0x4
1111 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1112 c40b       |    |		Store	0x2,0xb
1113 e005       |    |		Load	0x0,0x5								; Debug Table 0x29.0x3 = 0x1113,0x4
1114 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
1115 4800       |H   |		Short_Literal	0x0
1116 e404       |    |		Load	0x2,0x4
1117 e001       |    |		Load	0x0,0x1
1118 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
1119 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
111a 00cc       |    |		Action	Pop_Block							; Debug Table 0x29.0x4 = 0x111a,0x5
111b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
111c 0000 0000  |    |		.BLANK	0000[0x4]
1120 ; --------------------------------------------------------------------------------------
1120 ; SUBPROGRAM
1120 ; --------------------------------------------------------------------------------------
1120 1125       | %  |		.CONST	0x1125								; Address of begin
1121 0004       |    |		.CONST	0x0004								; Address of exception handler
1122 0001       |    |		.CONST	0x0001								; Number of locals
1123			INIT_1120:
1123 0007       |    |		Action	Break_Optional							; Debug Table 0x2a = .DEBUG	0x1123,0x1e6c,0x0002,0x0000,0x0058,0x54a5,0x0000,0x014f
													; Debug Table 0x2a.0x0 = 0x1123,0xffff
1124 0007       |    |		Action	Break_Optional							; Debug Table 0x2a.0x1 = 0x1124,0xfffe
1125			BODY_1120:
1125 0007       |    |		Action	Break_Optional							; Debug Table 0x2a.0x2 = 0x1125,0x1
1126 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x2a.0x3 = 0x1126,0x401
1127 0007       |    |		Action	Break_Optional
1128 4400       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x0				; Debug Table 0x2a.0x4 = 0x1128,0x402
1129 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x2a.0x5 = 0x1129,0x2
112a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
112b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
112c 0000 0000  |    |		.BLANK	0000[0x4]
1130 ; --------------------------------------------------------------------------------------
1130 ; SUBPROGRAM
1130 ; --------------------------------------------------------------------------------------
1130 113e       | >  |		.CONST	0x113e								; Address of begin
1131 119b       |    |		.CONST	0x119b								; Address of exception handler
1132 0008       |    |		.CONST	0x0008								; Number of locals
1133			INIT_1130:
1133 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x2b = .DEBUG	0x1133,0x1e7a,0x0002,0x0000,0x0058,0x54a5,0x0000,0x019a
													; Debug Table 0x2b.0x0 = 0x1133,0xffff
1134 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x2b.0x1 = 0x1134,0xfffe
1135 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2b.0x2 = 0x1135,0xfffd
1136 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
1137 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2b.0x3 = 0x1137,0xfffc
1138 e404       |    |		Load	0x2,0x4								; Debug Table 0x2b.0x4 = 0x1138,0xfffb
1139 0007       |    |		Action	Break_Optional
113a e013       |    |		Load	0x0,0x13							; Debug Table 0x2b.0x5 = 0x113a,0xfffa
113b 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
113c 0322       | "  |		Declare_Variable	Record
113d 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x2b.0x6 = 0x113d,0xfff9
113e			BODY_1130:
113e 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x2b.0x7 = 0x113e,0xfff8
113f e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x2b.0x8 = 0x113f,0x1
1140 01d9       |    |		Execute	Vector,Reverse_Bounds
1141 0263       | c  |		Execute	Discrete,Above_Bound
1142 702d       |p-  |		Jump_Nonzero	0x1170
1143 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2b.0x9 = 0x1143,0x2
1144 e7ff       |    |		Load	0x3,-0x1
1145 01d7       |    |		Execute	Vector,Field_Read
1146 0f5f       | _  |		Execute_Immediate	Equal,0x5f
1147 6826       |h&  |		Jump_Zero	0x116e
1148 0092 12e3  |    |		Action	Push_String_Extended,0x12e3					; "16#"
													; Debug Table 0x2b.0xa = 0x1148,0x3
114a e7ff       |    |		Load	0x3,-0x1
114b 01dd       |    |		Execute	Vector,First
114c 00da       |    |		Load_Top	At_Offset_2
114d 0aff       |    |		Execute_Immediate	Plus,-0x1
114e 0248       | H  |		Execute	Discrete,Check_In_Integer
114f e7ff       |    |		Load	0x3,-0x1
1150 01cf       |    |		Execute	Vector,Slice_Read
1151 01cc       |    |		Execute	Vector,Catenate
1152 0092 12e4  |    |		Action	Push_String_Extended,0x12e4					; "#"
1154 01cc       |    |		Execute	Vector,Catenate
1155 00e2       |    |		Load_Encached	Integer_Cache
1156 00e0       |    |		Load_Encached	Standard_Cache
1157 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
1158 a602       |    |		Store_Unchecked	0x3,0x2
1159 0092 12e3  |    |		Action	Push_String_Extended,0x12e3					; "16#"
													; Debug Table 0x2b.0xb = 0x1159,0x4
115b 00d9       |    |		Load_Top	At_Offset_1
115c 0a01       |    |		Execute_Immediate	Plus,0x1
115d 0248       | H  |		Execute	Discrete,Check_In_Integer
115e e7ff       |    |		Load	0x3,-0x1
115f 01dc       |    |		Execute	Vector,Last
1160 e7ff       |    |		Load	0x3,-0x1
1161 01cf       |    |		Execute	Vector,Slice_Read
1162 01cc       |    |		Execute	Vector,Catenate
1163 0092 12e4  |    |		Action	Push_String_Extended,0x12e4					; "#"
1165 01cc       |    |		Execute	Vector,Catenate
1166 00e2       |    |		Load_Encached	Integer_Cache
1167 00e0       |    |		Load_Encached	Standard_Cache
1168 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
1169 a603       |    |		Store_Unchecked	0x3,0x3
116a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2b.0xc = 0x116a,0x5
116b a604       |    |		Store_Unchecked	0x3,0x4
116c 00d2       |    |		Pop_Control	Pop_Count_2						; Debug Table 0x2b.0xd = 0x116c,0x6
116d 7802       |x   |		Jump	0x1170
116e 00c8       |    |		Action	Pop_Auxiliary_Range
116f 3fd3       |?   |		Loop_Increasing	0x1143
1170 00ce       |    |		Action	Pop_Auxiliary
1171 e604       |    |		Load	0x3,0x4								; Debug Table 0x2b.0xe = 0x1171,0x7
1172 7008       |p   |		Jump_Nonzero	0x117b
1173 0092 12e5  |    |		Action	Push_String_Extended,0x12e5					; "bad format for node name: "
													; Debug Table 0x2b.0xf = 0x1173,0x8
1175 e7ff       |    |		Load	0x3,-0x1
1176 01cc       |    |		Execute	Vector,Catenate
1177 821a       |    |		Call	0x1,0x1a
1178 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x2b.0x10 = 0x1178,0x9
1179 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
117a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
117b 4804       |H   |		Short_Literal	0x4							; Debug Table 0x2b.0x11 = 0x117b,0xa
117c e602       |    |		Load	0x3,0x2
117d 4802       |H   |		Short_Literal	0x2
117e 4820       |H   |		Short_Literal	0x20
117f 026d       | m  |		Execute	Discrete,Exponentiate
1180 0271       | q  |		Execute	Discrete,Times
1181 e013       |    |		Load	0x0,0x13
1182 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
1183 00da       |    |		Load_Top	At_Offset_2
1184 017d       | }  |		Execute	Record,Structure_Write
1185 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2b.0x12 = 0x1185,0xb
1186 e002       |    |		Load	0x0,0x2
1187 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
1188 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
1189 e603       |    |		Load	0x3,0x3								; Debug Table 0x2b.0x13 = 0x1189,0xc
118a e014       |    |		Load	0x0,0x14
118b 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
118c 025b       | [  |		Execute	Discrete,Check_In_Type
118d 00d9       |    |		Load_Top	At_Offset_1
118e e405       |    |		Load	0x2,0x5
118f e406       |    |		Load	0x2,0x6
1190 4807       |H   |		Short_Literal	0x7
1191 4802       |H   |		Short_Literal	0x2
1192 0099       |    |		Action	Reference_Dynamic
1193 e002       |    |		Load	0x0,0x2
1194 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
1195 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
1196 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2b.0x14 = 0x1196,0xd
1197 840a       |    |		Call	0x2,0xa
1198 a605       |    |		Store_Unchecked	0x3,0x5
1199 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2b.0x15 = 0x1199,0xe
119a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
119b			TRAP_1130:
119b 0007       |    |		Action	Break_Optional
119c 0092 12e6  |    |		Action	Push_String_Extended,0x12e6					; "exception converting: "
													; Debug Table 0x2b.0x16 = 0x119c,0xf
119e e7ff       |    |		Load	0x3,-0x1
119f 01cc       |    |		Execute	Vector,Catenate
11a0 0092 12a7  |    |		Action	Push_String_Extended,0x12a7					; " ("
11a2 01cc       |    |		Execute	Vector,Catenate
11a3 e007       |    |		Load	0x0,0x7
11a4 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
11a5 01cc       |    |		Execute	Vector,Catenate
11a6 0092 12a5  |    |		Action	Push_String_Extended,0x12a5					; ")"
11a8 01cc       |    |		Execute	Vector,Catenate
11a9 821a       |    |		Call	0x1,0x1a
11aa 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x2b.0x17 = 0x11aa,0x10
11ab 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
11ac 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
11ad 0000 0000  |    |		.XXX[0x3]
11af 0000       |    |
11b0 ; --------------------------------------------------------------------------------------
11b0 ; SUBPROGRAM
11b0 ; --------------------------------------------------------------------------------------
11b0 11b3       |    |		.CONST	0x11b3								; Address of begin
11b1 11ca       |    |		.CONST	0x11ca								; Address of exception handler
11b2 0001       |    |		.CONST	0x0001								; Number of locals
11b3			BODY_11b0:
11b3			INIT_11b0:
11b3 e406       |    |		Load	0x2,0x6								; Debug Table 0x2c = .DEBUG	0x11b3,0x1eac,0x0004,0x0000,0x0058,0x54a5,0x0000,0x0307
													; Debug Table 0x2c.0x0 = 0x11b3,0x1
11b4 0a01       |    |		Execute_Immediate	Plus,0x1
11b5 0248       | H  |		Execute	Discrete,Check_In_Integer
11b6 e5ff       |    |		Load	0x2,-0x1
11b7 01dc       |    |		Execute	Vector,Last
11b8 e5ff       |    |		Load	0x2,-0x1
11b9 01cf       |    |		Execute	Vector,Slice_Read
11ba 00e2       |    |		Load_Encached	Integer_Cache
11bb 00e0       |    |		Load_Encached	Standard_Cache
11bc 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
11bd a402       |    |		Store_Unchecked	0x2,0x2
11be e402       |    |		Load	0x2,0x2								; Debug Table 0x2c.0x1 = 0x11be,0x2
11bf 0d01       |    |		Execute_Immediate	Less,0x1
11c0 6806       |h   |		Jump_Zero	0x11c7
11c1 0092 12e7  |    |		Action	Push_String_Extended,0x12e7					; "op number must be >= 1"
													; Debug Table 0x2c.0x2 = 0x11c1,0x3
11c3 821a       |    |		Call	0x1,0x1a
11c4 4fff       |O   |		Short_Literal	-0x1							; Debug Table 0x2c.0x3 = 0x11c4,0x4
11c5 a5fd       |    |		Store_Unchecked	0x2,-0x3
11c6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
11c7 e402       |    |		Load	0x2,0x2								; Debug Table 0x2c.0x4 = 0x11c7,0x5
11c8 a5fd       |    |		Store_Unchecked	0x2,-0x3
11c9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
11ca			TRAP_11b0:
11ca 0007       |    |		Action	Break_Optional
11cb 0092 12e8  |    |		Action	Push_String_Extended,0x12e8					; "bad attr number: "
													; Debug Table 0x2c.0x5 = 0x11cb,0x6
11cd e406       |    |		Load	0x2,0x6
11ce 0a01       |    |		Execute_Immediate	Plus,0x1
11cf 0248       | H  |		Execute	Discrete,Check_In_Integer
11d0 e5ff       |    |		Load	0x2,-0x1
11d1 01dc       |    |		Execute	Vector,Last
11d2 e5ff       |    |		Load	0x2,-0x1
11d3 01cf       |    |		Execute	Vector,Slice_Read
11d4 01cc       |    |		Execute	Vector,Catenate
11d5 821a       |    |		Call	0x1,0x1a
11d6 4fff       |O   |		Short_Literal	-0x1							; Debug Table 0x2c.0x6 = 0x11d6,0x7
11d7 a5fd       |    |		Store_Unchecked	0x2,-0x3
11d8 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
11d9 0000 0000  |    |		.BLANK	0000[0x7]
11e0 ; --------------------------------------------------------------------------------------
11e0 ; SUBPROGRAM
11e0 ; --------------------------------------------------------------------------------------
11e0 11e3       |    |		.CONST	0x11e3								; Address of begin
11e1 0004       |    |		.CONST	0x0004								; Address of exception handler
11e2 0001       |    |		.CONST	0x0001								; Number of locals
11e3			BODY_11e0:
11e3			INIT_11e0:
11e3 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x2d = .DEBUG	0x11e3,0x1ebc,0x0002,0x0000,0x0058,0x54a5,0x0000,0x06e7
11e4 7805       |x   |		Jump	0x11ea
11e5 e402       |    |		Load	0x2,0x2								; Debug Table 0x2d.0x0 = 0x11e5,0x2
11e6 00eb       |    |		Load_Encached	Diana_Cache
11e7 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
11e8 a402       |    |		Store_Unchecked	0x2,0x2
11e9 00c9       |    |		Action	Pop_Auxiliary_Loop
11ea e402       |    |		Load	0x2,0x2								; Debug Table 0x2d.0x1 = 0x11ea,0x1
11eb 00eb       |    |		Load_Encached	Diana_Cache
11ec 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
11ed 00eb       |    |		Load_Encached	Diana_Cache
11ee 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
11ef 6ff5       |o   |		Jump_Zero	0x11e5
11f0 00ce       |    |		Action	Pop_Auxiliary
11f1 e402       |    |		Load	0x2,0x2								; Debug Table 0x2d.0x2 = 0x11f1,0x3
11f2 00eb       |    |		Load_Encached	Diana_Cache
11f3 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
11f4 00ca       |    |		Action	Exit_Nullary_Function
11f5 0000 0000  |    |		.XXX[0x3]
11f7 0000       |    |
11f8 ; --------------------------------------------------------------------------------------
11f8 ; SUBPROGRAM
11f8 ; --------------------------------------------------------------------------------------
11f8 11fb       |    |		.CONST	0x11fb								; Address of begin
11f9 1200       |    |		.CONST	0x1200								; Address of exception handler
11fa 0001       |    |		.CONST	0x0001								; Number of locals
11fb			BODY_11f8:
11fb			INIT_11f8:
11fb e402       |    |		Load	0x2,0x2								; Debug Table 0x2e = .DEBUG	0x11fb,0x1ec4,0x0004,0x0000,0x0058,0x54a5,0x0000,0x096e
													; Debug Table 0x2e.0x0 = 0x11fb,0x1
11fc 00eb       |    |		Load_Encached	Diana_Cache
11fd 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
11fe a402       |    |		Store_Unchecked	0x2,0x2
11ff 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1200			TRAP_11f8:
1200 0007       |    |		Action	Break_Optional
1201 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x2e.0x1 = 0x1201,0x2
1202 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1203 a402       |    |		Store_Unchecked	0x2,0x2
1204 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1205 0000 0000  |    |		.XXX[0x3]
1207 0000       |    |
1208 ; --------------------------------------------------------------------------------------
1208 ; SUBPROGRAM
1208 ; --------------------------------------------------------------------------------------
1208 120b       |    |		.CONST	0x120b								; Address of begin
1209 1222       | "  |		.CONST	0x1222								; Address of exception handler
120a 0001       |    |		.CONST	0x0001								; Number of locals
120b			BODY_1208:
120b			INIT_1208:
120b e402       |    |		Load	0x2,0x2								; Debug Table 0x2f = .DEBUG	0x120b,0x1eca,0x0004,0x0000,0x0058,0x54a5,0x0000,0x09b6
													; Debug Table 0x2f.0x0 = 0x120b,0x1
120c 00eb       |    |		Load_Encached	Diana_Cache
120d 1883       |    |		Execute	Package,Field_Execute,Field_Number 0x83
120e 0f04       |    |		Execute_Immediate	Equal,0x4
120f 680d       |h   |		Jump_Zero	0x121d
1210 e402       |    |		Load	0x2,0x2								; Debug Table 0x2f.0x1 = 0x1210,0x2
1211 00eb       |    |		Load_Encached	Diana_Cache
1212 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
1213 a403       |    |		Store_Unchecked	0x2,0x3
1214 e403       |    |		Load	0x2,0x3								; Debug Table 0x2f.0x2 = 0x1214,0x3
1215 00eb       |    |		Load_Encached	Diana_Cache
1216 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
1217 7004       |p   |		Jump_Nonzero	0x121c
1218 e403       |    |		Load	0x2,0x3								; Debug Table 0x2f.0x3 = 0x1218,0x4
1219 00eb       |    |		Load_Encached	Diana_Cache
121a 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
121b a402       |    |		Store_Unchecked	0x2,0x2
121c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
121d e402       |    |		Load	0x2,0x2								; Debug Table 0x2f.0x4 = 0x121d,0x5
121e 00eb       |    |		Load_Encached	Diana_Cache
121f 1885       |    |		Execute	Package,Field_Execute,Field_Number 0x85
1220 a402       |    |		Store_Unchecked	0x2,0x2
1221 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1222			TRAP_1208:
1222 0007       |    |		Action	Break_Optional
1223 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x2f.0x5 = 0x1223,0x6
1224 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1225 a402       |    |		Store_Unchecked	0x2,0x2
1226 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1227 0000       |    |		.XXX[0x1]
1228 ; --------------------------------------------------------------------------------------
1228 ; SUBPROGRAM
1228 ; --------------------------------------------------------------------------------------
1228 122b       | +  |		.CONST	0x122b								; Address of begin
1229 1230       | 0  |		.CONST	0x1230								; Address of exception handler
122a 0001       |    |		.CONST	0x0001								; Number of locals
122b			BODY_1228:
122b			INIT_1228:
122b e402       |    |		Load	0x2,0x2								; Debug Table 0x30 = .DEBUG	0x122b,0x1ed8,0x0004,0x0000,0x0058,0x54a5,0x0000,0x09cf
													; Debug Table 0x30.0x0 = 0x122b,0x1
122c 00eb       |    |		Load_Encached	Diana_Cache
122d 1886       |    |		Execute	Package,Field_Execute,Field_Number 0x86
122e a402       |    |		Store_Unchecked	0x2,0x2
122f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1230			TRAP_1228:
1230 0007       |    |		Action	Break_Optional
1231 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x30.0x1 = 0x1231,0x2
1232 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1233 a402       |    |		Store_Unchecked	0x2,0x2
1234 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1235 0000 0000  |    |		.XXX[0x3]
1237 0000       |    |
1238 ; --------------------------------------------------------------------------------------
1238 ; SUBPROGRAM
1238 ; --------------------------------------------------------------------------------------
1238 123b       | ;  |		.CONST	0x123b								; Address of begin
1239 1240       | @  |		.CONST	0x1240								; Address of exception handler
123a 0001       |    |		.CONST	0x0001								; Number of locals
123b			BODY_1238:
123b			INIT_1238:
123b e402       |    |		Load	0x2,0x2								; Debug Table 0x31 = .DEBUG	0x123b,0x1ede,0x0004,0x0000,0x0058,0x54a5,0x0000,0x09e8
													; Debug Table 0x31.0x0 = 0x123b,0x1
123c 00eb       |    |		Load_Encached	Diana_Cache
123d 1887       |    |		Execute	Package,Field_Execute,Field_Number 0x87
123e a402       |    |		Store_Unchecked	0x2,0x2
123f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1240			TRAP_1238:
1240 0007       |    |		Action	Break_Optional
1241 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x31.0x1 = 0x1241,0x2
1242 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
1243 a402       |    |		Store_Unchecked	0x2,0x2
1244 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1245 0000 0000  |    |		.XXX[0x3]
1247 0000       |    |
1248 ; --------------------------------------------------------------------------------------
1248 ; SUBPROGRAM
1248 ; --------------------------------------------------------------------------------------
1248 124b       | K  |		.CONST	0x124b								; Address of begin
1249 125a       | Z  |		.CONST	0x125a								; Address of exception handler
124a 0001       |    |		.CONST	0x0001								; Number of locals
124b			BODY_1248:
124b			INIT_1248:
124b 4805       |H   |		Short_Literal	0x5							; Debug Table 0x32 = .DEBUG	0x124b,0x1ee4,0x0004,0x0000,0x0058,0x54a5,0x0000,0x0e13
													; Debug Table 0x32.0x0 = 0x124b,0x1
124c e40b       |    |		Load	0x2,0xb
124d 1c08       |    |		Execute_Immediate	Run_Utility,0x8
124e e602       |    |		Load	0x3,0x2
124f 4973       |Is  |		Short_Literal	0x173
1250 00eb       |    |		Load_Encached	Diana_Cache
1251 0098       |    |		Execute	Package,Field_Read_Dynamic
1252 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
1253 0122       | "  |		Execute	Any,Make_Root_Type
1254 00e0       |    |		Load_Encached	Standard_Cache
1255 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
1256 00d9       |    |		Load_Top	At_Offset_1
1257 2a05       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5
1258 00cb       |    |		Action	Pop_Block_With_Result
1259 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
125a			TRAP_1248:
125a 0007       |    |		Action	Break_Optional
125b 0092 12e9  |    |		Action	Push_String_Extended,0x12e9					; "to_value "
													; Debug Table 0x32.0x1 = 0x125b,0x2
125d e5fd       |    |		Load	0x2,-0x3
125e 01cc       |    |		Execute	Vector,Catenate
125f 0092 12ea  |    |		Action	Push_String_Extended,0x12ea					; " is not recognizable"
1261 01cc       |    |		Execute	Vector,Catenate
1262 821a       |    |		Call	0x1,0x1a
1263 4800       |H   |		Short_Literal	0x0							; Debug Table 0x32.0x2 = 0x1263,0x3
1264 e40b       |    |		Load	0x2,0xb
1265 1c08       |    |		Execute_Immediate	Run_Utility,0x8
1266 00cb       |    |		Action	Pop_Block_With_Result
1267 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1268 ; --------------------------------------------------------------------------------------
1268 ; SUBPROGRAM
1268 ; --------------------------------------------------------------------------------------
1268 126b       | k  |		.CONST	0x126b								; Address of begin
1269 1276       | v  |		.CONST	0x1276								; Address of exception handler
126a 0001       |    |		.CONST	0x0001								; Number of locals
126b			BODY_1268:
126b			INIT_1268:
126b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x33 = .DEBUG	0x126b,0x1eec,0x0004,0x0000,0x0058,0x54a5,0x0000,0x0e37
													; Debug Table 0x33.0x0 = 0x126b,0x1
126c e40b       |    |		Load	0x2,0xb
126d 1c08       |    |		Execute_Immediate	Run_Utility,0x8
126e e602       |    |		Load	0x3,0x2
126f 00e2       |    |		Load_Encached	Integer_Cache
1270 00e0       |    |		Load_Encached	Standard_Cache
1271 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
1272 00d9       |    |		Load_Top	At_Offset_1
1273 2a03       |*   |		Execute	Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
1274 00cb       |    |		Action	Pop_Block_With_Result
1275 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1276			TRAP_1268:
1276 0007       |    |		Action	Break_Optional
1277 0092 12e9  |    |		Action	Push_String_Extended,0x12e9					; "to_value "
													; Debug Table 0x33.0x1 = 0x1277,0x2
1279 e5fd       |    |		Load	0x2,-0x3
127a 01cc       |    |		Execute	Vector,Catenate
127b 0092 12ea  |    |		Action	Push_String_Extended,0x12ea					; " is not recognizable"
127d 01cc       |    |		Execute	Vector,Catenate
127e 821a       |    |		Call	0x1,0x1a
127f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x33.0x2 = 0x127f,0x3
1280 e40b       |    |		Load	0x2,0xb
1281 1c08       |    |		Execute_Immediate	Run_Utility,0x8
1282 00cb       |    |		Action	Pop_Block_With_Result
1283 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1284 ; --------------------------------------------------------------------------------------
1284 ; STRING TABLE
1284 ; --------------------------------------------------------------------------------------
1284 00d0       |    |		.STRTAB	0x00d0->0x12ec							; "NO_KIND"
1285 00d5       |    |		.STRTAB	0x00d5->0x12ef							; "BOOLEAN_KIND"
1286 00df       |    |		.STRTAB	0x00df->0x12f5							; "INTEGER_KIND"
1287 00e9       |    |		.STRTAB	0x00e9->0x12fb							; "TREE_KIND"
1288 00f0       |    |		.STRTAB	0x00f0->0x1300							; "ID_TABLE_KIND"
1289 00fb       |    |		.STRTAB	0x00fb->0x1306							; "SHORT_INTEGER_KIND"
128a 010b       |    |		.STRTAB	0x010b->0x130f							; "on_node cannot be empty"
128b 0120       |    |		.STRTAB	0x0120->0x131b							; "can't open unit for overwrite: "
128c 013d       | =  |		.STRTAB	0x013d->0x132a							; ", nothing changed"
128d 014c       | L  |		.STRTAB	0x014c->0x1333							; "can't close unit: "
128e 015c       | \  |		.STRTAB	0x015c->0x133c							; "Added "
128f 0160       | `  |		.STRTAB	0x0160->0x133f							; " attribute to "
1290 016c       | l  |		.STRTAB	0x016c->0x1346							; " with value "
1291 0176       | v  |		.STRTAB	0x0176->0x134c							; "Unexpected exception "
1292 0189       |    |		.STRTAB	0x0189->0x1356							; " while adding attribute, nothing_changed"
1293 01af       |    |		.STRTAB	0x01af->0x136a							; "from_node cannot be empty"
1294 01c6       |    |		.STRTAB	0x01c6->0x1377							; "node does not have the "
1295 01db       |    |		.STRTAB	0x01db->0x1382							; " attribute"
1296 01e3       |    |		.STRTAB	0x01e3->0x1387							; "Removed "
1297 01e9       |    |		.STRTAB	0x01e9->0x138b							; " attribute from "
1298 01f7       |    |		.STRTAB	0x01f7->0x1393							; "Unexpected exception while removing attribute"
1299 0222       | "  |		.STRTAB	0x0222->0x13aa							; "SM_READ_ONLY"
129a 022c       | ,  |		.STRTAB	0x022c->0x13b0							; "can't resolve \x22"
129b 0239       | 9  |		.STRTAB	0x0239->0x13b7							; "\x22: "
129c 023a       | :  |		.STRTAB	0x023a->0x13b9							; "Removed read_only attribute from "
129d 0259       | Y  |		.STRTAB	0x0259->0x13c9							; "unit "
129e 025c       | \  |		.STRTAB	0x025c->0x13cc							; " does not have a read_only attribute"
129f 027e       | ~  |		.STRTAB	0x027e->0x13de							; "Unexpected exception while removing read_only attribute from "
12a0 02b9       |    |		.STRTAB	0x02b9->0x13fc							; "added read_only attribute to "
12a1 02d4       |    |		.STRTAB	0x02d4->0x140b							; "Unexpected exception while adding read_only attribute to "
12a2 030b       |    |		.STRTAB	0x030b->0x1427							; " has been changed to source"
12a3 0324       | $  |		.STRTAB	0x0324->0x1435							; "Unexpected exception while changing "
12a4 0346       | F  |		.STRTAB	0x0346->0x1447							; " to source ("
12a5 0350       | P  |		.STRTAB	0x0350->0x144d							; ")"
12a6 034f       | O  |		.STRTAB	0x034f->0x144d							; "can't resolve "
12a7 035b       | [  |		.STRTAB	0x035b->0x1454							; " ("
12a8 035b       | [  |		.STRTAB	0x035b->0x1455							; "getting object from tree"
12a9 0371       | q  |		.STRTAB	0x0371->0x1461							; "Changed symrep to "
12aa 0381       |    |		.STRTAB	0x0381->0x146a							; ", nothing_changed"
12ab 0390       |    |		.STRTAB	0x0390->0x1473							; "item name cannot be empty"
12ac 03a7       |    |		.STRTAB	0x03a7->0x147f							; "Unexpected exception: "
12ad 03bb       |    |		.STRTAB	0x03bb->0x148a							; " while removing item"
12ae 03cd       |    |		.STRTAB	0x03cd->0x1494							; "*** "
12af 03cf       |    |		.STRTAB	0x03cf->0x1496							; "+++ "
12b0 03d1       |    |		.STRTAB	0x03d1->0x1498							; "while "
12b1 03d5       |    |		.STRTAB	0x03d5->0x149b							; ", status = "
12b2 03de       |    |		.STRTAB	0x03de->0x14a1							; " cannot be identified"
12b3 03f1       |    |		.STRTAB	0x03f1->0x14ab							; "attr "
12b4 03f4       |    |		.STRTAB	0x03f4->0x14ae							; " is too large"
12b5 03ff       |    |		.STRTAB	0x03ff->0x14b4							; "bad context to look for "
12b6 0415       |    |		.STRTAB	0x0415->0x14c0							; "op "
12b7 0416       |    |		.STRTAB	0x0416->0x14c2							; " not found"
12b8 041e       |    |		.STRTAB	0x041e->0x14c7							; "SM_DEFN"
12b9 0423       | #  |		.STRTAB	0x0423->0x14ca							; "SM_EXP_TYPE"
12ba 042c       | ,  |		.STRTAB	0x042c->0x14d0							; "SM_TYPE_SPEC"
12bb 0436       | 6  |		.STRTAB	0x0436->0x14d6							; "SM_DISCRIMINANTS"
12bc 0444       | D  |		.STRTAB	0x0444->0x14de							; "SM_BASE_TYPE"
12bd 044e       | N  |		.STRTAB	0x044e->0x14e4							; "SM_TYPE_STRUCT"
12be 045a       | Z  |		.STRTAB	0x045a->0x14eb							; "SM_CONSTRAINT"
12bf 0465       | e  |		.STRTAB	0x0465->0x14f1							; "SM_FIRST"
12c0 046b       | k  |		.STRTAB	0x046b->0x14f5							; "SM_BODY"
12c1 0470       | p  |		.STRTAB	0x0470->0x14f9							; "SM_STUB"
12c2 0475       | u  |		.STRTAB	0x0475->0x14fc							; "SM_SPEC"
12c3 047a       | z  |		.STRTAB	0x047a->0x1500							; "SM_OBJ_TYPE"
12c4 0483       |    |		.STRTAB	0x0483->0x1505							; "SM_OBJ_DEF"
12c5 048b       |    |		.STRTAB	0x048b->0x150a							; "SM_SIZE"
12c6 0490       |    |		.STRTAB	0x0490->0x150e							; "SM_STORAGE_SIZE"
12c7 049d       |    |		.STRTAB	0x049d->0x1515							; "SM_OPS"
12c8 04a1       |    |		.STRTAB	0x04a1->0x1518							; "sm_ops must have an argument of the form <sm_ops,id>"
12c9 04d3       |    |		.STRTAB	0x04d3->0x1532							; "GOTO"
12ca 04d5       |    |		.STRTAB	0x04d5->0x1534							; "goto must have an argument of the form <goto,id>"
12cb 0503       |    |		.STRTAB	0x0503->0x154c							; "bad attribute name: "
12cc 0515       |    |		.STRTAB	0x0515->0x1556							; "exception getting: "
12cd 0526       | &  |		.STRTAB	0x0526->0x1560							; "unknown positioning character '"
12ce 0543       | C  |		.STRTAB	0x0543->0x156f							; "'"
12cf 0542       | B  |		.STRTAB	0x0542->0x1570							; "'<' has no closing '>'"
12d0 0556       | V  |		.STRTAB	0x0556->0x157b							; " lands on empty node"
12d1 0568       | h  |		.STRTAB	0x0568->0x1585							; "bad positioning character "
12d2 0580       |    |		.STRTAB	0x0580->0x1592							; " at position"
12d3 058a       |    |		.STRTAB	0x058a->0x1598							; "can't find enclosing item_s"
12d4 05a3       |    |		.STRTAB	0x05a3->0x15a5							; "can't find item within its parent item_s);"
12d5 05cb       |    |		.STRTAB	0x05cb->0x15ba							; "item has been removed"
12d6 05de       |    |		.STRTAB	0x05de->0x15c5							; "exception setting: "
12d7 05ef       |    |		.STRTAB	0x05ef->0x15ce							; "changed attribute "
12d8 05ff       |    |		.STRTAB	0x05ff->0x15d7							; " on node "
12d9 0606       |    |		.STRTAB	0x0606->0x15dc							; "Unexpected exception ("
12da 061a       |    |		.STRTAB	0x061a->0x15e7							; "), nothing changed"
12db 062a       | *  |		.STRTAB	0x062a->0x15f0							; "TRUE"
12dc 062c       | ,  |		.STRTAB	0x062c->0x15f2							; "FALSE"
12dd 062f       | /  |		.STRTAB	0x062f->0x15f4							; "NULL"
12de 0631       | 1  |		.STRTAB	0x0631->0x15f6							; "[]"
12df 0631       | 1  |		.STRTAB	0x0631->0x15f7							; "Exception "
12e0 0639       | 9  |		.STRTAB	0x0639->0x15fc							; "READ_ONLY"
12e1 0640       | @  |		.STRTAB	0x0640->0x1601							; "Removed read_only pragma from "
12e2 065c       | \  |		.STRTAB	0x065c->0x1610							; " while setting symrep, nothing_changed"
12e3 0680       |    |		.STRTAB	0x0680->0x1623							; "16#"
12e4 0681       |    |		.STRTAB	0x0681->0x1624							; "#"
12e5 0680       |    |		.STRTAB	0x0680->0x1625							; "bad format for node name: "
12e6 0698       |    |		.STRTAB	0x0698->0x1632							; "exception converting: "
12e7 06ac       |    |		.STRTAB	0x06ac->0x163d							; "op number must be >= 1"
12e8 06c0       |    |		.STRTAB	0x06c0->0x1648							; "bad attr number: "
12e9 06cf       |    |		.STRTAB	0x06cf->0x1650							; "to_value "
12ea 06d6       |    |		.STRTAB	0x06d6->0x1655							; " is not recognizable"
12eb 06e8       |    |		.STREND 0x06e8->0x165f
12ec 4e4f 5f4b  |NO_K|		.STRTAB_STRINGS
165f 0000       |    |		.XXX[0x1]
1660 ; --------------------------------------------------------------------------------------
1660 ; Debug Table
1660 ; --------------------------------------------------------------------------------------
1660 0003 0034  |   4|		.CONST	0x0003,0x0034
1662 000b 1802  |    |		.DEBUG	0x000b,0x1802,0x8000,0x0000,0x0058,0x5365,0x0000,0x0005
166a 0024 181e  | $  |		.DEBUG	0x0024,0x181e,0x8000,0x0000,0x0058,0x54a5,0x0000,0x002b
1672 006b 1862  | k b|		.DEBUG	0x006b,0x1862,0x0001,0x0000,0x0058,0x5365,0x0000,0x000f
167a 007b 186a  | { j|		.DEBUG	0x007b,0x186a,0x0001,0x0000,0x0058,0x5365,0x0000,0x001f
1682 018b 18c6  |    |		.DEBUG	0x018b,0x18c6,0x0001,0x0000,0x0058,0x5365,0x0000,0x0030
168a 0263 1912  | c  |		.DEBUG	0x0263,0x1912,0x0001,0x0000,0x0058,0x5365,0x0000,0x003c
1692 0373 1966  | s f|		.DEBUG	0x0373,0x1966,0x0001,0x0000,0x0058,0x5365,0x0000,0x0049
169a 0473 19b8  | s  |		.DEBUG	0x0473,0x19b8,0x0001,0x0000,0x0058,0x5365,0x0000,0x0056
16a2 053b 19f0  | ;  |		.DEBUG	0x053b,0x19f0,0x0001,0x0000,0x0058,0x5365,0x0000,0x005e
16aa 055b 19fe  | [  |		.DEBUG	0x055b,0x19fe,0x0002,0x0000,0x0058,0x5365,0x0000,0x0066
16b2 058b 1a14  |    |		.DEBUG	0x058b,0x1a14,0x0002,0x0000,0x0058,0x5365,0x0000,0x0073
16ba 0603 1a3a  |   :|		.DEBUG	0x0603,0x1a3a,0x0001,0x0000,0x0058,0x5365,0x0000,0x007e
16c2 06bb 1a82  |    |		.DEBUG	0x06bb,0x1a82,0x0001,0x0000,0x0058,0x5365,0x0000,0x008a
16ca 0753 1abc  | S  |		.DEBUG	0x0753,0x1abc,0x0001,0x0000,0x0058,0x54a5,0x0000,0x003f
16d2 075b 1ac0  | [  |		.DEBUG	0x075b,0x1ac0,0x0001,0x0000,0x0058,0x54a5,0x0000,0x0051
16da 0763 1ac4  | c  |		.DEBUG	0x0763,0x1ac4,0x0001,0x0000,0x0058,0x54a5,0x0000,0x005e
16e2 0773 1aca  | s  |		.DEBUG	0x0773,0x1aca,0x0001,0x0000,0x0058,0x54a5,0x0000,0x0075
16ea 0783 1ad0  |    |		.DEBUG	0x0783,0x1ad0,0x0001,0x0000,0x0058,0x54a5,0x0000,0x008c
16f2 079b 1ad8  |    |		.DEBUG	0x079b,0x1ad8,0x0001,0x0000,0x0058,0x54a5,0x0000,0x00c2
16fa 07b3 1ae0  |    |		.DEBUG	0x07b3,0x1ae0,0x0002,0x0000,0x0058,0x54a5,0x0000,0x00fb
1702 07d3 1af8  |    |		.DEBUG	0x07d3,0x1af8,0x0001,0x0000,0x0058,0x54a5,0x0000,0x028f
170a 07f3 1b0a  |    |		.DEBUG	0x07f3,0x1b0a,0x0002,0x0000,0x0058,0x54a5,0x0000,0x0312
1712 08e3 1b66  |   f|		.DEBUG	0x08e3,0x1b66,0x0002,0x0000,0x0058,0x54a5,0x0000,0x04c8
171a 0933 1b8a  | 3  |		.DEBUG	0x0933,0x1b8a,0x0002,0x0000,0x0058,0x54a5,0x0000,0x0573
1722 0a0b 1be6  |    |		.DEBUG	0x0a0b,0x1be6,0x0002,0x0000,0x0058,0x54a5,0x0000,0x06d4
172a 0a43 1c04  | C  |		.DEBUG	0x0a43,0x1c04,0x0002,0x0000,0x0058,0x54a5,0x0000,0x0781
1732 0a83 1c2a  |   *|		.DEBUG	0x0a83,0x1c2a,0x0002,0x0000,0x0058,0x54a5,0x0000,0x081a
173a 0abb 1c42  |   B|		.DEBUG	0x0abb,0x1c42,0x0002,0x0000,0x0058,0x54a5,0x0000,0x08a1
1742 0b13 1c5a  |   Z|		.DEBUG	0x0b13,0x1c5a,0x0002,0x0000,0x0058,0x54a5,0x0000,0x091a
174a 0beb 1caa  |    |		.DEBUG	0x0beb,0x1caa,0x0002,0x0000,0x0058,0x54a5,0x0000,0x0b01
1752 0c43 1cc4  | C  |		.DEBUG	0x0c43,0x1cc4,0x0001,0x0000,0x0058,0x54a5,0x0000,0x1da8
175a 0c93 1cea  |    |		.DEBUG	0x0c93,0x1cea,0x0001,0x0000,0x0058,0x54a5,0x0000,0x1817
1762 0d5b 1d34  | [ 4|		.DEBUG	0x0d5b,0x1d34,0x0001,0x0000,0x0058,0x54a5,0x0000,0x1935
176a 0e73 1d98  | s  |		.DEBUG	0x0e73,0x1d98,0x0005,0x0000,0x0058,0x54a5,0x0000,0x0d1d
1772 0e93 1d9a  |    |		.DEBUG	0x0e93,0x1d9a,0x0005,0x0000,0x0058,0x54a5,0x0000,0x0d27
177a 0ee3 1d9c  |    |		.DEBUG	0x0ee3,0x1d9c,0x0002,0x0000,0x0058,0x54a5,0x0000,0x0d68
1782 0f43 1dc2  | C  |		.DEBUG	0x0f43,0x1dc2,0x0004,0x0000,0x0058,0x54a5,0x0000,0x0f86
178a 0fa3 1dd8  |    |		.DEBUG	0x0fa3,0x1dd8,0x0001,0x0000,0x0058,0x54a5,0x0000,0x11cd
1792 1043 1e18  | C  |		.DEBUG	0x1043,0x1e18,0x0002,0x0000,0x0058,0x54a5,0x0000,0x1543
179a 1053 1e1c  | S  |		.DEBUG	0x1053,0x1e1c,0x0001,0x0000,0x0058,0x54a5,0x0000,0x156f
17a2 10eb 1e5c  |   \|		.DEBUG	0x10eb,0x1e5c,0x0001,0x0000,0x0058,0x54a5,0x0000,0x0c8a
17aa 10f3 1e60  |   `|		.DEBUG	0x10f3,0x1e60,0x0004,0x0000,0x0058,0x54a5,0x0000,0x1d59
17b2 1123 1e6c  | # l|		.DEBUG	0x1123,0x1e6c,0x0002,0x0000,0x0058,0x54a5,0x0000,0x014f
17ba 1133 1e7a  | 3 z|		.DEBUG	0x1133,0x1e7a,0x0002,0x0000,0x0058,0x54a5,0x0000,0x019a
17c2 11b3 1eac  |    |		.DEBUG	0x11b3,0x1eac,0x0004,0x0000,0x0058,0x54a5,0x0000,0x0307
17ca 11e3 1ebc  |    |		.DEBUG	0x11e3,0x1ebc,0x0002,0x0000,0x0058,0x54a5,0x0000,0x06e7
17d2 11fb 1ec4  |    |		.DEBUG	0x11fb,0x1ec4,0x0004,0x0000,0x0058,0x54a5,0x0000,0x096e
17da 120b 1eca  |    |		.DEBUG	0x120b,0x1eca,0x0004,0x0000,0x0058,0x54a5,0x0000,0x09b6
17e2 122b 1ed8  | +  |		.DEBUG	0x122b,0x1ed8,0x0004,0x0000,0x0058,0x54a5,0x0000,0x09cf
17ea 123b 1ede  | ;  |		.DEBUG	0x123b,0x1ede,0x0004,0x0000,0x0058,0x54a5,0x0000,0x09e8
17f2 124b 1ee4  | K  |		.DEBUG	0x124b,0x1ee4,0x0004,0x0000,0x0058,0x54a5,0x0000,0x0e13
17fa 126b 1eec  | k  |		.DEBUG	0x126b,0x1eec,0x0004,0x0000,0x0058,0x54a5,0x0000,0x0e37
1802 ; --------------------------------------------------------------------------------------
1802 ; Debug3 Subtable 0x0
1802 ; --------------------------------------------------------------------------------------
1802 000d 0000  |    |		.DBG3TAB	0x000d,0x0000
1804 000b ffff  |    |		.CONST	0x000b,0xffff
1806 000c fffe  |    |		.CONST	0x000c,0xfffe
1808 000d fffd  |    |		.CONST	0x000d,0xfffd
180a 000f fffc  |    |		.CONST	0x000f,0xfffc
180c 0011 fffb  |    |		.CONST	0x0011,0xfffb
180e 0013 fffa  |    |		.CONST	0x0013,0xfffa
1810 0015 fff9  |    |		.CONST	0x0015,0xfff9
1812 0017 fff8  |    |		.CONST	0x0017,0xfff8
1814 0019 fff7  |    |		.CONST	0x0019,0xfff7
1816 001b fff6  |    |		.CONST	0x001b,0xfff6
1818 001d fff5  |    |		.CONST	0x001d,0xfff5
181a 001f fff4  |    |		.CONST	0x001f,0xfff4
181c 0021 fff3  | !  |		.CONST	0x0021,0xfff3
181e ; --------------------------------------------------------------------------------------
181e ; Debug3 Subtable 0x1
181e ; --------------------------------------------------------------------------------------
181e 0021 0000  | !  |		.DBG3TAB	0x0021,0x0000
1820 0024 ffff  | $  |		.CONST	0x0024,0xffff
1822 0025 fffe  | %  |		.CONST	0x0025,0xfffe
1824 0026 fffd  | &  |		.CONST	0x0026,0xfffd
1826 0027 fffc  | '  |		.CONST	0x0027,0xfffc
1828 0028 fffb  | (  |		.CONST	0x0028,0xfffb
182a 002a fffa  | *  |		.CONST	0x002a,0xfffa
182c 002c fff9  | ,  |		.CONST	0x002c,0xfff9
182e 002e fff8  | .  |		.CONST	0x002e,0xfff8
1830 0030 fff7  | 0  |		.CONST	0x0030,0xfff7
1832 0032 fff6  | 2  |		.CONST	0x0032,0xfff6
1834 0034 fff5  | 4  |		.CONST	0x0034,0xfff5
1836 0036 fff4  | 6  |		.CONST	0x0036,0xfff4
1838 0038 fff3  | 8  |		.CONST	0x0038,0xfff3
183a 003a fff2  | :  |		.CONST	0x003a,0xfff2
183c 003c fff1  | <  |		.CONST	0x003c,0xfff1
183e 003e fff0  | >  |		.CONST	0x003e,0xfff0
1840 0040 ffef  | @  |		.CONST	0x0040,0xffef
1842 0042 ffee  | B  |		.CONST	0x0042,0xffee
1844 0044 ffed  | D  |		.CONST	0x0044,0xffed
1846 0046 ffec  | F  |		.CONST	0x0046,0xffec
1848 0048 ffeb  | H  |		.CONST	0x0048,0xffeb
184a 004a ffea  | J  |		.CONST	0x004a,0xffea
184c 004c ffe9  | L  |		.CONST	0x004c,0xffe9
184e 004e ffe8  | N  |		.CONST	0x004e,0xffe8
1850 0050 ffe7  | P  |		.CONST	0x0050,0xffe7
1852 0052 ffe6  | R  |		.CONST	0x0052,0xffe6
1854 0054 ffe5  | T  |		.CONST	0x0054,0xffe5
1856 0056 ffe4  | V  |		.CONST	0x0056,0xffe4
1858 0058 ffe3  | X  |		.CONST	0x0058,0xffe3
185a 005a ffe2  | Z  |		.CONST	0x005a,0xffe2
185c 005c ffe1  | \  |		.CONST	0x005c,0xffe1
185e 005e ffe0  | ^  |		.CONST	0x005e,0xffe0
1860 0060 ffdf  | `  |		.CONST	0x0060,0xffdf
1862 ; --------------------------------------------------------------------------------------
1862 ; Debug3 Subtable 0x2
1862 ; --------------------------------------------------------------------------------------
1862 0002 0001  |    |		.DBG3TAB	0x0002,0x0001
1864 006b ffff  | k  |		.CONST	0x006b,0xffff
1866 006d fffe  | m  |		.CONST	0x006d,0xfffe
1868 006f 0001  | o  |		.CONST	0x006f,0x0001
186a ; --------------------------------------------------------------------------------------
186a ; Debug3 Subtable 0x3
186a ; --------------------------------------------------------------------------------------
186a 000d 0020  |    |		.DBG3TAB	0x000d,0x0020
186c 007b ffff  | {  |		.CONST	0x007b,0xffff
186e 007c fffe  | |  |		.CONST	0x007c,0xfffe
1870 0082 fffd  |    |		.CONST	0x0082,0xfffd
1872 0087 fffc  |    |		.CONST	0x0087,0xfffc
1874 0089 fffb  |    |		.CONST	0x0089,0xfffb
1876 008d fffa  |    |		.CONST	0x008d,0xfffa
1878 008e fff9  |    |		.CONST	0x008e,0xfff9
187a 0093 fff8  |    |		.CONST	0x0093,0xfff8
187c 0099 fff7  |    |		.CONST	0x0099,0xfff7
187e 00a1 fff6  |    |		.CONST	0x00a1,0xfff6
1880 00a6 fff5  |    |		.CONST	0x00a6,0xfff5
1882 00ba fff4  |    |		.CONST	0x00ba,0xfff4
1884 00be fff3  |    |		.CONST	0x00be,0xfff3
1886 00c2 0001  |    |		.CONST	0x00c2,0x0001
1888 00c6 0002  |    |		.CONST	0x00c6,0x0002
188a 00c9 0003  |    |		.CONST	0x00c9,0x0003
188c 00cf 0004  |    |		.CONST	0x00cf,0x0004
188e 00d0 0005  |    |		.CONST	0x00d0,0x0005
1890 00d3 0006  |    |		.CONST	0x00d3,0x0006
1892 00d6 0007  |    |		.CONST	0x00d6,0x0007
1894 00dc 0008  |    |		.CONST	0x00dc,0x0008
1896 00dd 0009  |    |		.CONST	0x00dd,0x0009
1898 00e0 000a  |    |		.CONST	0x00e0,0x000a
189a 00e4 000b  |    |		.CONST	0x00e4,0x000b
189c 00ea 000c  |    |		.CONST	0x00ea,0x000c
189e 00eb 000d  |    |		.CONST	0x00eb,0x000d
18a0 00f4 000e  |    |		.CONST	0x00f4,0x000e
18a2 010e 000f  |    |		.CONST	0x010e,0x000f
18a4 0110 0010  |    |		.CONST	0x0110,0x0010
18a6 011c 0011  |    |		.CONST	0x011c,0x0011
18a8 0122 0012  | "  |		.CONST	0x0122,0x0012
18aa 0123 0013  | #  |		.CONST	0x0123,0x0013
18ac 0127 0014  | '  |		.CONST	0x0127,0x0014
18ae 012e 0015  | .  |		.CONST	0x012e,0x0015
18b0 0135 0016  | 5  |		.CONST	0x0135,0x0016
18b2 0136 0017  | 6  |		.CONST	0x0136,0x0017
18b4 013d 0018  | =  |		.CONST	0x013d,0x0018
18b6 0146 0019  | F  |		.CONST	0x0146,0x0019
18b8 0148 001a  | H  |		.CONST	0x0148,0x001a
18ba 0154 001b  | T  |		.CONST	0x0154,0x001b
18bc 015a 001c  | Z  |		.CONST	0x015a,0x001c
18be 015b 001d  | [  |		.CONST	0x015b,0x001d
18c0 0161 001e  | a  |		.CONST	0x0161,0x001e
18c2 0172 001f  | r  |		.CONST	0x0172,0x001f
18c4 017b 0020  | {  |		.CONST	0x017b,0x0020
18c6 ; --------------------------------------------------------------------------------------
18c6 ; Debug3 Subtable 0x4
18c6 ; --------------------------------------------------------------------------------------
18c6 0008 001d  |    |		.DBG3TAB	0x0008,0x001d
18c8 018b ffff  |    |		.CONST	0x018b,0xffff
18ca 018c fffe  |    |		.CONST	0x018c,0xfffe
18cc 0192 fffd  |    |		.CONST	0x0192,0xfffd
18ce 0197 fffc  |    |		.CONST	0x0197,0xfffc
18d0 0199 fffb  |    |		.CONST	0x0199,0xfffb
18d2 019d fffa  |    |		.CONST	0x019d,0xfffa
18d4 019e fff9  |    |		.CONST	0x019e,0xfff9
18d6 01a3 fff8  |    |		.CONST	0x01a3,0xfff8
18d8 01ab 0001  |    |		.CONST	0x01ab,0x0001
18da 01af 0002  |    |		.CONST	0x01af,0x0002
18dc 01b2 0003  |    |		.CONST	0x01b2,0x0003
18de 01b5 0004  |    |		.CONST	0x01b5,0x0004
18e0 01bb 0005  |    |		.CONST	0x01bb,0x0005
18e2 01bc 0006  |    |		.CONST	0x01bc,0x0006
18e4 01bf 0007  |    |		.CONST	0x01bf,0x0007
18e6 01c3 0008  |    |		.CONST	0x01c3,0x0008
18e8 01c9 0009  |    |		.CONST	0x01c9,0x0009
18ea 01ca 000a  |    |		.CONST	0x01ca,0x000a
18ec 01d1 000b  |    |		.CONST	0x01d1,0x000b
18ee 01d9 000c  |    |		.CONST	0x01d9,0x000c
18f0 01df 000d  |    |		.CONST	0x01df,0x000d
18f2 01e0 000e  |    |		.CONST	0x01e0,0x000e
18f4 01e9 000f  |    |		.CONST	0x01e9,0x000f
18f6 0203 0010  |    |		.CONST	0x0203,0x0010
18f8 0205 0011  |    |		.CONST	0x0205,0x0011
18fa 0211 0012  |    |		.CONST	0x0211,0x0012
18fc 0217 0013  |    |		.CONST	0x0217,0x0013
18fe 0218 0014  |    |		.CONST	0x0218,0x0014
1900 0221 0015  | !  |		.CONST	0x0221,0x0015
1902 022a 0016  | *  |		.CONST	0x022a,0x0016
1904 022c 0017  | ,  |		.CONST	0x022c,0x0017
1906 0238 0018  | 8  |		.CONST	0x0238,0x0018
1908 023e 0019  | >  |		.CONST	0x023e,0x0019
190a 023f 001a  | ?  |		.CONST	0x023f,0x001a
190c 0245 001b  | E  |		.CONST	0x0245,0x001b
190e 0251 001c  | Q  |		.CONST	0x0251,0x001c
1910 0254 001d  | T  |		.CONST	0x0254,0x001d
1912 ; --------------------------------------------------------------------------------------
1912 ; Debug3 Subtable 0x5
1912 ; --------------------------------------------------------------------------------------
1912 000a 001f  |    |		.DBG3TAB	0x000a,0x001f
1914 0263 ffff  | c  |		.CONST	0x0263,0xffff
1916 0269 fffe  | i  |		.CONST	0x0269,0xfffe
1918 026e fffd  | n  |		.CONST	0x026e,0xfffd
191a 0270 fffc  | p  |		.CONST	0x0270,0xfffc
191c 0275 fffb  | u  |		.CONST	0x0275,0xfffb
191e 0276 fffa  | v  |		.CONST	0x0276,0xfffa
1920 027c fff9  | |  |		.CONST	0x027c,0xfff9
1922 0280 fff8  |    |		.CONST	0x0280,0xfff8
1924 0283 fff7  |    |		.CONST	0x0283,0xfff7
1926 028b fff6  |    |		.CONST	0x028b,0xfff6
1928 028d 0001  |    |		.CONST	0x028d,0x0001
192a 0294 0002  |    |		.CONST	0x0294,0x0002
192c 0299 0003  |    |		.CONST	0x0299,0x0003
192e 02ac 0004  |    |		.CONST	0x02ac,0x0004
1930 02ae 0005  |    |		.CONST	0x02ae,0x0005
1932 02bd 0006  |    |		.CONST	0x02bd,0x0006
1934 02c3 0007  |    |		.CONST	0x02c3,0x0007
1936 02c4 0008  |    |		.CONST	0x02c4,0x0008
1938 02de 0009  |    |		.CONST	0x02de,0x0009
193a 02e0 000a  |    |		.CONST	0x02e0,0x000a
193c 02ec 000b  |    |		.CONST	0x02ec,0x000b
193e 02f2 000c  |    |		.CONST	0x02f2,0x000c
1940 02f3 000d  |    |		.CONST	0x02f3,0x000d
1942 02fa 000e  |    |		.CONST	0x02fa,0x000e
1944 02ff 000f  |    |		.CONST	0x02ff,0x000f
1946 0306 0010  |    |		.CONST	0x0306,0x0010
1948 030c 0011  |    |		.CONST	0x030c,0x0011
194a 0315 0012  |    |		.CONST	0x0315,0x0012
194c 0320 0013  |    |		.CONST	0x0320,0x0013
194e 0322 0014  | "  |		.CONST	0x0322,0x0014
1950 0323 0015  | #  |		.CONST	0x0323,0x0015
1952 032c 0016  | ,  |		.CONST	0x032c,0x0016
1954 032e 0017  | .  |		.CONST	0x032e,0x0017
1956 033a 0018  | :  |		.CONST	0x033a,0x0018
1958 0340 0019  | @  |		.CONST	0x0340,0x0019
195a 0347 001a  | G  |		.CONST	0x0347,0x001a
195c 0348 001b  | H  |		.CONST	0x0348,0x001b
195e 034f 001c  | O  |		.CONST	0x034f,0x001c
1960 0357 001d  | W  |		.CONST	0x0357,0x001d
1962 035f 001e  | _  |		.CONST	0x035f,0x001e
1964 0366 001f  | f  |		.CONST	0x0366,0x001f
1966 ; --------------------------------------------------------------------------------------
1966 ; Debug3 Subtable 0x6
1966 ; --------------------------------------------------------------------------------------
1966 000b 001d  |    |		.DBG3TAB	0x000b,0x001d
1968 0373 ffff  | s  |		.CONST	0x0373,0xffff
196a 0379 fffe  | y  |		.CONST	0x0379,0xfffe
196c 037e fffd  | ~  |		.CONST	0x037e,0xfffd
196e 0380 fffc  |    |		.CONST	0x0380,0xfffc
1970 0385 fffb  |    |		.CONST	0x0385,0xfffb
1972 0386 fffa  |    |		.CONST	0x0386,0xfffa
1974 038c fff9  |    |		.CONST	0x038c,0xfff9
1976 0390 fff8  |    |		.CONST	0x0390,0xfff8
1978 0393 fff7  |    |		.CONST	0x0393,0xfff7
197a 039b fff6  |    |		.CONST	0x039b,0xfff6
197c 039d fff5  |    |		.CONST	0x039d,0xfff5
197e 039f 0001  |    |		.CONST	0x039f,0x0001
1980 03a6 0002  |    |		.CONST	0x03a6,0x0002
1982 03ab 0003  |    |		.CONST	0x03ab,0x0003
1984 03be 0004  |    |		.CONST	0x03be,0x0004
1986 03c0 0005  |    |		.CONST	0x03c0,0x0005
1988 03cf 0006  |    |		.CONST	0x03cf,0x0006
198a 03d5 0007  |    |		.CONST	0x03d5,0x0007
198c 03d6 0008  |    |		.CONST	0x03d6,0x0008
198e 03f0 0009  |    |		.CONST	0x03f0,0x0009
1990 03f2 000a  |    |		.CONST	0x03f2,0x000a
1992 03fe 000b  |    |		.CONST	0x03fe,0x000b
1994 0404 000c  |    |		.CONST	0x0404,0x000c
1996 0405 000d  |    |		.CONST	0x0405,0x000d
1998 040c 000e  |    |		.CONST	0x040c,0x000e
199a 0411 000f  |    |		.CONST	0x0411,0x000f
199c 0418 0010  |    |		.CONST	0x0418,0x0010
199e 0420 0011  |    |		.CONST	0x0420,0x0011
19a0 0422 0012  | "  |		.CONST	0x0422,0x0012
19a2 0423 0013  | #  |		.CONST	0x0423,0x0013
19a4 042c 0014  | ,  |		.CONST	0x042c,0x0014
19a6 042e 0015  | .  |		.CONST	0x042e,0x0015
19a8 043a 0016  | :  |		.CONST	0x043a,0x0016
19aa 0440 0017  | @  |		.CONST	0x0440,0x0017
19ac 0447 0018  | G  |		.CONST	0x0447,0x0018
19ae 0448 0019  | H  |		.CONST	0x0448,0x0019
19b0 044f 001a  | O  |		.CONST	0x044f,0x001a
19b2 0457 001b  | W  |		.CONST	0x0457,0x001b
19b4 045f 001c  | _  |		.CONST	0x045f,0x001c
19b6 0466 001d  | f  |		.CONST	0x0466,0x001d
19b8 ; --------------------------------------------------------------------------------------
19b8 ; Debug3 Subtable 0x7
19b8 ; --------------------------------------------------------------------------------------
19b8 0007 0014  |    |		.DBG3TAB	0x0007,0x0014
19ba 0473 ffff  | s  |		.CONST	0x0473,0xffff
19bc 0474 fffe  | t  |		.CONST	0x0474,0xfffe
19be 047a fffd  | z  |		.CONST	0x047a,0xfffd
19c0 047f fffc  |    |		.CONST	0x047f,0xfffc
19c2 0481 fffb  |    |		.CONST	0x0481,0xfffb
19c4 0486 fffa  |    |		.CONST	0x0486,0xfffa
19c6 0489 fff9  |    |		.CONST	0x0489,0xfff9
19c8 0491 0001  |    |		.CONST	0x0491,0x0001
19ca 04a4 0002  |    |		.CONST	0x04a4,0x0002
19cc 04a6 0003  |    |		.CONST	0x04a6,0x0003
19ce 04b5 0004  |    |		.CONST	0x04b5,0x0004
19d0 04bb 0005  |    |		.CONST	0x04bb,0x0005
19d2 04bc 0006  |    |		.CONST	0x04bc,0x0006
19d4 04d6 0007  |    |		.CONST	0x04d6,0x0007
19d6 04d8 0008  |    |		.CONST	0x04d8,0x0008
19d8 04e4 0009  |    |		.CONST	0x04e4,0x0009
19da 04ea 000a  |    |		.CONST	0x04ea,0x000a
19dc 04eb 000b  |    |		.CONST	0x04eb,0x000b
19de 04f0 000c  |    |		.CONST	0x04f0,0x000c
19e0 04f9 000d  |    |		.CONST	0x04f9,0x000d
19e2 04fb 000e  |    |		.CONST	0x04fb,0x000e
19e4 0507 000f  |    |		.CONST	0x0507,0x000f
19e6 050d 0010  |    |		.CONST	0x050d,0x0010
19e8 050e 0011  |    |		.CONST	0x050e,0x0011
19ea 0514 0012  |    |		.CONST	0x0514,0x0012
19ec 051e 0013  |    |		.CONST	0x051e,0x0013
19ee 052f 0014  | /  |		.CONST	0x052f,0x0014
19f0 ; --------------------------------------------------------------------------------------
19f0 ; Debug3 Subtable 0x8
19f0 ; --------------------------------------------------------------------------------------
19f0 0003 0003  |    |		.DBG3TAB	0x0003,0x0003
19f2 053b ffff  | ;  |		.CONST	0x053b,0xffff
19f4 053c fffe  | <  |		.CONST	0x053c,0xfffe
19f6 053e fffd  | >  |		.CONST	0x053e,0xfffd
19f8 054b 0001  | K  |		.CONST	0x054b,0x0001
19fa 054e 0002  | N  |		.CONST	0x054e,0x0002
19fc 0552 0003  | R  |		.CONST	0x0552,0x0003
19fe ; --------------------------------------------------------------------------------------
19fe ; Debug3 Subtable 0x9
19fe ; --------------------------------------------------------------------------------------
19fe 0002 0008  |    |		.DBG3TAB	0x0002,0x0008
1a00 055b ffff  | [  |		.CONST	0x055b,0xffff
1a02 055f fffe  | _  |		.CONST	0x055f,0xfffe
1a04 0560 0001  | `  |		.CONST	0x0560,0x0001
1a06 0563 0002  | c  |		.CONST	0x0563,0x0002
1a08 0565 0003  | e  |		.CONST	0x0565,0x0003
1a0a 0569 0004  | i  |		.CONST	0x0569,0x0004
1a0c 056c 0005  | l  |		.CONST	0x056c,0x0005
1a0e 0570 0006  | p  |		.CONST	0x0570,0x0006
1a10 0572 0007  | r  |		.CONST	0x0572,0x0007
1a12 057a 0008  | z  |		.CONST	0x057a,0x0008
1a14 ; --------------------------------------------------------------------------------------
1a14 ; Debug3 Subtable 0xa
1a14 ; --------------------------------------------------------------------------------------
1a14 0002 0010  |    |		.DBG3TAB	0x0002,0x0010
1a16 058b ffff  |    |		.CONST	0x058b,0xffff
1a18 058e fffe  |    |		.CONST	0x058e,0xfffe
1a1a 058f 0001  |    |		.CONST	0x058f,0x0001
1a1c 0592 0002  |    |		.CONST	0x0592,0x0002
1a1e 0595 0003  |    |		.CONST	0x0595,0x0003
1a20 059a 0004  |    |		.CONST	0x059a,0x0004
1a22 05ad 0005  |    |		.CONST	0x05ad,0x0005
1a24 05af 0006  |    |		.CONST	0x05af,0x0006
1a26 05c1 0007  |    |		.CONST	0x05c1,0x0007
1a28 05c4 0008  |    |		.CONST	0x05c4,0x0008
1a2a 05c6 0009  |    |		.CONST	0x05c6,0x0009
1a2c 05ce 0010  |    |		.CONST	0x05ce,0x0010
1a2e 05d1 000a  |    |		.CONST	0x05d1,0x000a
1a30 05d9 000b  |    |		.CONST	0x05d9,0x000b
1a32 05dd 000c  |    |		.CONST	0x05dd,0x000c
1a34 05e0 000d  |    |		.CONST	0x05e0,0x000d
1a36 05e8 000e  |    |		.CONST	0x05e8,0x000e
1a38 05f4 000f  |    |		.CONST	0x05f4,0x000f
1a3a ; --------------------------------------------------------------------------------------
1a3a ; Debug3 Subtable 0xb
1a3a ; --------------------------------------------------------------------------------------
1a3a 000b 0018  |    |		.DBG3TAB	0x000b,0x0018
1a3c 0603 ffff  |    |		.CONST	0x0603,0xffff
1a3e 0604 fffe  |    |		.CONST	0x0604,0xfffe
1a40 060a fffd  |    |		.CONST	0x060a,0xfffd
1a42 060b fffc  |    |		.CONST	0x060b,0xfffc
1a44 0611 fffb  |    |		.CONST	0x0611,0xfffb
1a46 0613 fffa  |    |		.CONST	0x0613,0xfffa
1a48 0619 fff9  |    |		.CONST	0x0619,0xfff9
1a4a 061e fff8  |    |		.CONST	0x061e,0xfff8
1a4c 0623 fff7  | #  |		.CONST	0x0623,0xfff7
1a4e 0626 fff6  | &  |		.CONST	0x0626,0xfff6
1a50 0627 fff5  | '  |		.CONST	0x0627,0xfff5
1a52 0631 0001  | 1  |		.CONST	0x0631,0x0001
1a54 0634 0002  | 4  |		.CONST	0x0634,0x0002
1a56 0637 0003  | 7  |		.CONST	0x0637,0x0003
1a58 063d 0004  | =  |		.CONST	0x063d,0x0004
1a5a 063e 0005  | >  |		.CONST	0x063e,0x0005
1a5c 0641 0006  | A  |		.CONST	0x0641,0x0006
1a5e 0645 0007  | E  |		.CONST	0x0645,0x0007
1a60 064b 0008  | K  |		.CONST	0x064b,0x0008
1a62 064c 0009  | L  |		.CONST	0x064c,0x0009
1a64 065c 000a  | \  |		.CONST	0x065c,0x000a
1a66 0660 000b  | `  |		.CONST	0x0660,0x000b
1a68 0665 000c  | e  |		.CONST	0x0665,0x000c
1a6a 066c 000d  | l  |		.CONST	0x066c,0x000d
1a6c 0677 000e  | w  |		.CONST	0x0677,0x000e
1a6e 0679 000f  | y  |		.CONST	0x0679,0x000f
1a70 067b 0010  | {  |		.CONST	0x067b,0x0010
1a72 067c 0011  | |  |		.CONST	0x067c,0x0011
1a74 0683 0012  |    |		.CONST	0x0683,0x0012
1a76 068b 0013  |    |		.CONST	0x068b,0x0013
1a78 0691 0014  |    |		.CONST	0x0691,0x0014
1a7a 0693 0015  |    |		.CONST	0x0693,0x0015
1a7c 069c 0016  |    |		.CONST	0x069c,0x0016
1a7e 06a3 0017  |    |		.CONST	0x06a3,0x0017
1a80 06ac 0018  |    |		.CONST	0x06ac,0x0018
1a82 ; --------------------------------------------------------------------------------------
1a82 ; Debug3 Subtable 0xc
1a82 ; --------------------------------------------------------------------------------------
1a82 0008 0014  |    |		.DBG3TAB	0x0008,0x0014
1a84 06bb ffff  |    |		.CONST	0x06bb,0xffff
1a86 06bc fffe  |    |		.CONST	0x06bc,0xfffe
1a88 06bd fffd  |    |		.CONST	0x06bd,0xfffd
1a8a 06bf fffc  |    |		.CONST	0x06bf,0xfffc
1a8c 06c5 fffb  |    |		.CONST	0x06c5,0xfffb
1a8e 06ca fffa  |    |		.CONST	0x06ca,0xfffa
1a90 06cf fff9  |    |		.CONST	0x06cf,0xfff9
1a92 06d0 fff8  |    |		.CONST	0x06d0,0xfff8
1a94 06d8 0001  |    |		.CONST	0x06d8,0x0001
1a96 06db 0002  |    |		.CONST	0x06db,0x0002
1a98 06de 0003  |    |		.CONST	0x06de,0x0003
1a9a 06e4 0004  |    |		.CONST	0x06e4,0x0004
1a9c 06e5 0005  |    |		.CONST	0x06e5,0x0005
1a9e 06e8 0006  |    |		.CONST	0x06e8,0x0006
1aa0 06ec 0007  |    |		.CONST	0x06ec,0x0007
1aa2 06f2 0008  |    |		.CONST	0x06f2,0x0008
1aa4 06f3 0009  |    |		.CONST	0x06f3,0x0009
1aa6 0703 000a  |    |		.CONST	0x0703,0x000a
1aa8 0707 000b  |    |		.CONST	0x0707,0x000b
1aaa 070c 000c  |    |		.CONST	0x070c,0x000c
1aac 0717 000d  |    |		.CONST	0x0717,0x000d
1aae 0719 000e  |    |		.CONST	0x0719,0x000e
1ab0 071b 000f  |    |		.CONST	0x071b,0x000f
1ab2 0726 0010  | &  |		.CONST	0x0726,0x0010
1ab4 072e 0011  | .  |		.CONST	0x072e,0x0011
1ab6 0738 0012  | 8  |		.CONST	0x0738,0x0012
1ab8 073f 0013  | ?  |		.CONST	0x073f,0x0013
1aba 0748 0014  | H  |		.CONST	0x0748,0x0014
1abc ; --------------------------------------------------------------------------------------
1abc ; Debug3 Subtable 0xd
1abc ; --------------------------------------------------------------------------------------
1abc 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
1abe 0753 0001  | S  |		.CONST	0x0753,0x0001
1ac0 ; --------------------------------------------------------------------------------------
1ac0 ; Debug3 Subtable 0xe
1ac0 ; --------------------------------------------------------------------------------------
1ac0 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
1ac2 075b 0001  | [  |		.CONST	0x075b,0x0001
1ac4 ; --------------------------------------------------------------------------------------
1ac4 ; Debug3 Subtable 0xf
1ac4 ; --------------------------------------------------------------------------------------
1ac4 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
1ac6 0763 0001  | c  |		.CONST	0x0763,0x0001
1ac8 0768 0002  | h  |		.CONST	0x0768,0x0002
1aca ; --------------------------------------------------------------------------------------
1aca ; Debug3 Subtable 0x10
1aca ; --------------------------------------------------------------------------------------
1aca 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
1acc 0773 0001  | s  |		.CONST	0x0773,0x0001
1ace 0778 0002  | x  |		.CONST	0x0778,0x0002
1ad0 ; --------------------------------------------------------------------------------------
1ad0 ; Debug3 Subtable 0x11
1ad0 ; --------------------------------------------------------------------------------------
1ad0 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
1ad2 0783 0001  |    |		.CONST	0x0783,0x0001
1ad4 0785 0002  |    |		.CONST	0x0785,0x0002
1ad6 0793 0003  |    |		.CONST	0x0793,0x0003
1ad8 ; --------------------------------------------------------------------------------------
1ad8 ; Debug3 Subtable 0x12
1ad8 ; --------------------------------------------------------------------------------------
1ad8 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
1ada 079b 0001  |    |		.CONST	0x079b,0x0001
1adc 079d 0002  |    |		.CONST	0x079d,0x0002
1ade 07ab 0003  |    |		.CONST	0x07ab,0x0003
1ae0 ; --------------------------------------------------------------------------------------
1ae0 ; Debug3 Subtable 0x13
1ae0 ; --------------------------------------------------------------------------------------
1ae0 000a 0001  |    |		.DBG3TAB	0x000a,0x0001
1ae2 07b3 ffff  |    |		.CONST	0x07b3,0xffff
1ae4 07b4 fffe  |    |		.CONST	0x07b4,0xfffe
1ae6 07b5 fffd  |    |		.CONST	0x07b5,0xfffd
1ae8 07b8 fffc  |    |		.CONST	0x07b8,0xfffc
1aea 07bb fffb  |    |		.CONST	0x07bb,0xfffb
1aec 07bc fffa  |    |		.CONST	0x07bc,0xfffa
1aee 07bd fff9  |    |		.CONST	0x07bd,0xfff9
1af0 07bf fff8  |    |		.CONST	0x07bf,0xfff8
1af2 07c8 fff7  |    |		.CONST	0x07c8,0xfff7
1af4 07ca fff6  |    |		.CONST	0x07ca,0xfff6
1af6 07cc 0001  |    |		.CONST	0x07cc,0x0001
1af8 ; --------------------------------------------------------------------------------------
1af8 ; Debug3 Subtable 0x14
1af8 ; --------------------------------------------------------------------------------------
1af8 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
1afa 07d3 ffff  |    |		.CONST	0x07d3,0xffff
1afc 07d6 0001  |    |		.CONST	0x07d6,0x0001
1afe 07d8 0002  |    |		.CONST	0x07d8,0x0002
1b00 07dc 0003  |    |		.CONST	0x07dc,0x0003
1b02 07e0 0004  |    |		.CONST	0x07e0,0x0004
1b04 07e5 0005  |    |		.CONST	0x07e5,0x0005
1b06 07e9 0006  |    |		.CONST	0x07e9,0x0006
1b08 07ea 0007  |    |		.CONST	0x07ea,0x0007
1b0a ; --------------------------------------------------------------------------------------
1b0a ; Debug3 Subtable 0x15
1b0a ; --------------------------------------------------------------------------------------
1b0a 0006 0027  |   '|		.DBG3TAB	0x0006,0x0027
1b0c 07f3 ffff  |    |		.CONST	0x07f3,0xffff
1b0e 07f6 fffe  |    |		.CONST	0x07f6,0xfffe
1b10 07f7 fffd  |    |		.CONST	0x07f7,0xfffd
1b12 07fc fffc  |    |		.CONST	0x07fc,0xfffc
1b14 07fd fffb  |    |		.CONST	0x07fd,0xfffb
1b16 07fe fffa  |    |		.CONST	0x07fe,0xfffa
1b18 07ff 0001  |    |		.CONST	0x07ff,0x0001
1b1a 0805 0002  |    |		.CONST	0x0805,0x0002
1b1c 0809 0003  |    |		.CONST	0x0809,0x0003
1b1e 080d 0004  |    |		.CONST	0x080d,0x0004
1b20 080e 0005  |    |		.CONST	0x080e,0x0005
1b22 082b 0019  | +  |		.CONST	0x082b,0x0019
1b24 082d 0006  | -  |		.CONST	0x082d,0x0006
1b26 0832 0007  | 2  |		.CONST	0x0832,0x0007
1b28 0837 0008  | 7  |		.CONST	0x0837,0x0008
1b2a 083c 0009  | <  |		.CONST	0x083c,0x0009
1b2c 0841 000a  | A  |		.CONST	0x0841,0x000a
1b2e 0846 000b  | F  |		.CONST	0x0846,0x000b
1b30 084b 000c  | K  |		.CONST	0x084b,0x000c
1b32 0850 000d  | P  |		.CONST	0x0850,0x000d
1b34 0855 000e  | U  |		.CONST	0x0855,0x000e
1b36 0862 0010  | b  |		.CONST	0x0862,0x0010
1b38 0866 0011  | f  |		.CONST	0x0866,0x0011
1b3a 0874 0012  | t  |		.CONST	0x0874,0x0012
1b3c 0879 0013  | y  |		.CONST	0x0879,0x0013
1b3e 087c 0014  | |  |		.CONST	0x087c,0x0014
1b40 087e 0015  | ~  |		.CONST	0x087e,0x0015
1b42 0882 0016  |    |		.CONST	0x0882,0x0016
1b44 0887 000f  |    |		.CONST	0x0887,0x000f
1b46 088c 0017  |    |		.CONST	0x088c,0x0017
1b48 0891 0018  |    |		.CONST	0x0891,0x0018
1b4a 0898 001a  |    |		.CONST	0x0898,0x001a
1b4c 08a1 001b  |    |		.CONST	0x08a1,0x001b
1b4e 08a5 001c  |    |		.CONST	0x08a5,0x001c
1b50 08aa 001d  |    |		.CONST	0x08aa,0x001d
1b52 08ae 001e  |    |		.CONST	0x08ae,0x001e
1b54 08af 001f  |    |		.CONST	0x08af,0x001f
1b56 08b2 0020  |    |		.CONST	0x08b2,0x0020
1b58 08b6 0021  |   !|		.CONST	0x08b6,0x0021
1b5a 08ba 0022  |   "|		.CONST	0x08ba,0x0022
1b5c 08be 0023  |   #|		.CONST	0x08be,0x0023
1b5e 08c5 0024  |   $|		.CONST	0x08c5,0x0024
1b60 08cf 0025  |   %|		.CONST	0x08cf,0x0025
1b62 08d3 0026  |   &|		.CONST	0x08d3,0x0026
1b64 08d8 0027  |   '|		.CONST	0x08d8,0x0027
1b66 ; --------------------------------------------------------------------------------------
1b66 ; Debug3 Subtable 0x16
1b66 ; --------------------------------------------------------------------------------------
1b66 0004 000d  |    |		.DBG3TAB	0x0004,0x000d
1b68 08e3 ffff  |    |		.CONST	0x08e3,0xffff
1b6a 08e8 fffe  |    |		.CONST	0x08e8,0xfffe
1b6c 08e9 fffd  |    |		.CONST	0x08e9,0xfffd
1b6e 08ea fffc  |    |		.CONST	0x08ea,0xfffc
1b70 08eb 0001  |    |		.CONST	0x08eb,0x0001
1b72 08f1 0002  |    |		.CONST	0x08f1,0x0002
1b74 08f5 0003  |    |		.CONST	0x08f5,0x0003
1b76 08fa 0005  |    |		.CONST	0x08fa,0x0005
1b78 08fe 0006  |    |		.CONST	0x08fe,0x0006
1b7a 090c 0007  |    |		.CONST	0x090c,0x0007
1b7c 0911 0008  |    |		.CONST	0x0911,0x0008
1b7e 0914 0009  |    |		.CONST	0x0914,0x0009
1b80 0916 000a  |    |		.CONST	0x0916,0x000a
1b82 091a 000b  |    |		.CONST	0x091a,0x000b
1b84 091f 0004  |    |		.CONST	0x091f,0x0004
1b86 0924 000c  | $  |		.CONST	0x0924,0x000c
1b88 092c 000d  | ,  |		.CONST	0x092c,0x000d
1b8a ; --------------------------------------------------------------------------------------
1b8a ; Debug3 Subtable 0x17
1b8a ; --------------------------------------------------------------------------------------
1b8a 0001 002c  |   ,|		.DBG3TAB	0x0001,0x002c
1b8c 0933 ffff  | 3  |		.CONST	0x0933,0xffff
1b8e 0936 0001  | 6  |		.CONST	0x0936,0x0001
1b90 093b 0002  | ;  |		.CONST	0x093b,0x0002
1b92 093f 0003  | ?  |		.CONST	0x093f,0x0003
1b94 0944 0004  | D  |		.CONST	0x0944,0x0004
1b96 0948 0005  | H  |		.CONST	0x0948,0x0005
1b98 094d 0006  | M  |		.CONST	0x094d,0x0006
1b9a 0952 0007  | R  |		.CONST	0x0952,0x0007
1b9c 0957 0008  | W  |		.CONST	0x0957,0x0008
1b9e 095b 0009  | [  |		.CONST	0x095b,0x0009
1ba0 0960 000a  | `  |		.CONST	0x0960,0x000a
1ba2 0964 000b  | d  |		.CONST	0x0964,0x000b
1ba4 0969 000c  | i  |		.CONST	0x0969,0x000c
1ba6 096e 000d  | n  |		.CONST	0x096e,0x000d
1ba8 0973 000e  | s  |		.CONST	0x0973,0x000e
1baa 0977 000f  | w  |		.CONST	0x0977,0x000f
1bac 097c 0010  | |  |		.CONST	0x097c,0x0010
1bae 0981 0011  |    |		.CONST	0x0981,0x0011
1bb0 0986 0012  |    |		.CONST	0x0986,0x0012
1bb2 098a 0013  |    |		.CONST	0x098a,0x0013
1bb4 098f 0014  |    |		.CONST	0x098f,0x0014
1bb6 0994 0015  |    |		.CONST	0x0994,0x0015
1bb8 0999 0016  |    |		.CONST	0x0999,0x0016
1bba 099e 0017  |    |		.CONST	0x099e,0x0017
1bbc 09a3 0018  |    |		.CONST	0x09a3,0x0018
1bbe 09a8 0019  |    |		.CONST	0x09a8,0x0019
1bc0 09ad 001a  |    |		.CONST	0x09ad,0x001a
1bc2 09b2 001b  |    |		.CONST	0x09b2,0x001b
1bc4 09b7 001c  |    |		.CONST	0x09b7,0x001c
1bc6 09bc 001d  |    |		.CONST	0x09bc,0x001d
1bc8 09c1 001e  |    |		.CONST	0x09c1,0x001e
1bca 09c6 001f  |    |		.CONST	0x09c6,0x001f
1bcc 09cb 0020  |    |		.CONST	0x09cb,0x0020
1bce 09ce 0021  |   !|		.CONST	0x09ce,0x0021
1bd0 09d1 0022  |   "|		.CONST	0x09d1,0x0022
1bd2 09d4 0023  |   #|		.CONST	0x09d4,0x0023
1bd4 09d8 0024  |   $|		.CONST	0x09d8,0x0024
1bd6 09dd 0025  |   %|		.CONST	0x09dd,0x0025
1bd8 09e0 0026  |   &|		.CONST	0x09e0,0x0026
1bda 09e3 0027  |   '|		.CONST	0x09e3,0x0027
1bdc 09e6 0028  |   (|		.CONST	0x09e6,0x0028
1bde 09ea 0029  |   )|		.CONST	0x09ea,0x0029
1be0 09ef 002a  |   *|		.CONST	0x09ef,0x002a
1be2 09f3 002b  |   +|		.CONST	0x09f3,0x002b
1be4 0a01 002c  |   ,|		.CONST	0x0a01,0x002c
1be6 ; --------------------------------------------------------------------------------------
1be6 ; Debug3 Subtable 0x18
1be6 ; --------------------------------------------------------------------------------------
1be6 0002 000c  |    |		.DBG3TAB	0x0002,0x000c
1be8 0a0b ffff  |    |		.CONST	0x0a0b,0xffff
1bea 0a0c fffe  |    |		.CONST	0x0a0c,0xfffe
1bec 0a0e 0001  |    |		.CONST	0x0a0e,0x0001
1bee 0a15 0002  |    |		.CONST	0x0a15,0x0002
1bf0 0a1b 0003  |    |		.CONST	0x0a1b,0x0003
1bf2 0a1f 0004  |    |		.CONST	0x0a1f,0x0004
1bf4 0a21 0005  | !  |		.CONST	0x0a21,0x0005
1bf6 0a23 0006  | #  |		.CONST	0x0a23,0x0006
1bf8 0a28 0007  | (  |		.CONST	0x0a28,0x0007
1bfa 0a2c 0008  | ,  |		.CONST	0x0a2c,0x0008
1bfc 0a30 0009  | 0  |		.CONST	0x0a30,0x0009
1bfe 0a32 000a  | 2  |		.CONST	0x0a32,0x000a
1c00 0a34 000b  | 4  |		.CONST	0x0a34,0x000b
1c02 0a38 000c  | 8  |		.CONST	0x0a38,0x000c
1c04 ; --------------------------------------------------------------------------------------
1c04 ; Debug3 Subtable 0x19
1c04 ; --------------------------------------------------------------------------------------
1c04 0004 000e  |    |		.DBG3TAB	0x0004,0x000e
1c06 0a43 ffff  | C  |		.CONST	0x0a43,0xffff
1c08 0a44 fffe  | D  |		.CONST	0x0a44,0xfffe
1c0a 0a45 fffd  | E  |		.CONST	0x0a45,0xfffd
1c0c 0a46 fffc  | F  |		.CONST	0x0a46,0xfffc
1c0e 0a47 0001  | G  |		.CONST	0x0a47,0x0001
1c10 0a4e 0002  | N  |		.CONST	0x0a4e,0x0002
1c12 0a54 0003  | T  |		.CONST	0x0a54,0x0003
1c14 0a58 0004  | X  |		.CONST	0x0a58,0x0004
1c16 0a5d 0005  | ]  |		.CONST	0x0a5d,0x0005
1c18 0a5e 0006  | ^  |		.CONST	0x0a5e,0x0006
1c1a 0a62 0007  | b  |		.CONST	0x0a62,0x0007
1c1c 0a66 0008  | f  |		.CONST	0x0a66,0x0008
1c1e 0a6a 0009  | j  |		.CONST	0x0a6a,0x0009
1c20 0a6c 000a  | l  |		.CONST	0x0a6c,0x000a
1c22 0a6e 000b  | n  |		.CONST	0x0a6e,0x000b
1c24 0a70 000c  | p  |		.CONST	0x0a70,0x000c
1c26 0a77 000d  | w  |		.CONST	0x0a77,0x000d
1c28 0a7b 000e  | {  |		.CONST	0x0a7b,0x000e
1c2a ; --------------------------------------------------------------------------------------
1c2a ; Debug3 Subtable 0x1a
1c2a ; --------------------------------------------------------------------------------------
1c2a 0001 000a  |    |		.DBG3TAB	0x0001,0x000a
1c2c 0a83 ffff  |    |		.CONST	0x0a83,0xffff
1c2e 0a84 0001  |    |		.CONST	0x0a84,0x0001
1c30 0a8b 0002  |    |		.CONST	0x0a8b,0x0002
1c32 0a93 0003  |    |		.CONST	0x0a93,0x0003
1c34 0a97 0004  |    |		.CONST	0x0a97,0x0004
1c36 0a9b 0005  |    |		.CONST	0x0a9b,0x0005
1c38 0aa0 0006  |    |		.CONST	0x0aa0,0x0006
1c3a 0aa4 0007  |    |		.CONST	0x0aa4,0x0007
1c3c 0aa8 0008  |    |		.CONST	0x0aa8,0x0008
1c3e 0aac 0009  |    |		.CONST	0x0aac,0x0009
1c40 0ab0 000a  |    |		.CONST	0x0ab0,0x000a
1c42 ; --------------------------------------------------------------------------------------
1c42 ; Debug3 Subtable 0x1b
1c42 ; --------------------------------------------------------------------------------------
1c42 0004 0007  |    |		.DBG3TAB	0x0004,0x0007
1c44 0abb ffff  |    |		.CONST	0x0abb,0xffff
1c46 0abd fffe  |    |		.CONST	0x0abd,0xfffe
1c48 0ac2 fffd  |    |		.CONST	0x0ac2,0xfffd
1c4a 0ac3 fffc  |    |		.CONST	0x0ac3,0xfffc
1c4c 0ac9 0001  |    |		.CONST	0x0ac9,0x0001
1c4e 0ade 0002  |    |		.CONST	0x0ade,0x0002
1c50 0ae0 0003  |    |		.CONST	0x0ae0,0x0003
1c52 0afe 0004  |    |		.CONST	0x0afe,0x0004
1c54 0b00 0005  |    |		.CONST	0x0b00,0x0005
1c56 0b02 0006  |    |		.CONST	0x0b02,0x0006
1c58 0b06 0007  |    |		.CONST	0x0b06,0x0007
1c5a ; --------------------------------------------------------------------------------------
1c5a ; Debug3 Subtable 0x1c
1c5a ; --------------------------------------------------------------------------------------
1c5a 0005 0022  |   "|		.DBG3TAB	0x0005,0x0022
1c5c 0b13 ffff  |    |		.CONST	0x0b13,0xffff
1c5e 0b16 fffe  |    |		.CONST	0x0b16,0xfffe
1c60 0b17 fffd  |    |		.CONST	0x0b17,0xfffd
1c62 0b1b fffc  |    |		.CONST	0x0b1b,0xfffc
1c64 0b1c fffb  |    |		.CONST	0x0b1c,0xfffb
1c66 0b27 0002  | '  |		.CONST	0x0b27,0x0002
1c68 0b40 001d  | @  |		.CONST	0x0b40,0x001d
1c6a 0b4a 001e  | J  |		.CONST	0x0b4a,0x001e
1c6c 0b4d 0003  | M  |		.CONST	0x0b4d,0x0003
1c6e 0b4f 0004  | O  |		.CONST	0x0b4f,0x0004
1c70 0b51 0005  | Q  |		.CONST	0x0b51,0x0005
1c72 0b53 0006  | S  |		.CONST	0x0b53,0x0006
1c74 0b55 0007  | U  |		.CONST	0x0b55,0x0007
1c76 0b59 0008  | Y  |		.CONST	0x0b59,0x0008
1c78 0b5d 0009  | ]  |		.CONST	0x0b5d,0x0009
1c7a 0b61 000a  | a  |		.CONST	0x0b61,0x000a
1c7c 0b65 000b  | e  |		.CONST	0x0b65,0x000b
1c7e 0b67 000c  | g  |		.CONST	0x0b67,0x000c
1c80 0b6a 000d  | j  |		.CONST	0x0b6a,0x000d
1c82 0b6b 000e  | k  |		.CONST	0x0b6b,0x000e
1c84 0b6f 000f  | o  |		.CONST	0x0b6f,0x000f
1c86 0b74 0010  | t  |		.CONST	0x0b74,0x0010
1c88 0b77 0011  | w  |		.CONST	0x0b77,0x0011
1c8a 0b7a 0012  | z  |		.CONST	0x0b7a,0x0012
1c8c 0b81 001b  |    |		.CONST	0x0b81,0x001b
1c8e 0b82 0013  |    |		.CONST	0x0b82,0x0013
1c90 0b86 0014  |    |		.CONST	0x0b86,0x0014
1c92 0b9c 0015  |    |		.CONST	0x0b9c,0x0015
1c94 0ba8 0016  |    |		.CONST	0x0ba8,0x0016
1c96 0bac 0017  |    |		.CONST	0x0bac,0x0017
1c98 0bb7 0018  |    |		.CONST	0x0bb7,0x0018
1c9a 0bba 0019  |    |		.CONST	0x0bba,0x0019
1c9c 0bbc 001a  |    |		.CONST	0x0bbc,0x001a
1c9e 0bc3 001f  |    |		.CONST	0x0bc3,0x001f
1ca0 0bc7 0020  |    |		.CONST	0x0bc7,0x0020
1ca2 0bd5 0021  |   !|		.CONST	0x0bd5,0x0021
1ca4 0bd7 0022  |   "|		.CONST	0x0bd7,0x0022
1ca6 0bdc 0001  |    |		.CONST	0x0bdc,0x0001
1ca8 0be2 0023  |   #|		.CONST	0x0be2,0x0023
1caa ; --------------------------------------------------------------------------------------
1caa ; Debug3 Subtable 0x1d
1caa ; --------------------------------------------------------------------------------------
1caa 0003 0009  |    |		.DBG3TAB	0x0003,0x0009
1cac 0beb ffff  |    |		.CONST	0x0beb,0xffff
1cae 0bef fffe  |    |		.CONST	0x0bef,0xfffe
1cb0 0bf2 fffd  |    |		.CONST	0x0bf2,0xfffd
1cb2 0bf4 0001  |    |		.CONST	0x0bf4,0x0001
1cb4 0bf8 0002  |    |		.CONST	0x0bf8,0x0002
1cb6 0bfd 0003  |    |		.CONST	0x0bfd,0x0003
1cb8 0c01 0004  |    |		.CONST	0x0c01,0x0004
1cba 0c06 0005  |    |		.CONST	0x0c06,0x0005
1cbc 0c19 0006  |    |		.CONST	0x0c19,0x0006
1cbe 0c1b 0007  |    |		.CONST	0x0c1b,0x0007
1cc0 0c31 0008  | 1  |		.CONST	0x0c31,0x0008
1cc2 0c34 0009  | 4  |		.CONST	0x0c34,0x0009
1cc4 ; --------------------------------------------------------------------------------------
1cc4 ; Debug3 Subtable 0x1e
1cc4 ; --------------------------------------------------------------------------------------
1cc4 0003 000f  |    |		.DBG3TAB	0x0003,0x000f
1cc6 0c43 ffff  | C  |		.CONST	0x0c43,0xffff
1cc8 0c44 fffe  | D  |		.CONST	0x0c44,0xfffe
1cca 0c47 fffd  | G  |		.CONST	0x0c47,0xfffd
1ccc 0c4d 0001  | M  |		.CONST	0x0c4d,0x0001
1cce 0c4e 0002  | N  |		.CONST	0x0c4e,0x0002
1cd0 0c52 0003  | R  |		.CONST	0x0c52,0x0003
1cd2 0c55 0004  | U  |		.CONST	0x0c55,0x0004
1cd4 0c57 0005  | W  |		.CONST	0x0c57,0x0005
1cd6 0c61 0006  | a  |		.CONST	0x0c61,0x0006
1cd8 0c63 0007  | c  |		.CONST	0x0c63,0x0007
1cda 0c6a 0008  | j  |		.CONST	0x0c6a,0x0008
1cdc 0c73 0009  | s  |		.CONST	0x0c73,0x0009
1cde 0c77 000a  | w  |		.CONST	0x0c77,0x000a
1ce0 0c7a 000b  | z  |		.CONST	0x0c7a,0x000b
1ce2 0c7c 000c  | |  |		.CONST	0x0c7c,0x000c
1ce4 0c7f 000d  |    |		.CONST	0x0c7f,0x000d
1ce6 0c84 000e  |    |		.CONST	0x0c84,0x000e
1ce8 0c8c 000f  |    |		.CONST	0x0c8c,0x000f
1cea ; --------------------------------------------------------------------------------------
1cea ; Debug3 Subtable 0x1f
1cea ; --------------------------------------------------------------------------------------
1cea 0001 0023  |   #|		.DBG3TAB	0x0001,0x0023
1cec 0c93 ffff  |    |		.CONST	0x0c93,0xffff
1cee 0c96 0001  |    |		.CONST	0x0c96,0x0001
1cf0 0c98 0002  |    |		.CONST	0x0c98,0x0002
1cf2 0c9d 0003  |    |		.CONST	0x0c9d,0x0003
1cf4 0ca3 0004  |    |		.CONST	0x0ca3,0x0004
1cf6 0ca8 0005  |    |		.CONST	0x0ca8,0x0005
1cf8 0cae 0006  |    |		.CONST	0x0cae,0x0006
1cfa 0cb3 0007  |    |		.CONST	0x0cb3,0x0007
1cfc 0cb9 0008  |    |		.CONST	0x0cb9,0x0008
1cfe 0cbe 0009  |    |		.CONST	0x0cbe,0x0009
1d00 0cc4 000a  |    |		.CONST	0x0cc4,0x000a
1d02 0cc9 000b  |    |		.CONST	0x0cc9,0x000b
1d04 0ccf 000c  |    |		.CONST	0x0ccf,0x000c
1d06 0cd4 000d  |    |		.CONST	0x0cd4,0x000d
1d08 0cda 000e  |    |		.CONST	0x0cda,0x000e
1d0a 0cdf 000f  |    |		.CONST	0x0cdf,0x000f
1d0c 0ce5 0010  |    |		.CONST	0x0ce5,0x0010
1d0e 0cea 0011  |    |		.CONST	0x0cea,0x0011
1d10 0cf0 0012  |    |		.CONST	0x0cf0,0x0012
1d12 0cf5 0013  |    |		.CONST	0x0cf5,0x0013
1d14 0cfb 0014  |    |		.CONST	0x0cfb,0x0014
1d16 0d00 0015  |    |		.CONST	0x0d00,0x0015
1d18 0d06 0016  |    |		.CONST	0x0d06,0x0016
1d1a 0d0b 0017  |    |		.CONST	0x0d0b,0x0017
1d1c 0d11 0018  |    |		.CONST	0x0d11,0x0018
1d1e 0d16 0019  |    |		.CONST	0x0d16,0x0019
1d20 0d1c 001a  |    |		.CONST	0x0d1c,0x001a
1d22 0d21 001b  | !  |		.CONST	0x0d21,0x001b
1d24 0d27 001c  | '  |		.CONST	0x0d27,0x001c
1d26 0d2c 001d  | ,  |		.CONST	0x0d2c,0x001d
1d28 0d32 001e  | 2  |		.CONST	0x0d32,0x001e
1d2a 0d37 001f  | 7  |		.CONST	0x0d37,0x001f
1d2c 0d3d 0020  | =  |		.CONST	0x0d3d,0x0020
1d2e 0d42 0021  | B !|		.CONST	0x0d42,0x0021
1d30 0d46 0022  | F "|		.CONST	0x0d46,0x0022
1d32 0d48 0023  | H #|		.CONST	0x0d48,0x0023
1d34 ; --------------------------------------------------------------------------------------
1d34 ; Debug3 Subtable 0x20
1d34 ; --------------------------------------------------------------------------------------
1d34 000a 0027  |   '|		.DBG3TAB	0x000a,0x0027
1d36 0d5b ffff  | [  |		.CONST	0x0d5b,0xffff
1d38 0d5c fffe  | \  |		.CONST	0x0d5c,0xfffe
1d3a 0d62 fffd  | b  |		.CONST	0x0d62,0xfffd
1d3c 0d67 fffc  | g  |		.CONST	0x0d67,0xfffc
1d3e 0d69 fffb  | i  |		.CONST	0x0d69,0xfffb
1d40 0d6f fffa  | o  |		.CONST	0x0d6f,0xfffa
1d42 0d70 fff9  | p  |		.CONST	0x0d70,0xfff9
1d44 0d71 fff8  | q  |		.CONST	0x0d71,0xfff8
1d46 0d76 fff7  | v  |		.CONST	0x0d76,0xfff7
1d48 0d77 fff6  | w  |		.CONST	0x0d77,0xfff6
1d4a 0d7f 0001  |    |		.CONST	0x0d7f,0x0001
1d4c 0d86 0002  |    |		.CONST	0x0d86,0x0002
1d4e 0d89 0003  |    |		.CONST	0x0d89,0x0003
1d50 0d8c 0004  |    |		.CONST	0x0d8c,0x0004
1d52 0d92 0005  |    |		.CONST	0x0d92,0x0005
1d54 0d93 0006  |    |		.CONST	0x0d93,0x0006
1d56 0d96 0007  |    |		.CONST	0x0d96,0x0007
1d58 0d9a 0008  |    |		.CONST	0x0d9a,0x0008
1d5a 0da0 0009  |    |		.CONST	0x0da0,0x0009
1d5c 0da1 000a  |    |		.CONST	0x0da1,0x000a
1d5e 0da4 000b  |    |		.CONST	0x0da4,0x000b
1d60 0dab 000c  |    |		.CONST	0x0dab,0x000c
1d62 0db1 000d  |    |		.CONST	0x0db1,0x000d
1d64 0db2 000e  |    |		.CONST	0x0db2,0x000e
1d66 0dbb 000f  |    |		.CONST	0x0dbb,0x000f
1d68 0dd5 0010  |    |		.CONST	0x0dd5,0x0010
1d6a 0dd7 0011  |    |		.CONST	0x0dd7,0x0011
1d6c 0de3 0012  |    |		.CONST	0x0de3,0x0012
1d6e 0de9 0013  |    |		.CONST	0x0de9,0x0013
1d70 0dea 0014  |    |		.CONST	0x0dea,0x0014
1d72 0df1 0015  |    |		.CONST	0x0df1,0x0015
1d74 0df9 0016  |    |		.CONST	0x0df9,0x0016
1d76 0dfe 0017  |    |		.CONST	0x0dfe,0x0017
1d78 0e06 0018  |    |		.CONST	0x0e06,0x0018
1d7a 0e08 0019  |    |		.CONST	0x0e08,0x0019
1d7c 0e0e 001a  |    |		.CONST	0x0e0e,0x001a
1d7e 0e15 001b  |    |		.CONST	0x0e15,0x001b
1d80 0e16 001c  |    |		.CONST	0x0e16,0x001c
1d82 0e1f 001d  |    |		.CONST	0x0e1f,0x001d
1d84 0e21 001e  | !  |		.CONST	0x0e21,0x001e
1d86 0e2d 001f  | -  |		.CONST	0x0e2d,0x001f
1d88 0e33 0020  | 3  |		.CONST	0x0e33,0x0020
1d8a 0e3a 0021  | : !|		.CONST	0x0e3a,0x0021
1d8c 0e3b 0022  | ; "|		.CONST	0x0e3b,0x0022
1d8e 0e42 0023  | B #|		.CONST	0x0e42,0x0023
1d90 0e48 0024  | H $|		.CONST	0x0e48,0x0024
1d92 0e54 0025  | T %|		.CONST	0x0e54,0x0025
1d94 0e5d 0026  | ] &|		.CONST	0x0e5d,0x0026
1d96 0e64 0027  | d '|		.CONST	0x0e64,0x0027
1d98 ; --------------------------------------------------------------------------------------
1d98 ; Debug3 Subtable 0x21
1d98 ; --------------------------------------------------------------------------------------
1d98 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
1d9a ; --------------------------------------------------------------------------------------
1d9a ; Debug3 Subtable 0x22
1d9a ; --------------------------------------------------------------------------------------
1d9a 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
1d9c ; --------------------------------------------------------------------------------------
1d9c ; Debug3 Subtable 0x23
1d9c ; --------------------------------------------------------------------------------------
1d9c 0002 0010  |    |		.DBG3TAB	0x0002,0x0010
1d9e 0ee3 ffff  |    |		.CONST	0x0ee3,0xffff
1da0 0ee6 fffe  |    |		.CONST	0x0ee6,0xfffe
1da2 0eeb 0001  |    |		.CONST	0x0eeb,0x0001
1da4 0ef0 0002  |    |		.CONST	0x0ef0,0x0002
1da6 0ef7 0003  |    |		.CONST	0x0ef7,0x0003
1da8 0efc 0004  |    |		.CONST	0x0efc,0x0004
1daa 0f03 0005  |    |		.CONST	0x0f03,0x0005
1dac 0f08 0006  |    |		.CONST	0x0f08,0x0006
1dae 0f10 0007  |    |		.CONST	0x0f10,0x0007
1db0 0f15 0008  |    |		.CONST	0x0f15,0x0008
1db2 0f19 0009  |    |		.CONST	0x0f19,0x0009
1db4 0f1f 000a  |    |		.CONST	0x0f1f,0x000a
1db6 0f22 000b  | "  |		.CONST	0x0f22,0x000b
1db8 0f26 000c  | &  |		.CONST	0x0f26,0x000c
1dba 0f2a 000d  | *  |		.CONST	0x0f2a,0x000d
1dbc 0f31 000e  | 1  |		.CONST	0x0f31,0x000e
1dbe 0f3b 000f  | ;  |		.CONST	0x0f3b,0x000f
1dc0 0f3d 0010  | =  |		.CONST	0x0f3d,0x0010
1dc2 ; --------------------------------------------------------------------------------------
1dc2 ; Debug3 Subtable 0x24
1dc2 ; --------------------------------------------------------------------------------------
1dc2 0000 000a  |    |		.DBG3TAB	0x0000,0x000a
1dc4 0f43 0001  | C  |		.CONST	0x0f43,0x0001
1dc6 0f4c 0002  | L  |		.CONST	0x0f4c,0x0002
1dc8 0f58 0003  | X  |		.CONST	0x0f58,0x0003
1dca 0f64 0004  | d  |		.CONST	0x0f64,0x0004
1dcc 0f70 0005  | p  |		.CONST	0x0f70,0x0005
1dce 0f7c 0006  | |  |		.CONST	0x0f7c,0x0006
1dd0 0f86 0008  |    |		.CONST	0x0f86,0x0008
1dd2 0f8f 0009  |    |		.CONST	0x0f8f,0x0009
1dd4 0f95 000a  |    |		.CONST	0x0f95,0x000a
1dd6 0f9c 000b  |    |		.CONST	0x0f9c,0x000b
1dd8 ; --------------------------------------------------------------------------------------
1dd8 ; Debug3 Subtable 0x25
1dd8 ; --------------------------------------------------------------------------------------
1dd8 0004 001b  |    |		.DBG3TAB	0x0004,0x001b
1dda 0fa3 ffff  |    |		.CONST	0x0fa3,0xffff
1ddc 0fa5 fffe  |    |		.CONST	0x0fa5,0xfffe
1dde 0fa6 fffd  |    |		.CONST	0x0fa6,0xfffd
1de0 0fa7 fffc  |    |		.CONST	0x0fa7,0xfffc
1de2 0fa8 0001  |    |		.CONST	0x0fa8,0x0001
1de4 0fad 0002  |    |		.CONST	0x0fad,0x0002
1de6 0fb1 0003  |    |		.CONST	0x0fb1,0x0003
1de8 0fb6 0004  |    |		.CONST	0x0fb6,0x0004
1dea 0fba 0005  |    |		.CONST	0x0fba,0x0005
1dec 0fbf 0006  |    |		.CONST	0x0fbf,0x0006
1dee 0fc3 0007  |    |		.CONST	0x0fc3,0x0007
1df0 0fc8 0008  |    |		.CONST	0x0fc8,0x0008
1df2 0fce 0009  |    |		.CONST	0x0fce,0x0009
1df4 0fd2 000a  |    |		.CONST	0x0fd2,0x000a
1df6 0fd6 000b  |    |		.CONST	0x0fd6,0x000b
1df8 0fd8 000c  |    |		.CONST	0x0fd8,0x000c
1dfa 0fdc 000d  |    |		.CONST	0x0fdc,0x000d
1dfc 0fec 000e  |    |		.CONST	0x0fec,0x000e
1dfe 0ff2 000f  |    |		.CONST	0x0ff2,0x000f
1e00 0ff8 0010  |    |		.CONST	0x0ff8,0x0010
1e02 1000 0011  |    |		.CONST	0x1000,0x0011
1e04 1003 0013  |    |		.CONST	0x1003,0x0013
1e06 1007 0014  |    |		.CONST	0x1007,0x0014
1e08 1017 0015  |    |		.CONST	0x1017,0x0015
1e0a 101b 0016  |    |		.CONST	0x101b,0x0016
1e0c 1020 0017  |    |		.CONST	0x1020,0x0017
1e0e 1024 0018  | $  |		.CONST	0x1024,0x0018
1e10 102c 0019  | ,  |		.CONST	0x102c,0x0019
1e12 102d 001a  | -  |		.CONST	0x102d,0x001a
1e14 102f 001b  | /  |		.CONST	0x102f,0x001b
1e16 1034 0012  | 4  |		.CONST	0x1034,0x0012
1e18 ; --------------------------------------------------------------------------------------
1e18 ; Debug3 Subtable 0x26
1e18 ; --------------------------------------------------------------------------------------
1e18 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
1e1a 1043 0001  | C  |		.CONST	0x1043,0x0001
1e1c ; --------------------------------------------------------------------------------------
1e1c ; Debug3 Subtable 0x27
1e1c ; --------------------------------------------------------------------------------------
1e1c 0005 001a  |    |		.DBG3TAB	0x0005,0x001a
1e1e 1053 ffff  | S  |		.CONST	0x1053,0xffff
1e20 1055 fffe  | U  |		.CONST	0x1055,0xfffe
1e22 1056 fffd  | V  |		.CONST	0x1056,0xfffd
1e24 1057 fffc  | W  |		.CONST	0x1057,0xfffc
1e26 1058 fffb  | X  |		.CONST	0x1058,0xfffb
1e28 1059 0001  | Y  |		.CONST	0x1059,0x0001
1e2a 105e 0002  | ^  |		.CONST	0x105e,0x0002
1e2c 1062 0003  | b  |		.CONST	0x1062,0x0003
1e2e 1067 0004  | g  |		.CONST	0x1067,0x0004
1e30 106b 0005  | k  |		.CONST	0x106b,0x0005
1e32 1070 0006  | p  |		.CONST	0x1070,0x0006
1e34 1074 0007  | t  |		.CONST	0x1074,0x0007
1e36 1079 0008  | y  |		.CONST	0x1079,0x0008
1e38 107d 0009  | }  |		.CONST	0x107d,0x0009
1e3a 1081 000a  |    |		.CONST	0x1081,0x000a
1e3c 1085 000b  |    |		.CONST	0x1085,0x000b
1e3e 1089 000c  |    |		.CONST	0x1089,0x000c
1e40 108b 000d  |    |		.CONST	0x108b,0x000d
1e42 108f 000e  |    |		.CONST	0x108f,0x000e
1e44 109f 000f  |    |		.CONST	0x109f,0x000f
1e46 10a2 0011  |    |		.CONST	0x10a2,0x0011
1e48 10a6 0012  |    |		.CONST	0x10a6,0x0012
1e4a 10b6 0013  |    |		.CONST	0x10b6,0x0013
1e4c 10ba 0014  |    |		.CONST	0x10ba,0x0014
1e4e 10bb 0015  |    |		.CONST	0x10bb,0x0015
1e50 10bd 0016  |    |		.CONST	0x10bd,0x0016
1e52 10c2 0010  |    |		.CONST	0x10c2,0x0010
1e54 10c7 0017  |    |		.CONST	0x10c7,0x0017
1e56 10cb 0018  |    |		.CONST	0x10cb,0x0018
1e58 10d4 0019  |    |		.CONST	0x10d4,0x0019
1e5a 10d8 001a  |    |		.CONST	0x10d8,0x001a
1e5c ; --------------------------------------------------------------------------------------
1e5c ; Debug3 Subtable 0x28
1e5c ; --------------------------------------------------------------------------------------
1e5c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
1e5e 10eb 0001  |    |		.CONST	0x10eb,0x0001
1e60 ; --------------------------------------------------------------------------------------
1e60 ; Debug3 Subtable 0x29
1e60 ; --------------------------------------------------------------------------------------
1e60 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
1e62 10f3 0001  |    |		.CONST	0x10f3,0x0001
1e64 1104 0002  |    |		.CONST	0x1104,0x0002
1e66 110d 0003  |    |		.CONST	0x110d,0x0003
1e68 1113 0004  |    |		.CONST	0x1113,0x0004
1e6a 111a 0005  |    |		.CONST	0x111a,0x0005
1e6c ; --------------------------------------------------------------------------------------
1e6c ; Debug3 Subtable 0x2a
1e6c ; --------------------------------------------------------------------------------------
1e6c 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
1e6e 1123 ffff  | #  |		.CONST	0x1123,0xffff
1e70 1124 fffe  | $  |		.CONST	0x1124,0xfffe
1e72 1125 0001  | %  |		.CONST	0x1125,0x0001
1e74 1126 0401  | &  |		.CONST	0x1126,0x0401
1e76 1128 0402  | (  |		.CONST	0x1128,0x0402
1e78 1129 0002  | )  |		.CONST	0x1129,0x0002
1e7a ; --------------------------------------------------------------------------------------
1e7a ; Debug3 Subtable 0x2b
1e7a ; --------------------------------------------------------------------------------------
1e7a 0008 0010  |    |		.DBG3TAB	0x0008,0x0010
1e7c 1133 ffff  | 3  |		.CONST	0x1133,0xffff
1e7e 1134 fffe  | 4  |		.CONST	0x1134,0xfffe
1e80 1135 fffd  | 5  |		.CONST	0x1135,0xfffd
1e82 1137 fffc  | 7  |		.CONST	0x1137,0xfffc
1e84 1138 fffb  | 8  |		.CONST	0x1138,0xfffb
1e86 113a fffa  | :  |		.CONST	0x113a,0xfffa
1e88 113d fff9  | =  |		.CONST	0x113d,0xfff9
1e8a 113e fff8  | >  |		.CONST	0x113e,0xfff8
1e8c 113f 0001  | ?  |		.CONST	0x113f,0x0001
1e8e 1143 0002  | C  |		.CONST	0x1143,0x0002
1e90 1148 0003  | H  |		.CONST	0x1148,0x0003
1e92 1159 0004  | Y  |		.CONST	0x1159,0x0004
1e94 116a 0005  | j  |		.CONST	0x116a,0x0005
1e96 116c 0006  | l  |		.CONST	0x116c,0x0006
1e98 1171 0007  | q  |		.CONST	0x1171,0x0007
1e9a 1173 0008  | s  |		.CONST	0x1173,0x0008
1e9c 1178 0009  | x  |		.CONST	0x1178,0x0009
1e9e 117b 000a  | {  |		.CONST	0x117b,0x000a
1ea0 1185 000b  |    |		.CONST	0x1185,0x000b
1ea2 1189 000c  |    |		.CONST	0x1189,0x000c
1ea4 1196 000d  |    |		.CONST	0x1196,0x000d
1ea6 1199 000e  |    |		.CONST	0x1199,0x000e
1ea8 119c 000f  |    |		.CONST	0x119c,0x000f
1eaa 11aa 0010  |    |		.CONST	0x11aa,0x0010
1eac ; --------------------------------------------------------------------------------------
1eac ; Debug3 Subtable 0x2c
1eac ; --------------------------------------------------------------------------------------
1eac 0000 0007  |    |		.DBG3TAB	0x0000,0x0007
1eae 11b3 0001  |    |		.CONST	0x11b3,0x0001
1eb0 11be 0002  |    |		.CONST	0x11be,0x0002
1eb2 11c1 0003  |    |		.CONST	0x11c1,0x0003
1eb4 11c4 0004  |    |		.CONST	0x11c4,0x0004
1eb6 11c7 0005  |    |		.CONST	0x11c7,0x0005
1eb8 11cb 0006  |    |		.CONST	0x11cb,0x0006
1eba 11d6 0007  |    |		.CONST	0x11d6,0x0007
1ebc ; --------------------------------------------------------------------------------------
1ebc ; Debug3 Subtable 0x2d
1ebc ; --------------------------------------------------------------------------------------
1ebc 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
1ebe 11e5 0002  |    |		.CONST	0x11e5,0x0002
1ec0 11ea 0001  |    |		.CONST	0x11ea,0x0001
1ec2 11f1 0003  |    |		.CONST	0x11f1,0x0003
1ec4 ; --------------------------------------------------------------------------------------
1ec4 ; Debug3 Subtable 0x2e
1ec4 ; --------------------------------------------------------------------------------------
1ec4 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
1ec6 11fb 0001  |    |		.CONST	0x11fb,0x0001
1ec8 1201 0002  |    |		.CONST	0x1201,0x0002
1eca ; --------------------------------------------------------------------------------------
1eca ; Debug3 Subtable 0x2f
1eca ; --------------------------------------------------------------------------------------
1eca 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
1ecc 120b 0001  |    |		.CONST	0x120b,0x0001
1ece 1210 0002  |    |		.CONST	0x1210,0x0002
1ed0 1214 0003  |    |		.CONST	0x1214,0x0003
1ed2 1218 0004  |    |		.CONST	0x1218,0x0004
1ed4 121d 0005  |    |		.CONST	0x121d,0x0005
1ed6 1223 0006  | #  |		.CONST	0x1223,0x0006
1ed8 ; --------------------------------------------------------------------------------------
1ed8 ; Debug3 Subtable 0x30
1ed8 ; --------------------------------------------------------------------------------------
1ed8 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
1eda 122b 0001  | +  |		.CONST	0x122b,0x0001
1edc 1231 0002  | 1  |		.CONST	0x1231,0x0002
1ede ; --------------------------------------------------------------------------------------
1ede ; Debug3 Subtable 0x31
1ede ; --------------------------------------------------------------------------------------
1ede 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
1ee0 123b 0001  | ;  |		.CONST	0x123b,0x0001
1ee2 1241 0002  | A  |		.CONST	0x1241,0x0002
1ee4 ; --------------------------------------------------------------------------------------
1ee4 ; Debug3 Subtable 0x32
1ee4 ; --------------------------------------------------------------------------------------
1ee4 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
1ee6 124b 0001  | K  |		.CONST	0x124b,0x0001
1ee8 125b 0002  | [  |		.CONST	0x125b,0x0002
1eea 1263 0003  | c  |		.CONST	0x1263,0x0003
1eec ; --------------------------------------------------------------------------------------
1eec ; Debug3 Subtable 0x33
1eec ; --------------------------------------------------------------------------------------
1eec 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
1eee 126b 0001  | k  |		.CONST	0x126b,0x0001
1ef0 1277 0002  | w  |		.CONST	0x1277,0x0002
1ef2 127f 0003  |    |		.CONST	0x127f,0x0003
1ef4 0000 0000  |    |		.BLANK	0000[0x10c]