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

⟦cd453893b⟧

    Length: 9216 (0x2400)
    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 0cd0       |    |		.CONST	0x0cd0								; 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 0008       |    |		.CONST	0x0008								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00f3       |    |		.CONST	0x00f3								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0046       | F  |		.CONST	0x0046								; Number of locals
000b			INIT_0008:
000b e001       |    |		Load	0x0,0x1								; Debug Table 0x0 = .DEBUG	0x000b,0x0e12,0x8000,0x0000,0x0057,0xb0d5,0x0000,0x0007
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
000d 0129       | )  |		Execute	Any,Make_Visible
000e e002       |    |		Load	0x0,0x2								; Debug Table 0x0.0x1 = 0xe,0xfffe
000f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0010 0129       | )  |		Execute	Any,Make_Visible
0011 029a 00fb  |    |		Declare_Subprogram	INIT_00f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0x11,0xfffd
0013 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x13,0xfffc
0015 029a 016b  |   k|		Declare_Subprogram	INIT_0168,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x15,0xfffb
0017 029a 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x17,0xfffa
0019 029a 029b  |    |		Declare_Subprogram	INIT_0298,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x19,0xfff9
001b 029a 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x1b,0xfff8
001d 029a 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1d,0xfff7
001f 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x9 = 0x1f,0xfff6
0020 00bf       |    |		Action	Accept_Activation						; Debug Table 0x0.0xa = 0x20,0xfff5
0021 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0021,0x0e2a,0x8000,0x0000,0x0058,0x6f55,0x0000,0x0049
													; Debug Table 0x1.0x0 = 0x21,0xffff
0022 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x22,0xfffe
0023 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x23,0xfffd
0024 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x24,0xfffc
0025 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x4 = 0x25,0xfffb
0026 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x5 = 0x26,0xfffa
0027 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x6 = 0x27,0xfff9
0028 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x1.0x7 = 0x28,0xfff8
0029 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
002a e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x8 = 0x2a,0xfff7
002b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
002c e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x9 = 0x2c,0xfff6
002d 1922       | "  |		Execute	Package,Field_Reference,Field_Number 0x22
002e 0007       |    |		Action	Break_Optional
002f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1.0xa = 0x2f,0xfff5
0030 02c7       |    |		Declare_Variable	Any
0031 4802       |H   |		Short_Literal	0x2
0032 0092 0acc  |    |		Action	Push_String_Extended,0xacc					; "Invalid User Identity"
0034 8218       |    |		Call	0x1,0x18
0035 c219       |    |		Store	0x1,0x19
0036 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1.0xb = 0x36,0xfff4
0037 02c7       |    |		Declare_Variable	Any
0038 4802       |H   |		Short_Literal	0x2
0039 0092 0acd  |    |		Action	Push_String_Extended,0xacd					; "Option Error"
003b 8218       |    |		Call	0x1,0x18
003c c21a       |    |		Store	0x1,0x1a
003d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1.0xc = 0x3d,0xfff3
003e 02c7       |    |		Declare_Variable	Any
003f 4802       |H   |		Short_Literal	0x2
0040 0092 0ace  |    |		Action	Push_String_Extended,0xace					; "Invalid Option String"
0042 8218       |    |		Call	0x1,0x18
0043 c21b       |    |		Store	0x1,0x1b
0044 e217       |    |		Load	0x1,0x17							; Debug Table 0x1.0xd = 0x44,0xfff2
0045 02c7       |    |		Declare_Variable	Any
0046 4802       |H   |		Short_Literal	0x2
0047 0092 0acf  |    |		Action	Push_String_Extended,0xacf					; "Access Violation"
0049 8218       |    |		Call	0x1,0x18
004a c21c       |    |		Store	0x1,0x1c
004b e217       |    |		Load	0x1,0x17							; Debug Table 0x1.0xe = 0x4b,0xfff1
004c 02c7       |    |		Declare_Variable	Any
004d 4802       |H   |		Short_Literal	0x2
004e 0092 0ad0  |    |		Action	Push_String_Extended,0xad0					; "Invalid Program"
0050 8218       |    |		Call	0x1,0x18
0051 c21d       |    |		Store	0x1,0x1d
0052 e217       |    |		Load	0x1,0x17							; Debug Table 0x1.0xf = 0x52,0xfff0
0053 02c7       |    |		Declare_Variable	Any
0054 4802       |H   |		Short_Literal	0x2
0055 0092 0ad1  |    |		Action	Push_String_Extended,0xad1					; "Unexpected Exception"
0057 8218       |    |		Call	0x1,0x18
0058 c21e       |    |		Store	0x1,0x1e
0059 e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0x10 = 0x59,0xffef
005a 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
005b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x11 = 0x5b,0xffee
005c e004       |    |		Load	0x0,0x4
005d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
005e 0092 0ad2  |    |		Action	Push_String_Extended,0xad2					; "procedure Created_For_Program_Run is begin \x0a"
													; Debug Table 0x1.0x12 = 0x5e,0xffed
0060 0092 0ad3  |    |		Action	Push_String_Extended,0xad3					; "\x0a end;"
													; Debug Table 0x1.0x13 = 0x60,0xffec
0062 0092 0ad4  |    |		Action	Push_String_Extended,0xad4					; "Program"
													; Debug Table 0x1.0x14 = 0x62,0xffeb
0064 0092 0ad5  |    |		Action	Push_String_Extended,0xad5					; "Change_Identity"
													; Debug Table 0x1.0x15 = 0x64,0xffea
0066 e005       |    |		Load	0x0,0x5								; Debug Table 0x1.0x16 = 0x66,0xffe9
0067 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0068 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0069 00ec       |    |		Load_Encached	Diana_Tree_Cache
006a e006       |    |		Load	0x0,0x6
006b 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
006c e001       |    |		Load	0x0,0x1
006d 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
006e 029f 04cb  |    |		Declare_Subprogram	INIT_04c8,For_Call
0070 4804       |H   |		Short_Literal	0x4
0071 032d       | -  |		Declare_Type	Record,Defined
0072 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x17 = 0x72,0xffe8
0073 4807       |H   |		Short_Literal	0x7
0074 029f 04e3  |    |		Declare_Subprogram	INIT_04e0,For_Call
0076 03fd       |    |		Declare_Type	Discrete,Defined
0077 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1.0x18 = 0x77,0xffe7
0078 4803       |H   |		Short_Literal	0x3
0079 029f 04fb  |    |		Declare_Subprogram	INIT_04f8,For_Call
007b 03fd       |    |		Declare_Type	Discrete,Defined
007c 029b 0513  |    |		Declare_Subprogram	INIT_0510,For_Outer_Call,Unelaborated		; Debug Table 0x1.0x19 = 0x7c,0xffe6
007e 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28				; Debug Table 0x1.0x1a = 0x7e,0xffe5
007f 00c7       |    |		Action	Elaborate_Subprogram
0080 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28				; Debug Table 0x1.0x1b = 0x80,0xffe4
0081 00c6       |    |		Action	Check_Subprogram_Elaborated
0082 e007       |    |		Load	0x0,0x7
0083 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0084 e007       |    |		Load	0x0,0x7
0085 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0086 e007       |    |		Load	0x0,0x7
0087 1913       |    |		Execute	Package,Field_Reference,Field_Number 0x13
0088 e007       |    |		Load	0x0,0x7
0089 1914       |    |		Execute	Package,Field_Reference,Field_Number 0x14
008a e007       |    |		Load	0x0,0x7
008b 1916       |    |		Execute	Package,Field_Reference,Field_Number 0x16
008c e007       |    |		Load	0x0,0x7
008d 1917       |    |		Execute	Package,Field_Reference,Field_Number 0x17
008e e007       |    |		Load	0x0,0x7
008f 191a       |    |		Execute	Package,Field_Reference,Field_Number 0x1a
0090 e007       |    |		Load	0x0,0x7
0091 1919       |    |		Execute	Package,Field_Reference,Field_Number 0x19
0092 6335       |c5  |		Indirect_Literal	Discrete,0x3c8,{0x00000000, 0x00586f55}
0093 4a2b       |J+  |		Short_Literal	0x22b
0094 4800       |H   |		Short_Literal	0x0
0095 0007       |    |		Action	Break_Optional
0096 029d 053b  |   ;|		Declare_Subprogram	INIT_0538,For_Outer_Call			; Debug Table 0x1.0x1c = 0x96,0xffe3
0098 029d 054b  |   K|		Declare_Subprogram	INIT_0548,For_Outer_Call			; Debug Table 0x1.0x1d = 0x98,0xffe2
009a 029d 0573  |   s|		Declare_Subprogram	INIT_0570,For_Outer_Call			; Debug Table 0x1.0x1e = 0x9a,0xffe1
009c 029d 057b  |   {|		Declare_Subprogram	INIT_0578,For_Outer_Call			; Debug Table 0x1.0x1f = 0x9c,0xffe0
009e 029d 0593  |    |		Declare_Subprogram	INIT_0590,For_Outer_Call			; Debug Table 0x1.0x20 = 0x9e,0xffdf
00a0 029d 05eb  |    |		Declare_Subprogram	INIT_05e8,For_Outer_Call			; Debug Table 0x1.0x21 = 0xa0,0xffde
00a2 029d 0643  |   C|		Declare_Subprogram	INIT_0640,For_Outer_Call			; Debug Table 0x1.0x22 = 0xa2,0xffdd
00a4 029d 0673  |   s|		Declare_Subprogram	INIT_0670,For_Outer_Call			; Debug Table 0x1.0x23 = 0xa4,0xffdc
00a6 029d 06a3  |    |		Declare_Subprogram	INIT_06a0,For_Outer_Call			; Debug Table 0x1.0x24 = 0xa6,0xffdb
00a8 029d 0723  |   #|		Declare_Subprogram	INIT_0720,For_Outer_Call			; Debug Table 0x1.0x25 = 0xa8,0xffda
00aa 029d 0753  |   S|		Declare_Subprogram	INIT_0750,For_Outer_Call			; Debug Table 0x1.0x26 = 0xaa,0xffd9
00ac 631b       |c   |		Indirect_Literal	Discrete,0x3c8,{0x00000000, 0x00586f55}		; Debug Table 0x1.0x27 = 0xac,0xffd8
00ad 6316       |c   |		Indirect_Literal	Discrete,0x3c4,{0x00000000, 0x00000737}
00ae e226       | &  |		Load	0x1,0x26
00af 4800       |H   |		Short_Literal	0x0
00b0 4801       |H   |		Short_Literal	0x1
00b1 4807       |H   |		Short_Literal	0x7
00b2 0092 0ad6  |    |		Action	Push_String_Extended,0xad6					; "Output..Session => Directory_String_Name"
00b4 00ea       |    |		Load_Encached	Null_String_Cache
00b5 00ea       |    |		Load_Encached	Null_String_Cache
00b6 4801       |H   |		Short_Literal	0x1
00b7 4807       |H   |		Short_Literal	0x7
00b8 e008       |    |		Load	0x0,0x8
00b9 0387       |    |		Declare_Variable	Package
00ba 00d8       |    |		Load_Top	At_Offset_0
00bb 020f       |    |		Execute	Module,Activate
00bc 029d 07b3  |    |		Declare_Subprogram	INIT_07b0,For_Outer_Call			; Debug Table 0x1.0x28 = 0xbc,0xffd7
00be 029d 07d3  |    |		Declare_Subprogram	INIT_07d0,For_Outer_Call			; Debug Table 0x1.0x29 = 0xbe,0xffd6
00c0 6307       |c   |		Indirect_Literal	Discrete,0x3c8,{0x00000000, 0x00586f55}		; Debug Table 0x1.0x2a = 0xc0,0xffd5
00c1 62fe       |b   |		Indirect_Literal	Discrete,0x3c0,{0x00000000, 0x000007d2}
00c2 e225       | %  |		Load	0x1,0x25
00c3 1d41       | A  |		Execute_Immediate	Reference_Lex_1,0x41
00c4 e009       |    |		Load	0x0,0x9
00c5 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
00c6 0387       |    |		Declare_Variable	Package
00c7 00d8       |    |		Load_Top	At_Offset_0
00c8 020f       |    |		Execute	Module,Activate
00c9 029d 0813  |    |		Declare_Subprogram	INIT_0810,For_Outer_Call			; Debug Table 0x1.0x2b = 0xc9,0xffd4
00cb 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x2c = 0xcb,0xffd3
00cc 00c7       |    |		Action	Elaborate_Subprogram
00cd 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x2d = 0xcd,0xffd2
00ce 00c7       |    |		Action	Elaborate_Subprogram
00cf 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x2e = 0xcf,0xffd1
00d0 00c7       |    |		Action	Elaborate_Subprogram
00d1 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x2f = 0xd1,0xffd0
00d2 00c7       |    |		Action	Elaborate_Subprogram
00d3 62f4       |b   |		Indirect_Literal	Discrete,0x3c8,{0x00000000, 0x00586f55}		; Debug Table 0x1.0x30 = 0xd3,0xffcf
00d4 62e7       |b   |		Indirect_Literal	Discrete,0x3bc,{0x00000000, 0x00000dc6}
00d5 e227       | '  |		Load	0x1,0x27
00d6 4800       |H   |		Short_Literal	0x0
00d7 4801       |H   |		Short_Literal	0x1
00d8 4803       |H   |		Short_Literal	0x3
00d9 0092 0ad7  |    |		Action	Push_String_Extended,0xad7					; "Privileged..Restore_Identity => Boolean_Valued"
00db 00ea       |    |		Load_Encached	Null_String_Cache
00dc 00ea       |    |		Load_Encached	Null_String_Cache
00dd 4801       |H   |		Short_Literal	0x1
00de 4803       |H   |		Short_Literal	0x3
00df e008       |    |		Load	0x0,0x8
00e0 0387       |    |		Declare_Variable	Package
00e1 00d8       |    |		Load_Top	At_Offset_0
00e2 020f       |    |		Execute	Module,Activate
00e3 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x31 = 0xe3,0xffce
00e4 00c7       |    |		Action	Elaborate_Subprogram
00e5 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x32 = 0xe5,0xffcd
00e6 00c7       |    |		Action	Elaborate_Subprogram
00e7 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x33 = 0xe7,0xffcc
00e8 00c7       |    |		Action	Elaborate_Subprogram
00e9 029d 08d3  |    |		Declare_Subprogram	INIT_08d0,For_Outer_Call			; Debug Table 0x1.0x34 = 0xe9,0xffcb
00eb 62dc       |b   |		Indirect_Literal	Discrete,0x3c8,{0x00000000, 0x00586f55}		; Debug Table 0x1.0x35 = 0xeb,0xffca
00ec 62cb       |b   |		Indirect_Literal	Discrete,0x3b8,{0x00000000, 0x000011ad}
00ed 1d45       | E  |		Execute_Immediate	Reference_Lex_1,0x45
00ee e00a       |    |		Load	0x0,0xa
00ef 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00f0 0387       |    |		Declare_Variable	Package
00f1 00d8       |    |		Load_Top	At_Offset_0
00f2 020f       |    |		Execute	Module,Activate
00f3			BODY_0008:
00f3 00bc       |    |		Action	Signal_Activated
00f4 00bb       |    |		Action	Signal_Completion
00f5 0000 0000  |    |		.XXX[0x3]
00f7 0000       |    |
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 010e       |    |		.CONST	0x010e								; Address of begin
00f9 0004       |    |		.CONST	0x0004								; Address of exception handler
00fa 0007       |    |		.CONST	0x0007								; Number of locals
00fb			INIT_00f8:
00fb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2 = .DEBUG	0x00fb,0x0e98,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0014
													; Debug Table 0x2.0x0 = 0xfb,0xffff
00fc e20e       |    |		Load	0x1,0xe								; Debug Table 0x2.0x1 = 0xfc,0xfffe
00fd 02c7       |    |		Declare_Variable	Any
00fe 00d8       |    |		Load_Top	At_Offset_0
00ff 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0100 e00b       |    |		Load	0x0,0xb								; Debug Table 0x2.0x2 = 0x100,0xfffd
0101 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0102 e00b       |    |		Load	0x0,0xb
0103 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0104 011e       |    |		Execute	Any,Convert
0105 e00b       |    |		Load	0x0,0xb								; Debug Table 0x2.0x3 = 0x105,0xfffc
0106 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0107 02c7       |    |		Declare_Variable	Any
0108 00d8       |    |		Load_Top	At_Offset_0
0109 1c00       |    |		Execute_Immediate	Run_Utility,0x0
010a 029f 08eb  |    |		Declare_Subprogram	INIT_08e8,For_Call				; Debug Table 0x2.0x4 = 0x10a,0xfffb
010c 029f 0903  |    |		Declare_Subprogram	INIT_0900,For_Call
010e			BODY_00f8:
010e e403       |    |		Load	0x2,0x3								; Debug Table 0x2.0x5 = 0x10e,0x1
010f 00db       |    |		Load_Top	At_Offset_3
0110 0120       |    |		Execute	Any,Is_Value
0111 6803       |h   |		Jump_Zero	0x115
0112 e00b       |    |		Load	0x0,0xb
0113 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0114 7801       |x   |		Jump	0x116
0115 00db       |    |		Load_Top	At_Offset_3
0116 e5fd       |    |		Load	0x2,-0x3
0117 e00b       |    |		Load	0x0,0xb
0118 184c       | L  |		Execute	Package,Field_Execute,Field_Number 0x4c
0119 c405       |    |		Store	0x2,0x5
011a c403       |    |		Store	0x2,0x3
011b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x6 = 0x11b,0x2
011c e00b       |    |		Load	0x0,0xb
011d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
011e 8407       |    |		Call	0x2,0x7								; Debug Table 0x2.0x7 = 0x11e,0x3
011f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2.0x8 = 0x11f,0x4
0120 e403       |    |		Load	0x2,0x3
0121 e002       |    |		Load	0x0,0x2
0122 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0123 7003       |p   |		Jump_Nonzero	0x127
0124 4800       |H   |		Short_Literal	0x0							; Debug Table 0x2.0x9 = 0x124,0x5
0125 e402       |    |		Load	0x2,0x2
0126 8406       |    |		Call	0x2,0x6
0127 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0xa = 0x127,0x6
0128 e00b       |    |		Load	0x0,0xb
0129 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
012a e403       |    |		Load	0x2,0x3								; Debug Table 0x2.0xb = 0x12a,0x7
012b 00db       |    |		Load_Top	At_Offset_3
012c 8235       | 5  |		Call	0x1,0x35
012d c403       |    |		Store	0x2,0x3
012e 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
012f 0000       |    |		.XXX[0x1]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0139       | 9  |		.CONST	0x0139								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0003       |    |		.CONST	0x0003								; Number of locals
0133			INIT_0130:
0133 e20d       |    |		Load	0x1,0xd								; Debug Table 0x3 = .DEBUG	0x0133,0x0eb2,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0027
													; Debug Table 0x3.0x0 = 0x133,0xffff
0134 0007       |    |		Action	Break_Optional
0135 e20e       |    |		Load	0x1,0xe								; Debug Table 0x3.0x1 = 0x135,0xfffe
0136 02c7       |    |		Declare_Variable	Any
0137 00d8       |    |		Load_Top	At_Offset_0
0138 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0139			BODY_0130:
0139 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x2 = 0x139,0x1
013a e20d       |    |		Load	0x1,0xd
013b e5fa       |    |		Load	0x2,-0x6
013c e5fb       |    |		Load	0x2,-0x5
013d e5fc       |    |		Load	0x2,-0x4
013e e5fd       |    |		Load	0x2,-0x3
013f e5fe       |    |		Load	0x2,-0x2
0140 e5ff       |    |		Load	0x2,-0x1
0141 8211       |    |		Call	0x1,0x11
0142 005b       | [  |		Store_Top	Discrete,At_Offset_3
0143 c403       |    |		Store	0x2,0x3
0144 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x3 = 0x144,0x2
0145 8212       |    |		Call	0x1,0x12
0146 7006       |p   |		Jump_Nonzero	0x14d
0147 8234       | 4  |		Call	0x1,0x34
0148 6804       |h   |		Jump_Zero	0x14d
0149 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x4 = 0x149,0x3
014a e00c       |    |		Load	0x0,0xc
014b 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
014c c403       |    |		Store	0x2,0x3
014d e00b       |    |		Load	0x0,0xb								; Debug Table 0x3.0x5 = 0x14d,0x4
014e 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
014f 00d9       |    |		Load_Top	At_Offset_1
0150 e00d       |    |		Load	0x0,0xd
0151 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0152 e00b       |    |		Load	0x0,0xb								; Debug Table 0x3.0x6 = 0x152,0x5
0153 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0154 e00b       |    |		Load	0x0,0xb
0155 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0156 680b       |h   |		Jump_Zero	0x162
0157 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x7 = 0x157,0x6
0158 e002       |    |		Load	0x0,0x2
0159 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
015a 4603       |F   |		Jump_Case	0x4
015b 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7					; case 0x0
015c 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7					; case 0x1
015d 7801       |x   |		Jump	0x15f								; case 0x2
015e 7800       |x   |		Jump	0x15f								; case 0x3
015f e00b       |    |		Load	0x0,0xb								; Debug Table 0x3.0x8 = 0x15f,0x7
0160 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0161 0257       | W  |		Execute	Discrete,Raise
0162 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0163 0000 0000  |    |		.BLANK	0000[0x5]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 01a5       |    |		.CONST	0x01a5								; Address of begin
0169 0267       | g  |		.CONST	0x0267								; Address of exception handler
016a 000e       |    |		.CONST	0x000e								; Number of locals
016b			INIT_0168:
016b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4 = .DEBUG	0x016b,0x0ec6,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0049
													; Debug Table 0x4.0x0 = 0x16b,0xffff
016c e225       | %  |		Load	0x1,0x25							; Debug Table 0x4.0x1 = 0x16c,0xfffe
016d 0322       | "  |		Declare_Variable	Record
016e 00d8       |    |		Load_Top	At_Offset_0
016f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0170 e23f       | ?  |		Load	0x1,0x3f							; Debug Table 0x4.0x2 = 0x170,0xfffd
0171 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0172 e5fb       |    |		Load	0x2,-0x5
0173 e23f       | ?  |		Load	0x1,0x3f
0174 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0175 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0176 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x4.0x3 = 0x176,0xfffc
0177 4802       |H   |		Short_Literal	0x2
0178 00da       |    |		Load_Top	At_Offset_2
0179 e23f       | ?  |		Load	0x1,0x3f
017a 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
017b 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x4.0x4 = 0x17b,0xfffb
017c 4804       |H   |		Short_Literal	0x4
017d 00db       |    |		Load_Top	At_Offset_3
017e e23f       | ?  |		Load	0x1,0x3f
017f 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0180 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x4.0x5 = 0x180,0xfffa
0181 4803       |H   |		Short_Literal	0x3
0182 e404       |    |		Load	0x2,0x4
0183 e23f       | ?  |		Load	0x1,0x3f
0184 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0185 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x4.0x6 = 0x185,0xfff9
0186 4801       |H   |		Short_Literal	0x1
0187 e404       |    |		Load	0x2,0x4
0188 e23f       | ?  |		Load	0x1,0x3f
0189 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
018a 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x4.0x7 = 0x18a,0xfff8
018b 4805       |H   |		Short_Literal	0x5
018c e404       |    |		Load	0x2,0x4
018d e23f       | ?  |		Load	0x1,0x3f
018e 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
018f 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x4.0x8 = 0x18f,0xfff7
0190 4807       |H   |		Short_Literal	0x7
0191 e404       |    |		Load	0x2,0x4
0192 e23f       | ?  |		Load	0x1,0x3f
0193 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0194 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x4.0x9 = 0x194,0xfff6
0195 4806       |H   |		Short_Literal	0x6
0196 e404       |    |		Load	0x2,0x4
0197 e23f       | ?  |		Load	0x1,0x3f
0198 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0199 e00b       |    |		Load	0x0,0xb								; Debug Table 0x4.0xa = 0x199,0xfff5
019a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
019b 02c7       |    |		Declare_Variable	Any
019c 00d8       |    |		Load_Top	At_Offset_0
019d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
019e e001       |    |		Load	0x0,0x1								; Debug Table 0x4.0xb = 0x19e,0xfff4
019f 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01a0 e006       |    |		Load	0x0,0x6								; Debug Table 0x4.0xc = 0x1a0,0xfff3
01a1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01a2 02ff       |    |		Declare_Variable	Variant_Record
01a3 00d8       |    |		Load_Top	At_Offset_0
01a4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01a5			BODY_0168:
01a5 e00e       |    |		Load	0x0,0xe								; Debug Table 0x4.0xd = 0x1a5,0x1
01a6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01a7 e403       |    |		Load	0x2,0x3
01a8 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
01a9 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0xe = 0x1a9,0x2
01aa a5f9       |    |		Store_Unchecked	0x2,-0x7
01ab e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x4.0xf = 0x1ab,0x3
01ac 00db       |    |		Load_Top	At_Offset_3
01ad 0120       |    |		Execute	Any,Is_Value
01ae 6803       |h   |		Jump_Zero	0x1b2
01af e00b       |    |		Load	0x0,0xb
01b0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01b1 7801       |x   |		Jump	0x1b3
01b2 00db       |    |		Load_Top	At_Offset_3
01b3 e5fa       |    |		Load	0x2,-0x6
01b4 e00b       |    |		Load	0x0,0xb
01b5 184c       | L  |		Execute	Package,Field_Execute,Field_Number 0x4c
01b6 c40c       |    |		Store	0x2,0xc
01b7 c5f8       |    |		Store	0x2,-0x8
01b8 e404       |    |		Load	0x2,0x4								; Debug Table 0x4.0x10 = 0x1b8,0x4
01b9 e23f       | ?  |		Load	0x1,0x3f
01ba 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
01bb 701c       |p   |		Jump_Nonzero	0x1d8
01bc 00cf       |    |		Action	Mark_Auxiliary
01bd 7815       |x   |		Jump	0x1d3
01be 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x11 = 0x1be,0x6
01bf e404       |    |		Load	0x2,0x4
01c0 e23f       | ?  |		Load	0x1,0x3f
01c1 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
01c2 700b       |p   |		Jump_Nonzero	0x1ce
01c3 e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x4.0x12 = 0x1c3,0x7
01c4 4800       |H   |		Short_Literal	0x0
01c5 e404       |    |		Load	0x2,0x4
01c6 e23f       | ?  |		Load	0x1,0x3f
01c7 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
01c8 e21a       |    |		Load	0x1,0x1a
01c9 0092 0ad8  |    |		Action	Push_String_Extended,0xad8					; "Create_Job"
01cb e002       |    |		Load	0x0,0x2
01cc 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
01cd c5f8       |    |		Store	0x2,-0x8
01ce e404       |    |		Load	0x2,0x4								; Debug Table 0x4.0x13 = 0x1ce,0x8
01cf e23f       | ?  |		Load	0x1,0x3f
01d0 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
01d1 c404       |    |		Store	0x2,0x4
01d2 00c9       |    |		Action	Pop_Auxiliary_Loop
01d3 e404       |    |		Load	0x2,0x4								; Debug Table 0x4.0x14 = 0x1d3,0x5
01d4 e23f       | ?  |		Load	0x1,0x3f
01d5 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
01d6 6fe7       |o   |		Jump_Zero	0x1be
01d7 00ce       |    |		Action	Pop_Auxiliary
01d8 e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x4.0x15 = 0x1d8,0x9
01d9 00ec       |    |		Load_Encached	Diana_Tree_Cache
01da e5ff       |    |		Load	0x2,-0x1
01db 823b       | ;  |		Call	0x1,0x3b
01dc c402       |    |		Store	0x2,0x2
01dd c5f8       |    |		Store	0x2,-0x8
01de e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x4.0x16 = 0x1de,0xa
01df e402       |    |		Load	0x2,0x2
01e0 e5fd       |    |		Load	0x2,-0x3
01e1 823c       | <  |		Call	0x1,0x3c
01e2 c402       |    |		Store	0x2,0x2
01e3 c5f8       |    |		Store	0x2,-0x8
01e4 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x17 = 0x1e4,0xb
01e5 e5f8       |    |		Load	0x2,-0x8
01e6 e002       |    |		Load	0x0,0x2
01e7 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
01e8 707d       |p}  |		Jump_Nonzero	0x266
01e9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x18 = 0x1e9,0xc
01ea e403       |    |		Load	0x2,0x3
01eb 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
01ec 0120       |    |		Execute	Any,Is_Value
01ed 6803       |h   |		Jump_Zero	0x1f1
01ee e006       |    |		Load	0x0,0x6
01ef 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
01f0 7802       |x   |		Jump	0x1f3
01f1 e403       |    |		Load	0x2,0x3
01f2 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
01f3 e5fe       |    |		Load	0x2,-0x2
01f4 e402       |    |		Load	0x2,0x2
01f5 e006       |    |		Load	0x0,0x6
01f6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01f7 e403       |    |		Load	0x2,0x3
01f8 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01f9 00d1       |    |		Pop_Control	Pop_Count_1
01fa e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x4.0x19 = 0x1fa,0xd
01fb e223       | #  |		Load	0x1,0x23
01fc 00da       |    |		Load_Top	At_Offset_2
01fd 823d       | =  |		Call	0x1,0x3d
01fe c5f8       |    |		Store	0x2,-0x8
01ff 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x1a = 0x1ff,0xe
0200 e5f8       |    |		Load	0x2,-0x8
0201 e002       |    |		Load	0x0,0x2
0202 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0203 7062       |pb  |		Jump_Nonzero	0x266
0204 e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x4.0x1b = 0x204,0xf
0205 e005       |    |		Load	0x0,0x5
0206 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0207 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0208 e5fd       |    |		Load	0x2,-0x3
0209 823a       | :  |		Call	0x1,0x3a
020a e403       |    |		Load	0x2,0x3
020b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
020c c5f8       |    |		Store	0x2,-0x8
020d e402       |    |		Load	0x2,0x2								; Debug Table 0x4.0x1c = 0x20d,0x10
020e e403       |    |		Load	0x2,0x3
020f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0210 e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x4.0x1d = 0x210,0x11
0211 e001       |    |		Load	0x0,0x1
0212 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0213 e40b       |    |		Load	0x2,0xb
0214 e409       |    |		Load	0x2,0x9
0215 823e       | >  |		Call	0x1,0x3e
0216 005b       | [  |		Store_Top	Discrete,At_Offset_3
0217 c5f8       |    |		Store	0x2,-0x8
0218 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x1e = 0x218,0x12
0219 e5f8       |    |		Load	0x2,-0x8
021a e002       |    |		Load	0x0,0x2
021b 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
021c 681b       |h   |		Jump_Zero	0x238
021d e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x4.0x1f = 0x21d,0x13
021e e002       |    |		Load	0x0,0x2
021f 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0220 c5f8       |    |		Store	0x2,-0x8
0221 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x20 = 0x221,0x14
0222 01db       |    |		Execute	Vector,Length
0223 7008       |p   |		Jump_Nonzero	0x22c
0224 e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x4.0x21 = 0x224,0x15
0225 e409       |    |		Load	0x2,0x9
0226 e219       |    |		Load	0x1,0x19
0227 e223       | #  |		Load	0x1,0x23
0228 e002       |    |		Load	0x0,0x2
0229 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
022a c5f8       |    |		Store	0x2,-0x8
022b 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
022c e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x4.0x22 = 0x22c,0x16
022d 482e       |H.  |		Short_Literal	0x2e
022e e409       |    |		Load	0x2,0x9
022f 01cb       |    |		Execute	Vector,Append
0230 e40b       |    |		Load	0x2,0xb
0231 01cc       |    |		Execute	Vector,Catenate
0232 e219       |    |		Load	0x1,0x19
0233 e223       | #  |		Load	0x1,0x23
0234 e002       |    |		Load	0x0,0x2
0235 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0236 c5f8       |    |		Store	0x2,-0x8
0237 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7					; Debug Table 0x4.0x23 = 0x237,0x17
0238 e408       |    |		Load	0x2,0x8								; Debug Table 0x4.0x24 = 0x238,0x18
0239 01db       |    |		Execute	Vector,Length
023a 7017       |p   |		Jump_Nonzero	0x252
023b e009       |    |		Load	0x0,0x9								; Debug Table 0x4.0x25 = 0x23b,0x19
023c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
023d 4800       |H   |		Short_Literal	0x0
023e 4800       |H   |		Short_Literal	0x0
023f e5fb       |    |		Load	0x2,-0x5
0240 e40a       |    |		Load	0x2,0xa
0241 e409       |    |		Load	0x2,0x9
0242 e407       |    |		Load	0x2,0x7
0243 e406       |    |		Load	0x2,0x6
0244 e405       |    |		Load	0x2,0x5
0245 e40c       |    |		Load	0x2,0xc
0246 e5fc       |    |		Load	0x2,-0x4
0247 e40d       |    |		Load	0x2,0xd
0248 e00e       |    |		Load	0x0,0xe
0249 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
024a e403       |    |		Load	0x2,0x3
024b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
024c 8243       | C  |		Call	0x1,0x43
024d e403       |    |		Load	0x2,0x3
024e e242       | B  |		Load	0x1,0x42
024f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0250 c5f9       |    |		Store	0x2,-0x7
0251 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0252 e009       |    |		Load	0x0,0x9								; Debug Table 0x4.0x26 = 0x252,0x1a
0253 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0254 4800       |H   |		Short_Literal	0x0
0255 4800       |H   |		Short_Literal	0x0
0256 e5fb       |    |		Load	0x2,-0x5
0257 e40a       |    |		Load	0x2,0xa
0258 e409       |    |		Load	0x2,0x9
0259 e407       |    |		Load	0x2,0x7
025a e406       |    |		Load	0x2,0x6
025b e405       |    |		Load	0x2,0x5
025c e40c       |    |		Load	0x2,0xc
025d e5fc       |    |		Load	0x2,-0x4
025e e40d       |    |		Load	0x2,0xd
025f e00e       |    |		Load	0x0,0xe
0260 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0261 e408       |    |		Load	0x2,0x8
0262 e403       |    |		Load	0x2,0x3
0263 e242       | B  |		Load	0x1,0x42
0264 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0265 c5f9       |    |		Store	0x2,-0x7
0266 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0267			TRAP_0168:
0267 4931       |I1  |		Short_Literal	0x131
0268 010f       |    |		Execute	Exception,Equal
0269 6808       |h   |		Jump_Zero	0x272
026a e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x4.0x27 = 0x26a,0x1b
026b e409       |    |		Load	0x2,0x9
026c e219       |    |		Load	0x1,0x19
026d e223       | #  |		Load	0x1,0x23
026e e002       |    |		Load	0x0,0x2
026f 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0270 c5f8       |    |		Store	0x2,-0x8
0271 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0272 6141       |aA  |		Indirect_Literal	Discrete,0x3b4,{0x00000000, 0x586f5501}
0273 010f       |    |		Execute	Exception,Equal
0274 6808       |h   |		Jump_Zero	0x27d
0275 e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x4.0x28 = 0x275,0x1c
0276 e5ff       |    |		Load	0x2,-0x1
0277 e21d       |    |		Load	0x1,0x1d
0278 e223       | #  |		Load	0x1,0x23
0279 e002       |    |		Load	0x0,0x2
027a 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
027b c5f8       |    |		Store	0x2,-0x8
027c 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
027d e5f8       |    |		Load	0x2,-0x8							; Debug Table 0x4.0x29 = 0x27d,0x1d
027e e00f       |    |		Load	0x0,0xf
027f 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0280 e21e       |    |		Load	0x1,0x1e
0281 e223       | #  |		Load	0x1,0x23
0282 e002       |    |		Load	0x0,0x2
0283 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0284 c5f8       |    |		Store	0x2,-0x8
0285 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0286 0000 0000  |    |		.XXX[0x2]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b       |    |		.CONST	0x028b								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0001       |    |		.CONST	0x0001								; Number of locals
028b			BODY_0288:
028b			INIT_0288:
028b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x5 = .DEBUG	0x028b,0x0f1c,0x0002,0x0000,0x0057,0xb0d5,0x0000,0x0073
													; Debug Table 0x5.0x0 = 0x28b,0x1
028c 00db       |    |		Load_Top	At_Offset_3
028d e002       |    |		Load	0x0,0x2
028e 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
028f 0f00       |    |		Execute_Immediate	Equal,0x0
0290 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0291 0000 0000  |    |		.BLANK	0000[0x7]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029d       |    |		.CONST	0x029d								; Address of begin
0299 02ab       |    |		.CONST	0x02ab								; Address of exception handler
029a 0002       |    |		.CONST	0x0002								; Number of locals
029b			INIT_0298:
029b e001       |    |		Load	0x0,0x1								; Debug Table 0x6 = .DEBUG	0x029b,0x0f20,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x007c
													; Debug Table 0x6.0x0 = 0x29b,0xffff
029c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
029d			BODY_0298:
029d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x1 = 0x29d,0x1
029e e010       |    |		Load	0x0,0x10
029f 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
02a0 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
02a1 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x6.0x2 = 0x2a1,0x2
02a2 7803       |x   |		Jump	0x2a6
02a3 610c       |a   |		Indirect_Literal	Discrete,0x3b0,{0x00000000, 0x00050000}		; Debug Table 0x6.0x3 = 0x2a3,0x3
02a4 00ba       |    |		Action	Initiate_Delay
02a5 00c9       |    |		Action	Pop_Auxiliary_Loop
02a6 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x4 = 0x2a6,0x2
02a7 e001       |    |		Load	0x0,0x1
02a8 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02a9 77f9       |w   |		Jump_Nonzero	0x2a3
02aa 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
02ab			TRAP_0298:
02ab 0007       |    |		Action	Break_Optional
02ac 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x6.0x5 = 0x2ac,0x4
02ad 0000 0000  |    |		.XXX[0x3]
02af 0000       |    |
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02c6       |    |		.CONST	0x02c6								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0009       |    |		.CONST	0x0009								; Number of locals
02b3			INIT_02b0:
02b3 e011       |    |		Load	0x0,0x11							; Debug Table 0x7 = .DEBUG	0x02b3,0x0f2e,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0084
													; Debug Table 0x7.0x0 = 0x2b3,0xffff
02b4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02b5 02ff       |    |		Declare_Variable	Variant_Record
02b6 00d8       |    |		Load_Top	At_Offset_0
02b7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02b8 e012       |    |		Load	0x0,0x12							; Debug Table 0x7.0x1 = 0x2b8,0xfffe
02b9 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02ba 0337       | 7  |		Declare_Variable	Array
02bb 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7.0x2 = 0x2bb,0xfffd
02bc 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
02bd 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7.0x3 = 0x2bd,0xfffc
02be 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
02bf 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7.0x4 = 0x2bf,0xfffb
02c0 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
02c1 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7.0x5 = 0x2c1,0xfffa
02c2 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
02c3 e244       | D  |		Load	0x1,0x44							; Debug Table 0x7.0x6 = 0x2c3,0xfff9
02c4 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
02c5 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7.0x7 = 0x2c5,0xfff8
02c6			BODY_02b0:
02c6 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7.0x8 = 0x2c6,0x1
02c7 e244       | D  |		Load	0x1,0x44
02c8 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
02c9 e5fd       |    |		Load	0x2,-0x3
02ca e244       | D  |		Load	0x1,0x44
02cb 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
02cc 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
02cd 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02ce 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x9 = 0x2ce,0x2
02cf 700b       |p   |		Jump_Nonzero	0x2db
02d0 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0xa = 0x2d0,0x3
02d1 4800       |H   |		Short_Literal	0x0
02d2 00db       |    |		Load_Top	At_Offset_3
02d3 e244       | D  |		Load	0x1,0x44
02d4 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
02d5 e21b       |    |		Load	0x1,0x1b
02d6 e224       | $  |		Load	0x1,0x24
02d7 e002       |    |		Load	0x0,0x2
02d8 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
02d9 c5fc       |    |		Store	0x2,-0x4
02da 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x7.0xb = 0x2da,0x4
02db 00cf       |    |		Action	Mark_Auxiliary
02dc 7833       |x3  |		Jump	0x310
02dd 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0xc = 0x2dd,0x6
02de 00db       |    |		Load_Top	At_Offset_3
02df e244       | D  |		Load	0x1,0x44
02e0 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
02e1 700b       |p   |		Jump_Nonzero	0x2ed
02e2 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0xd = 0x2e2,0x7
02e3 4800       |H   |		Short_Literal	0x0
02e4 e408       |    |		Load	0x2,0x8
02e5 e244       | D  |		Load	0x1,0x44
02e6 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
02e7 e21b       |    |		Load	0x1,0x1b
02e8 e223       | #  |		Load	0x1,0x23
02e9 e002       |    |		Load	0x0,0x2
02ea 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
02eb c5fc       |    |		Store	0x2,-0x4
02ec 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x7.0xe = 0x2ec,0x8
02ed 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0xf = 0x2ed,0x9
02ee e244       | D  |		Load	0x1,0x44
02ef 1828       | (  |		Execute	Package,Field_Execute,Field_Number 0x28
02f0 4603       |F   |		Jump_Case	0x4
02f1 7819       |x   |		Jump	0x30b								; case 0x0
02f2 7802       |x   |		Jump	0x2f5								; case 0x1
02f3 780a       |x   |		Jump	0x2fe								; case 0x2
02f4 7810       |x   |		Jump	0x305								; case 0x3
02f5 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x10 = 0x2f5,0xb
02f6 4800       |H   |		Short_Literal	0x0
02f7 e408       |    |		Load	0x2,0x8
02f8 e244       | D  |		Load	0x1,0x44
02f9 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
02fa a405       |    |		Store_Unchecked	0x2,0x5
02fb 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x11 = 0x2fb,0xc
02fc a406       |    |		Store_Unchecked	0x2,0x6
02fd 780d       |x   |		Jump	0x30b
02fe 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x12 = 0x2fe,0xd
02ff 4800       |H   |		Short_Literal	0x0
0300 e408       |    |		Load	0x2,0x8
0301 e244       | D  |		Load	0x1,0x44
0302 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0303 a404       |    |		Store_Unchecked	0x2,0x4
0304 7806       |x   |		Jump	0x30b
0305 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x13 = 0x305,0xe
0306 4800       |H   |		Short_Literal	0x0
0307 e408       |    |		Load	0x2,0x8
0308 e244       | D  |		Load	0x1,0x44
0309 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
030a a407       |    |		Store_Unchecked	0x2,0x7
030b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x14 = 0x30b,0xf
030c e244       | D  |		Load	0x1,0x44
030d 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
030e 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
030f 00c9       |    |		Action	Pop_Auxiliary_Loop
0310 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x15 = 0x310,0x5
0311 e244       | D  |		Load	0x1,0x44
0312 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
0313 6fc9       |o   |		Jump_Zero	0x2dd
0314 00ce       |    |		Action	Pop_Auxiliary
0315 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7.0x16 = 0x315,0x10
0316 01db       |    |		Execute	Vector,Length
0317 7002       |p   |		Jump_Nonzero	0x31a
0318 00da       |    |		Load_Top	At_Offset_2
0319 6861       |ha  |		Jump_Zero	0x37b
031a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7.0x17 = 0x31a,0x11
031b 01db       |    |		Execute	Vector,Length
031c 682e       |h.  |		Jump_Zero	0x34b
031d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x18 = 0x31d,0x12
031e 6809       |h   |		Jump_Zero	0x328
031f e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x19 = 0x31f,0x13
0320 0092 0ad9  |    |		Action	Push_String_Extended,0xad9					; ": can't specify both user and Restore_Identity"
0322 e21b       |    |		Load	0x1,0x1b
0323 e224       | $  |		Load	0x1,0x24
0324 e002       |    |		Load	0x0,0x2
0325 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0326 c5fc       |    |		Store	0x2,-0x4
0327 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x7.0x1a = 0x327,0x14
0328 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x1b = 0x328,0x15
0329 e402       |    |		Load	0x2,0x2
032a e00e       |    |		Load	0x0,0xe
032b 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
032c e010       |    |		Load	0x0,0x10
032d 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
032e e5fe       |    |		Load	0x2,-0x2
032f e5ff       |    |		Load	0x2,-0x1
0330 e013       |    |		Load	0x0,0x13
0331 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0332 00d1       |    |		Pop_Control	Pop_Count_1
0333 c5fc       |    |		Store	0x2,-0x4
0334 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x1c = 0x334,0x16
0335 e5fc       |    |		Load	0x2,-0x4
0336 e002       |    |		Load	0x0,0x2
0337 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0338 6808       |h   |		Jump_Zero	0x341
0339 e216       |    |		Load	0x1,0x16							; Debug Table 0x7.0x1d = 0x339,0x17
033a 0a01       |    |		Execute_Immediate	Plus,0x1
033b c216       |    |		Store	0x1,0x16
033c e216       |    |		Load	0x1,0x16							; Debug Table 0x7.0x1e = 0x33c,0x18
033d 606e       |`n  |		Indirect_Literal	Discrete,0x3ac,{0x00000000, 0x00008000}
033e 0271       | q  |		Execute	Discrete,Times
033f 00ba       |    |		Action	Initiate_Delay
0340 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x7.0x1f = 0x340,0x19
0341 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x20 = 0x341,0x1a
0342 e403       |    |		Load	0x2,0x3
0343 e014       |    |		Load	0x0,0x14
0344 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0345 e402       |    |		Load	0x2,0x2
0346 e015       |    |		Load	0x0,0x15
0347 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0348 00d1       |    |		Pop_Control	Pop_Count_1
0349 c5fc       |    |		Store	0x2,-0x4
034a 780d       |x   |		Jump	0x358
034b e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x21 = 0x34b,0x1b
034c e403       |    |		Load	0x2,0x3
034d e014       |    |		Load	0x0,0x14
034e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
034f e001       |    |		Load	0x0,0x1
0350 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0351 e011       |    |		Load	0x0,0x11
0352 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0353 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0354 e015       |    |		Load	0x0,0x15
0355 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0356 00d1       |    |		Pop_Control	Pop_Count_1
0357 c5fc       |    |		Store	0x2,-0x4
0358 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x22 = 0x358,0x1c
0359 e5fc       |    |		Load	0x2,-0x4
035a e002       |    |		Load	0x0,0x2
035b 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
035c 6801       |h   |		Jump_Zero	0x35e
035d 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x7.0x23 = 0x35d,0x1d
035e e405       |    |		Load	0x2,0x5								; Debug Table 0x7.0x24 = 0x35e,0x1e
035f 680d       |h   |		Jump_Zero	0x36d
0360 4802       |H   |		Short_Literal	0x2
0361 e403       |    |		Load	0x2,0x3
0362 01d7       |    |		Execute	Vector,Field_Read
0363 7009       |p   |		Jump_Nonzero	0x36d
0364 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x25 = 0x364,0x1f
0365 0092 0ada  |    |		Action	Push_String_Extended,0xada					; ": can't run in privileged mode from unprivileged user id"
0367 e21c       |    |		Load	0x1,0x1c
0368 e224       | $  |		Load	0x1,0x24
0369 e002       |    |		Load	0x0,0x2
036a 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
036b c5fc       |    |		Store	0x2,-0x4
036c 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
036d e404       |    |		Load	0x2,0x4								; Debug Table 0x7.0x26 = 0x36d,0x20
036e e403       |    |		Load	0x2,0x3
036f e00e       |    |		Load	0x0,0xe
0370 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0371 e010       |    |		Load	0x0,0x10
0372 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0373 e405       |    |		Load	0x2,0x5								; Debug Table 0x7.0x27 = 0x373,0x21
0374 6805       |h   |		Jump_Zero	0x37a
0375 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x28 = 0x375,0x22
0376 e00e       |    |		Load	0x0,0xe
0377 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0378 e010       |    |		Load	0x0,0x10
0379 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
037a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
037b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x29 = 0x37b,0x23
037c 6826       |h&  |		Jump_Zero	0x3a3
037d e405       |    |		Load	0x2,0x5								; Debug Table 0x7.0x2a = 0x37d,0x24
037e 681a       |h   |		Jump_Zero	0x399
037f 4802       |H   |		Short_Literal	0x2							; Debug Table 0x7.0x2b = 0x37f,0x25
0380 e00e       |    |		Load	0x0,0xe
0381 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0382 e010       |    |		Load	0x0,0x10
0383 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0384 01d7       |    |		Execute	Vector,Field_Read
0385 680a       |h   |		Jump_Zero	0x390
0386 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x2c = 0x386,0x26
0387 e00e       |    |		Load	0x0,0xe
0388 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0389 e010       |    |		Load	0x0,0x10
038a 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
038b e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x2d = 0x38b,0x27
038c e002       |    |		Load	0x0,0x2
038d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
038e c5fc       |    |		Store	0x2,-0x4
038f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0390 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x2e = 0x390,0x28
0391 0092 0adb  |    |		Action	Push_String_Extended,0xadb					; ": attempt to enable privileged mode"
0393 e21c       |    |		Load	0x1,0x1c
0394 e224       | $  |		Load	0x1,0x24
0395 e002       |    |		Load	0x0,0x2
0396 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0397 c5fc       |    |		Store	0x2,-0x4
0398 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0399 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x2f = 0x399,0x29
039a e00e       |    |		Load	0x0,0xe
039b 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
039c e010       |    |		Load	0x0,0x10
039d 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
039e e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x30 = 0x39e,0x2a
039f e002       |    |		Load	0x0,0x2
03a0 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
03a1 c5fc       |    |		Store	0x2,-0x4
03a2 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
03a3 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x7.0x31 = 0x3a3,0x2b
03a4 00ea       |    |		Load_Encached	Null_String_Cache
03a5 e21b       |    |		Load	0x1,0x1b
03a6 e224       | $  |		Load	0x1,0x24
03a7 e002       |    |		Load	0x0,0x2
03a8 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
03a9 c5fc       |    |		Store	0x2,-0x4
03aa 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
03ab 0000       |    |		.XXX[0x1]
03ac 0000 0000  |    |		.LITERAL	{0x00000000, 0x00008000}
03b0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00050000}
03b4 0000 0000  |    |		.LITERAL	{0x00000000, 0x586f5501}
03b8 0000 0000  |    |		.LITERAL	{0x00000000, 0x000011ad}
03bc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000dc6}
03c0 0000 0000  |    |		.LITERAL	{0x00000000, 0x000007d2}
03c4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000737}
03c8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00586f55}
03cc 0000 0000  |    |		.BLANK	0000[0x4]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03f1       |    |		.CONST	0x03f1								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0009       |    |		.CONST	0x0009								; Number of locals
03d3			INIT_03d0:
03d3 0007       |    |		Action	Break_Optional							; Debug Table 0x8 = .DEBUG	0x03d3,0x0f94,0x0002,0x0000,0x0057,0xb0d5,0x0000,0x009b
													; Debug Table 0x8.0x0 = 0x3d3,0xffff
03d4 e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x1 = 0x3d4,0xfffe
03d5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03d6 02c7       |    |		Declare_Variable	Any
03d7 00d8       |    |		Load_Top	At_Offset_0
03d8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03d9 e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x2 = 0x3d9,0xfffd
03da 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03db 02c7       |    |		Declare_Variable	Any
03dc 00d8       |    |		Load_Top	At_Offset_0
03dd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03de e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x3 = 0x3de,0xfffc
03df 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
03e0 e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x4 = 0x3e0,0xfffb
03e1 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03e2 02c7       |    |		Declare_Variable	Any
03e3 00d8       |    |		Load_Top	At_Offset_0
03e4 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03e5 e016       |    |		Load	0x0,0x16							; Debug Table 0x8.0x5 = 0x3e5,0xfffa
03e6 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
03e7 02c7       |    |		Declare_Variable	Any
03e8 00d8       |    |		Load_Top	At_Offset_0
03e9 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03ea e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x6 = 0x3ea,0xfff9
03eb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03ec e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x7 = 0x3ec,0xfff8
03ed 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03ee 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03ef 029f 0923  |   #|		Declare_Subprogram	INIT_0920,For_Call				; Debug Table 0x8.0x8 = 0x3ef,0xfff7
03f1			BODY_03d0:
03f1 00be       |    |		Action	Activate_Tasks
03f2 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x9 = 0x3f2,0x1
03f3 8409       |    |		Call	0x2,0x9
03f4 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0xa = 0x3f4,0x2
03f5 8409       |    |		Call	0x2,0x9
03f6 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x8.0xb = 0x3f6,0x3
03f7 01db       |    |		Execute	Vector,Length
03f8 0c03       |    |		Execute_Immediate	Greater_Equal,0x3
03f9 6812       |h   |		Jump_Zero	0x40c
03fa 4801       |H   |		Short_Literal	0x1
03fb 0092 0adc  |    |		Action	Push_String_Extended,0xadc					; "<A"
03fd e5fc       |    |		Load	0x2,-0x4
03fe 01dd       |    |		Execute	Vector,First
03ff e5fc       |    |		Load	0x2,-0x4
0400 01dd       |    |		Execute	Vector,First
0401 0a01       |    |		Execute_Immediate	Plus,0x1
0402 0248       | H  |		Execute	Discrete,Check_In_Integer
0403 e5fc       |    |		Load	0x2,-0x4
0404 01cf       |    |		Execute	Vector,Slice_Read
0405 e017       |    |		Load	0x0,0x17
0406 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0407 6804       |h   |		Jump_Zero	0x40c
0408 e016       |    |		Load	0x0,0x16							; Debug Table 0x8.0xc = 0x408,0x4
0409 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
040a c402       |    |		Store	0x2,0x2
040b 781c       |x   |		Jump	0x428
040c e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0xd = 0x40c,0x5
040d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
040e 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
040f e402       |    |		Load	0x2,0x2
0410 0120       |    |		Execute	Any,Is_Value
0411 6803       |h   |		Jump_Zero	0x415
0412 e005       |    |		Load	0x0,0x5
0413 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0414 7801       |x   |		Jump	0x416
0415 e402       |    |		Load	0x2,0x2
0416 6225       |b%  |		Indirect_Literal	Discrete,0x63c,{0x00000000, 0x00004000}
0417 e014       |    |		Load	0x0,0x14
0418 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0419 e00e       |    |		Load	0x0,0xe
041a 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
041b e005       |    |		Load	0x0,0x5
041c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
041d 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
041e e5fc       |    |		Load	0x2,-0x4
041f e005       |    |		Load	0x0,0x5
0420 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0421 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0422 c402       |    |		Store	0x2,0x2
0423 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0424 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x8.0xe = 0x424,0x6
0425 6802       |h   |		Jump_Zero	0x428
0426 4920       |I   |		Short_Literal	0x120							; Debug Table 0x8.0xf = 0x426,0x7
0427 0257       | W  |		Execute	Discrete,Raise
0428 e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x10 = 0x428,0x8
0429 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
042a e406       |    |		Load	0x2,0x6
042b 4801       |H   |		Short_Literal	0x1
042c 4800       |H   |		Short_Literal	0x0
042d e014       |    |		Load	0x0,0x14
042e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
042f e402       |    |		Load	0x2,0x2
0430 e016       |    |		Load	0x0,0x16
0431 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0432 c406       |    |		Store	0x2,0x6
0433 005b       | [  |		Store_Top	Discrete,At_Offset_3
0434 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8.0x11 = 0x434,0x9
0435 6802       |h   |		Jump_Zero	0x438
0436 4930       |I0  |		Short_Literal	0x130							; Debug Table 0x8.0x12 = 0x436,0xa
0437 0257       | W  |		Execute	Discrete,Raise
0438 e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x13 = 0x438,0xb
0439 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
043a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
043b e403       |    |		Load	0x2,0x3
043c 0120       |    |		Execute	Any,Is_Value
043d 6803       |h   |		Jump_Zero	0x441
043e e005       |    |		Load	0x0,0x5
043f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0440 7801       |x   |		Jump	0x442
0441 e403       |    |		Load	0x2,0x3
0442 61f9       |a   |		Indirect_Literal	Discrete,0x63c,{0x00000000, 0x00004000}
0443 e014       |    |		Load	0x0,0x14
0444 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0445 e00e       |    |		Load	0x0,0xe
0446 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0447 e005       |    |		Load	0x0,0x5
0448 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0449 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
044a e5ff       |    |		Load	0x2,-0x1
044b e005       |    |		Load	0x0,0x5
044c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
044d 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
044e c403       |    |		Store	0x2,0x3
044f 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0450 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x8.0x14 = 0x450,0xc
0451 6809       |h   |		Jump_Zero	0x45b
0452 e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x15 = 0x452,0xd
0453 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0454 e406       |    |		Load	0x2,0x6
0455 e016       |    |		Load	0x0,0x16
0456 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0457 c406       |    |		Store	0x2,0x6
0458 005b       | [  |		Store_Top	Discrete,At_Offset_3
0459 4920       |I   |		Short_Literal	0x120							; Debug Table 0x8.0x16 = 0x459,0xe
045a 0257       | W  |		Execute	Discrete,Raise
045b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x17 = 0x45b,0xf
045c e403       |    |		Load	0x2,0x3
045d e016       |    |		Load	0x0,0x16
045e 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
045f c405       |    |		Store	0x2,0x5
0460 e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x18 = 0x460,0x10
0461 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0462 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0463 e005       |    |		Load	0x0,0x5
0464 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0465 61d6       |a   |		Indirect_Literal	Discrete,0x63c,{0x00000000, 0x00004000}
0466 e014       |    |		Load	0x0,0x14
0467 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0468 e00e       |    |		Load	0x0,0xe
0469 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
046a e005       |    |		Load	0x0,0x5
046b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
046c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
046d 4824       |H$  |		Short_Literal	0x24
046e e405       |    |		Load	0x2,0x5
046f e005       |    |		Load	0x0,0x5
0470 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0471 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0472 0092 0add  |    |		Action	Push_String_Extended,0xadd					; "`."
0474 01cc       |    |		Execute	Vector,Catenate
0475 e5fe       |    |		Load	0x2,-0x2
0476 01cc       |    |		Execute	Vector,Catenate
0477 01cb       |    |		Execute	Vector,Append
0478 e005       |    |		Load	0x0,0x5
0479 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
047a 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
047b c404       |    |		Store	0x2,0x4
047c 005a       | Z  |		Store_Top	Discrete,At_Offset_2
047d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x8.0x19 = 0x47d,0x11
047e 682d       |h-  |		Jump_Zero	0x4ac
047f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x1a = 0x47f,0x12
0480 e403       |    |		Load	0x2,0x3
0481 e016       |    |		Load	0x0,0x16
0482 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0483 c405       |    |		Store	0x2,0x5
0484 e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x1b = 0x484,0x13
0485 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0486 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0487 e005       |    |		Load	0x0,0x5
0488 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0489 61b2       |a   |		Indirect_Literal	Discrete,0x63c,{0x00000000, 0x00004000}
048a e014       |    |		Load	0x0,0x14
048b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
048c e00e       |    |		Load	0x0,0xe
048d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
048e e005       |    |		Load	0x0,0x5
048f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0490 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0491 4824       |H$  |		Short_Literal	0x24
0492 e405       |    |		Load	0x2,0x5
0493 e005       |    |		Load	0x0,0x5
0494 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0495 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0496 0092 0add  |    |		Action	Push_String_Extended,0xadd					; "`."
0498 01cc       |    |		Execute	Vector,Catenate
0499 e5fe       |    |		Load	0x2,-0x2
049a 01cc       |    |		Execute	Vector,Catenate
049b 01cb       |    |		Execute	Vector,Append
049c e005       |    |		Load	0x0,0x5
049d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
049e 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
049f c404       |    |		Store	0x2,0x4
04a0 005a       | Z  |		Store_Top	Discrete,At_Offset_2
04a1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x8.0x1c = 0x4a1,0x14
04a2 6809       |h   |		Jump_Zero	0x4ac
04a3 e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x1d = 0x4a3,0x15
04a4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04a5 e406       |    |		Load	0x2,0x6
04a6 e016       |    |		Load	0x0,0x16
04a7 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
04a8 c406       |    |		Store	0x2,0x6
04a9 005b       | [  |		Store_Top	Discrete,At_Offset_3
04aa 4920       |I   |		Short_Literal	0x120							; Debug Table 0x8.0x1e = 0x4aa,0x16
04ab 0257       | W  |		Execute	Discrete,Raise
04ac e005       |    |		Load	0x0,0x5								; Debug Table 0x8.0x1f = 0x4ac,0x17
04ad 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04ae e406       |    |		Load	0x2,0x6
04af e016       |    |		Load	0x0,0x16
04b0 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
04b1 c406       |    |		Store	0x2,0x6
04b2 005b       | [  |		Store_Top	Discrete,At_Offset_3
04b3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8.0x20 = 0x4b3,0x18
04b4 6802       |h   |		Jump_Zero	0x4b7
04b5 4930       |I0  |		Short_Literal	0x130							; Debug Table 0x8.0x21 = 0x4b5,0x19
04b6 0257       | W  |		Execute	Discrete,Raise
04b7 4822       |H"  |		Short_Literal	0x22							; Debug Table 0x8.0x22 = 0x4b7,0x1a
04b8 483b       |H;  |		Short_Literal	0x3b
04b9 e404       |    |		Load	0x2,0x4
04ba e005       |    |		Load	0x0,0x5
04bb 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
04bc 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
04bd 0092 0ade  |    |		Action	Push_String_Extended,0xade					; "\x22."
04bf 01cc       |    |		Execute	Vector,Catenate
04c0 e5fe       |    |		Load	0x2,-0x2
04c1 01cc       |    |		Execute	Vector,Catenate
04c2 e5fd       |    |		Load	0x2,-0x3
04c3 01cc       |    |		Execute	Vector,Catenate
04c4 01cb       |    |		Execute	Vector,Append
04c5 01ca       |    |		Execute	Vector,Prepend
04c6 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
04c7 0000       |    |		.XXX[0x1]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cb       |    |		.CONST	0x04cb								; Address of begin
04c9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ca 0001       |    |		.CONST	0x0001								; Number of locals
04cb			BODY_04c8:
04cb			INIT_04c8:
04cb 4608       |F   |		Jump_Case	0x9							; Debug Table 0x9 = .DEBUG	0x04cb,0x0fdc,0x0005,0x0000,0x0058,0x6f55,0x0000,0x010f
04cc 7808       |x   |		Jump	0x4d5								; case 0x0
04cd 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
04ce 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
04cf 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
04d0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
04d1 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
04d2 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
04d3 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
04d4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
04d5 00da       |    |		Load_Top	At_Offset_2
04d6 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
04d7 0125       | %  |		Execute	Any,Set_Constraint
04d8 00da       |    |		Load_Top	At_Offset_2
04d9 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
04da 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04db 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
04dc 0000 0000  |    |		.BLANK	0000[0x4]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e3       |    |		.CONST	0x04e3								; Address of begin
04e1 0004       |    |		.CONST	0x0004								; Address of exception handler
04e2 0001       |    |		.CONST	0x0001								; Number of locals
04e3			BODY_04e0:
04e3			INIT_04e0:
04e3 4603       |F   |		Jump_Case	0x4							; Debug Table 0xa = .DEBUG	0x04e3,0x0fde,0x0005,0x0000,0x0058,0x6f55,0x0000,0x012f
04e4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
04e5 7802       |x   |		Jump	0x4e8								; case 0x1
04e6 7805       |x   |		Jump	0x4ec								; case 0x2
04e7 7809       |x   |		Jump	0x4f1								; case 0x3
04e8 00da       |    |		Load_Top	At_Offset_2
04e9 0091 0ac0  |    |		Action	Push_String_Extended_Indexed,0xac0				; "NIL"
04eb 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
04ec 00db       |    |		Load_Top	At_Offset_3
04ed 00db       |    |		Load_Top	At_Offset_3
04ee 00e0       |    |		Load_Encached	Standard_Cache
04ef 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
04f0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
04f1 00da       |    |		Load_Top	At_Offset_2
04f2 00e0       |    |		Load_Encached	Standard_Cache
04f3 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
04f4 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
04f5 0000 0000  |    |		.XXX[0x3]
04f7 0000       |    |
04f8 ; --------------------------------------------------------------------------------------
04f8 ; SUBPROGRAM
04f8 ; --------------------------------------------------------------------------------------
04f8 04fb       |    |		.CONST	0x04fb								; Address of begin
04f9 0004       |    |		.CONST	0x0004								; Address of exception handler
04fa 0001       |    |		.CONST	0x0001								; Number of locals
04fb			BODY_04f8:
04fb			INIT_04f8:
04fb 4603       |F   |		Jump_Case	0x4							; Debug Table 0xb = .DEBUG	0x04fb,0x0fe0,0x0005,0x0000,0x0058,0x6f55,0x0000,0x013b
04fc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
04fd 7802       |x   |		Jump	0x500								; case 0x1
04fe 7805       |x   |		Jump	0x504								; case 0x2
04ff 7809       |x   |		Jump	0x509								; case 0x3
0500 00da       |    |		Load_Top	At_Offset_2
0501 0091 0ac8  |    |		Action	Push_String_Extended_Indexed,0xac8				; "NONE"
0503 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
0504 00db       |    |		Load_Top	At_Offset_3
0505 00db       |    |		Load_Top	At_Offset_3
0506 00e0       |    |		Load_Encached	Standard_Cache
0507 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0508 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
0509 00da       |    |		Load_Top	At_Offset_2
050a 00e0       |    |		Load_Encached	Standard_Cache
050b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
050c 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
050d 0000 0000  |    |		.XXX[0x3]
050f 0000       |    |
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 051a       |    |		.CONST	0x051a								; Address of begin
0511 0004       |    |		.CONST	0x0004								; Address of exception handler
0512 0003       |    |		.CONST	0x0003								; Number of locals
0513			INIT_0510:
0513 e5f7       |    |		Load	0x2,-0x9							; Debug Table 0xc = .DEBUG	0x0513,0x0fe2,0x2801,0x0002,0x0058,0x6f55,0x0000,0x0143
													; Debug Table 0xc.0x0 = 0x513,0xffff
0514 02c7       |    |		Declare_Variable	Any
0515 e5f6       |    |		Load	0x2,-0xa
0516 c402       |    |		Store	0x2,0x2
0517 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x1 = 0x517,0xfffe
0518 029f 093b  |   ;|		Declare_Subprogram	INIT_0938,For_Call				; Debug Table 0xc.0x2 = 0x518,0xfffd
051a			BODY_0510:
051a 00cf       |    |		Action	Mark_Auxiliary
051b 7811       |x   |		Jump	0x52d
051c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc.0x3 = 0x51c,0x2
051d e5f7       |    |		Load	0x2,-0x9
051e 0119       |    |		Execute	Any,Check_In_Formal_Type
051f 85f9       |    |		Call	0x2,-0x7
0520 e5f5       |    |		Load	0x2,-0xb
0521 027b       | {  |		Execute	Discrete,Greater_Equal
0522 6804       |h   |		Jump_Zero	0x527
0523 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc.0x4 = 0x523,0x3
0524 e5f7       |    |		Load	0x2,-0x9
0525 0119       |    |		Execute	Any,Check_In_Formal_Type
0526 8403       |    |		Call	0x2,0x3
0527 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc.0x5 = 0x527,0x4
0528 e5f7       |    |		Load	0x2,-0x9
0529 0119       |    |		Execute	Any,Check_In_Formal_Type
052a 85fe       |    |		Call	0x2,-0x2
052b c402       |    |		Store	0x2,0x2
052c 00c9       |    |		Action	Pop_Auxiliary_Loop
052d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc.0x6 = 0x52d,0x1
052e e5f7       |    |		Load	0x2,-0x9
052f 0119       |    |		Execute	Any,Check_In_Formal_Type
0530 85fd       |    |		Call	0x2,-0x3
0531 6fea       |o   |		Jump_Zero	0x51c
0532 450d       |E   |		Exit_Suprogram	New_Top_Offset 0xd
0533 0000 0000  |    |		.BLANK	0000[0x5]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 053b       | ;  |		.CONST	0x053b								; Address of begin
0539 0004       |    |		.CONST	0x0004								; Address of exception handler
053a 0001       |    |		.CONST	0x0001								; Number of locals
053b			BODY_0538:
053b			INIT_0538:
053b e018       |    |		Load	0x0,0x18							; Debug Table 0xd = .DEBUG	0x053b,0x0ff2,0x0002,0x0000,0x0058,0x6f55,0x0000,0x025a
													; Debug Table 0xd.0x0 = 0x53b,0x1
053c 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
053d e018       |    |		Load	0x0,0x18
053e 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
053f 0092 0adf  |    |		Action	Push_String_Extended,0xadf					; "*SYSTEM"
0541 01df       |    |		Execute	Vector,Equal
0542 00ca       |    |		Action	Exit_Nullary_Function
0543 0000 0000  |    |		.BLANK	0000[0x5]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 054b       | K  |		.CONST	0x054b								; Address of begin
0549 0004       |    |		.CONST	0x0004								; Address of exception handler
054a 0001       |    |		.CONST	0x0001								; Number of locals
054b			BODY_0548:
054b			INIT_0548:
054b 4801       |H   |		Short_Literal	0x1							; Debug Table 0xe = .DEBUG	0x054b,0x0ff6,0x0001,0x0000,0x0058,0x6f55,0x0000,0x026b
													; Debug Table 0xe.0x0 = 0x54b,0x1
054c e5fe       |    |		Load	0x2,-0x2
054d e002       |    |		Load	0x0,0x2
054e 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
054f 6806       |h   |		Jump_Zero	0x556
0550 8234       | 4  |		Call	0x1,0x34
0551 6804       |h   |		Jump_Zero	0x556
0552 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x1 = 0x552,0x2
0553 e00c       |    |		Load	0x0,0xc
0554 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0555 c5fe       |    |		Store	0x2,-0x2
0556 e00b       |    |		Load	0x0,0xb								; Debug Table 0xe.0x2 = 0x556,0x3
0557 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0558 e5fe       |    |		Load	0x2,-0x2
0559 e00d       |    |		Load	0x0,0xd
055a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
055b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe.0x3 = 0x55b,0x4
055c e00b       |    |		Load	0x0,0xb
055d 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
055e 680b       |h   |		Jump_Zero	0x56a
055f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x4 = 0x55f,0x5
0560 e002       |    |		Load	0x0,0x2
0561 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0562 4603       |F   |		Jump_Case	0x4
0563 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x0
0564 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x1
0565 7801       |x   |		Jump	0x567								; case 0x2
0566 7800       |x   |		Jump	0x567								; case 0x3
0567 e00b       |    |		Load	0x0,0xb								; Debug Table 0xe.0x5 = 0x567,0x6
0568 1b47       | G  |		Execute	Package,Field_Read,Field_Number 0x47
0569 0257       | W  |		Execute	Discrete,Raise
056a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
056b 0000 0000  |    |		.BLANK	0000[0x5]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0573       | s  |		.CONST	0x0573								; Address of begin
0571 0004       |    |		.CONST	0x0004								; Address of exception handler
0572 0001       |    |		.CONST	0x0001								; Number of locals
0573			BODY_0570:
0573			INIT_0570:
0573 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xf = .DEBUG	0x0573,0x1004,0x0002,0x0000,0x0058,0x6f55,0x0000,0x02b8
													; Debug Table 0xf.0x0 = 0x573,0x1
0574 00eb       |    |		Load_Encached	Diana_Cache
0575 18e9       |    |		Execute	Package,Field_Execute,Field_Number 0xe9
0576 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0577 0000       |    |		.XXX[0x1]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057b       | {  |		.CONST	0x057b								; Address of begin
0579 0004       |    |		.CONST	0x0004								; Address of exception handler
057a 0001       |    |		.CONST	0x0001								; Number of locals
057b			BODY_0578:
057b			INIT_0578:
057b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10 = .DEBUG	0x057b,0x1008,0x0001,0x0000,0x0058,0x6f55,0x0000,0x02d0
													; Debug Table 0x10.0x0 = 0x57b,0x1
057c 680f       |h   |		Jump_Zero	0x58c
057d e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x10.0x1 = 0x57d,0x2
057e e5fe       |    |		Load	0x2,-0x2
057f 4802       |H   |		Short_Literal	0x2
0580 e5ff       |    |		Load	0x2,-0x1
0581 e005       |    |		Load	0x0,0x5
0582 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0583 025e       | ^  |		Execute	Discrete,Convert
0584 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0585 8218       |    |		Call	0x1,0x18
0586 e223       | #  |		Load	0x1,0x23
0587 e002       |    |		Load	0x0,0x2
0588 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0589 c5fd       |    |		Store	0x2,-0x3
058a 6629       |f)  |		Indirect_Literal	Discrete,0x3b4,{0x00000000, 0x586f5501}		; Debug Table 0x10.0x2 = 0x58a,0x3
058b 0257       | W  |		Execute	Discrete,Raise
058c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
058d 0000 0000  |    |		.XXX[0x3]
058f 0000       |    |
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0596       |    |		.CONST	0x0596								; Address of begin
0591 0004       |    |		.CONST	0x0004								; Address of exception handler
0592 0002       |    |		.CONST	0x0002								; Number of locals
0593			INIT_0590:
0593 e005       |    |		Load	0x0,0x5								; Debug Table 0x11 = .DEBUG	0x0593,0x1010,0x0001,0x0000,0x0058,0x6f55,0x0000,0x030a
													; Debug Table 0x11.0x0 = 0x593,0xffff
0594 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0595 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0596			BODY_0590:
0596 e005       |    |		Load	0x0,0x5								; Debug Table 0x11.0x1 = 0x596,0x1
0597 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0598 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0599 e5fe       |    |		Load	0x2,-0x2
059a 0120       |    |		Execute	Any,Is_Value
059b 6803       |h   |		Jump_Zero	0x59f
059c e005       |    |		Load	0x0,0x5
059d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
059e 7801       |x   |		Jump	0x5a0
059f e5fe       |    |		Load	0x2,-0x2
05a0 609b       |`   |		Indirect_Literal	Discrete,0x63c,{0x00000000, 0x00004000}
05a1 e014       |    |		Load	0x0,0x14
05a2 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
05a3 e00e       |    |		Load	0x0,0xe
05a4 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
05a5 e005       |    |		Load	0x0,0x5
05a6 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05a7 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05a8 e5ff       |    |		Load	0x2,-0x1
05a9 e005       |    |		Load	0x0,0x5
05aa 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05ab 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
05ac c5fe       |    |		Store	0x2,-0x2
05ad 0059       | Y  |		Store_Top	Discrete,At_Offset_1
05ae 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x2 = 0x5ae,0x2
05af 7001       |p   |		Jump_Nonzero	0x5b1
05b0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x11.0x3 = 0x5b0,0x3
05b1 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11.0x4 = 0x5b1,0x4
05b2 0092 0ae0  |    |		Action	Push_String_Extended,0xae0					; "$"
05b4 01df       |    |		Execute	Vector,Equal
05b5 681c       |h   |		Jump_Zero	0x5d2
05b6 e005       |    |		Load	0x0,0x5								; Debug Table 0x11.0x5 = 0x5b6,0x5
05b7 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05b8 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05b9 e5fe       |    |		Load	0x2,-0x2
05ba 0120       |    |		Execute	Any,Is_Value
05bb 6803       |h   |		Jump_Zero	0x5bf
05bc e005       |    |		Load	0x0,0x5
05bd 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05be 7801       |x   |		Jump	0x5c0
05bf e5fe       |    |		Load	0x2,-0x2
05c0 607b       |`{  |		Indirect_Literal	Discrete,0x63c,{0x00000000, 0x00004000}
05c1 e014       |    |		Load	0x0,0x14
05c2 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
05c3 e00e       |    |		Load	0x0,0xe
05c4 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
05c5 e005       |    |		Load	0x0,0x5
05c6 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05c7 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05c8 0092 0ae1  |    |		Action	Push_String_Extended,0xae1					; "!Machine.Error_Logs"
05ca e005       |    |		Load	0x0,0x5
05cb 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05cc 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
05cd c5fe       |    |		Store	0x2,-0x2
05ce 0059       | Y  |		Store_Top	Discrete,At_Offset_1
05cf 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x6 = 0x5cf,0x6
05d0 7001       |p   |		Jump_Nonzero	0x5d2
05d1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x11.0x7 = 0x5d1,0x7
05d2 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x11.0x8 = 0x5d2,0x8
05d3 e5ff       |    |		Load	0x2,-0x1
05d4 0092 0ae2  |    |		Action	Push_String_Extended,0xae2					; " could not be resovled"
05d6 01cc       |    |		Execute	Vector,Catenate
05d7 4802       |H   |		Short_Literal	0x2
05d8 00db       |    |		Load_Top	At_Offset_3
05d9 e005       |    |		Load	0x0,0x5
05da 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05db 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05dc 025e       | ^  |		Execute	Discrete,Convert
05dd 1c01       |    |		Execute_Immediate	Run_Utility,0x1
05de 8218       |    |		Call	0x1,0x18
05df e223       | #  |		Load	0x1,0x23
05e0 e002       |    |		Load	0x0,0x2
05e1 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
05e2 c5fd       |    |		Store	0x2,-0x3
05e3 65d0       |e   |		Indirect_Literal	Discrete,0x3b4,{0x00000000, 0x586f5501}		; Debug Table 0x11.0x9 = 0x5e3,0x9
05e4 0257       | W  |		Execute	Discrete,Raise
05e5 0000 0000  |    |		.XXX[0x3]
05e7 0000       |    |
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05f5       |    |		.CONST	0x05f5								; Address of begin
05e9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ea 0004       |    |		.CONST	0x0004								; Number of locals
05eb			INIT_05e8:
05eb e005       |    |		Load	0x0,0x5								; Debug Table 0x12 = .DEBUG	0x05eb,0x1026,0x0001,0x0000,0x0058,0x6f55,0x0000,0x037f
													; Debug Table 0x12.0x0 = 0x5eb,0xffff
05ec 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05ed 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
05ee e005       |    |		Load	0x0,0x5								; Debug Table 0x12.0x1 = 0x5ee,0xfffe
05ef 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05f0 02c7       |    |		Declare_Variable	Any
05f1 00d8       |    |		Load_Top	At_Offset_0
05f2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05f3 e005       |    |		Load	0x0,0x5								; Debug Table 0x12.0x2 = 0x5f3,0xfffd
05f4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05f5			BODY_05e8:
05f5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x12.0x3 = 0x5f5,0x1
05f6 01db       |    |		Execute	Vector,Length
05f7 700e       |p   |		Jump_Nonzero	0x606
05f8 e005       |    |		Load	0x0,0x5								; Debug Table 0x12.0x4 = 0x5f8,0x2
05f9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05fa e005       |    |		Load	0x0,0x5
05fb 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
05fc 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
05fd e005       |    |		Load	0x0,0x5
05fe 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05ff 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0600 e005       |    |		Load	0x0,0x5
0601 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0602 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0603 c5fe       |    |		Store	0x2,-0x2
0604 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0605 782c       |x,  |		Jump	0x632
0606 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x12.0x5 = 0x606,0x3
0607 00da       |    |		Load_Top	At_Offset_2
0608 0120       |    |		Execute	Any,Is_Value
0609 6803       |h   |		Jump_Zero	0x60d
060a e005       |    |		Load	0x0,0x5
060b 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
060c 7801       |x   |		Jump	0x60e
060d 00da       |    |		Load_Top	At_Offset_2
060e e5ff       |    |		Load	0x2,-0x1
060f 8238       | 8  |		Call	0x1,0x38
0610 c403       |    |		Store	0x2,0x3
0611 c5fd       |    |		Store	0x2,-0x3
0612 e005       |    |		Load	0x0,0x5								; Debug Table 0x12.0x6 = 0x612,0x4
0613 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0614 e005       |    |		Load	0x0,0x5
0615 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0616 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0617 6024       |`$  |		Indirect_Literal	Discrete,0x63c,{0x00000000, 0x00004000}
0618 e014       |    |		Load	0x0,0x14
0619 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
061a 4800       |H   |		Short_Literal	0x0
061b e403       |    |		Load	0x2,0x3
061c e005       |    |		Load	0x0,0x5
061d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
061e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
061f c402       |    |		Store	0x2,0x2
0620 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0621 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x12.0x7 = 0x621,0x5
0622 0092 0ae3  |    |		Action	Push_String_Extended,0xae3					; "Get Context failed"
0624 00da       |    |		Load_Top	At_Offset_2
0625 8237       | 7  |		Call	0x1,0x37
0626 c5fd       |    |		Store	0x2,-0x3
0627 e005       |    |		Load	0x0,0x5								; Debug Table 0x12.0x8 = 0x627,0x6
0628 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0629 e005       |    |		Load	0x0,0x5
062a 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
062b 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
062c e402       |    |		Load	0x2,0x2
062d e005       |    |		Load	0x0,0x5
062e 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
062f 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0630 c5fe       |    |		Store	0x2,-0x2
0631 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0632 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x12.0x9 = 0x632,0x7
0633 0092 0ae4  |    |		Action	Push_String_Extended,0xae4					; "Get Root Failed"
0635 00da       |    |		Load_Top	At_Offset_2
0636 8237       | 7  |		Call	0x1,0x37
0637 c5fd       |    |		Store	0x2,-0x3
0638 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0639 0000 0000  |    |		.XXX[0x3]
063b 0000       |    |
063c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 064a       | J  |		.CONST	0x064a								; Address of begin
0641 0004       |    |		.CONST	0x0004								; Address of exception handler
0642 0003       |    |		.CONST	0x0003								; Number of locals
0643			INIT_0640:
0643 e005       |    |		Load	0x0,0x5								; Debug Table 0x13 = .DEBUG	0x0643,0x103c,0x0001,0x0000,0x0058,0x6f55,0x0000,0x03f6
													; Debug Table 0x13.0x0 = 0x643,0xffff
0644 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0645 02c7       |    |		Declare_Variable	Any
0646 00d8       |    |		Load_Top	At_Offset_0
0647 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0648 e005       |    |		Load	0x0,0x5								; Debug Table 0x13.0x1 = 0x648,0xfffe
0649 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
064a			BODY_0640:
064a e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x13.0x2 = 0x64a,0x1
064b 00da       |    |		Load_Top	At_Offset_2
064c 0120       |    |		Execute	Any,Is_Value
064d 6803       |h   |		Jump_Zero	0x651
064e e005       |    |		Load	0x0,0x5
064f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0650 7801       |x   |		Jump	0x652
0651 00da       |    |		Load_Top	At_Offset_2
0652 e5ff       |    |		Load	0x2,-0x1
0653 8238       | 8  |		Call	0x1,0x38
0654 c402       |    |		Store	0x2,0x2
0655 c5fd       |    |		Store	0x2,-0x3
0656 e005       |    |		Load	0x0,0x5								; Debug Table 0x13.0x3 = 0x656,0x2
0657 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0658 e005       |    |		Load	0x0,0x5
0659 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
065a 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
065b 67e0       |g   |		Indirect_Literal	Discrete,0x63c,{0x00000000, 0x00004000}
065c e014       |    |		Load	0x0,0x14
065d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
065e 4800       |H   |		Short_Literal	0x0
065f e402       |    |		Load	0x2,0x2
0660 e005       |    |		Load	0x0,0x5
0661 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0662 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0663 c5fe       |    |		Store	0x2,-0x2
0664 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0665 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x13.0x4 = 0x665,0x3
0666 0092 0ae3  |    |		Action	Push_String_Extended,0xae3					; "Get Context failed"
0668 00da       |    |		Load_Top	At_Offset_2
0669 8237       | 7  |		Call	0x1,0x37
066a c5fd       |    |		Store	0x2,-0x3
066b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
066c 0000 0000  |    |		.BLANK	0000[0x4]
0670 ; --------------------------------------------------------------------------------------
0670 ; SUBPROGRAM
0670 ; --------------------------------------------------------------------------------------
0670 0678       | x  |		.CONST	0x0678								; Address of begin
0671 0004       |    |		.CONST	0x0004								; Address of exception handler
0672 0004       |    |		.CONST	0x0004								; Number of locals
0673			INIT_0670:
0673 e019       |    |		Load	0x0,0x19							; Debug Table 0x14 = .DEBUG	0x0673,0x1048,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0434
													; Debug Table 0x14.0x0 = 0x673,0xffff
0674 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0675 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x14.0x1 = 0x675,0xfffe
0676 029f 096b  |   k|		Declare_Subprogram	INIT_0968,For_Call				; Debug Table 0x14.0x2 = 0x676,0xfffd
0678			BODY_0670:
0678 e019       |    |		Load	0x0,0x19							; Debug Table 0x14.0x3 = 0x678,0x1
0679 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
067a 00ec       |    |		Load_Encached	Diana_Tree_Cache
067b e01a       |    |		Load	0x0,0x1a
067c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
067d e001       |    |		Load	0x0,0x1
067e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
067f 4800       |H   |		Short_Literal	0x0
0680 e01b       |    |		Load	0x0,0x1b
0681 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0682 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0683 4803       |H   |		Short_Literal	0x3
0684 e5ff       |    |		Load	0x2,-0x1
0685 8404       |    |		Call	0x2,0x4
0686 e01c       |    |		Load	0x0,0x1c
0687 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0688 c5fe       |    |		Store	0x2,-0x2
0689 005b       | [  |		Store_Top	Discrete,At_Offset_3
068a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14.0x4 = 0x68a,0x2
068b 0f02       |    |		Execute_Immediate	Equal,0x2
068c 680c       |h   |		Jump_Zero	0x699
068d e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x14.0x5 = 0x68d,0x3
068e e5ff       |    |		Load	0x2,-0x1
068f 4802       |H   |		Short_Literal	0x2
0690 0092 0ae5  |    |		Action	Push_String_Extended,0xae5					; "Severe parser error"
0692 8218       |    |		Call	0x1,0x18
0693 e223       | #  |		Load	0x1,0x23
0694 e002       |    |		Load	0x0,0x2
0695 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0696 c5fd       |    |		Store	0x2,-0x3
0697 6230       |b0  |		Indirect_Literal	Discrete,0x8c8,{0x00000000, 0x586f5501}		; Debug Table 0x14.0x6 = 0x697,0x4
0698 0257       | W  |		Execute	Discrete,Raise
0699 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
069a 0000 0000  |    |		.BLANK	0000[0x6]
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06ba       |    |		.CONST	0x06ba								; Address of begin
06a1 070a       |    |		.CONST	0x070a								; Address of exception handler
06a2 0006       |    |		.CONST	0x0006								; Number of locals
06a3			INIT_06a0:
06a3 e007       |    |		Load	0x0,0x7								; Debug Table 0x15 = .DEBUG	0x06a3,0x1058,0x0001,0x0000,0x0058,0x6f55,0x0000,0x052c
													; Debug Table 0x15.0x0 = 0x6a3,0xffff
06a4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06a5 02c7       |    |		Declare_Variable	Any
06a6 00d8       |    |		Load_Top	At_Offset_0
06a7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06a8 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x15.0x1 = 0x6a8,0xfffe
06a9 e5fe       |    |		Load	0x2,-0x2
06aa 8236       | 6  |		Call	0x1,0x36
06ab 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
06ac e005       |    |		Load	0x0,0x5								; Debug Table 0x15.0x2 = 0x6ac,0xfffd
06ad 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
06ae 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
06af e00e       |    |		Load	0x0,0xe
06b0 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
06b1 e005       |    |		Load	0x0,0x5
06b2 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
06b3 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
06b4 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
06b5 e005       |    |		Load	0x0,0x5								; Debug Table 0x15.0x3 = 0x6b5,0xfffc
06b6 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
06b7 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
06b8 e005       |    |		Load	0x0,0x5								; Debug Table 0x15.0x4 = 0x6b8,0xfffb
06b9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06ba			BODY_06a0:
06ba e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x15.0x5 = 0x6ba,0x1
06bb 00da       |    |		Load_Top	At_Offset_2
06bc e5ff       |    |		Load	0x2,-0x1
06bd 8239       | 9  |		Call	0x1,0x39
06be 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
06bf c5fd       |    |		Store	0x2,-0x3
06c0 e005       |    |		Load	0x0,0x5								; Debug Table 0x15.0x6 = 0x6c0,0x2
06c1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06c2 e00e       |    |		Load	0x0,0xe
06c3 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
06c4 00db       |    |		Load_Top	At_Offset_3
06c5 e005       |    |		Load	0x0,0x5
06c6 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
06c7 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
06c8 0059       | Y  |		Store_Top	Discrete,At_Offset_1
06c9 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x15.0x7 = 0x6c9,0x3
06ca 0092 0ae6  |    |		Action	Push_String_Extended,0xae6					; "Cannot set context to "
06cc e5ff       |    |		Load	0x2,-0x1
06cd 01cc       |    |		Execute	Vector,Catenate
06ce 00da       |    |		Load_Top	At_Offset_2
06cf 8237       | 7  |		Call	0x1,0x37
06d0 c5fd       |    |		Store	0x2,-0x3
06d1 e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0x8 = 0x6d1,0x4
06d2 0120       |    |		Execute	Any,Is_Value
06d3 6803       |h   |		Jump_Zero	0x6d7
06d4 e01d       |    |		Load	0x0,0x1d
06d5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
06d6 7801       |x   |		Jump	0x6d8
06d7 e402       |    |		Load	0x2,0x2
06d8 e403       |    |		Load	0x2,0x3
06d9 e01e       |    |		Load	0x0,0x1e
06da 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
06db e014       |    |		Load	0x0,0x14
06dc 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
06dd e220       |    |		Load	0x1,0x20
06de e00e       |    |		Load	0x0,0xe
06df 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
06e0 e01f       |    |		Load	0x0,0x1f
06e1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
06e2 e405       |    |		Load	0x2,0x5
06e3 e21f       |    |		Load	0x1,0x1f
06e4 e01d       |    |		Load	0x0,0x1d
06e5 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
06e6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06e7 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
06e8 c403       |    |		Store	0x2,0x3
06e9 c402       |    |		Store	0x2,0x2
06ea e005       |    |		Load	0x0,0x5								; Debug Table 0x15.0x9 = 0x6ea,0x5
06eb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06ec e00e       |    |		Load	0x0,0xe
06ed 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
06ee e404       |    |		Load	0x2,0x4
06ef e005       |    |		Load	0x0,0x5
06f0 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
06f1 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
06f2 0059       | Y  |		Store_Top	Discrete,At_Offset_1
06f3 e402       |    |		Load	0x2,0x2								; Debug Table 0x15.0xa = 0x6f3,0x6
06f4 e007       |    |		Load	0x0,0x7
06f5 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
06f6 7012       |p   |		Jump_Nonzero	0x709
06f7 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x15.0xb = 0x6f7,0x7
06f8 0092 0ae7  |    |		Action	Push_String_Extended,0xae7					; "Semantics"
06fa 4801       |H   |		Short_Literal	0x1
06fb e402       |    |		Load	0x2,0x2
06fc e229       | )  |		Load	0x1,0x29
06fd e22a       | *  |		Load	0x1,0x2a
06fe 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
06ff 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
0700 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
0701 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
0702 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
0703 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
0704 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
0705 8228       | (  |		Call	0x1,0x28
0706 c5fd       |    |		Store	0x2,-0x3
0707 61c0       |a   |		Indirect_Literal	Discrete,0x8c8,{0x00000000, 0x586f5501}		; Debug Table 0x15.0xc = 0x707,0x8
0708 0257       | W  |		Execute	Discrete,Raise
0709 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
070a			TRAP_06a0:
070a 61bd       |a   |		Indirect_Literal	Discrete,0x8c8,{0x00000000, 0x586f5501}
070b 010f       |    |		Execute	Exception,Equal
070c 6802       |h   |		Jump_Zero	0x70f
070d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0xd = 0x70d,0x9
070e 0101       |    |		Execute	Exception,Reraise
070f e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x15.0xe = 0x70f,0xa
0710 e020       |    |		Load	0x0,0x20
0711 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0712 4802       |H   |		Short_Literal	0x2
0713 0092 0ae8  |    |		Action	Push_String_Extended,0xae8					; "Unhandled exception in Semantics"
0715 8218       |    |		Call	0x1,0x18
0716 e223       | #  |		Load	0x1,0x23
0717 e002       |    |		Load	0x0,0x2
0718 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0719 c5fd       |    |		Store	0x2,-0x3
071a 61ad       |a   |		Indirect_Literal	Discrete,0x8c8,{0x00000000, 0x586f5501}		; Debug Table 0x15.0xf = 0x71a,0xb
071b 0257       | W  |		Execute	Discrete,Raise
071c 0000 0000  |    |		.BLANK	0000[0x4]
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0723       | #  |		.CONST	0x0723								; Address of begin
0721 0004       |    |		.CONST	0x0004								; Address of exception handler
0722 0001       |    |		.CONST	0x0001								; Number of locals
0723			BODY_0720:
0723			INIT_0720:
0723 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x16 = .DEBUG	0x0723,0x107a,0x0001,0x0000,0x0058,0x6f55,0x0000,0x05dd
													; Debug Table 0x16.0x0 = 0x723,0x1
0724 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0725 4603       |F   |		Jump_Case	0x4
0726 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; case 0x0
0727 7802       |x   |		Jump	0x72a								; case 0x1
0728 780c       |x   |		Jump	0x735								; case 0x2
0729 781d       |x   |		Jump	0x747								; case 0x3
072a e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x16.0x1 = 0x72a,0x3
072b 00db       |    |		Load_Top	At_Offset_3
072c 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
072d e020       |    |		Load	0x0,0x20
072e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
072f e21e       |    |		Load	0x1,0x1e
0730 e5fe       |    |		Load	0x2,-0x2
0731 e002       |    |		Load	0x0,0x2
0732 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0733 c5fd       |    |		Store	0x2,-0x3
0734 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0735 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x16.0x2 = 0x735,0x4
0736 0092 0ae9  |    |		Action	Push_String_Extended,0xae9					; "Unable to run program"
0738 4802       |H   |		Short_Literal	0x2
0739 e5ff       |    |		Load	0x2,-0x1
073a 2e02       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
073b e229       | )  |		Load	0x1,0x29
073c e22a       | *  |		Load	0x1,0x2a
073d 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
073e 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
073f 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
0740 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
0741 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
0742 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
0743 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
0744 8228       | (  |		Call	0x1,0x28
0745 c5fd       |    |		Store	0x2,-0x3
0746 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0747 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x16.0x3 = 0x747,0x5
0748 00ea       |    |		Load_Encached	Null_String_Cache
0749 e21e       |    |		Load	0x1,0x1e
074a e5fe       |    |		Load	0x2,-0x2
074b e002       |    |		Load	0x0,0x2
074c 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
074d c5fd       |    |		Store	0x2,-0x3
074e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
074f 0000       |    |		.XXX[0x1]
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 075f       | _  |		.CONST	0x075f								; Address of begin
0751 0004       |    |		.CONST	0x0004								; Address of exception handler
0752 0005       |    |		.CONST	0x0005								; Number of locals
0753			INIT_0750:
0753 e011       |    |		Load	0x0,0x11							; Debug Table 0x17 = .DEBUG	0x0753,0x1084,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0641
													; Debug Table 0x17.0x0 = 0x753,0xffff
0754 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0755 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0756 02ff       |    |		Declare_Variable	Variant_Record
0757 00d8       |    |		Load_Top	At_Offset_0
0758 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0759 029f 09bb  |    |		Declare_Subprogram	INIT_09b8,For_Call
075b 029f 09d3  |    |		Declare_Subprogram	INIT_09d0,For_Call
075d 029f 09e3  |    |		Declare_Subprogram	INIT_09e0,For_Call
075f			BODY_0750:
075f e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x17.0x1 = 0x75f,0x1
0760 e002       |    |		Load	0x0,0x2
0761 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0762 c5fc       |    |		Store	0x2,-0x4
0763 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x17.0x2 = 0x763,0x2
0764 01db       |    |		Execute	Vector,Length
0765 7009       |p   |		Jump_Nonzero	0x76f
0766 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x3 = 0x766,0x3
0767 01db       |    |		Execute	Vector,Length
0768 7004       |p   |		Jump_Nonzero	0x76d
0769 e00e       |    |		Load	0x0,0xe								; Debug Table 0x17.0x4 = 0x769,0x4
076a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
076b a5fd       |    |		Store_Unchecked	0x2,-0x3
076c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
076d 8403       |    |		Call	0x2,0x3								; Debug Table 0x17.0x5 = 0x76d,0x5
076e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
076f e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x6 = 0x76f,0x6
0770 01db       |    |		Execute	Vector,Length
0771 701d       |p   |		Jump_Nonzero	0x78f
0772 4801       |H   |		Short_Literal	0x1							; Debug Table 0x17.0x7 = 0x772,0x7
0773 0092 0aea  |    |		Action	Push_String_Extended,0xaea					; "network_public"
0775 e5ff       |    |		Load	0x2,-0x1
0776 e017       |    |		Load	0x0,0x17
0777 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0778 6802       |h   |		Jump_Zero	0x77b
0779 8404       |    |		Call	0x2,0x4								; Debug Table 0x17.0x8 = 0x779,0x8
077a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
077b 4801       |H   |		Short_Literal	0x1							; Debug Table 0x17.0x9 = 0x77b,0x9
077c 0092 0aeb  |    |		Action	Push_String_Extended,0xaeb					; "public"
077e e5ff       |    |		Load	0x2,-0x1
077f e017       |    |		Load	0x0,0x17
0780 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0781 6802       |h   |		Jump_Zero	0x784
0782 8405       |    |		Call	0x2,0x5								; Debug Table 0x17.0xa = 0x782,0xa
0783 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0784 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x17.0xb = 0x784,0xb
0785 e001       |    |		Load	0x0,0x1
0786 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0787 e5ff       |    |		Load	0x2,-0x1
0788 e021       | !  |		Load	0x0,0x21
0789 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
078a e5ff       |    |		Load	0x2,-0x1
078b 823e       | >  |		Call	0x1,0x3e
078c c5fd       |    |		Store	0x2,-0x3
078d c5fc       |    |		Store	0x2,-0x4
078e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
078f e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x17.0xc = 0x78f,0xc
0790 e402       |    |		Load	0x2,0x2
0791 e014       |    |		Load	0x0,0x14
0792 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0793 0092 0aec  |    |		Action	Push_String_Extended,0xaec					; "!users."
0795 e5ff       |    |		Load	0x2,-0x1
0796 01cc       |    |		Execute	Vector,Catenate
0797 0092 0aed  |    |		Action	Push_String_Extended,0xaed					; "."
0799 01cc       |    |		Execute	Vector,Catenate
079a e5fe       |    |		Load	0x2,-0x2
079b 01cc       |    |		Execute	Vector,Catenate
079c e013       |    |		Load	0x0,0x13
079d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
079e 00d1       |    |		Pop_Control	Pop_Count_1
079f c5fc       |    |		Store	0x2,-0x4
07a0 4801       |H   |		Short_Literal	0x1							; Debug Table 0x17.0xd = 0x7a0,0xd
07a1 e5fc       |    |		Load	0x2,-0x4
07a2 e002       |    |		Load	0x0,0x2
07a3 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
07a4 6803       |h   |		Jump_Zero	0x7a8
07a5 4800       |H   |		Short_Literal	0x0							; Debug Table 0x17.0xe = 0x7a5,0xe
07a6 a5fd       |    |		Store_Unchecked	0x2,-0x3
07a7 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
07a8 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x17.0xf = 0x7a8,0xf
07a9 e013       |    |		Load	0x0,0x13
07aa 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
07ab a5fd       |    |		Store_Unchecked	0x2,-0x3
07ac 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
07ad 0000 0000  |    |		.XXX[0x3]
07af 0000       |    |
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07bd       |    |		.CONST	0x07bd								; Address of begin
07b1 0004       |    |		.CONST	0x0004								; Address of exception handler
07b2 0003       |    |		.CONST	0x0003								; Number of locals
07b3			INIT_07b0:
07b3 e006       |    |		Load	0x0,0x6								; Debug Table 0x18 = .DEBUG	0x07b3,0x10a6,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0742
													; Debug Table 0x18.0x0 = 0x7b3,0xffff
07b4 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
07b5 02ff       |    |		Declare_Variable	Variant_Record
07b6 00d8       |    |		Load_Top	At_Offset_0
07b7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07b8 e006       |    |		Load	0x0,0x6								; Debug Table 0x18.0x1 = 0x7b8,0xfffe
07b9 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
07ba 02c7       |    |		Declare_Variable	Any
07bb e5ff       |    |		Load	0x2,-0x1
07bc c403       |    |		Store	0x2,0x3
07bd			BODY_07b0:
07bd 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x18.0x2 = 0x7bd,0x1
07be 00d9       |    |		Load_Top	At_Offset_1
07bf e006       |    |		Load	0x0,0x6
07c0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
07c1 c403       |    |		Store	0x2,0x3
07c2 00d1       |    |		Pop_Control	Pop_Count_1
07c3 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x18.0x3 = 0x7c3,0x2
07c4 e5fe       |    |		Load	0x2,-0x2
07c5 00db       |    |		Load_Top	At_Offset_3
07c6 823d       | =  |		Call	0x1,0x3d
07c7 c5fd       |    |		Store	0x2,-0x3
07c8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
07c9 0000 0000  |    |		.BLANK	0000[0x7]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07df       |    |		.CONST	0x07df								; Address of begin
07d1 0803       |    |		.CONST	0x0803								; Address of exception handler
07d2 0004       |    |		.CONST	0x0004								; Number of locals
07d3			INIT_07d0:
07d3 e006       |    |		Load	0x0,0x6								; Debug Table 0x19 = .DEBUG	0x07d3,0x10b0,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0774
													; Debug Table 0x19.0x0 = 0x7d3,0xffff
07d4 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
07d5 02c7       |    |		Declare_Variable	Any
07d6 00db       |    |		Load_Top	At_Offset_3
07d7 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
07d8 c402       |    |		Store	0x2,0x2
07d9 e005       |    |		Load	0x0,0x5								; Debug Table 0x19.0x1 = 0x7d9,0xfffe
07da 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
07db e20e       |    |		Load	0x1,0xe								; Debug Table 0x19.0x2 = 0x7db,0xfffd
07dc 02c7       |    |		Declare_Variable	Any
07dd 00d8       |    |		Load_Top	At_Offset_0
07de 1c00       |    |		Execute_Immediate	Run_Utility,0x0
07df			BODY_07d0:
07df e005       |    |		Load	0x0,0x5								; Debug Table 0x19.0x3 = 0x7df,0x1
07e0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
07e1 e00e       |    |		Load	0x0,0xe
07e2 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
07e3 e5ff       |    |		Load	0x2,-0x1
07e4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
07e5 e005       |    |		Load	0x0,0x5
07e6 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
07e7 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
07e8 005a       | Z  |		Store_Top	Discrete,At_Offset_2
07e9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x4 = 0x7e9,0x2
07ea 0092 0aee  |    |		Action	Push_String_Extended,0xaee					; "Context problem"
07ec 00db       |    |		Load_Top	At_Offset_3
07ed 8237       | 7  |		Call	0x1,0x37
07ee c404       |    |		Store	0x2,0x4
07ef e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x19.0x5 = 0x7ef,0x3
07f0 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
07f1 e00e       |    |		Load	0x0,0xe
07f2 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
07f3 e00b       |    |		Load	0x0,0xb
07f4 185b       | [  |		Execute	Package,Field_Execute,Field_Number 0x5b
07f5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x6 = 0x7f5,0x4
07f6 e018       |    |		Load	0x0,0x18
07f7 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
07f8 e018       |    |		Load	0x0,0x18
07f9 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
07fa e402       |    |		Load	0x2,0x2
07fb 8240       | @  |		Call	0x1,0x40
07fc c404       |    |		Store	0x2,0x4
07fd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x7 = 0x7fd,0x5
07fe e00b       |    |		Load	0x0,0xb
07ff 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0800 8235       | 5  |		Call	0x1,0x35
0801 c404       |    |		Store	0x2,0x4
0802 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0803			TRAP_07d0:
0803 0007       |    |		Action	Break_Optional
0804 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x19.0x8 = 0x804,0x6
0805 e00b       |    |		Load	0x0,0xb
0806 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0807 8235       | 5  |		Call	0x1,0x35
0808 c404       |    |		Store	0x2,0x4
0809 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x9 = 0x809,0x7
080a 0101       |    |		Execute	Exception,Reraise
080b 0000 0000  |    |		.BLANK	0000[0x5]
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 081b       |    |		.CONST	0x081b								; Address of begin
0811 0004       |    |		.CONST	0x0004								; Address of exception handler
0812 0006       |    |		.CONST	0x0006								; Number of locals
0813			INIT_0810:
0813 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1a = .DEBUG	0x0813,0x10c6,0x0002,0x0000,0x0058,0x6f55,0x0000,0x07db
													; Debug Table 0x1a.0x0 = 0x813,0xffff
0814 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1a.0x1 = 0x814,0xfffe
0815 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x1a.0x2 = 0x815,0xfffd
0816 0602       |    |		Execute_Immediate	Set_Value_Unchecked,0x2
0817 029f 09f3  |    |		Declare_Subprogram	INIT_09f0,For_Call				; Debug Table 0x1a.0x3 = 0x817,0xfffc
0819 029f 0a3b  |   ;|		Declare_Subprogram	INIT_0a38,For_Call				; Debug Table 0x1a.0x4 = 0x819,0xfffb
081b			BODY_0810:
081b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x1a.0x5 = 0x81b,0x1
081c a403       |    |		Store_Unchecked	0x2,0x3
081d 00cf       |    |		Action	Mark_Auxiliary
081e 0007       |    |		Action	Break_Optional							; Debug Table 0x1a.0x6 = 0x81e,0x2
081f e403       |    |		Load	0x2,0x3								; Debug Table 0x1a.0x7 = 0x81f,0x3
0820 00eb       |    |		Load_Encached	Diana_Cache
0821 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0822 0ba8       |    |		Execute_Immediate	Case_Compare,0xa8
0823 7037       |p7  |		Jump_Nonzero	0x85b
0824 0b48       | H  |		Execute_Immediate	Case_Compare,0x48
0825 703a       |p:  |		Jump_Nonzero	0x860
0826 0b4e       | N  |		Execute_Immediate	Case_Compare,0x4e
0827 703d       |p=  |		Jump_Nonzero	0x865
0828 0b97       |    |		Execute_Immediate	Case_Compare,0x97
0829 7040       |p@  |		Jump_Nonzero	0x86a
082a 0b5b       | [  |		Execute_Immediate	Case_Compare,0x5b
082b 7045       |pE  |		Jump_Nonzero	0x871
082c 0b53       | S  |		Execute_Immediate	Case_Compare,0x53
082d 7043       |pC  |		Jump_Nonzero	0x871
082e 0bab       |    |		Execute_Immediate	Case_Compare,0xab
082f 7044       |pD  |		Jump_Nonzero	0x874
0830 0b40       | @  |		Execute_Immediate	Case_Compare,0x40
0831 7045       |pE  |		Jump_Nonzero	0x877
0832 0b4a       | J  |		Execute_Immediate	Case_Compare,0x4a
0833 704e       |pN  |		Jump_Nonzero	0x882
0834 0b4b       | K  |		Execute_Immediate	Case_Compare,0x4b
0835 704f       |pO  |		Jump_Nonzero	0x885
0836 0b4c       | L  |		Execute_Immediate	Case_Compare,0x4c
0837 7050       |pP  |		Jump_Nonzero	0x888
0838 0b4d       | M  |		Execute_Immediate	Case_Compare,0x4d
0839 7051       |pQ  |		Jump_Nonzero	0x88b
083a 0b4f       | O  |		Execute_Immediate	Case_Compare,0x4f
083b 7052       |pR  |		Jump_Nonzero	0x88e
083c 0b50       | P  |		Execute_Immediate	Case_Compare,0x50
083d 7053       |pS  |		Jump_Nonzero	0x891
083e 0b51       | Q  |		Execute_Immediate	Case_Compare,0x51
083f 7054       |pT  |		Jump_Nonzero	0x894
0840 0b52       | R  |		Execute_Immediate	Case_Compare,0x52
0841 7055       |pU  |		Jump_Nonzero	0x897
0842 0b54       | T  |		Execute_Immediate	Case_Compare,0x54
0843 7056       |pV  |		Jump_Nonzero	0x89a
0844 0b55       | U  |		Execute_Immediate	Case_Compare,0x55
0845 7057       |pW  |		Jump_Nonzero	0x89d
0846 0b56       | V  |		Execute_Immediate	Case_Compare,0x56
0847 7058       |pX  |		Jump_Nonzero	0x8a0
0848 0b5a       | Z  |		Execute_Immediate	Case_Compare,0x5a
0849 7059       |pY  |		Jump_Nonzero	0x8a3
084a 0b5c       | \  |		Execute_Immediate	Case_Compare,0x5c
084b 705a       |pZ  |		Jump_Nonzero	0x8a6
084c 0b5d       | ]  |		Execute_Immediate	Case_Compare,0x5d
084d 705b       |p[  |		Jump_Nonzero	0x8a9
084e 0b5e       | ^  |		Execute_Immediate	Case_Compare,0x5e
084f 705c       |p\  |		Jump_Nonzero	0x8ac
0850 0b5f       | _  |		Execute_Immediate	Case_Compare,0x5f
0851 705d       |p]  |		Jump_Nonzero	0x8af
0852 0b60       | `  |		Execute_Immediate	Case_Compare,0x60
0853 705e       |p^  |		Jump_Nonzero	0x8b2
0854 0b57       | W  |		Execute_Immediate	Case_Compare,0x57
0855 705f       |p_  |		Jump_Nonzero	0x8b5
0856 0b58       | X  |		Execute_Immediate	Case_Compare,0x58
0857 7066       |pf  |		Jump_Nonzero	0x8be
0858 e403       |    |		Load	0x2,0x3								; Debug Table 0x1a.0x8 = 0x858,0x1e
0859 8405       |    |		Call	0x2,0x5
085a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
085b e403       |    |		Load	0x2,0x3								; Debug Table 0x1a.0x9 = 0x85b,0x4
085c 00eb       |    |		Load_Encached	Diana_Cache
085d 18e9       |    |		Execute	Package,Field_Execute,Field_Number 0xe9
085e a403       |    |		Store_Unchecked	0x2,0x3
085f 7863       |xc  |		Jump	0x8c3
0860 e403       |    |		Load	0x2,0x3								; Debug Table 0x1a.0xa = 0x860,0x5
0861 00eb       |    |		Load_Encached	Diana_Cache
0862 18b6       |    |		Execute	Package,Field_Execute,Field_Number 0xb6
0863 a403       |    |		Store_Unchecked	0x2,0x3
0864 785e       |x^  |		Jump	0x8c3
0865 e403       |    |		Load	0x2,0x3								; Debug Table 0x1a.0xb = 0x865,0x6
0866 00eb       |    |		Load_Encached	Diana_Cache
0867 18e1       |    |		Execute	Package,Field_Execute,Field_Number 0xe1
0868 a403       |    |		Store_Unchecked	0x2,0x3
0869 7859       |xY  |		Jump	0x8c3
086a e403       |    |		Load	0x2,0x3								; Debug Table 0x1a.0xc = 0x86a,0x7
086b 00eb       |    |		Load_Encached	Diana_Cache
086c 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
086d 00eb       |    |		Load_Encached	Diana_Cache
086e 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
086f a403       |    |		Store_Unchecked	0x2,0x3
0870 7852       |xR  |		Jump	0x8c3
0871 e403       |    |		Load	0x2,0x3								; Debug Table 0x1a.0xd = 0x871,0x8
0872 8406       |    |		Call	0x2,0x6
0873 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0874 0092 0aef  |    |		Action	Push_String_Extended,0xaef					; "prompt"
													; Debug Table 0x1a.0xe = 0x874,0x9
0876 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0877 e403       |    |		Load	0x2,0x3								; Debug Table 0x1a.0xf = 0x877,0xa
0878 4975       |Iu  |		Short_Literal	0x175
0879 00eb       |    |		Load_Encached	Diana_Cache
087a 0098       |    |		Execute	Package,Field_Read_Dynamic
087b 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
087c 00eb       |    |		Load_Encached	Diana_Cache
087d 185a       | Z  |		Execute	Package,Field_Execute,Field_Number 0x5a
087e 00eb       |    |		Load_Encached	Diana_Cache
087f 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
0880 a403       |    |		Store_Unchecked	0x2,0x3
0881 7841       |xA  |		Jump	0x8c3
0882 0092 0af0  |    |		Action	Push_String_Extended,0xaf0					; "loop"
													; Debug Table 0x1a.0x10 = 0x882,0xb
0884 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0885 0092 0af1  |    |		Action	Push_String_Extended,0xaf1					; "abort"
													; Debug Table 0x1a.0x11 = 0x885,0xc
0887 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0888 0092 0af2  |    |		Action	Push_String_Extended,0xaf2					; "accept"
													; Debug Table 0x1a.0x12 = 0x888,0xd
088a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
088b 0092 0af3  |    |		Action	Push_String_Extended,0xaf3					; "assignment"
													; Debug Table 0x1a.0x13 = 0x88b,0xe
088d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
088e 0092 0af4  |    |		Action	Push_String_Extended,0xaf4					; "case"
													; Debug Table 0x1a.0x14 = 0x88e,0xf
0890 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0891 0092 0af5  |    |		Action	Push_String_Extended,0xaf5					; "machine code"
													; Debug Table 0x1a.0x15 = 0x891,0x10
0893 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0894 0092 0af6  |    |		Action	Push_String_Extended,0xaf6					; "conditional entry call"
													; Debug Table 0x1a.0x16 = 0x894,0x11
0896 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0897 0092 0af7  |    |		Action	Push_String_Extended,0xaf7					; "delay"
													; Debug Table 0x1a.0x17 = 0x897,0x12
0899 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
089a 0092 0af8  |    |		Action	Push_String_Extended,0xaf8					; "exit"
													; Debug Table 0x1a.0x18 = 0x89a,0x13
089c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
089d 0092 0af9  |    |		Action	Push_String_Extended,0xaf9					; "goto"
													; Debug Table 0x1a.0x19 = 0x89d,0x14
089f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08a0 0092 0afa  |    |		Action	Push_String_Extended,0xafa					; "if"
													; Debug Table 0x1a.0x1a = 0x8a0,0x15
08a2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08a3 0092 0afb  |    |		Action	Push_String_Extended,0xafb					; "null"
													; Debug Table 0x1a.0x1b = 0x8a3,0x16
08a5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08a6 0092 0afc  |    |		Action	Push_String_Extended,0xafc					; "raise"
													; Debug Table 0x1a.0x1c = 0x8a6,0x17
08a8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08a9 0092 0afd  |    |		Action	Push_String_Extended,0xafd					; "return"
													; Debug Table 0x1a.0x1d = 0x8a9,0x18
08ab 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08ac 0092 0afe  |    |		Action	Push_String_Extended,0xafe					; "selective wait"
													; Debug Table 0x1a.0x1e = 0x8ac,0x19
08ae 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08af 0092 0aff  |    |		Action	Push_String_Extended,0xaff					; "terminate alternative"
													; Debug Table 0x1a.0x1f = 0x8af,0x1a
08b1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08b2 0092 0b00  |    |		Action	Push_String_Extended,0xb00					; "timed entry call"
													; Debug Table 0x1a.0x20 = 0x8b2,0x1b
08b4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08b5 e403       |    |		Load	0x2,0x3								; Debug Table 0x1a.0x21 = 0x8b5,0x1c
08b6 00eb       |    |		Load_Encached	Diana_Cache
08b7 18d0       |    |		Execute	Package,Field_Execute,Field_Number 0xd0
08b8 00eb       |    |		Load_Encached	Diana_Cache
08b9 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
08ba 00eb       |    |		Load_Encached	Diana_Cache
08bb 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
08bc 8405       |    |		Call	0x2,0x5
08bd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08be e403       |    |		Load	0x2,0x3								; Debug Table 0x1a.0x22 = 0x8be,0x1d
08bf 00eb       |    |		Load_Encached	Diana_Cache
08c0 18cf       |    |		Execute	Package,Field_Execute,Field_Number 0xcf
08c1 8405       |    |		Call	0x2,0x5
08c2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08c3 00d1       |    |		Pop_Control	Pop_Count_1
08c4 00c9       |    |		Action	Pop_Auxiliary_Loop
08c5 7f59       | Y  |		Jump	0x81f
08c6 0000 0000  |    |		.XXX[0x2]
08c8 0000 0000  |    |		.LITERAL	{0x00000000, 0x586f5501}
08cc 0000 0000  |    |		.BLANK	0000[0x4]
08d0 ; --------------------------------------------------------------------------------------
08d0 ; SUBPROGRAM
08d0 ; --------------------------------------------------------------------------------------
08d0 08d5       |    |		.CONST	0x08d5								; Address of begin
08d1 0004       |    |		.CONST	0x0004								; Address of exception handler
08d2 0002       |    |		.CONST	0x0002								; Number of locals
08d3			INIT_08d0:
08d3 e20d       |    |		Load	0x1,0xd								; Debug Table 0x1b = .DEBUG	0x08d3,0x110e,0x0001,0x0000,0x0058,0x6f55,0x0000,0x114f
													; Debug Table 0x1b.0x0 = 0x8d3,0xffff
08d4 0007       |    |		Action	Break_Optional
08d5			BODY_08d0:
08d5 e5f9       |    |		Load	0x2,-0x7							; Debug Table 0x1b.0x1 = 0x8d5,0x1
08d6 e20d       |    |		Load	0x1,0xd
08d7 e5fa       |    |		Load	0x2,-0x6
08d8 e5fb       |    |		Load	0x2,-0x5
08d9 e5fc       |    |		Load	0x2,-0x4
08da e5fd       |    |		Load	0x2,-0x3
08db e5fe       |    |		Load	0x2,-0x2
08dc e5ff       |    |		Load	0x2,-0x1
08dd 8211       |    |		Call	0x1,0x11
08de 005a       | Z  |		Store_Top	Discrete,At_Offset_2
08df c5f9       |    |		Store	0x2,-0x7
08e0 e5f9       |    |		Load	0x2,-0x7							; Debug Table 0x1b.0x2 = 0x8e0,0x2
08e1 8212       |    |		Call	0x1,0x12
08e2 6804       |h   |		Jump_Zero	0x8e7
08e3 e5f9       |    |		Load	0x2,-0x7							; Debug Table 0x1b.0x3 = 0x8e3,0x3
08e4 e002       |    |		Load	0x0,0x2
08e5 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
08e6 c5f9       |    |		Store	0x2,-0x7
08e7 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
08e8 ; --------------------------------------------------------------------------------------
08e8 ; SUBPROGRAM
08e8 ; --------------------------------------------------------------------------------------
08e8 08f3       |    |		.CONST	0x08f3								; Address of begin
08e9 0004       |    |		.CONST	0x0004								; Address of exception handler
08ea 0003       |    |		.CONST	0x0003								; Number of locals
08eb			INIT_08e8:
08eb e006       |    |		Load	0x0,0x6								; Debug Table 0x1c = .DEBUG	0x08eb,0x1118,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0d48
													; Debug Table 0x1c.0x0 = 0x8eb,0xffff
08ec 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
08ed 02ff       |    |		Declare_Variable	Variant_Record
08ee 00d8       |    |		Load_Top	At_Offset_0
08ef 1c00       |    |		Execute_Immediate	Run_Utility,0x0
08f0 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1c.0x1 = 0x8f0,0xfffe
08f1 e7ff       |    |		Load	0x3,-0x1
08f2 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
08f3			BODY_08e8:
08f3 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1c.0x2 = 0x8f3,0x1
08f4 e7fe       |    |		Load	0x3,-0x2
08f5 00da       |    |		Load_Top	At_Offset_2
08f6 e006       |    |		Load	0x0,0x6
08f7 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
08f8 00d1       |    |		Pop_Control	Pop_Count_1
08f9 e403       |    |		Load	0x2,0x3								; Debug Table 0x1c.0x3 = 0x8f9,0x2
08fa e223       | #  |		Load	0x1,0x23
08fb 00db       |    |		Load_Top	At_Offset_3
08fc 823d       | =  |		Call	0x1,0x3d
08fd c403       |    |		Store	0x2,0x3
08fe 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
08ff 0000       |    |		.XXX[0x1]
0900 ; --------------------------------------------------------------------------------------
0900 ; SUBPROGRAM
0900 ; --------------------------------------------------------------------------------------
0900 0903       |    |		.CONST	0x0903								; Address of begin
0901 0910       |    |		.CONST	0x0910								; Address of exception handler
0902 0001       |    |		.CONST	0x0001								; Number of locals
0903			BODY_0900:
0903			INIT_0900:
0903 e403       |    |		Load	0x2,0x3								; Debug Table 0x1d = .DEBUG	0x0903,0x1122,0x0004,0x0000,0x0058,0x6f55,0x0000,0x0da6
													; Debug Table 0x1d.0x0 = 0x903,0x1
0904 00ec       |    |		Load_Encached	Diana_Tree_Cache
0905 e5ff       |    |		Load	0x2,-0x1
0906 823b       | ;  |		Call	0x1,0x3b
0907 c402       |    |		Store	0x2,0x2
0908 c403       |    |		Store	0x2,0x3
0909 e403       |    |		Load	0x2,0x3								; Debug Table 0x1d.0x1 = 0x909,0x2
090a e402       |    |		Load	0x2,0x2
090b e5fe       |    |		Load	0x2,-0x2
090c 823c       | <  |		Call	0x1,0x3c
090d c402       |    |		Store	0x2,0x2
090e c403       |    |		Store	0x2,0x3
090f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0910			TRAP_0900:
0910 0007       |    |		Action	Break_Optional
0911 e404       |    |		Load	0x2,0x4								; Debug Table 0x1d.0x2 = 0x911,0x3
0912 e00b       |    |		Load	0x0,0xb
0913 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0914 e403       |    |		Load	0x2,0x3								; Debug Table 0x1d.0x3 = 0x914,0x4
0915 e405       |    |		Load	0x2,0x5
0916 8235       | 5  |		Call	0x1,0x35
0917 c403       |    |		Store	0x2,0x3
0918 00cc       |    |		Action	Pop_Block							; Debug Table 0x1d.0x4 = 0x918,0x5
0919 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
091a 0000 0000  |    |		.BLANK	0000[0x6]
0920 ; --------------------------------------------------------------------------------------
0920 ; SUBPROGRAM
0920 ; --------------------------------------------------------------------------------------
0920 0923       | #  |		.CONST	0x0923								; Address of begin
0921 0004       |    |		.CONST	0x0004								; Address of exception handler
0922 0001       |    |		.CONST	0x0001								; Number of locals
0923			BODY_0920:
0923			INIT_0920:
0923 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1e = .DEBUG	0x0923,0x112e,0x0001,0x0000,0x0058,0x6f55,0x0000,0x1006
													; Debug Table 0x1e.0x0 = 0x923,0x1
0924 01db       |    |		Execute	Vector,Length
0925 0c02       |    |		Execute_Immediate	Greater_Equal,0x2
0926 680e       |h   |		Jump_Zero	0x935
0927 00da       |    |		Load_Top	At_Offset_2
0928 01dd       |    |		Execute	Vector,First
0929 00db       |    |		Load_Top	At_Offset_3
092a 01dd       |    |		Execute	Vector,First
092b 0a01       |    |		Execute_Immediate	Plus,0x1
092c 0248       | H  |		Execute	Discrete,Check_In_Integer
092d e7ff       |    |		Load	0x3,-0x1
092e 01cf       |    |		Execute	Vector,Slice_Read
092f 0092 0b01  |    |		Action	Push_String_Extended,0xb01					; ">>"
0931 01df       |    |		Execute	Vector,Equal
0932 6802       |h   |		Jump_Zero	0x935
0933 4921       |I!  |		Short_Literal	0x121							; Debug Table 0x1e.0x1 = 0x933,0x2
0934 0257       | W  |		Execute	Discrete,Raise
0935 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0936 0000 0000  |    |		.XXX[0x2]
0938 ; --------------------------------------------------------------------------------------
0938 ; SUBPROGRAM
0938 ; --------------------------------------------------------------------------------------
0938 093b       | ;  |		.CONST	0x093b								; Address of begin
0939 0004       |    |		.CONST	0x0004								; Address of exception handler
093a 0001       |    |		.CONST	0x0001								; Number of locals
093b			BODY_0938:
093b			INIT_0938:
093b e5f3       |    |		Load	0x2,-0xd							; Debug Table 0x1f = .DEBUG	0x093b,0x1134,0x0801,0x0002,0x0058,0x6f55,0x0000,0x01bd
													; Debug Table 0x1f.0x0 = 0x93b,0x1
093c 4820       |H   |		Short_Literal	0x20
093d 4820       |H   |		Short_Literal	0x20
093e 4801       |H   |		Short_Literal	0x1
093f 48c8       |H   |		Short_Literal	0xc8
0940 e7ff       |    |		Load	0x3,-0x1
0941 e5f7       |    |		Load	0x2,-0x9
0942 0119       |    |		Execute	Any,Check_In_Formal_Type
0943 85fa       |    |		Call	0x2,-0x6
0944 e022       | "  |		Load	0x0,0x22
0945 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0946 01cb       |    |		Execute	Vector,Append
0947 e7ff       |    |		Load	0x3,-0x1
0948 e5f7       |    |		Load	0x2,-0x9
0949 0119       |    |		Execute	Any,Check_In_Formal_Type
094a 85fb       |    |		Call	0x2,-0x5
094b 01cc       |    |		Execute	Vector,Catenate
094c 01cb       |    |		Execute	Vector,Append
094d 4801       |H   |		Short_Literal	0x1
094e 48c8       |H   |		Short_Literal	0xc8
094f e7ff       |    |		Load	0x3,-0x1
0950 e5f7       |    |		Load	0x2,-0x9
0951 0119       |    |		Execute	Any,Check_In_Formal_Type
0952 85fc       |    |		Call	0x2,-0x4
0953 e022       | "  |		Load	0x0,0x22
0954 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0955 01cc       |    |		Execute	Vector,Catenate
0956 4802       |H   |		Short_Literal	0x2
0957 e7ff       |    |		Load	0x3,-0x1
0958 e5f7       |    |		Load	0x2,-0x9
0959 0119       |    |		Execute	Any,Check_In_Formal_Type
095a 85f9       |    |		Call	0x2,-0x7
095b e5f8       |    |		Load	0x2,-0x8
095c 0122       | "  |		Execute	Any,Make_Root_Type
095d 025e       | ^  |		Execute	Discrete,Convert
095e 1c01       |    |		Execute_Immediate	Run_Utility,0x1
095f 8218       |    |		Call	0x1,0x18
0960 e223       | #  |		Load	0x1,0x23
0961 e002       |    |		Load	0x0,0x2
0962 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0963 c5f3       |    |		Store	0x2,-0xd
0964 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0965 0000 0000  |    |		.XXX[0x3]
0967 0000       |    |
0968 ; --------------------------------------------------------------------------------------
0968 ; SUBPROGRAM
0968 ; --------------------------------------------------------------------------------------
0968 096d       | m  |		.CONST	0x096d								; Address of begin
0969 0994       |    |		.CONST	0x0994								; Address of exception handler
096a 0002       |    |		.CONST	0x0002								; Number of locals
096b			INIT_0968:
096b 029f 0a7b  |   {|		Declare_Subprogram	INIT_0a78,For_Call				; Debug Table 0x20 = .DEBUG	0x096b,0x1138,0x0002,0x0000,0x0058,0x6f55,0x0000,0x0451
096d			BODY_0968:
096d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x20.0x0 = 0x96d,0x1
096e e005       |    |		Load	0x0,0x5
096f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0970 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0971 460f       |F   |		Jump_Case	0x10
0972 780f       |x   |		Jump	0x982								; case 0x0
0973 781c       |x   |		Jump	0x990								; case 0x1
0974 7813       |x   |		Jump	0x988								; case 0x2
0975 7812       |x   |		Jump	0x988								; case 0x3
0976 7811       |x   |		Jump	0x988								; case 0x4
0977 7810       |x   |		Jump	0x988								; case 0x5
0978 7811       |x   |		Jump	0x98a								; case 0x6
0979 7816       |x   |		Jump	0x990								; case 0x7
097a 7815       |x   |		Jump	0x990								; case 0x8
097b 7814       |x   |		Jump	0x990								; case 0x9
097c 7813       |x   |		Jump	0x990								; case 0xa
097d 7812       |x   |		Jump	0x990								; case 0xb
097e 7811       |x   |		Jump	0x990								; case 0xc
097f 7810       |x   |		Jump	0x990								; case 0xd
0980 780f       |x   |		Jump	0x990								; case 0xe
0981 780e       |x   |		Jump	0x990								; case 0xf
0982 e221       | !  |		Load	0x1,0x21							; Debug Table 0x20.0x1 = 0x982,0x2
0983 e7ff       |    |		Load	0x3,-0x1
0984 01cc       |    |		Execute	Vector,Catenate
0985 e222       | "  |		Load	0x1,0x22
0986 01cc       |    |		Execute	Vector,Catenate
0987 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0988 8602       |    |		Call	0x3,0x2								; Debug Table 0x20.0x2 = 0x988,0x3
0989 7808       |x   |		Jump	0x992
098a e00e       |    |		Load	0x0,0xe								; Debug Table 0x20.0x3 = 0x98a,0x4
098b 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
098c 4803       |H   |		Short_Literal	0x3
098d e023       | #  |		Load	0x0,0x23
098e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
098f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0990 6737       |g7  |		Indirect_Literal	Discrete,0x8c8,{0x00000000, 0x586f5501}		; Debug Table 0x20.0x4 = 0x990,0x5
0991 0257       | W  |		Execute	Discrete,Raise
0992 4831       |H1  |		Short_Literal	0x31
0993 0257       | W  |		Execute	Discrete,Raise
0994			TRAP_0968:
0994 6733       |g3  |		Indirect_Literal	Discrete,0x8c8,{0x00000000, 0x586f5501}
0995 010f       |    |		Execute	Exception,Equal
0996 6810       |h   |		Jump_Zero	0x9a7
0997 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x20.0x5 = 0x997,0x6
0998 e5fd       |    |		Load	0x2,-0x3
0999 0120       |    |		Execute	Any,Is_Value
099a 6803       |h   |		Jump_Zero	0x99e
099b e024       | $  |		Load	0x0,0x24
099c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
099d 7801       |x   |		Jump	0x99f
099e e5fd       |    |		Load	0x2,-0x3
099f e00e       |    |		Load	0x0,0xe
09a0 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
09a1 e024       | $  |		Load	0x0,0x24
09a2 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
09a3 c5fd       |    |		Store	0x2,-0x3
09a4 c403       |    |		Store	0x2,0x3
09a5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x20.0x6 = 0x9a5,0x7
09a6 0101       |    |		Execute	Exception,Reraise
09a7 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x7 = 0x9a7,0x8
09a8 e002       |    |		Load	0x0,0x2
09a9 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
09aa c5fd       |    |		Store	0x2,-0x3
09ab e221       | !  |		Load	0x1,0x21							; Debug Table 0x20.0x8 = 0x9ab,0x9
09ac e7ff       |    |		Load	0x3,-0x1
09ad 01cc       |    |		Execute	Vector,Catenate
09ae e222       | "  |		Load	0x1,0x22
09af 01cc       |    |		Execute	Vector,Catenate
09b0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09b1 0000 0000  |    |		.BLANK	0000[0x7]
09b8 ; --------------------------------------------------------------------------------------
09b8 ; SUBPROGRAM
09b8 ; --------------------------------------------------------------------------------------
09b8 09bb       |    |		.CONST	0x09bb								; Address of begin
09b9 09c7       |    |		.CONST	0x09c7								; Address of exception handler
09ba 0001       |    |		.CONST	0x0001								; Number of locals
09bb			BODY_09b8:
09bb			INIT_09b8:
09bb e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x21 = .DEBUG	0x09bb,0x114c,0x0004,0x0000,0x0058,0x6f55,0x0000,0x0692
													; Debug Table 0x21.0x0 = 0x9bb,0x1
09bc e001       |    |		Load	0x0,0x1
09bd 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
09be e5fe       |    |		Load	0x2,-0x2
09bf e018       |    |		Load	0x0,0x18
09c0 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
09c1 e018       |    |		Load	0x0,0x18
09c2 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
09c3 823e       | >  |		Call	0x1,0x3e
09c4 c5fd       |    |		Store	0x2,-0x3
09c5 c5fc       |    |		Store	0x2,-0x4
09c6 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09c7			TRAP_09b8:
09c7 0007       |    |		Action	Break_Optional
09c8 e00e       |    |		Load	0x0,0xe								; Debug Table 0x21.0x1 = 0x9c8,0x2
09c9 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
09ca a5fd       |    |		Store_Unchecked	0x2,-0x3
09cb 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09cc 0000 0000  |    |		.BLANK	0000[0x4]
09d0 ; --------------------------------------------------------------------------------------
09d0 ; SUBPROGRAM
09d0 ; --------------------------------------------------------------------------------------
09d0 09d3       |    |		.CONST	0x09d3								; Address of begin
09d1 09da       |    |		.CONST	0x09da								; Address of exception handler
09d2 0001       |    |		.CONST	0x0001								; Number of locals
09d3			BODY_09d0:
09d3			INIT_09d0:
09d3 e021       | !  |		Load	0x0,0x21							; Debug Table 0x22 = .DEBUG	0x09d3,0x1152,0x0004,0x0000,0x0058,0x6f55,0x0000,0x06c3
													; Debug Table 0x22.0x0 = 0x9d3,0x1
09d4 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
09d5 e011       |    |		Load	0x0,0x11
09d6 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
09d7 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
09d8 a5fd       |    |		Store_Unchecked	0x2,-0x3
09d9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09da			TRAP_09d0:
09da 0007       |    |		Action	Break_Optional
09db e00e       |    |		Load	0x0,0xe								; Debug Table 0x22.0x1 = 0x9db,0x2
09dc 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
09dd a5fd       |    |		Store_Unchecked	0x2,-0x3
09de 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09df 0000       |    |		.XXX[0x1]
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 09e3       |    |		.CONST	0x09e3								; Address of begin
09e1 09ea       |    |		.CONST	0x09ea								; Address of exception handler
09e2 0001       |    |		.CONST	0x0001								; Number of locals
09e3			BODY_09e0:
09e3			INIT_09e0:
09e3 e021       | !  |		Load	0x0,0x21							; Debug Table 0x23 = .DEBUG	0x09e3,0x1158,0x0004,0x0000,0x0058,0x6f55,0x0000,0x06ea
													; Debug Table 0x23.0x0 = 0x9e3,0x1
09e4 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
09e5 e011       |    |		Load	0x0,0x11
09e6 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
09e7 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
09e8 a5fd       |    |		Store_Unchecked	0x2,-0x3
09e9 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09ea			TRAP_09e0:
09ea 0007       |    |		Action	Break_Optional
09eb e00e       |    |		Load	0x0,0xe								; Debug Table 0x23.0x1 = 0x9eb,0x2
09ec 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
09ed a5fd       |    |		Store_Unchecked	0x2,-0x3
09ee 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09ef 0000       |    |		.XXX[0x1]
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 09f5       |    |		.CONST	0x09f5								; Address of begin
09f1 0004       |    |		.CONST	0x0004								; Address of exception handler
09f2 0002       |    |		.CONST	0x0002								; Number of locals
09f3			INIT_09f0:
09f3 029f 0aab  |    |		Declare_Subprogram	INIT_0aa8,For_Call				; Debug Table 0x24 = .DEBUG	0x09f3,0x115e,0x0002,0x0000,0x0058,0x6f55,0x0000,0x07f7
09f5			BODY_09f0:
09f5 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x24.0x0 = 0x9f5,0x1
09f6 00eb       |    |		Load_Encached	Diana_Cache
09f7 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
09f8 0b12       |    |		Execute_Immediate	Case_Compare,0x12
09f9 7018       |p   |		Jump_Nonzero	0xa12
09fa 0b0b       |    |		Execute_Immediate	Case_Compare,0xb
09fb 7020       |p   |		Jump_Nonzero	0xa1c
09fc 0b14       |    |		Execute_Immediate	Case_Compare,0x14
09fd 701e       |p   |		Jump_Nonzero	0xa1c
09fe 0b15       |    |		Execute_Immediate	Case_Compare,0x15
09ff 701c       |p   |		Jump_Nonzero	0xa1c
0a00 0b17       |    |		Execute_Immediate	Case_Compare,0x17
0a01 7027       |p'  |		Jump_Nonzero	0xa29
0a02 0b16       |    |		Execute_Immediate	Case_Compare,0x16
0a03 7025       |p%  |		Jump_Nonzero	0xa29
0a04 0b18       |    |		Execute_Immediate	Case_Compare,0x18
0a05 7023       |p#  |		Jump_Nonzero	0xa29
0a06 0b59       | Y  |		Execute_Immediate	Case_Compare,0x59
0a07 7021       |p!  |		Jump_Nonzero	0xa29
0a08 0b27       | '  |		Execute_Immediate	Case_Compare,0x27
0a09 701f       |p   |		Jump_Nonzero	0xa29
0a0a e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x24.0x1 = 0xa0a,0x9
0a0b 00eb       |    |		Load_Encached	Diana_Cache
0a0c 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0a0d 00eb       |    |		Load_Encached	Diana_Cache
0a0e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0a0f 025e       | ^  |		Execute	Discrete,Convert
0a10 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0a11 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a12 e404       |    |		Load	0x2,0x4								; Debug Table 0x24.0x2 = 0xa12,0x2
0a13 0f01       |    |		Execute_Immediate	Equal,0x1
0a14 6805       |h   |		Jump_Zero	0xa1a
0a15 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x24.0x3 = 0xa15,0x3
0a16 00eb       |    |		Load_Encached	Diana_Cache
0a17 18c0       |    |		Execute	Package,Field_Execute,Field_Number 0xc0
0a18 8405       |    |		Call	0x2,0x5
0a19 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a1a 8602       |    |		Call	0x3,0x2								; Debug Table 0x24.0x4 = 0xa1a,0x4
0a1b 7816       |x   |		Jump	0xa32
0a1c e404       |    |		Load	0x2,0x4								; Debug Table 0x24.0x5 = 0xa1c,0x5
0a1d 0aff       |    |		Execute_Immediate	Plus,-0x1
0a1e c404       |    |		Store	0x2,0x4
0a1f 4822       |H"  |		Short_Literal	0x22							; Debug Table 0x24.0x6 = 0xa1f,0x6
0a20 4822       |H"  |		Short_Literal	0x22
0a21 e7ff       |    |		Load	0x3,-0x1
0a22 00eb       |    |		Load_Encached	Diana_Cache
0a23 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0a24 00eb       |    |		Load_Encached	Diana_Cache
0a25 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0a26 01ca       |    |		Execute	Vector,Prepend
0a27 01cb       |    |		Execute	Vector,Append
0a28 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a29 e404       |    |		Load	0x2,0x4								; Debug Table 0x24.0x7 = 0xa29,0x7
0a2a 0aff       |    |		Execute_Immediate	Plus,-0x1
0a2b c404       |    |		Store	0x2,0x4
0a2c e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x24.0x8 = 0xa2c,0x8
0a2d 00eb       |    |		Load_Encached	Diana_Cache
0a2e 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0a2f 00eb       |    |		Load_Encached	Diana_Cache
0a30 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0a31 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a32 00d1       |    |		Pop_Control	Pop_Count_1
0a33 4831       |H1  |		Short_Literal	0x31
0a34 0257       | W  |		Execute	Discrete,Raise
0a35 0000 0000  |    |		.XXX[0x3]
0a37 0000       |    |
0a38 ; --------------------------------------------------------------------------------------
0a38 ; SUBPROGRAM
0a38 ; --------------------------------------------------------------------------------------
0a38 0a40       | @  |		.CONST	0x0a40								; Address of begin
0a39 0004       |    |		.CONST	0x0004								; Address of exception handler
0a3a 0003       |    |		.CONST	0x0003								; Number of locals
0a3b			INIT_0a38:
0a3b 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x25 = .DEBUG	0x0a3b,0x1172,0x0002,0x0000,0x0058,0x6f55,0x0000,0x08af
													; Debug Table 0x25.0x0 = 0xa3b,0xffff
0a3c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x25.0x1 = 0xa3c,0xfffe
0a3d 00eb       |    |		Load_Encached	Diana_Cache
0a3e 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
0a3f 8405       |    |		Call	0x2,0x5
0a40			BODY_0a38:
0a40 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x25.0x2 = 0xa40,0x1
0a41 00eb       |    |		Load_Encached	Diana_Cache
0a42 18d9       |    |		Execute	Package,Field_Execute,Field_Number 0xd9
0a43 00eb       |    |		Load_Encached	Diana_Cache
0a44 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
0a45 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0a46 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x25.0x3 = 0xa46,0x2
0a47 00eb       |    |		Load_Encached	Diana_Cache
0a48 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
0a49 6802       |h   |		Jump_Zero	0xa4c
0a4a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x25.0x4 = 0xa4a,0x3
0a4b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a4c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x25.0x5 = 0xa4c,0x4
0a4d 4975       |Iu  |		Short_Literal	0x175
0a4e 00eb       |    |		Load_Encached	Diana_Cache
0a4f 0098       |    |		Execute	Package,Field_Read_Dynamic
0a50 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0a51 6810       |h   |		Jump_Zero	0xa62
0a52 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x25.0x6 = 0xa52,0x5
0a53 0092 0b02  |    |		Action	Push_String_Extended,0xb02					; "("
0a55 01cc       |    |		Execute	Vector,Catenate
0a56 4801       |H   |		Short_Literal	0x1
0a57 4814       |H   |		Short_Literal	0x14
0a58 e602       |    |		Load	0x3,0x2
0a59 00eb       |    |		Load_Encached	Diana_Cache
0a5a 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
0a5b e022       | "  |		Load	0x0,0x22
0a5c 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0a5d 01cc       |    |		Execute	Vector,Catenate
0a5e 0092 0b03  |    |		Action	Push_String_Extended,0xb03					; ")"
0a60 01cc       |    |		Execute	Vector,Catenate
0a61 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a62 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x25.0x7 = 0xa62,0x6
0a63 0092 0b02  |    |		Action	Push_String_Extended,0xb02					; "("
0a65 01cc       |    |		Execute	Vector,Catenate
0a66 4801       |H   |		Short_Literal	0x1
0a67 4814       |H   |		Short_Literal	0x14
0a68 e602       |    |		Load	0x3,0x2
0a69 00eb       |    |		Load_Encached	Diana_Cache
0a6a 1859       | Y  |		Execute	Package,Field_Execute,Field_Number 0x59
0a6b e022       | "  |		Load	0x0,0x22
0a6c 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0a6d 01cc       |    |		Execute	Vector,Catenate
0a6e 0092 0b04  |    |		Action	Push_String_Extended,0xb04					; ", ...)"
0a70 01cc       |    |		Execute	Vector,Catenate
0a71 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a72 0000 0000  |    |		.BLANK	0000[0x6]
0a78 ; --------------------------------------------------------------------------------------
0a78 ; SUBPROGRAM
0a78 ; --------------------------------------------------------------------------------------
0a78 0a80       |    |		.CONST	0x0a80								; Address of begin
0a79 0004       |    |		.CONST	0x0004								; Address of exception handler
0a7a 0003       |    |		.CONST	0x0003								; Number of locals
0a7b			INIT_0a78:
0a7b e005       |    |		Load	0x0,0x5								; Debug Table 0x26 = .DEBUG	0x0a7b,0x1184,0x0004,0x0000,0x0058,0x6f55,0x0000,0x04b8
													; Debug Table 0x26.0x0 = 0xa7b,0xffff
0a7c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0a7d e005       |    |		Load	0x0,0x5								; Debug Table 0x26.0x1 = 0xa7d,0xfffe
0a7e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a7f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0a80			BODY_0a78:
0a80 e005       |    |		Load	0x0,0x5								; Debug Table 0x26.0x2 = 0xa80,0x1
0a81 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a82 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0a83 e005       |    |		Load	0x0,0x5
0a84 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0a85 6036       |`6  |		Indirect_Literal	Discrete,0xabc,{0x00000000, 0x00004000}
0a86 e014       |    |		Load	0x0,0x14
0a87 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0a88 e00e       |    |		Load	0x0,0xe
0a89 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0a8a e005       |    |		Load	0x0,0x5
0a8b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a8c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0a8d e7ff       |    |		Load	0x3,-0x1
0a8e e005       |    |		Load	0x0,0x5
0a8f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a90 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0a91 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0a92 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0a93 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x26.0x3 = 0xa93,0x2
0a94 6802       |h   |		Jump_Zero	0xa97
0a95 6632       |f2  |		Indirect_Literal	Discrete,0x8c8,{0x00000000, 0x586f5501}		; Debug Table 0x26.0x4 = 0xa95,0x3
0a96 0257       | W  |		Execute	Discrete,Raise
0a97 483b       |H;  |		Short_Literal	0x3b							; Debug Table 0x26.0x5 = 0xa97,0x4
0a98 e221       | !  |		Load	0x1,0x21
0a99 00db       |    |		Load_Top	At_Offset_3
0a9a e005       |    |		Load	0x0,0x5
0a9b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0a9c 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
0a9d 01cc       |    |		Execute	Vector,Catenate
0a9e 01cb       |    |		Execute	Vector,Append
0a9f e222       | "  |		Load	0x1,0x22
0aa0 01cc       |    |		Execute	Vector,Catenate
0aa1 00cb       |    |		Action	Pop_Block_With_Result
0aa2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0aa3 0000 0000  |    |		.BLANK	0000[0x5]
0aa8 ; --------------------------------------------------------------------------------------
0aa8 ; SUBPROGRAM
0aa8 ; --------------------------------------------------------------------------------------
0aa8 0ab3       |    |		.CONST	0x0ab3								; Address of begin
0aa9 0004       |    |		.CONST	0x0004								; Address of exception handler
0aaa 0003       |    |		.CONST	0x0003								; Number of locals
0aab			INIT_0aa8:
0aab e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x27 = .DEBUG	0x0aab,0x1192,0x0004,0x0000,0x0058,0x6f55,0x0000,0x0846
													; Debug Table 0x27.0x0 = 0xaab,0xffff
0aac 00eb       |    |		Load_Encached	Diana_Cache
0aad 18c0       |    |		Execute	Package,Field_Execute,Field_Number 0xc0
0aae 8405       |    |		Call	0x2,0x5
0aaf e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x27.0x1 = 0xaaf,0xfffe
0ab0 00eb       |    |		Load_Encached	Diana_Cache
0ab1 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
0ab2 8405       |    |		Call	0x2,0x5
0ab3			BODY_0aa8:
0ab3 482e       |H.  |		Short_Literal	0x2e							; Debug Table 0x27.0x2 = 0xab3,0x1
0ab4 00d9       |    |		Load_Top	At_Offset_1
0ab5 01cb       |    |		Execute	Vector,Append
0ab6 00da       |    |		Load_Top	At_Offset_2
0ab7 01cc       |    |		Execute	Vector,Catenate
0ab8 00cb       |    |		Action	Pop_Block_With_Result
0ab9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0aba 0000 0000  |    |		.XXX[0x2]
0abc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0ac0 ; --------------------------------------------------------------------------------------
0ac0 ; STRING TABLE
0ac0 ; --------------------------------------------------------------------------------------
0ac0 008c       |    |		.STRTAB	0x008c->0x0b06							; "NIL"
0ac1 008d       |    |		.STRTAB	0x008d->0x0b07							; "NAME_DISPLAY"
0ac2 0097       |    |		.STRTAB	0x0097->0x0b0d							; "OUTPUT"
0ac3 009b       |    |		.STRTAB	0x009b->0x0b10							; "INPUT"
0ac4 009e       |    |		.STRTAB	0x009e->0x0b13							; "ERROR"
0ac5 00a1       |    |		.STRTAB	0x00a1->0x0b15							; "USER"
0ac6 00a3       |    |		.STRTAB	0x00a3->0x0b17							; "SESSION"
0ac7 00a8       |    |		.STRTAB	0x00a8->0x0b1b							; "PASSWORD"
0ac8 00ae       |    |		.STRTAB	0x00ae->0x0b1f							; "NONE"
0ac9 00b0       |    |		.STRTAB	0x00b0->0x0b21							; "PRIVILEGED"
0aca 00b8       |    |		.STRTAB	0x00b8->0x0b26							; "PRESERVE_PRIVILEGE"
0acb 00c8       |    |		.STRTAB	0x00c8->0x0b2f							; "RESTORE_IDENTITY"
0acc 00d6       |    |		.STRTAB	0x00d6->0x0b37							; "Invalid User Identity"
0acd 00e9       |    |		.STRTAB	0x00e9->0x0b41							; "Option Error"
0ace 00f3       |    |		.STRTAB	0x00f3->0x0b47							; "Invalid Option String"
0acf 0106       |    |		.STRTAB	0x0106->0x0b52							; "Access Violation"
0ad0 0114       |    |		.STRTAB	0x0114->0x0b5a							; "Invalid Program"
0ad1 0121       | !  |		.STRTAB	0x0121->0x0b61							; "Unexpected Exception"
0ad2 0133       | 3  |		.STRTAB	0x0133->0x0b6b							; "procedure Created_For_Program_Run is begin \x0a"
0ad3 015d       | ]  |		.STRTAB	0x015d->0x0b81							; "\x0a end;"
0ad4 0161       | a  |		.STRTAB	0x0161->0x0b84							; "Program"
0ad5 0166       | f  |		.STRTAB	0x0166->0x0b88							; "Change_Identity"
0ad6 0173       | s  |		.STRTAB	0x0173->0x0b8f							; "Output..Session => Directory_String_Name"
0ad7 0199       |    |		.STRTAB	0x0199->0x0ba3							; "Privileged..Restore_Identity => Boolean_Valued"
0ad8 01c5       |    |		.STRTAB	0x01c5->0x0bba							; "Create_Job"
0ad9 01cd       |    |		.STRTAB	0x01cd->0x0bbf							; ": can't specify both user and Restore_Identity"
0ada 01f9       |    |		.STRTAB	0x01f9->0x0bd6							; ": can't run in privileged mode from unprivileged user id"
0adb 022f       | /  |		.STRTAB	0x022f->0x0bf2							; ": attempt to enable privileged mode"
0adc 0250       | P  |		.STRTAB	0x0250->0x0c04							; "<A"
0add 0250       | P  |		.STRTAB	0x0250->0x0c05							; "`."
0ade 0250       | P  |		.STRTAB	0x0250->0x0c06							; "\x22."
0adf 0250       | P  |		.STRTAB	0x0250->0x0c07							; "*SYSTEM"
0ae0 0255       | U  |		.STRTAB	0x0255->0x0c0a							; "$"
0ae1 0254       | T  |		.STRTAB	0x0254->0x0c0b							; "!Machine.Error_Logs"
0ae2 0265       | e  |		.STRTAB	0x0265->0x0c14							; " could not be resovled"
0ae3 0279       | y  |		.STRTAB	0x0279->0x0c1f							; "Get Context failed"
0ae4 0289       |    |		.STRTAB	0x0289->0x0c28							; "Get Root Failed"
0ae5 0296       |    |		.STRTAB	0x0296->0x0c30							; "Severe parser error"
0ae6 02a7       |    |		.STRTAB	0x02a7->0x0c39							; "Cannot set context to "
0ae7 02bb       |    |		.STRTAB	0x02bb->0x0c44							; "Semantics"
0ae8 02c2       |    |		.STRTAB	0x02c2->0x0c49							; "Unhandled exception in Semantics"
0ae9 02e0       |    |		.STRTAB	0x02e0->0x0c59							; "Unable to run program"
0aea 02f3       |    |		.STRTAB	0x02f3->0x0c63							; "network_public"
0aeb 02ff       |    |		.STRTAB	0x02ff->0x0c6a							; "public"
0aec 0303       |    |		.STRTAB	0x0303->0x0c6d							; "!users."
0aed 0308       |    |		.STRTAB	0x0308->0x0c71							; "."
0aee 0307       |    |		.STRTAB	0x0307->0x0c71							; "Context problem"
0aef 0314       |    |		.STRTAB	0x0314->0x0c79							; "prompt"
0af0 0318       |    |		.STRTAB	0x0318->0x0c7c							; "loop"
0af1 031a       |    |		.STRTAB	0x031a->0x0c7e							; "abort"
0af2 031d       |    |		.STRTAB	0x031d->0x0c80							; "accept"
0af3 0321       | !  |		.STRTAB	0x0321->0x0c83							; "assignment"
0af4 0329       | )  |		.STRTAB	0x0329->0x0c88							; "case"
0af5 032b       | +  |		.STRTAB	0x032b->0x0c8a							; "machine code"
0af6 0335       | 5  |		.STRTAB	0x0335->0x0c90							; "conditional entry call"
0af7 0349       | I  |		.STRTAB	0x0349->0x0c9b							; "delay"
0af8 034c       | L  |		.STRTAB	0x034c->0x0c9e							; "exit"
0af9 034e       | N  |		.STRTAB	0x034e->0x0ca0							; "goto"
0afa 0350       | P  |		.STRTAB	0x0350->0x0ca2							; "if"
0afb 0350       | P  |		.STRTAB	0x0350->0x0ca3							; "null"
0afc 0352       | R  |		.STRTAB	0x0352->0x0ca5							; "raise"
0afd 0355       | U  |		.STRTAB	0x0355->0x0ca7							; "return"
0afe 0359       | Y  |		.STRTAB	0x0359->0x0caa							; "selective wait"
0aff 0365       | e  |		.STRTAB	0x0365->0x0cb1							; "terminate alternative"
0b00 0378       | x  |		.STRTAB	0x0378->0x0cbc							; "timed entry call"
0b01 0386       |    |		.STRTAB	0x0386->0x0cc4							; ">>"
0b02 0386       |    |		.STRTAB	0x0386->0x0cc5							; "("
0b03 0385       |    |		.STRTAB	0x0385->0x0cc5							; ")"
0b04 0384       |    |		.STRTAB	0x0384->0x0cc6							; ", ...)"
0b05 0388       |    |		.STREND 0x0388->0x0cc9
0b06 4e49 4c4e  |NILN|		.STRTAB_STRINGS
0cc9 0000 0000  |    |		.BLANK	0000[0x7]
0cd0 ; --------------------------------------------------------------------------------------
0cd0 ; Debug Table
0cd0 ; --------------------------------------------------------------------------------------
0cd0 0003 0028  |   (|		.CONST	0x0003,0x0028
0cd2 000b 0e12  |    |		.DEBUG	0x000b,0x0e12,0x8000,0x0000,0x0057,0xb0d5,0x0000,0x0007
0cda 0021 0e2a  | ! *|		.DEBUG	0x0021,0x0e2a,0x8000,0x0000,0x0058,0x6f55,0x0000,0x0049
0ce2 00fb 0e98  |    |		.DEBUG	0x00fb,0x0e98,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0014
0cea 0133 0eb2  | 3  |		.DEBUG	0x0133,0x0eb2,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0027
0cf2 016b 0ec6  | k  |		.DEBUG	0x016b,0x0ec6,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0049
0cfa 028b 0f1c  |    |		.DEBUG	0x028b,0x0f1c,0x0002,0x0000,0x0057,0xb0d5,0x0000,0x0073
0d02 029b 0f20  |    |		.DEBUG	0x029b,0x0f20,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x007c
0d0a 02b3 0f2e  |   .|		.DEBUG	0x02b3,0x0f2e,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0084
0d12 03d3 0f94  |    |		.DEBUG	0x03d3,0x0f94,0x0002,0x0000,0x0057,0xb0d5,0x0000,0x009b
0d1a 04cb 0fdc  |    |		.DEBUG	0x04cb,0x0fdc,0x0005,0x0000,0x0058,0x6f55,0x0000,0x010f
0d22 04e3 0fde  |    |		.DEBUG	0x04e3,0x0fde,0x0005,0x0000,0x0058,0x6f55,0x0000,0x012f
0d2a 04fb 0fe0  |    |		.DEBUG	0x04fb,0x0fe0,0x0005,0x0000,0x0058,0x6f55,0x0000,0x013b
0d32 0513 0fe2  |    |		.DEBUG	0x0513,0x0fe2,0x2801,0x0002,0x0058,0x6f55,0x0000,0x0143
0d3a 053b 0ff2  | ;  |		.DEBUG	0x053b,0x0ff2,0x0002,0x0000,0x0058,0x6f55,0x0000,0x025a
0d42 054b 0ff6  | K  |		.DEBUG	0x054b,0x0ff6,0x0001,0x0000,0x0058,0x6f55,0x0000,0x026b
0d4a 0573 1004  | s  |		.DEBUG	0x0573,0x1004,0x0002,0x0000,0x0058,0x6f55,0x0000,0x02b8
0d52 057b 1008  | {  |		.DEBUG	0x057b,0x1008,0x0001,0x0000,0x0058,0x6f55,0x0000,0x02d0
0d5a 0593 1010  |    |		.DEBUG	0x0593,0x1010,0x0001,0x0000,0x0058,0x6f55,0x0000,0x030a
0d62 05eb 1026  |   &|		.DEBUG	0x05eb,0x1026,0x0001,0x0000,0x0058,0x6f55,0x0000,0x037f
0d6a 0643 103c  | C <|		.DEBUG	0x0643,0x103c,0x0001,0x0000,0x0058,0x6f55,0x0000,0x03f6
0d72 0673 1048  | s H|		.DEBUG	0x0673,0x1048,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0434
0d7a 06a3 1058  |   X|		.DEBUG	0x06a3,0x1058,0x0001,0x0000,0x0058,0x6f55,0x0000,0x052c
0d82 0723 107a  | # z|		.DEBUG	0x0723,0x107a,0x0001,0x0000,0x0058,0x6f55,0x0000,0x05dd
0d8a 0753 1084  | S  |		.DEBUG	0x0753,0x1084,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0641
0d92 07b3 10a6  |    |		.DEBUG	0x07b3,0x10a6,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0742
0d9a 07d3 10b0  |    |		.DEBUG	0x07d3,0x10b0,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0774
0da2 0813 10c6  |    |		.DEBUG	0x0813,0x10c6,0x0002,0x0000,0x0058,0x6f55,0x0000,0x07db
0daa 08d3 110e  |    |		.DEBUG	0x08d3,0x110e,0x0001,0x0000,0x0058,0x6f55,0x0000,0x114f
0db2 08eb 1118  |    |		.DEBUG	0x08eb,0x1118,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0d48
0dba 0903 1122  |   "|		.DEBUG	0x0903,0x1122,0x0004,0x0000,0x0058,0x6f55,0x0000,0x0da6
0dc2 0923 112e  | # .|		.DEBUG	0x0923,0x112e,0x0001,0x0000,0x0058,0x6f55,0x0000,0x1006
0dca 093b 1134  | ; 4|		.DEBUG	0x093b,0x1134,0x0801,0x0002,0x0058,0x6f55,0x0000,0x01bd
0dd2 096b 1138  | k 8|		.DEBUG	0x096b,0x1138,0x0002,0x0000,0x0058,0x6f55,0x0000,0x0451
0dda 09bb 114c  |   L|		.DEBUG	0x09bb,0x114c,0x0004,0x0000,0x0058,0x6f55,0x0000,0x0692
0de2 09d3 1152  |   R|		.DEBUG	0x09d3,0x1152,0x0004,0x0000,0x0058,0x6f55,0x0000,0x06c3
0dea 09e3 1158  |   X|		.DEBUG	0x09e3,0x1158,0x0004,0x0000,0x0058,0x6f55,0x0000,0x06ea
0df2 09f3 115e  |   ^|		.DEBUG	0x09f3,0x115e,0x0002,0x0000,0x0058,0x6f55,0x0000,0x07f7
0dfa 0a3b 1172  | ; r|		.DEBUG	0x0a3b,0x1172,0x0002,0x0000,0x0058,0x6f55,0x0000,0x08af
0e02 0a7b 1184  | {  |		.DEBUG	0x0a7b,0x1184,0x0004,0x0000,0x0058,0x6f55,0x0000,0x04b8
0e0a 0aab 1192  |    |		.DEBUG	0x0aab,0x1192,0x0004,0x0000,0x0058,0x6f55,0x0000,0x0846
0e12 ; --------------------------------------------------------------------------------------
0e12 ; Debug3 Subtable 0x0
0e12 ; --------------------------------------------------------------------------------------
0e12 000b 0000  |    |		.DBG3TAB	0x000b,0x0000
0e14 000b ffff  |    |		.CONST	0x000b,0xffff
0e16 000e fffe  |    |		.CONST	0x000e,0xfffe
0e18 0011 fffd  |    |		.CONST	0x0011,0xfffd
0e1a 0013 fffc  |    |		.CONST	0x0013,0xfffc
0e1c 0015 fffb  |    |		.CONST	0x0015,0xfffb
0e1e 0017 fffa  |    |		.CONST	0x0017,0xfffa
0e20 0019 fff9  |    |		.CONST	0x0019,0xfff9
0e22 001b fff8  |    |		.CONST	0x001b,0xfff8
0e24 001d fff7  |    |		.CONST	0x001d,0xfff7
0e26 001f fff6  |    |		.CONST	0x001f,0xfff6
0e28 0020 fff5  |    |		.CONST	0x0020,0xfff5
0e2a ; --------------------------------------------------------------------------------------
0e2a ; Debug3 Subtable 0x1
0e2a ; --------------------------------------------------------------------------------------
0e2a 0036 0000  | 6  |		.DBG3TAB	0x0036,0x0000
0e2c 0021 ffff  | !  |		.CONST	0x0021,0xffff
0e2e 0022 fffe  | "  |		.CONST	0x0022,0xfffe
0e30 0023 fffd  | #  |		.CONST	0x0023,0xfffd
0e32 0024 fffc  | $  |		.CONST	0x0024,0xfffc
0e34 0025 fffb  | %  |		.CONST	0x0025,0xfffb
0e36 0026 fffa  | &  |		.CONST	0x0026,0xfffa
0e38 0027 fff9  | '  |		.CONST	0x0027,0xfff9
0e3a 0028 fff8  | (  |		.CONST	0x0028,0xfff8
0e3c 002a fff7  | *  |		.CONST	0x002a,0xfff7
0e3e 002c fff6  | ,  |		.CONST	0x002c,0xfff6
0e40 002f fff5  | /  |		.CONST	0x002f,0xfff5
0e42 0036 fff4  | 6  |		.CONST	0x0036,0xfff4
0e44 003d fff3  | =  |		.CONST	0x003d,0xfff3
0e46 0044 fff2  | D  |		.CONST	0x0044,0xfff2
0e48 004b fff1  | K  |		.CONST	0x004b,0xfff1
0e4a 0052 fff0  | R  |		.CONST	0x0052,0xfff0
0e4c 0059 ffef  | Y  |		.CONST	0x0059,0xffef
0e4e 005b ffee  | [  |		.CONST	0x005b,0xffee
0e50 005e ffed  | ^  |		.CONST	0x005e,0xffed
0e52 0060 ffec  | `  |		.CONST	0x0060,0xffec
0e54 0062 ffeb  | b  |		.CONST	0x0062,0xffeb
0e56 0064 ffea  | d  |		.CONST	0x0064,0xffea
0e58 0066 ffe9  | f  |		.CONST	0x0066,0xffe9
0e5a 0072 ffe8  | r  |		.CONST	0x0072,0xffe8
0e5c 0077 ffe7  | w  |		.CONST	0x0077,0xffe7
0e5e 007c ffe6  | |  |		.CONST	0x007c,0xffe6
0e60 007e ffe5  | ~  |		.CONST	0x007e,0xffe5
0e62 0080 ffe4  |    |		.CONST	0x0080,0xffe4
0e64 0096 ffe3  |    |		.CONST	0x0096,0xffe3
0e66 0098 ffe2  |    |		.CONST	0x0098,0xffe2
0e68 009a ffe1  |    |		.CONST	0x009a,0xffe1
0e6a 009c ffe0  |    |		.CONST	0x009c,0xffe0
0e6c 009e ffdf  |    |		.CONST	0x009e,0xffdf
0e6e 00a0 ffde  |    |		.CONST	0x00a0,0xffde
0e70 00a2 ffdd  |    |		.CONST	0x00a2,0xffdd
0e72 00a4 ffdc  |    |		.CONST	0x00a4,0xffdc
0e74 00a6 ffdb  |    |		.CONST	0x00a6,0xffdb
0e76 00a8 ffda  |    |		.CONST	0x00a8,0xffda
0e78 00aa ffd9  |    |		.CONST	0x00aa,0xffd9
0e7a 00ac ffd8  |    |		.CONST	0x00ac,0xffd8
0e7c 00bc ffd7  |    |		.CONST	0x00bc,0xffd7
0e7e 00be ffd6  |    |		.CONST	0x00be,0xffd6
0e80 00c0 ffd5  |    |		.CONST	0x00c0,0xffd5
0e82 00c9 ffd4  |    |		.CONST	0x00c9,0xffd4
0e84 00cb ffd3  |    |		.CONST	0x00cb,0xffd3
0e86 00cd ffd2  |    |		.CONST	0x00cd,0xffd2
0e88 00cf ffd1  |    |		.CONST	0x00cf,0xffd1
0e8a 00d1 ffd0  |    |		.CONST	0x00d1,0xffd0
0e8c 00d3 ffcf  |    |		.CONST	0x00d3,0xffcf
0e8e 00e3 ffce  |    |		.CONST	0x00e3,0xffce
0e90 00e5 ffcd  |    |		.CONST	0x00e5,0xffcd
0e92 00e7 ffcc  |    |		.CONST	0x00e7,0xffcc
0e94 00e9 ffcb  |    |		.CONST	0x00e9,0xffcb
0e96 00eb ffca  |    |		.CONST	0x00eb,0xffca
0e98 ; --------------------------------------------------------------------------------------
0e98 ; Debug3 Subtable 0x2
0e98 ; --------------------------------------------------------------------------------------
0e98 0005 0007  |    |		.DBG3TAB	0x0005,0x0007
0e9a 00fb ffff  |    |		.CONST	0x00fb,0xffff
0e9c 00fc fffe  |    |		.CONST	0x00fc,0xfffe
0e9e 0100 fffd  |    |		.CONST	0x0100,0xfffd
0ea0 0105 fffc  |    |		.CONST	0x0105,0xfffc
0ea2 010a fffb  |    |		.CONST	0x010a,0xfffb
0ea4 010e 0001  |    |		.CONST	0x010e,0x0001
0ea6 011b 0002  |    |		.CONST	0x011b,0x0002
0ea8 011e 0003  |    |		.CONST	0x011e,0x0003
0eaa 011f 0004  |    |		.CONST	0x011f,0x0004
0eac 0124 0005  | $  |		.CONST	0x0124,0x0005
0eae 0127 0006  | '  |		.CONST	0x0127,0x0006
0eb0 012a 0007  | *  |		.CONST	0x012a,0x0007
0eb2 ; --------------------------------------------------------------------------------------
0eb2 ; Debug3 Subtable 0x3
0eb2 ; --------------------------------------------------------------------------------------
0eb2 0002 0007  |    |		.DBG3TAB	0x0002,0x0007
0eb4 0133 ffff  | 3  |		.CONST	0x0133,0xffff
0eb6 0135 fffe  | 5  |		.CONST	0x0135,0xfffe
0eb8 0139 0001  | 9  |		.CONST	0x0139,0x0001
0eba 0144 0002  | D  |		.CONST	0x0144,0x0002
0ebc 0149 0003  | I  |		.CONST	0x0149,0x0003
0ebe 014d 0004  | M  |		.CONST	0x014d,0x0004
0ec0 0152 0005  | R  |		.CONST	0x0152,0x0005
0ec2 0157 0006  | W  |		.CONST	0x0157,0x0006
0ec4 015f 0007  | _  |		.CONST	0x015f,0x0007
0ec6 ; --------------------------------------------------------------------------------------
0ec6 ; Debug3 Subtable 0x4
0ec6 ; --------------------------------------------------------------------------------------
0ec6 000d 001d  |    |		.DBG3TAB	0x000d,0x001d
0ec8 016b ffff  | k  |		.CONST	0x016b,0xffff
0eca 016c fffe  | l  |		.CONST	0x016c,0xfffe
0ecc 0170 fffd  | p  |		.CONST	0x0170,0xfffd
0ece 0176 fffc  | v  |		.CONST	0x0176,0xfffc
0ed0 017b fffb  | {  |		.CONST	0x017b,0xfffb
0ed2 0180 fffa  |    |		.CONST	0x0180,0xfffa
0ed4 0185 fff9  |    |		.CONST	0x0185,0xfff9
0ed6 018a fff8  |    |		.CONST	0x018a,0xfff8
0ed8 018f fff7  |    |		.CONST	0x018f,0xfff7
0eda 0194 fff6  |    |		.CONST	0x0194,0xfff6
0edc 0199 fff5  |    |		.CONST	0x0199,0xfff5
0ede 019e fff4  |    |		.CONST	0x019e,0xfff4
0ee0 01a0 fff3  |    |		.CONST	0x01a0,0xfff3
0ee2 01a5 0001  |    |		.CONST	0x01a5,0x0001
0ee4 01a9 0002  |    |		.CONST	0x01a9,0x0002
0ee6 01ab 0003  |    |		.CONST	0x01ab,0x0003
0ee8 01b8 0004  |    |		.CONST	0x01b8,0x0004
0eea 01be 0006  |    |		.CONST	0x01be,0x0006
0eec 01c3 0007  |    |		.CONST	0x01c3,0x0007
0eee 01ce 0008  |    |		.CONST	0x01ce,0x0008
0ef0 01d3 0005  |    |		.CONST	0x01d3,0x0005
0ef2 01d8 0009  |    |		.CONST	0x01d8,0x0009
0ef4 01de 000a  |    |		.CONST	0x01de,0x000a
0ef6 01e4 000b  |    |		.CONST	0x01e4,0x000b
0ef8 01e9 000c  |    |		.CONST	0x01e9,0x000c
0efa 01fa 000d  |    |		.CONST	0x01fa,0x000d
0efc 01ff 000e  |    |		.CONST	0x01ff,0x000e
0efe 0204 000f  |    |		.CONST	0x0204,0x000f
0f00 020d 0010  |    |		.CONST	0x020d,0x0010
0f02 0210 0011  |    |		.CONST	0x0210,0x0011
0f04 0218 0012  |    |		.CONST	0x0218,0x0012
0f06 021d 0013  |    |		.CONST	0x021d,0x0013
0f08 0221 0014  | !  |		.CONST	0x0221,0x0014
0f0a 0224 0015  | $  |		.CONST	0x0224,0x0015
0f0c 022c 0016  | ,  |		.CONST	0x022c,0x0016
0f0e 0237 0017  | 7  |		.CONST	0x0237,0x0017
0f10 0238 0018  | 8  |		.CONST	0x0238,0x0018
0f12 023b 0019  | ;  |		.CONST	0x023b,0x0019
0f14 0252 001a  | R  |		.CONST	0x0252,0x001a
0f16 026a 001b  | j  |		.CONST	0x026a,0x001b
0f18 0275 001c  | u  |		.CONST	0x0275,0x001c
0f1a 027d 001d  | }  |		.CONST	0x027d,0x001d
0f1c ; --------------------------------------------------------------------------------------
0f1c ; Debug3 Subtable 0x5
0f1c ; --------------------------------------------------------------------------------------
0f1c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0f1e 028b 0001  |    |		.CONST	0x028b,0x0001
0f20 ; --------------------------------------------------------------------------------------
0f20 ; Debug3 Subtable 0x6
0f20 ; --------------------------------------------------------------------------------------
0f20 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
0f22 029b ffff  |    |		.CONST	0x029b,0xffff
0f24 029d 0001  |    |		.CONST	0x029d,0x0001
0f26 02a1 0002  |    |		.CONST	0x02a1,0x0002
0f28 02a3 0003  |    |		.CONST	0x02a3,0x0003
0f2a 02a6 0002  |    |		.CONST	0x02a6,0x0002
0f2c 02ac 0004  |    |		.CONST	0x02ac,0x0004
0f2e ; --------------------------------------------------------------------------------------
0f2e ; Debug3 Subtable 0x7
0f2e ; --------------------------------------------------------------------------------------
0f2e 0008 002a  |   *|		.DBG3TAB	0x0008,0x002a
0f30 02b3 ffff  |    |		.CONST	0x02b3,0xffff
0f32 02b8 fffe  |    |		.CONST	0x02b8,0xfffe
0f34 02bb fffd  |    |		.CONST	0x02bb,0xfffd
0f36 02bd fffc  |    |		.CONST	0x02bd,0xfffc
0f38 02bf fffb  |    |		.CONST	0x02bf,0xfffb
0f3a 02c1 fffa  |    |		.CONST	0x02c1,0xfffa
0f3c 02c3 fff9  |    |		.CONST	0x02c3,0xfff9
0f3e 02c5 fff8  |    |		.CONST	0x02c5,0xfff8
0f40 02c6 0001  |    |		.CONST	0x02c6,0x0001
0f42 02ce 0002  |    |		.CONST	0x02ce,0x0002
0f44 02d0 0003  |    |		.CONST	0x02d0,0x0003
0f46 02da 0004  |    |		.CONST	0x02da,0x0004
0f48 02dd 0006  |    |		.CONST	0x02dd,0x0006
0f4a 02e2 0007  |    |		.CONST	0x02e2,0x0007
0f4c 02ec 0008  |    |		.CONST	0x02ec,0x0008
0f4e 02ed 0009  |    |		.CONST	0x02ed,0x0009
0f50 02f5 000b  |    |		.CONST	0x02f5,0x000b
0f52 02fb 000c  |    |		.CONST	0x02fb,0x000c
0f54 02fe 000d  |    |		.CONST	0x02fe,0x000d
0f56 0305 000e  |    |		.CONST	0x0305,0x000e
0f58 030b 000f  |    |		.CONST	0x030b,0x000f
0f5a 0310 0005  |    |		.CONST	0x0310,0x0005
0f5c 0315 0010  |    |		.CONST	0x0315,0x0010
0f5e 031a 0011  |    |		.CONST	0x031a,0x0011
0f60 031d 0012  |    |		.CONST	0x031d,0x0012
0f62 031f 0013  |    |		.CONST	0x031f,0x0013
0f64 0327 0014  | '  |		.CONST	0x0327,0x0014
0f66 0328 0015  | (  |		.CONST	0x0328,0x0015
0f68 0334 0016  | 4  |		.CONST	0x0334,0x0016
0f6a 0339 0017  | 9  |		.CONST	0x0339,0x0017
0f6c 033c 0018  | <  |		.CONST	0x033c,0x0018
0f6e 0340 0019  | @  |		.CONST	0x0340,0x0019
0f70 0341 001a  | A  |		.CONST	0x0341,0x001a
0f72 034b 001b  | K  |		.CONST	0x034b,0x001b
0f74 0358 001c  | X  |		.CONST	0x0358,0x001c
0f76 035d 001d  | ]  |		.CONST	0x035d,0x001d
0f78 035e 001e  | ^  |		.CONST	0x035e,0x001e
0f7a 0364 001f  | d  |		.CONST	0x0364,0x001f
0f7c 036d 0020  | m  |		.CONST	0x036d,0x0020
0f7e 0373 0021  | s !|		.CONST	0x0373,0x0021
0f80 0375 0022  | u "|		.CONST	0x0375,0x0022
0f82 037b 0023  | { #|		.CONST	0x037b,0x0023
0f84 037d 0024  | } $|		.CONST	0x037d,0x0024
0f86 037f 0025  |   %|		.CONST	0x037f,0x0025
0f88 0386 0026  |   &|		.CONST	0x0386,0x0026
0f8a 038b 0027  |   '|		.CONST	0x038b,0x0027
0f8c 0390 0028  |   (|		.CONST	0x0390,0x0028
0f8e 0399 0029  |   )|		.CONST	0x0399,0x0029
0f90 039e 002a  |   *|		.CONST	0x039e,0x002a
0f92 03a3 002b  |   +|		.CONST	0x03a3,0x002b
0f94 ; --------------------------------------------------------------------------------------
0f94 ; Debug3 Subtable 0x8
0f94 ; --------------------------------------------------------------------------------------
0f94 0009 001a  |    |		.DBG3TAB	0x0009,0x001a
0f96 03d3 ffff  |    |		.CONST	0x03d3,0xffff
0f98 03d4 fffe  |    |		.CONST	0x03d4,0xfffe
0f9a 03d9 fffd  |    |		.CONST	0x03d9,0xfffd
0f9c 03de fffc  |    |		.CONST	0x03de,0xfffc
0f9e 03e0 fffb  |    |		.CONST	0x03e0,0xfffb
0fa0 03e5 fffa  |    |		.CONST	0x03e5,0xfffa
0fa2 03ea fff9  |    |		.CONST	0x03ea,0xfff9
0fa4 03ec fff8  |    |		.CONST	0x03ec,0xfff8
0fa6 03ef fff7  |    |		.CONST	0x03ef,0xfff7
0fa8 03f2 0001  |    |		.CONST	0x03f2,0x0001
0faa 03f4 0002  |    |		.CONST	0x03f4,0x0002
0fac 03f6 0003  |    |		.CONST	0x03f6,0x0003
0fae 0408 0004  |    |		.CONST	0x0408,0x0004
0fb0 040c 0005  |    |		.CONST	0x040c,0x0005
0fb2 0424 0006  | $  |		.CONST	0x0424,0x0006
0fb4 0426 0007  | &  |		.CONST	0x0426,0x0007
0fb6 0428 0008  | (  |		.CONST	0x0428,0x0008
0fb8 0434 0009  | 4  |		.CONST	0x0434,0x0009
0fba 0436 000a  | 6  |		.CONST	0x0436,0x000a
0fbc 0438 000b  | 8  |		.CONST	0x0438,0x000b
0fbe 0450 000c  | P  |		.CONST	0x0450,0x000c
0fc0 0452 000d  | R  |		.CONST	0x0452,0x000d
0fc2 0459 000e  | Y  |		.CONST	0x0459,0x000e
0fc4 045b 000f  | [  |		.CONST	0x045b,0x000f
0fc6 0460 0010  | `  |		.CONST	0x0460,0x0010
0fc8 047d 0011  | }  |		.CONST	0x047d,0x0011
0fca 047f 0012  |    |		.CONST	0x047f,0x0012
0fcc 0484 0013  |    |		.CONST	0x0484,0x0013
0fce 04a1 0014  |    |		.CONST	0x04a1,0x0014
0fd0 04a3 0015  |    |		.CONST	0x04a3,0x0015
0fd2 04aa 0016  |    |		.CONST	0x04aa,0x0016
0fd4 04ac 0017  |    |		.CONST	0x04ac,0x0017
0fd6 04b3 0018  |    |		.CONST	0x04b3,0x0018
0fd8 04b5 0019  |    |		.CONST	0x04b5,0x0019
0fda 04b7 001a  |    |		.CONST	0x04b7,0x001a
0fdc ; --------------------------------------------------------------------------------------
0fdc ; Debug3 Subtable 0x9
0fdc ; --------------------------------------------------------------------------------------
0fdc 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0fde ; --------------------------------------------------------------------------------------
0fde ; Debug3 Subtable 0xa
0fde ; --------------------------------------------------------------------------------------
0fde 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0fe0 ; --------------------------------------------------------------------------------------
0fe0 ; Debug3 Subtable 0xb
0fe0 ; --------------------------------------------------------------------------------------
0fe0 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0fe2 ; --------------------------------------------------------------------------------------
0fe2 ; Debug3 Subtable 0xc
0fe2 ; --------------------------------------------------------------------------------------
0fe2 0003 0004  |    |		.DBG3TAB	0x0003,0x0004
0fe4 0513 ffff  |    |		.CONST	0x0513,0xffff
0fe6 0517 fffe  |    |		.CONST	0x0517,0xfffe
0fe8 0518 fffd  |    |		.CONST	0x0518,0xfffd
0fea 051c 0002  |    |		.CONST	0x051c,0x0002
0fec 0523 0003  | #  |		.CONST	0x0523,0x0003
0fee 0527 0004  | '  |		.CONST	0x0527,0x0004
0ff0 052d 0001  | -  |		.CONST	0x052d,0x0001
0ff2 ; --------------------------------------------------------------------------------------
0ff2 ; Debug3 Subtable 0xd
0ff2 ; --------------------------------------------------------------------------------------
0ff2 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0ff4 053b 0001  | ;  |		.CONST	0x053b,0x0001
0ff6 ; --------------------------------------------------------------------------------------
0ff6 ; Debug3 Subtable 0xe
0ff6 ; --------------------------------------------------------------------------------------
0ff6 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0ff8 054b 0001  | K  |		.CONST	0x054b,0x0001
0ffa 0552 0002  | R  |		.CONST	0x0552,0x0002
0ffc 0556 0003  | V  |		.CONST	0x0556,0x0003
0ffe 055b 0004  | [  |		.CONST	0x055b,0x0004
1000 055f 0005  | _  |		.CONST	0x055f,0x0005
1002 0567 0006  | g  |		.CONST	0x0567,0x0006
1004 ; --------------------------------------------------------------------------------------
1004 ; Debug3 Subtable 0xf
1004 ; --------------------------------------------------------------------------------------
1004 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
1006 0573 0001  | s  |		.CONST	0x0573,0x0001
1008 ; --------------------------------------------------------------------------------------
1008 ; Debug3 Subtable 0x10
1008 ; --------------------------------------------------------------------------------------
1008 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
100a 057b 0001  | {  |		.CONST	0x057b,0x0001
100c 057d 0002  | }  |		.CONST	0x057d,0x0002
100e 058a 0003  |    |		.CONST	0x058a,0x0003
1010 ; --------------------------------------------------------------------------------------
1010 ; Debug3 Subtable 0x11
1010 ; --------------------------------------------------------------------------------------
1010 0001 0009  |    |		.DBG3TAB	0x0001,0x0009
1012 0593 ffff  |    |		.CONST	0x0593,0xffff
1014 0596 0001  |    |		.CONST	0x0596,0x0001
1016 05ae 0002  |    |		.CONST	0x05ae,0x0002
1018 05b0 0003  |    |		.CONST	0x05b0,0x0003
101a 05b1 0004  |    |		.CONST	0x05b1,0x0004
101c 05b6 0005  |    |		.CONST	0x05b6,0x0005
101e 05cf 0006  |    |		.CONST	0x05cf,0x0006
1020 05d1 0007  |    |		.CONST	0x05d1,0x0007
1022 05d2 0008  |    |		.CONST	0x05d2,0x0008
1024 05e3 0009  |    |		.CONST	0x05e3,0x0009
1026 ; --------------------------------------------------------------------------------------
1026 ; Debug3 Subtable 0x12
1026 ; --------------------------------------------------------------------------------------
1026 0003 0007  |    |		.DBG3TAB	0x0003,0x0007
1028 05eb ffff  |    |		.CONST	0x05eb,0xffff
102a 05ee fffe  |    |		.CONST	0x05ee,0xfffe
102c 05f3 fffd  |    |		.CONST	0x05f3,0xfffd
102e 05f5 0001  |    |		.CONST	0x05f5,0x0001
1030 05f8 0002  |    |		.CONST	0x05f8,0x0002
1032 0606 0003  |    |		.CONST	0x0606,0x0003
1034 0612 0004  |    |		.CONST	0x0612,0x0004
1036 0621 0005  | !  |		.CONST	0x0621,0x0005
1038 0627 0006  | '  |		.CONST	0x0627,0x0006
103a 0632 0007  | 2  |		.CONST	0x0632,0x0007
103c ; --------------------------------------------------------------------------------------
103c ; Debug3 Subtable 0x13
103c ; --------------------------------------------------------------------------------------
103c 0002 0003  |    |		.DBG3TAB	0x0002,0x0003
103e 0643 ffff  | C  |		.CONST	0x0643,0xffff
1040 0648 fffe  | H  |		.CONST	0x0648,0xfffe
1042 064a 0001  | J  |		.CONST	0x064a,0x0001
1044 0656 0002  | V  |		.CONST	0x0656,0x0002
1046 0665 0003  | e  |		.CONST	0x0665,0x0003
1048 ; --------------------------------------------------------------------------------------
1048 ; Debug3 Subtable 0x14
1048 ; --------------------------------------------------------------------------------------
1048 0003 0004  |    |		.DBG3TAB	0x0003,0x0004
104a 0673 ffff  | s  |		.CONST	0x0673,0xffff
104c 0675 fffe  | u  |		.CONST	0x0675,0xfffe
104e 0676 fffd  | v  |		.CONST	0x0676,0xfffd
1050 0678 0001  | x  |		.CONST	0x0678,0x0001
1052 068a 0002  |    |		.CONST	0x068a,0x0002
1054 068d 0003  |    |		.CONST	0x068d,0x0003
1056 0697 0004  |    |		.CONST	0x0697,0x0004
1058 ; --------------------------------------------------------------------------------------
1058 ; Debug3 Subtable 0x15
1058 ; --------------------------------------------------------------------------------------
1058 0005 000b  |    |		.DBG3TAB	0x0005,0x000b
105a 06a3 ffff  |    |		.CONST	0x06a3,0xffff
105c 06a8 fffe  |    |		.CONST	0x06a8,0xfffe
105e 06ac fffd  |    |		.CONST	0x06ac,0xfffd
1060 06b5 fffc  |    |		.CONST	0x06b5,0xfffc
1062 06b8 fffb  |    |		.CONST	0x06b8,0xfffb
1064 06ba 0001  |    |		.CONST	0x06ba,0x0001
1066 06c0 0002  |    |		.CONST	0x06c0,0x0002
1068 06c9 0003  |    |		.CONST	0x06c9,0x0003
106a 06d1 0004  |    |		.CONST	0x06d1,0x0004
106c 06ea 0005  |    |		.CONST	0x06ea,0x0005
106e 06f3 0006  |    |		.CONST	0x06f3,0x0006
1070 06f7 0007  |    |		.CONST	0x06f7,0x0007
1072 0707 0008  |    |		.CONST	0x0707,0x0008
1074 070d 0009  |    |		.CONST	0x070d,0x0009
1076 070f 000a  |    |		.CONST	0x070f,0x000a
1078 071a 000b  |    |		.CONST	0x071a,0x000b
107a ; --------------------------------------------------------------------------------------
107a ; Debug3 Subtable 0x16
107a ; --------------------------------------------------------------------------------------
107a 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
107c 0723 0001  | #  |		.CONST	0x0723,0x0001
107e 072a 0003  | *  |		.CONST	0x072a,0x0003
1080 0735 0004  | 5  |		.CONST	0x0735,0x0004
1082 0747 0005  | G  |		.CONST	0x0747,0x0005
1084 ; --------------------------------------------------------------------------------------
1084 ; Debug3 Subtable 0x17
1084 ; --------------------------------------------------------------------------------------
1084 0001 000f  |    |		.DBG3TAB	0x0001,0x000f
1086 0753 ffff  | S  |		.CONST	0x0753,0xffff
1088 075f 0001  | _  |		.CONST	0x075f,0x0001
108a 0763 0002  | c  |		.CONST	0x0763,0x0002
108c 0766 0003  | f  |		.CONST	0x0766,0x0003
108e 0769 0004  | i  |		.CONST	0x0769,0x0004
1090 076d 0005  | m  |		.CONST	0x076d,0x0005
1092 076f 0006  | o  |		.CONST	0x076f,0x0006
1094 0772 0007  | r  |		.CONST	0x0772,0x0007
1096 0779 0008  | y  |		.CONST	0x0779,0x0008
1098 077b 0009  | {  |		.CONST	0x077b,0x0009
109a 0782 000a  |    |		.CONST	0x0782,0x000a
109c 0784 000b  |    |		.CONST	0x0784,0x000b
109e 078f 000c  |    |		.CONST	0x078f,0x000c
10a0 07a0 000d  |    |		.CONST	0x07a0,0x000d
10a2 07a5 000e  |    |		.CONST	0x07a5,0x000e
10a4 07a8 000f  |    |		.CONST	0x07a8,0x000f
10a6 ; --------------------------------------------------------------------------------------
10a6 ; Debug3 Subtable 0x18
10a6 ; --------------------------------------------------------------------------------------
10a6 0002 0002  |    |		.DBG3TAB	0x0002,0x0002
10a8 07b3 ffff  |    |		.CONST	0x07b3,0xffff
10aa 07b8 fffe  |    |		.CONST	0x07b8,0xfffe
10ac 07bd 0001  |    |		.CONST	0x07bd,0x0001
10ae 07c3 0002  |    |		.CONST	0x07c3,0x0002
10b0 ; --------------------------------------------------------------------------------------
10b0 ; Debug3 Subtable 0x19
10b0 ; --------------------------------------------------------------------------------------
10b0 0003 0007  |    |		.DBG3TAB	0x0003,0x0007
10b2 07d3 ffff  |    |		.CONST	0x07d3,0xffff
10b4 07d9 fffe  |    |		.CONST	0x07d9,0xfffe
10b6 07db fffd  |    |		.CONST	0x07db,0xfffd
10b8 07df 0001  |    |		.CONST	0x07df,0x0001
10ba 07e9 0002  |    |		.CONST	0x07e9,0x0002
10bc 07ef 0003  |    |		.CONST	0x07ef,0x0003
10be 07f5 0004  |    |		.CONST	0x07f5,0x0004
10c0 07fd 0005  |    |		.CONST	0x07fd,0x0005
10c2 0804 0006  |    |		.CONST	0x0804,0x0006
10c4 0809 0007  |    |		.CONST	0x0809,0x0007
10c6 ; --------------------------------------------------------------------------------------
10c6 ; Debug3 Subtable 0x1a
10c6 ; --------------------------------------------------------------------------------------
10c6 0005 001e  |    |		.DBG3TAB	0x0005,0x001e
10c8 0813 ffff  |    |		.CONST	0x0813,0xffff
10ca 0814 fffe  |    |		.CONST	0x0814,0xfffe
10cc 0815 fffd  |    |		.CONST	0x0815,0xfffd
10ce 0817 fffc  |    |		.CONST	0x0817,0xfffc
10d0 0819 fffb  |    |		.CONST	0x0819,0xfffb
10d2 081b 0001  |    |		.CONST	0x081b,0x0001
10d4 081e 0002  |    |		.CONST	0x081e,0x0002
10d6 081f 0003  |    |		.CONST	0x081f,0x0003
10d8 0858 001e  | X  |		.CONST	0x0858,0x001e
10da 085b 0004  | [  |		.CONST	0x085b,0x0004
10dc 0860 0005  | `  |		.CONST	0x0860,0x0005
10de 0865 0006  | e  |		.CONST	0x0865,0x0006
10e0 086a 0007  | j  |		.CONST	0x086a,0x0007
10e2 0871 0008  | q  |		.CONST	0x0871,0x0008
10e4 0874 0009  | t  |		.CONST	0x0874,0x0009
10e6 0877 000a  | w  |		.CONST	0x0877,0x000a
10e8 0882 000b  |    |		.CONST	0x0882,0x000b
10ea 0885 000c  |    |		.CONST	0x0885,0x000c
10ec 0888 000d  |    |		.CONST	0x0888,0x000d
10ee 088b 000e  |    |		.CONST	0x088b,0x000e
10f0 088e 000f  |    |		.CONST	0x088e,0x000f
10f2 0891 0010  |    |		.CONST	0x0891,0x0010
10f4 0894 0011  |    |		.CONST	0x0894,0x0011
10f6 0897 0012  |    |		.CONST	0x0897,0x0012
10f8 089a 0013  |    |		.CONST	0x089a,0x0013
10fa 089d 0014  |    |		.CONST	0x089d,0x0014
10fc 08a0 0015  |    |		.CONST	0x08a0,0x0015
10fe 08a3 0016  |    |		.CONST	0x08a3,0x0016
1100 08a6 0017  |    |		.CONST	0x08a6,0x0017
1102 08a9 0018  |    |		.CONST	0x08a9,0x0018
1104 08ac 0019  |    |		.CONST	0x08ac,0x0019
1106 08af 001a  |    |		.CONST	0x08af,0x001a
1108 08b2 001b  |    |		.CONST	0x08b2,0x001b
110a 08b5 001c  |    |		.CONST	0x08b5,0x001c
110c 08be 001d  |    |		.CONST	0x08be,0x001d
110e ; --------------------------------------------------------------------------------------
110e ; Debug3 Subtable 0x1b
110e ; --------------------------------------------------------------------------------------
110e 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
1110 08d3 ffff  |    |		.CONST	0x08d3,0xffff
1112 08d5 0001  |    |		.CONST	0x08d5,0x0001
1114 08e0 0002  |    |		.CONST	0x08e0,0x0002
1116 08e3 0003  |    |		.CONST	0x08e3,0x0003
1118 ; --------------------------------------------------------------------------------------
1118 ; Debug3 Subtable 0x1c
1118 ; --------------------------------------------------------------------------------------
1118 0002 0002  |    |		.DBG3TAB	0x0002,0x0002
111a 08eb ffff  |    |		.CONST	0x08eb,0xffff
111c 08f0 fffe  |    |		.CONST	0x08f0,0xfffe
111e 08f3 0001  |    |		.CONST	0x08f3,0x0001
1120 08f9 0002  |    |		.CONST	0x08f9,0x0002
1122 ; --------------------------------------------------------------------------------------
1122 ; Debug3 Subtable 0x1d
1122 ; --------------------------------------------------------------------------------------
1122 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
1124 0903 0001  |    |		.CONST	0x0903,0x0001
1126 0909 0002  |    |		.CONST	0x0909,0x0002
1128 0911 0003  |    |		.CONST	0x0911,0x0003
112a 0914 0004  |    |		.CONST	0x0914,0x0004
112c 0918 0005  |    |		.CONST	0x0918,0x0005
112e ; --------------------------------------------------------------------------------------
112e ; Debug3 Subtable 0x1e
112e ; --------------------------------------------------------------------------------------
112e 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
1130 0923 0001  | #  |		.CONST	0x0923,0x0001
1132 0933 0002  | 3  |		.CONST	0x0933,0x0002
1134 ; --------------------------------------------------------------------------------------
1134 ; Debug3 Subtable 0x1f
1134 ; --------------------------------------------------------------------------------------
1134 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
1136 093b 0001  | ;  |		.CONST	0x093b,0x0001
1138 ; --------------------------------------------------------------------------------------
1138 ; Debug3 Subtable 0x20
1138 ; --------------------------------------------------------------------------------------
1138 0000 0009  |    |		.DBG3TAB	0x0000,0x0009
113a 096d 0001  | m  |		.CONST	0x096d,0x0001
113c 0982 0002  |    |		.CONST	0x0982,0x0002
113e 0988 0003  |    |		.CONST	0x0988,0x0003
1140 098a 0004  |    |		.CONST	0x098a,0x0004
1142 0990 0005  |    |		.CONST	0x0990,0x0005
1144 0997 0006  |    |		.CONST	0x0997,0x0006
1146 09a5 0007  |    |		.CONST	0x09a5,0x0007
1148 09a7 0008  |    |		.CONST	0x09a7,0x0008
114a 09ab 0009  |    |		.CONST	0x09ab,0x0009
114c ; --------------------------------------------------------------------------------------
114c ; Debug3 Subtable 0x21
114c ; --------------------------------------------------------------------------------------
114c 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
114e 09bb 0001  |    |		.CONST	0x09bb,0x0001
1150 09c8 0002  |    |		.CONST	0x09c8,0x0002
1152 ; --------------------------------------------------------------------------------------
1152 ; Debug3 Subtable 0x22
1152 ; --------------------------------------------------------------------------------------
1152 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
1154 09d3 0001  |    |		.CONST	0x09d3,0x0001
1156 09db 0002  |    |		.CONST	0x09db,0x0002
1158 ; --------------------------------------------------------------------------------------
1158 ; Debug3 Subtable 0x23
1158 ; --------------------------------------------------------------------------------------
1158 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
115a 09e3 0001  |    |		.CONST	0x09e3,0x0001
115c 09eb 0002  |    |		.CONST	0x09eb,0x0002
115e ; --------------------------------------------------------------------------------------
115e ; Debug3 Subtable 0x24
115e ; --------------------------------------------------------------------------------------
115e 0000 0009  |    |		.DBG3TAB	0x0000,0x0009
1160 09f5 0001  |    |		.CONST	0x09f5,0x0001
1162 0a0a 0009  |    |		.CONST	0x0a0a,0x0009
1164 0a12 0002  |    |		.CONST	0x0a12,0x0002
1166 0a15 0003  |    |		.CONST	0x0a15,0x0003
1168 0a1a 0004  |    |		.CONST	0x0a1a,0x0004
116a 0a1c 0005  |    |		.CONST	0x0a1c,0x0005
116c 0a1f 0006  |    |		.CONST	0x0a1f,0x0006
116e 0a29 0007  | )  |		.CONST	0x0a29,0x0007
1170 0a2c 0008  | ,  |		.CONST	0x0a2c,0x0008
1172 ; --------------------------------------------------------------------------------------
1172 ; Debug3 Subtable 0x25
1172 ; --------------------------------------------------------------------------------------
1172 0002 0006  |    |		.DBG3TAB	0x0002,0x0006
1174 0a3b ffff  | ;  |		.CONST	0x0a3b,0xffff
1176 0a3c fffe  | <  |		.CONST	0x0a3c,0xfffe
1178 0a40 0001  | @  |		.CONST	0x0a40,0x0001
117a 0a46 0002  | F  |		.CONST	0x0a46,0x0002
117c 0a4a 0003  | J  |		.CONST	0x0a4a,0x0003
117e 0a4c 0004  | L  |		.CONST	0x0a4c,0x0004
1180 0a52 0005  | R  |		.CONST	0x0a52,0x0005
1182 0a62 0006  | b  |		.CONST	0x0a62,0x0006
1184 ; --------------------------------------------------------------------------------------
1184 ; Debug3 Subtable 0x26
1184 ; --------------------------------------------------------------------------------------
1184 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
1186 0a7b ffff  | {  |		.CONST	0x0a7b,0xffff
1188 0a7d fffe  | }  |		.CONST	0x0a7d,0xfffe
118a 0a80 0001  |    |		.CONST	0x0a80,0x0001
118c 0a93 0002  |    |		.CONST	0x0a93,0x0002
118e 0a95 0003  |    |		.CONST	0x0a95,0x0003
1190 0a97 0004  |    |		.CONST	0x0a97,0x0004
1192 ; --------------------------------------------------------------------------------------
1192 ; Debug3 Subtable 0x27
1192 ; --------------------------------------------------------------------------------------
1192 0002 0001  |    |		.DBG3TAB	0x0002,0x0001
1194 0aab ffff  |    |		.CONST	0x0aab,0xffff
1196 0aaf fffe  |    |		.CONST	0x0aaf,0xfffe
1198 0ab3 0001  |    |		.CONST	0x0ab3,0x0001
119a 0000 0000  |    |		.BLANK	0000[0x66]