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

⟦3df4c69af⟧

    Length: 7168 (0x1c00)
    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 08a0       |    |		.CONST	0x08a0								; 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 0006       |    |		.CONST	0x0006								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 004c       | L  |		.CONST	0x004c								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 002b       | +  |		.CONST	0x002b								; Number of locals
000b			INIT_0008:
000b 029a 0053  |   S|		Declare_Subprogram	INIT_0050,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x09b2,0x8000,0x0000,0x0058,0x6d05,0x0000,0x0009
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 00bf       |    |		Action	Accept_Activation
000e 029d 007b  |   {|		Declare_Subprogram	INIT_0078,For_Outer_Call			; Debug Table 0x1 = .DEBUG	0x000e,0x09b6,0x8000,0x0000,0x0058,0x7555,0x0000,0x0025
													; Debug Table 0x1.0x0 = 0xe,0xffff
0010 029d 009b  |    |		Declare_Subprogram	INIT_0098,For_Outer_Call			; Debug Table 0x1.0x1 = 0x10,0xfffe
0012 029d 00a3  |    |		Declare_Subprogram	INIT_00a0,For_Outer_Call			; Debug Table 0x1.0x2 = 0x12,0xfffd
0014 029d 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Outer_Call			; Debug Table 0x1.0x3 = 0x14,0xfffc
0016 029d 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call			; Debug Table 0x1.0x4 = 0x16,0xfffb
0018 029d 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call			; Debug Table 0x1.0x5 = 0x18,0xfffa
001a 029d 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call			; Debug Table 0x1.0x6 = 0x1a,0xfff9
001c 029d 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call			; Debug Table 0x1.0x7 = 0x1c,0xfff8
001e 029d 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call			; Debug Table 0x1.0x8 = 0x1e,0xfff7
0020 029d 0193  |    |		Declare_Subprogram	INIT_0190,For_Outer_Call			; Debug Table 0x1.0x9 = 0x20,0xfff6
0022 029d 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call			; Debug Table 0x1.0xa = 0x22,0xfff5
0024 029d 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call			; Debug Table 0x1.0xb = 0x24,0xfff4
0026 029d 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Outer_Call			; Debug Table 0x1.0xc = 0x26,0xfff3
0028 029d 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call			; Debug Table 0x1.0xd = 0x28,0xfff2
002a 029d 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call			; Debug Table 0x1.0xe = 0x2a,0xfff1
002c 029d 028b  |    |		Declare_Subprogram	INIT_0288,For_Outer_Call			; Debug Table 0x1.0xf = 0x2c,0xfff0
002e 029d 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call			; Debug Table 0x1.0x10 = 0x2e,0xffef
0030 029d 0333  |   3|		Declare_Subprogram	INIT_0330,For_Outer_Call			; Debug Table 0x1.0x11 = 0x30,0xffee
0032 029d 03a3  |    |		Declare_Subprogram	INIT_03a0,For_Outer_Call			; Debug Table 0x1.0x12 = 0x32,0xffed
0034 029d 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Outer_Call			; Debug Table 0x1.0x13 = 0x34,0xffec
0036 029d 041b  |    |		Declare_Subprogram	INIT_0418,For_Outer_Call			; Debug Table 0x1.0x14 = 0x36,0xffeb
0038 029d 0473  |   s|		Declare_Subprogram	INIT_0470,For_Outer_Call			; Debug Table 0x1.0x15 = 0x38,0xffea
003a 029d 0493  |    |		Declare_Subprogram	INIT_0490,For_Outer_Call			; Debug Table 0x1.0x16 = 0x3a,0xffe9
003c 029d 04db  |    |		Declare_Subprogram	INIT_04d8,For_Outer_Call			; Debug Table 0x1.0x17 = 0x3c,0xffe8
003e 029d 04fb  |    |		Declare_Subprogram	INIT_04f8,For_Outer_Call			; Debug Table 0x1.0x18 = 0x3e,0xffe7
0040 029d 056b  |   k|		Declare_Subprogram	INIT_0568,For_Outer_Call			; Debug Table 0x1.0x19 = 0x40,0xffe6
0042 029d 058b  |    |		Declare_Subprogram	INIT_0588,For_Outer_Call			; Debug Table 0x1.0x1a = 0x42,0xffe5
0044 029d 05f3  |    |		Declare_Subprogram	INIT_05f0,For_Outer_Call			; Debug Table 0x1.0x1b = 0x44,0xffe4
0046 029d 061b  |    |		Declare_Subprogram	INIT_0618,For_Outer_Call			; Debug Table 0x1.0x1c = 0x46,0xffe3
0048 029d 06d3  |    |		Declare_Subprogram	INIT_06d0,For_Outer_Call			; Debug Table 0x1.0x1d = 0x48,0xffe2
004a 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x1e = 0x4a,0xffe1
004b 00c7       |    |		Action	Elaborate_Subprogram
004c			BODY_0008:
004c 00bc       |    |		Action	Signal_Activated
004d 00bb       |    |		Action	Signal_Completion
004e 0000 0000  |    |		.XXX[0x2]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 005b       | [  |		.CONST	0x005b								; Address of begin
0051 0004       |    |		.CONST	0x0004								; Address of exception handler
0052 0004       |    |		.CONST	0x0004								; Number of locals
0053			INIT_0050:
0053 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2 = .DEBUG	0x0053,0x09f6,0x0001,0x0000,0x0058,0x6d05,0x0000,0x000a
													; Debug Table 0x2.0x0 = 0x53,0xffff
0054 01dd       |    |		Execute	Vector,First
0055 00e3       |    |		Load_Encached	Natural_Cache
0056 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0057 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x2.0x1 = 0x57,0xfffe
0058 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0059 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x2.0x2 = 0x59,0xfffd
005a 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
005b			BODY_0050:
005b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x3 = 0x5b,0x1
005c 00da       |    |		Load_Top	At_Offset_2
005d 00da       |    |		Load_Top	At_Offset_2
005e e5fc       |    |		Load	0x2,-0x4
005f e5ff       |    |		Load	0x2,-0x1
0060 820e       |    |		Call	0x1,0xe
0061 005b       | [  |		Store_Top	Discrete,At_Offset_3
0062 005b       | [  |		Store_Top	Discrete,At_Offset_3
0063 005b       | [  |		Store_Top	Discrete,At_Offset_3
0064 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x4 = 0x64,0x2
0065 e5fb       |    |		Load	0x2,-0x5
0066 0120       |    |		Execute	Any,Is_Value
0067 6803       |h   |		Jump_Zero	0x6b
0068 e001       |    |		Load	0x0,0x1
0069 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
006a 7801       |x   |		Jump	0x6c
006b e5fb       |    |		Load	0x2,-0x5
006c e5fc       |    |		Load	0x2,-0x4
006d e5ff       |    |		Load	0x2,-0x1
006e e5fd       |    |		Load	0x2,-0x3
006f e5fe       |    |		Load	0x2,-0x2
0070 822b       | +  |		Call	0x1,0x2b
0071 c5fb       |    |		Store	0x2,-0x5
0072 005b       | [  |		Store_Top	Discrete,At_Offset_3
0073 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0074 0000 0000  |    |		.BLANK	0000[0x4]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b       | {  |		.CONST	0x007b								; Address of begin
0079 0004       |    |		.CONST	0x0004								; Address of exception handler
007a 0001       |    |		.CONST	0x0001								; Number of locals
007b			BODY_0078:
007b			INIT_0078:
007b e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x3 = .DEBUG	0x007b,0x0a02,0x0001,0x0000,0x0058,0x7555,0x0000,0x0026
													; Debug Table 0x3.0x0 = 0x7b,0x1
007c 00e3       |    |		Load_Encached	Natural_Cache
007d 00e3       |    |		Load_Encached	Natural_Cache
007e e5ff       |    |		Load	0x2,-0x1
007f e002       |    |		Load	0x0,0x2
0080 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0081 c5fd       |    |		Store	0x2,-0x3
0082 c5fc       |    |		Store	0x2,-0x4
0083 c5fb       |    |		Store	0x2,-0x5
0084 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x3.0x1 = 0x84,0x2
0085 0e02       |    |		Execute_Immediate	Not_Equal,0x2
0086 6805       |h   |		Jump_Zero	0x8c
0087 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x2 = 0x87,0x3
0088 0092 07bb  |    |		Action	Push_String_Extended,0x7bb					; "Work_Order is stored in an unsupported format."
008a e003       |    |		Load	0x0,0x3
008b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
008c e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x3.0x3 = 0x8c,0x4
008d 0e01       |    |		Execute_Immediate	Not_Equal,0x1
008e 6805       |h   |		Jump_Zero	0x94
008f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x4 = 0x8f,0x5
0090 0092 07bc  |    |		Action	Push_String_Extended,0x7bc					; "Work_Order is stored in an unsupported archive format."
0092 e003       |    |		Load	0x0,0x3
0093 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0094 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0095 0000 0000  |    |		.XXX[0x3]
0097 0000       |    |
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b       |    |		.CONST	0x009b								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0001       |    |		.CONST	0x0001								; Number of locals
009b			BODY_0098:
009b			INIT_0098:
009b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4 = .DEBUG	0x009b,0x0a0e,0x0002,0x0000,0x0058,0x7555,0x0000,0x0071
													; Debug Table 0x4.0x0 = 0x9b,0x1
009c 01db       |    |		Execute	Vector,Length
009d 0d03       |    |		Execute_Immediate	Less,0x3
009e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
009f 0000       |    |		.XXX[0x1]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3       |    |		.CONST	0x00a3								; Address of begin
00a1 0004       |    |		.CONST	0x0004								; Address of exception handler
00a2 0001       |    |		.CONST	0x0001								; Number of locals
00a3			BODY_00a0:
00a3			INIT_00a0:
00a3 00e7       |    |		Load_Encached	Duration_Cache						; Debug Table 0x5 = .DEBUG	0x00a3,0x0a12,0x0002,0x0000,0x0058,0x7555,0x0000,0x0086
													; Debug Table 0x5.0x0 = 0xa3,0x1
00a4 1c03       |    |		Execute_Immediate	Run_Utility,0x3
00a5 00e7       |    |		Load_Encached	Duration_Cache
00a6 1c03       |    |		Execute_Immediate	Run_Utility,0x3
00a7 023a       | :  |		Execute	Float,Divide
00a8 0235       | 5  |		Execute	Float,Round_To_Discrete
00a9 00db       |    |		Load_Top	At_Offset_3
00aa e004       |    |		Load	0x0,0x4
00ab 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
00ac 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ad 0000 0000  |    |		.XXX[0x3]
00af 0000       |    |
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00c3       |    |		.CONST	0x00c3								; Address of begin
00b1 0004       |    |		.CONST	0x0004								; Address of exception handler
00b2 0003       |    |		.CONST	0x0003								; Number of locals
00b3			INIT_00b0:
00b3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6 = .DEBUG	0x00b3,0x0a16,0x0002,0x0000,0x0058,0x7555,0x0000,0x00a1
													; Debug Table 0x6.0x0 = 0xb3,0xffff
00b4 00db       |    |		Load_Top	At_Offset_3
00b5 4822       |H"  |		Short_Literal	0x22
00b6 e005       |    |		Load	0x0,0x5
00b7 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
00b8 0a01       |    |		Execute_Immediate	Plus,0x1
00b9 00e3       |    |		Load_Encached	Natural_Cache
00ba 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
00bb 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x1 = 0xbb,0xfffe
00bc e5ff       |    |		Load	0x2,-0x1
00bd 0092 07bd  |    |		Action	Push_String_Extended,0x7bd					; " => "
00bf e005       |    |		Load	0x0,0x5
00c0 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
00c1 00e3       |    |		Load_Encached	Natural_Cache
00c2 03f1       |    |		Declare_Variable	Discrete,With_Value
00c3			BODY_00b0:
00c3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x2 = 0xc3,0x1
00c4 00da       |    |		Load_Top	At_Offset_2
00c5 00da       |    |		Load_Top	At_Offset_2
00c6 e5ff       |    |		Load	0x2,-0x1
00c7 01cf       |    |		Execute	Vector,Slice_Read
00c8 4822       |H"  |		Short_Literal	0x22
00c9 e005       |    |		Load	0x0,0x5
00ca 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
00cb 0aff       |    |		Execute_Immediate	Plus,-0x1
00cc 0059       | Y  |		Store_Top	Discrete,At_Offset_1
00cd 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x3 = 0xcd,0x2
00ce 00d9       |    |		Load_Top	At_Offset_1
00cf e5ff       |    |		Load	0x2,-0x1
00d0 01cf       |    |		Execute	Vector,Slice_Read
00d1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d2 0000 0000  |    |		.BLANK	0000[0x6]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00e5       |    |		.CONST	0x00e5								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0003       |    |		.CONST	0x0003								; Number of locals
00db			INIT_00d8:
00db 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x7 = .DEBUG	0x00db,0x0a20,0x0002,0x0000,0x0058,0x7555,0x0000,0x00e1
													; Debug Table 0x7.0x0 = 0xdb,0xffff
00dc 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x1 = 0xdc,0xfffe
00dd e5ff       |    |		Load	0x2,-0x1
00de 0092 07bd  |    |		Action	Push_String_Extended,0x7bd					; " => "
00e0 e005       |    |		Load	0x0,0x5
00e1 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
00e2 0afc       |    |		Execute_Immediate	Plus,-0x4
00e3 00e3       |    |		Load_Encached	Natural_Cache
00e4 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
00e5			BODY_00d8:
00e5 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x2 = 0xe5,0x1
00e6 e5ff       |    |		Load	0x2,-0x1
00e7 01dd       |    |		Execute	Vector,First
00e8 00da       |    |		Load_Top	At_Offset_2
00e9 e5ff       |    |		Load	0x2,-0x1
00ea 01cf       |    |		Execute	Vector,Slice_Read
00eb 4820       |H   |		Short_Literal	0x20
00ec e005       |    |		Load	0x0,0x5
00ed 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
00ee 0aff       |    |		Execute_Immediate	Plus,-0x1
00ef 0059       | Y  |		Store_Top	Discrete,At_Offset_1
00f0 4800       |H   |		Short_Literal	0x0							; Debug Table 0x7.0x3 = 0xf0,0x2
00f1 e5ff       |    |		Load	0x2,-0x1
00f2 01dd       |    |		Execute	Vector,First
00f3 00da       |    |		Load_Top	At_Offset_2
00f4 e5ff       |    |		Load	0x2,-0x1
00f5 01cf       |    |		Execute	Vector,Slice_Read
00f6 4820       |H   |		Short_Literal	0x20
00f7 e005       |    |		Load	0x0,0x5
00f8 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
00f9 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
00fa 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0x4 = 0xfa,0x3
00fb 00d9       |    |		Load_Top	At_Offset_1
00fc e5ff       |    |		Load	0x2,-0x1
00fd 01cf       |    |		Execute	Vector,Slice_Read
00fe 00e3       |    |		Load_Encached	Natural_Cache
00ff 0122       | "  |		Execute	Any,Make_Root_Type
0100 00e0       |    |		Load_Encached	Standard_Cache
0101 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0102 00e3       |    |		Load_Encached	Natural_Cache
0103 025b       | [  |		Execute	Discrete,Check_In_Type
0104 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0105 0000 0000  |    |		.XXX[0x3]
0107 0000       |    |
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 011b       |    |		.CONST	0x011b								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0003       |    |		.CONST	0x0003								; Number of locals
010b			INIT_0108:
010b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8 = .DEBUG	0x010b,0x0a2c,0x0002,0x0000,0x0058,0x7555,0x0000,0x012f
													; Debug Table 0x8.0x0 = 0x10b,0xffff
010c 00db       |    |		Load_Top	At_Offset_3
010d 4822       |H"  |		Short_Literal	0x22
010e e005       |    |		Load	0x0,0x5
010f 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0110 0a01       |    |		Execute_Immediate	Plus,0x1
0111 00e3       |    |		Load_Encached	Natural_Cache
0112 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0113 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0x1 = 0x113,0xfffe
0114 e5ff       |    |		Load	0x2,-0x1
0115 4822       |H"  |		Short_Literal	0x22
0116 e005       |    |		Load	0x0,0x5
0117 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0118 0aff       |    |		Execute_Immediate	Plus,-0x1
0119 00e3       |    |		Load_Encached	Natural_Cache
011a 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
011b			BODY_0108:
011b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x8.0x2 = 0x11b,0x1
011c 00d9       |    |		Load_Top	At_Offset_1
011d e5ff       |    |		Load	0x2,-0x1
011e 01cf       |    |		Execute	Vector,Slice_Read
011f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 012a       | *  |		.CONST	0x012a								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0002       |    |		.CONST	0x0002								; Number of locals
0123			INIT_0120:
0123 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9 = .DEBUG	0x0123,0x0a34,0x0002,0x0000,0x0058,0x7555,0x0000,0x0162
													; Debug Table 0x9.0x0 = 0x123,0xffff
0124 00db       |    |		Load_Top	At_Offset_3
0125 483a       |H:  |		Short_Literal	0x3a
0126 e005       |    |		Load	0x0,0x5
0127 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0128 00e3       |    |		Load_Encached	Natural_Cache
0129 03f1       |    |		Declare_Variable	Discrete,With_Value
012a			BODY_0120:
012a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x1 = 0x12a,0x1
012b 00d9       |    |		Load_Top	At_Offset_1
012c e5ff       |    |		Load	0x2,-0x1
012d 01dc       |    |		Execute	Vector,Last
012e e5ff       |    |		Load	0x2,-0x1
012f 01cf       |    |		Execute	Vector,Slice_Read
0130 4820       |H   |		Short_Literal	0x20
0131 e005       |    |		Load	0x0,0x5
0132 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0133 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0134 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9.0x2 = 0x134,0x2
0135 01dd       |    |		Execute	Vector,First
0136 00d9       |    |		Load_Top	At_Offset_1
0137 e5ff       |    |		Load	0x2,-0x1
0138 01cf       |    |		Execute	Vector,Slice_Read
0139 e006       |    |		Load	0x0,0x6
013a 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
013b e006       |    |		Load	0x0,0x6
013c 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
013d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
013e 0000 0000  |    |		.XXX[0x2]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0160       | `  |		.CONST	0x0160								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0004       |    |		.CONST	0x0004								; Number of locals
0143			INIT_0140:
0143 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa = .DEBUG	0x0143,0x0a3c,0x0002,0x0000,0x0058,0x7555,0x0000,0x019e
													; Debug Table 0xa.0x0 = 0x143,0xffff
0144 00db       |    |		Load_Top	At_Offset_3
0145 482e       |H.  |		Short_Literal	0x2e
0146 e005       |    |		Load	0x0,0x5
0147 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0148 00e3       |    |		Load_Encached	Natural_Cache
0149 03f1       |    |		Declare_Variable	Discrete,With_Value
014a 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x1 = 0x14a,0xfffe
014b e5ff       |    |		Load	0x2,-0x1
014c 01dd       |    |		Execute	Vector,First
014d 00da       |    |		Load_Top	At_Offset_2
014e e5ff       |    |		Load	0x2,-0x1
014f 01cf       |    |		Execute	Vector,Slice_Read
0150 4820       |H   |		Short_Literal	0x20
0151 e005       |    |		Load	0x0,0x5
0152 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0153 00e3       |    |		Load_Encached	Natural_Cache
0154 03f1       |    |		Declare_Variable	Discrete,With_Value
0155 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x2 = 0x155,0xfffd
0156 00da       |    |		Load_Top	At_Offset_2
0157 e5ff       |    |		Load	0x2,-0x1
0158 01dc       |    |		Execute	Vector,Last
0159 e5ff       |    |		Load	0x2,-0x1
015a 01cf       |    |		Execute	Vector,Slice_Read
015b 4820       |H   |		Short_Literal	0x20
015c e005       |    |		Load	0x0,0x5
015d 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
015e 00e3       |    |		Load_Encached	Natural_Cache
015f 03f1       |    |		Declare_Variable	Discrete,With_Value
0160			BODY_0140:
0160 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0x3 = 0x160,0x1
0161 0a01       |    |		Execute_Immediate	Plus,0x1
0162 0248       | H  |		Execute	Discrete,Check_In_Integer
0163 00d9       |    |		Load_Top	At_Offset_1
0164 0aff       |    |		Execute_Immediate	Plus,-0x1
0165 0248       | H  |		Execute	Discrete,Check_In_Integer
0166 e5ff       |    |		Load	0x2,-0x1
0167 01cf       |    |		Execute	Vector,Slice_Read
0168 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0169 0000 0000  |    |		.BLANK	0000[0x7]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0185       |    |		.CONST	0x0185								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0003       |    |		.CONST	0x0003								; Number of locals
0173			INIT_0170:
0173 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb = .DEBUG	0x0173,0x0a46,0x0002,0x0000,0x0058,0x7555,0x0000,0x01e9
													; Debug Table 0xb.0x0 = 0x173,0xffff
0174 00db       |    |		Load_Top	At_Offset_3
0175 0092 07be  |    |		Action	Push_String_Extended,0x7be					; " for \x22"
0177 e005       |    |		Load	0x0,0x5
0178 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0179 0a06       |    |		Execute_Immediate	Plus,0x6
017a 00e3       |    |		Load_Encached	Natural_Cache
017b 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
017c 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x1 = 0x17c,0xfffe
017d e5ff       |    |		Load	0x2,-0x1
017e 0092 07bf  |    |		Action	Push_String_Extended,0x7bf					; "\x22 => \x22"
0180 e005       |    |		Load	0x0,0x5
0181 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0182 0aff       |    |		Execute_Immediate	Plus,-0x1
0183 00e3       |    |		Load_Encached	Natural_Cache
0184 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0185			BODY_0170:
0185 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0x2 = 0x185,0x1
0186 00d9       |    |		Load_Top	At_Offset_1
0187 e5ff       |    |		Load	0x2,-0x1
0188 01cf       |    |		Execute	Vector,Slice_Read
0189 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
018a 0000 0000  |    |		.BLANK	0000[0x6]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 01a4       |    |		.CONST	0x01a4								; Address of begin
0191 0004       |    |		.CONST	0x0004								; Address of exception handler
0192 0003       |    |		.CONST	0x0003								; Number of locals
0193			INIT_0190:
0193 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc = .DEBUG	0x0193,0x0a4e,0x0002,0x0000,0x0058,0x7555,0x0000,0x021c
													; Debug Table 0xc.0x0 = 0x193,0xffff
0194 00db       |    |		Load_Top	At_Offset_3
0195 0092 07bf  |    |		Action	Push_String_Extended,0x7bf					; "\x22 => \x22"
0197 e005       |    |		Load	0x0,0x5
0198 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0199 0a06       |    |		Execute_Immediate	Plus,0x6
019a 00e3       |    |		Load_Encached	Natural_Cache
019b 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
019c 4800       |H   |		Short_Literal	0x0							; Debug Table 0xc.0x1 = 0x19c,0xfffe
019d e5ff       |    |		Load	0x2,-0x1
019e 4822       |H"  |		Short_Literal	0x22
019f e005       |    |		Load	0x0,0x5
01a0 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01a1 0aff       |    |		Execute_Immediate	Plus,-0x1
01a2 00e3       |    |		Load_Encached	Natural_Cache
01a3 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
01a4			BODY_0190:
01a4 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x2 = 0x1a4,0x1
01a5 00d9       |    |		Load_Top	At_Offset_1
01a6 e5ff       |    |		Load	0x2,-0x1
01a7 01cf       |    |		Execute	Vector,Slice_Read
01a8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a9 0000 0000  |    |		.BLANK	0000[0x7]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01c7       |    |		.CONST	0x01c7								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0003       |    |		.CONST	0x0003								; Number of locals
01b3			INIT_01b0:
01b3 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd = .DEBUG	0x01b3,0x0a56,0x0002,0x0000,0x0058,0x7555,0x0000,0x024f
													; Debug Table 0xd.0x0 = 0x1b3,0xffff
01b4 00db       |    |		Load_Top	At_Offset_3
01b5 4820       |H   |		Short_Literal	0x20
01b6 e005       |    |		Load	0x0,0x5
01b7 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01b8 0aff       |    |		Execute_Immediate	Plus,-0x1
01b9 00e3       |    |		Load_Encached	Natural_Cache
01ba 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
01bb 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x1 = 0x1bb,0xfffe
01bc e5ff       |    |		Load	0x2,-0x1
01bd 01dd       |    |		Execute	Vector,First
01be 00da       |    |		Load_Top	At_Offset_2
01bf e5ff       |    |		Load	0x2,-0x1
01c0 01cf       |    |		Execute	Vector,Slice_Read
01c1 482e       |H.  |		Short_Literal	0x2e
01c2 e005       |    |		Load	0x0,0x5
01c3 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01c4 0a01       |    |		Execute_Immediate	Plus,0x1
01c5 00e3       |    |		Load_Encached	Natural_Cache
01c6 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
01c7			BODY_01b0:
01c7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x2 = 0x1c7,0x1
01c8 00da       |    |		Load_Top	At_Offset_2
01c9 e5ff       |    |		Load	0x2,-0x1
01ca 01cf       |    |		Execute	Vector,Slice_Read
01cb 00e3       |    |		Load_Encached	Natural_Cache
01cc 0122       | "  |		Execute	Any,Make_Root_Type
01cd 00e0       |    |		Load_Encached	Standard_Cache
01ce 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
01cf 00e3       |    |		Load_Encached	Natural_Cache
01d0 025b       | [  |		Execute	Discrete,Check_In_Type
01d1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01d2 0000 0000  |    |		.BLANK	0000[0x6]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01eb       |    |		.CONST	0x01eb								; Address of begin
01d9 0004       |    |		.CONST	0x0004								; Address of exception handler
01da 0003       |    |		.CONST	0x0003								; Number of locals
01db			INIT_01d8:
01db 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe = .DEBUG	0x01db,0x0a5e,0x0002,0x0000,0x0058,0x7555,0x0000,0x028c
													; Debug Table 0xe.0x0 = 0x1db,0xffff
01dc 00db       |    |		Load_Top	At_Offset_3
01dd 4822       |H"  |		Short_Literal	0x22
01de e005       |    |		Load	0x0,0x5
01df 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01e0 0a01       |    |		Execute_Immediate	Plus,0x1
01e1 00e3       |    |		Load_Encached	Natural_Cache
01e2 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
01e3 4800       |H   |		Short_Literal	0x0							; Debug Table 0xe.0x1 = 0x1e3,0xfffe
01e4 e5ff       |    |		Load	0x2,-0x1
01e5 4822       |H"  |		Short_Literal	0x22
01e6 e005       |    |		Load	0x0,0x5
01e7 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01e8 0aff       |    |		Execute_Immediate	Plus,-0x1
01e9 00e3       |    |		Load_Encached	Natural_Cache
01ea 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
01eb			BODY_01d8:
01eb 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0x2 = 0x1eb,0x1
01ec 00d9       |    |		Load_Top	At_Offset_1
01ed e5ff       |    |		Load	0x2,-0x1
01ee 01cf       |    |		Execute	Vector,Slice_Read
01ef 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01fb       |    |		.CONST	0x01fb								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0002       |    |		.CONST	0x0002								; Number of locals
01f3			INIT_01f0:
01f3 4800       |H   |		Short_Literal	0x0							; Debug Table 0xf = .DEBUG	0x01f3,0x0a66,0x0002,0x0000,0x0058,0x7555,0x0000,0x02bf
													; Debug Table 0xf.0x0 = 0x1f3,0xffff
01f4 00db       |    |		Load_Top	At_Offset_3
01f5 4820       |H   |		Short_Literal	0x20
01f6 e005       |    |		Load	0x0,0x5
01f7 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01f8 0a01       |    |		Execute_Immediate	Plus,0x1
01f9 00e3       |    |		Load_Encached	Natural_Cache
01fa 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
01fb			BODY_01f0:
01fb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x1 = 0x1fb,0x1
01fc e5ff       |    |		Load	0x2,-0x1
01fd 01dc       |    |		Execute	Vector,Last
01fe e5ff       |    |		Load	0x2,-0x1
01ff 01cf       |    |		Execute	Vector,Slice_Read
0200 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0201 0000 0000  |    |		.BLANK	0000[0x7]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 0213       |    |		.CONST	0x0213								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0002       |    |		.CONST	0x0002								; Number of locals
020b			INIT_0208:
020b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10 = .DEBUG	0x020b,0x0a6c,0x0002,0x0000,0x0058,0x7555,0x0000,0x02e4
													; Debug Table 0x10.0x0 = 0x20b,0xffff
020c 00db       |    |		Load_Top	At_Offset_3
020d 4820       |H   |		Short_Literal	0x20
020e e005       |    |		Load	0x0,0x5
020f 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0210 0a01       |    |		Execute_Immediate	Plus,0x1
0211 00e3       |    |		Load_Encached	Natural_Cache
0212 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0213			BODY_0208:
0213 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x1 = 0x213,0x1
0214 e5ff       |    |		Load	0x2,-0x1
0215 01dc       |    |		Execute	Vector,Last
0216 e5ff       |    |		Load	0x2,-0x1
0217 01cf       |    |		Execute	Vector,Slice_Read
0218 e007       |    |		Load	0x0,0x7
0219 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
021a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
021b 00e0       |    |		Load_Encached	Standard_Cache
021c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
021d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
021e 0000 0000  |    |		.XXX[0x2]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0232       | 2  |		.CONST	0x0232								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0004       |    |		.CONST	0x0004								; Number of locals
0223			INIT_0220:
0223 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11 = .DEBUG	0x0223,0x0a72,0x0001,0x0000,0x0058,0x7555,0x0000,0x0315
													; Debug Table 0x11.0x0 = 0x223,0xffff
0224 e5fe       |    |		Load	0x2,-0x2
0225 0092 07bd  |    |		Action	Push_String_Extended,0x7bd					; " => "
0227 e005       |    |		Load	0x0,0x5
0228 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0229 0a04       |    |		Execute_Immediate	Plus,0x4
022a 00e3       |    |		Load_Encached	Natural_Cache
022b 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
022c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x11.0x1 = 0x22c,0xfffe
022d 01dc       |    |		Execute	Vector,Last
022e 00e3       |    |		Load_Encached	Natural_Cache
022f 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0230 e008       |    |		Load	0x0,0x8								; Debug Table 0x11.0x2 = 0x230,0xfffd
0231 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0232			BODY_0220:
0232 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0x3 = 0x232,0x1
0233 e5fe       |    |		Load	0x2,-0x2
0234 01d7       |    |		Execute	Vector,Field_Read
0235 0f7b       | {  |		Execute_Immediate	Equal,0x7b
0236 680a       |h   |		Jump_Zero	0x241
0237 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11.0x4 = 0x237,0x2
0238 0a01       |    |		Execute_Immediate	Plus,0x1
0239 005b       | [  |		Store_Top	Discrete,At_Offset_3
023a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x5 = 0x23a,0x3
023b e5fe       |    |		Load	0x2,-0x2
023c 487d       |H}  |		Short_Literal	0x7d
023d e005       |    |		Load	0x0,0x5
023e 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
023f 0aff       |    |		Execute_Immediate	Plus,-0x1
0240 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0241 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x11.0x6 = 0x241,0x4
0242 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0243 4602       |F   |		Jump_Case	0x3
0244 7802       |x   |		Jump	0x247								; case 0x0
0245 7811       |x   |		Jump	0x257								; case 0x1
0246 7821       |x!  |		Jump	0x268								; case 0x2
0247 e007       |    |		Load	0x0,0x7								; Debug Table 0x11.0x7 = 0x247,0x5
0248 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0249 e5fc       |    |		Load	0x2,-0x4
024a e402       |    |		Load	0x2,0x2
024b e403       |    |		Load	0x2,0x3
024c e5fe       |    |		Load	0x2,-0x2
024d 01cf       |    |		Execute	Vector,Slice_Read
024e 00e1       |    |		Load_Encached	Boolean_Cache
024f 00e0       |    |		Load_Encached	Standard_Cache
0250 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0251 e007       |    |		Load	0x0,0x7
0252 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
0253 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0254 c5fc       |    |		Store	0x2,-0x4
0255 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0256 7820       |x   |		Jump	0x277
0257 e007       |    |		Load	0x0,0x7								; Debug Table 0x11.0x8 = 0x257,0x6
0258 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0259 e5fc       |    |		Load	0x2,-0x4
025a e402       |    |		Load	0x2,0x2
025b 0a01       |    |		Execute_Immediate	Plus,0x1
025c 0248       | H  |		Execute	Discrete,Check_In_Integer
025d e403       |    |		Load	0x2,0x3
025e 0aff       |    |		Execute_Immediate	Plus,-0x1
025f 0248       | H  |		Execute	Discrete,Check_In_Integer
0260 e5fe       |    |		Load	0x2,-0x2
0261 01cf       |    |		Execute	Vector,Slice_Read
0262 e007       |    |		Load	0x0,0x7
0263 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
0264 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0265 c5fc       |    |		Store	0x2,-0x4
0266 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0267 780f       |x   |		Jump	0x277
0268 e007       |    |		Load	0x0,0x7								; Debug Table 0x11.0x9 = 0x268,0x7
0269 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
026a e5fc       |    |		Load	0x2,-0x4
026b e402       |    |		Load	0x2,0x2
026c e403       |    |		Load	0x2,0x3
026d e5fe       |    |		Load	0x2,-0x2
026e 01cf       |    |		Execute	Vector,Slice_Read
026f 00e2       |    |		Load_Encached	Integer_Cache
0270 00e0       |    |		Load_Encached	Standard_Cache
0271 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0272 e007       |    |		Load	0x0,0x7
0273 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
0274 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0275 c5fc       |    |		Store	0x2,-0x4
0276 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0277 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0xa = 0x277,0x8
0278 e008       |    |		Load	0x0,0x8
0279 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
027a 700b       |p   |		Jump_Nonzero	0x286
027b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x11.0xb = 0x27b,0x9
027c 0092 07c0  |    |		Action	Push_String_Extended,0x7c0					; "setting default for field "
027e e5fc       |    |		Load	0x2,-0x4
027f e007       |    |		Load	0x0,0x7
0280 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
0281 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0282 01cc       |    |		Execute	Vector,Catenate
0283 00da       |    |		Load_Top	At_Offset_2
0284 e003       |    |		Load	0x0,0x3
0285 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0286 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0287 0000       |    |		.XXX[0x1]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 0296       |    |		.CONST	0x0296								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0004       |    |		.CONST	0x0004								; Number of locals
028b			INIT_0288:
028b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x12 = .DEBUG	0x028b,0x0a8c,0x0001,0x0000,0x0058,0x7555,0x0000,0x03e3
													; Debug Table 0x12.0x0 = 0x28b,0xffff
028c e5fd       |    |		Load	0x2,-0x3
028d 0092 07bd  |    |		Action	Push_String_Extended,0x7bd					; " => "
028f e005       |    |		Load	0x0,0x5
0290 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0291 00e3       |    |		Load_Encached	Natural_Cache
0292 03f1       |    |		Declare_Variable	Discrete,With_Value
0293 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x12.0x1 = 0x293,0xfffe
0294 e008       |    |		Load	0x0,0x8								; Debug Table 0x12.0x2 = 0x294,0xfffd
0295 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0296			BODY_0288:
0296 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x12.0x3 = 0x296,0x1
0297 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0298 4602       |F   |		Jump_Case	0x3
0299 7802       |x   |		Jump	0x29c								; case 0x0
029a 7820       |x   |		Jump	0x2bb								; case 0x1
029b 7842       |xB  |		Jump	0x2de								; case 0x2
029c e007       |    |		Load	0x0,0x7								; Debug Table 0x12.0x4 = 0x29c,0x2
029d 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
029e e5fb       |    |		Load	0x2,-0x5
029f e402       |    |		Load	0x2,0x2
02a0 0a04       |    |		Execute_Immediate	Plus,0x4
02a1 0248       | H  |		Execute	Discrete,Check_In_Integer
02a2 e5fd       |    |		Load	0x2,-0x3
02a3 01dc       |    |		Execute	Vector,Last
02a4 e5fd       |    |		Load	0x2,-0x3
02a5 01cf       |    |		Execute	Vector,Slice_Read
02a6 00e1       |    |		Load_Encached	Boolean_Cache
02a7 00e0       |    |		Load_Encached	Standard_Cache
02a8 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02a9 e5fd       |    |		Load	0x2,-0x3
02aa 01dd       |    |		Execute	Vector,First
02ab e402       |    |		Load	0x2,0x2
02ac e5fd       |    |		Load	0x2,-0x3
02ad 01cf       |    |		Execute	Vector,Slice_Read
02ae 00e3       |    |		Load_Encached	Natural_Cache
02af 0122       | "  |		Execute	Any,Make_Root_Type
02b0 00e0       |    |		Load_Encached	Standard_Cache
02b1 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02b2 00e3       |    |		Load_Encached	Natural_Cache
02b3 025b       | [  |		Execute	Discrete,Check_In_Type
02b4 e5ff       |    |		Load	0x2,-0x1
02b5 e007       |    |		Load	0x0,0x7
02b6 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
02b7 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
02b8 c5fb       |    |		Store	0x2,-0x5
02b9 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02ba 7841       |xA  |		Jump	0x2fc
02bb 4800       |H   |		Short_Literal	0x0							; Debug Table 0x12.0x5 = 0x2bb,0x3
02bc e5fd       |    |		Load	0x2,-0x3
02bd 4822       |H"  |		Short_Literal	0x22
02be e005       |    |		Load	0x0,0x5
02bf 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
02c0 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
02c1 e007       |    |		Load	0x0,0x7								; Debug Table 0x12.0x6 = 0x2c1,0x4
02c2 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
02c3 e5fb       |    |		Load	0x2,-0x5
02c4 e402       |    |		Load	0x2,0x2
02c5 0a05       |    |		Execute_Immediate	Plus,0x5
02c6 0248       | H  |		Execute	Discrete,Check_In_Integer
02c7 e403       |    |		Load	0x2,0x3
02c8 0aff       |    |		Execute_Immediate	Plus,-0x1
02c9 0248       | H  |		Execute	Discrete,Check_In_Integer
02ca e5fd       |    |		Load	0x2,-0x3
02cb 01cf       |    |		Execute	Vector,Slice_Read
02cc e5fd       |    |		Load	0x2,-0x3
02cd 01dd       |    |		Execute	Vector,First
02ce e402       |    |		Load	0x2,0x2
02cf e5fd       |    |		Load	0x2,-0x3
02d0 01cf       |    |		Execute	Vector,Slice_Read
02d1 00e3       |    |		Load_Encached	Natural_Cache
02d2 0122       | "  |		Execute	Any,Make_Root_Type
02d3 00e0       |    |		Load_Encached	Standard_Cache
02d4 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02d5 00e3       |    |		Load_Encached	Natural_Cache
02d6 025b       | [  |		Execute	Discrete,Check_In_Type
02d7 e5ff       |    |		Load	0x2,-0x1
02d8 e007       |    |		Load	0x0,0x7
02d9 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
02da 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
02db c5fb       |    |		Store	0x2,-0x5
02dc 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02dd 781e       |x   |		Jump	0x2fc
02de e007       |    |		Load	0x0,0x7								; Debug Table 0x12.0x7 = 0x2de,0x5
02df 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
02e0 e5fb       |    |		Load	0x2,-0x5
02e1 e402       |    |		Load	0x2,0x2
02e2 0a04       |    |		Execute_Immediate	Plus,0x4
02e3 0248       | H  |		Execute	Discrete,Check_In_Integer
02e4 e5fd       |    |		Load	0x2,-0x3
02e5 01dc       |    |		Execute	Vector,Last
02e6 e5fd       |    |		Load	0x2,-0x3
02e7 01cf       |    |		Execute	Vector,Slice_Read
02e8 00e2       |    |		Load_Encached	Integer_Cache
02e9 00e0       |    |		Load_Encached	Standard_Cache
02ea 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02eb e5fd       |    |		Load	0x2,-0x3
02ec 01dd       |    |		Execute	Vector,First
02ed e402       |    |		Load	0x2,0x2
02ee e5fd       |    |		Load	0x2,-0x3
02ef 01cf       |    |		Execute	Vector,Slice_Read
02f0 00e3       |    |		Load_Encached	Natural_Cache
02f1 0122       | "  |		Execute	Any,Make_Root_Type
02f2 00e0       |    |		Load_Encached	Standard_Cache
02f3 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02f4 00e3       |    |		Load_Encached	Natural_Cache
02f5 025b       | [  |		Execute	Discrete,Check_In_Type
02f6 e5ff       |    |		Load	0x2,-0x1
02f7 e007       |    |		Load	0x0,0x7
02f8 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
02f9 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
02fa c5fb       |    |		Store	0x2,-0x5
02fb 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02fc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x8 = 0x2fc,0x6
02fd e008       |    |		Load	0x0,0x8
02fe 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
02ff 700b       |p   |		Jump_Nonzero	0x30b
0300 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x12.0x9 = 0x300,0x7
0301 0092 07c1  |    |		Action	Push_String_Extended,0x7c1					; "setting elements of field "
0303 e5fb       |    |		Load	0x2,-0x5
0304 e007       |    |		Load	0x0,0x7
0305 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
0306 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0307 01cc       |    |		Execute	Vector,Catenate
0308 00da       |    |		Load_Top	At_Offset_2
0309 e003       |    |		Load	0x0,0x3
030a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
030b 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
030c 0000 0000  |    |		.BLANK	0000[0x4]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0319       |    |		.CONST	0x0319								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0003       |    |		.CONST	0x0003								; Number of locals
0313			INIT_0310:
0313 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x13 = .DEBUG	0x0313,0x0aa2,0x0001,0x0000,0x0058,0x7555,0x0000,0x04ca
													; Debug Table 0x13.0x0 = 0x313,0xffff
0314 e5f9       |    |		Load	0x2,-0x7
0315 e002       |    |		Load	0x0,0x2
0316 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0317 029f 07ab  |    |		Declare_Subprogram	INIT_07a8,For_Call
0319			BODY_0310:
0319 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x13.0x1 = 0x319,0x1
031a 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
031b a5f9       |    |		Store_Unchecked	0x2,-0x7
031c e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x13.0x2 = 0x31c,0x2
031d e5fb       |    |		Load	0x2,-0x5
031e 00db       |    |		Load_Top	At_Offset_3
031f 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0320 e5fe       |    |		Load	0x2,-0x2
0321 821c       |    |		Call	0x1,0x1c
0322 c5fa       |    |		Store	0x2,-0x6
0323 00cf       |    |		Action	Mark_Auxiliary
0324 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x13.0x3 = 0x324,0x3
0325 4801       |H   |		Short_Literal	0x1
0326 0263       | c  |		Execute	Discrete,Above_Bound
0327 7003       |p   |		Jump_Nonzero	0x32b
0328 8403       |    |		Call	0x2,0x3								; Debug Table 0x13.0x4 = 0x328,0x4
0329 00c8       |    |		Action	Pop_Auxiliary_Range
032a 3ffd       |?   |		Loop_Increasing	0x328
032b 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
032c 0000 0000  |    |		.BLANK	0000[0x4]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0348       | H  |		.CONST	0x0348								; Address of begin
0331 0004       |    |		.CONST	0x0004								; Address of exception handler
0332 0005       |    |		.CONST	0x0005								; Number of locals
0333			INIT_0330:
0333 4800       |H   |		Short_Literal	0x0							; Debug Table 0x14 = .DEBUG	0x0333,0x0aae,0x0001,0x0000,0x0058,0x7555,0x0000,0x053e
													; Debug Table 0x14.0x0 = 0x333,0xffff
0334 e5fd       |    |		Load	0x2,-0x3
0335 0092 07bd  |    |		Action	Push_String_Extended,0x7bd					; " => "
0337 e005       |    |		Load	0x0,0x5
0338 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0339 0a04       |    |		Execute_Immediate	Plus,0x4
033a 00e3       |    |		Load_Encached	Natural_Cache
033b 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
033c e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x14.0x1 = 0x33c,0xfffe
033d 01dc       |    |		Execute	Vector,Last
033e 00e3       |    |		Load_Encached	Natural_Cache
033f 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0340 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x14.0x2 = 0x340,0xfffd
0341 e5fd       |    |		Load	0x2,-0x3
0342 01d7       |    |		Execute	Vector,Field_Read
0343 0f7b       | {  |		Execute_Immediate	Equal,0x7b
0344 00e1       |    |		Load_Encached	Boolean_Cache
0345 03f1       |    |		Declare_Variable	Discrete,With_Value
0346 e008       |    |		Load	0x0,0x8								; Debug Table 0x14.0x3 = 0x346,0xfffc
0347 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0348			BODY_0330:
0348 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x14.0x4 = 0x348,0x1
0349 6807       |h   |		Jump_Zero	0x351
034a e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x14.0x5 = 0x34a,0x2
034b e5fc       |    |		Load	0x2,-0x4
034c e5fd       |    |		Load	0x2,-0x3
034d e5fe       |    |		Load	0x2,-0x2
034e 821c       |    |		Call	0x1,0x1c
034f c5fb       |    |		Store	0x2,-0x5
0350 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0351 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x14.0x6 = 0x351,0x3
0352 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0353 4602       |F   |		Jump_Case	0x3
0354 7802       |x   |		Jump	0x357								; case 0x0
0355 7812       |x   |		Jump	0x368								; case 0x1
0356 7829       |x)  |		Jump	0x380								; case 0x2
0357 e007       |    |		Load	0x0,0x7								; Debug Table 0x14.0x7 = 0x357,0x4
0358 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0359 e5fb       |    |		Load	0x2,-0x5
035a e402       |    |		Load	0x2,0x2
035b e403       |    |		Load	0x2,0x3
035c e5fd       |    |		Load	0x2,-0x3
035d 01cf       |    |		Execute	Vector,Slice_Read
035e 00e1       |    |		Load_Encached	Boolean_Cache
035f 00e0       |    |		Load_Encached	Standard_Cache
0360 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0361 e5ff       |    |		Load	0x2,-0x1
0362 e007       |    |		Load	0x0,0x7
0363 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
0364 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0365 c5fb       |    |		Store	0x2,-0x5
0366 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0367 7828       |x(  |		Jump	0x390
0368 4800       |H   |		Short_Literal	0x0							; Debug Table 0x14.0x8 = 0x368,0x5
0369 e5fd       |    |		Load	0x2,-0x3
036a 4822       |H"  |		Short_Literal	0x22
036b e005       |    |		Load	0x0,0x5
036c 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
036d 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
036e e007       |    |		Load	0x0,0x7								; Debug Table 0x14.0x9 = 0x36e,0x6
036f 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0370 e5fb       |    |		Load	0x2,-0x5
0371 e402       |    |		Load	0x2,0x2
0372 0a01       |    |		Execute_Immediate	Plus,0x1
0373 0248       | H  |		Execute	Discrete,Check_In_Integer
0374 e403       |    |		Load	0x2,0x3
0375 0aff       |    |		Execute_Immediate	Plus,-0x1
0376 0248       | H  |		Execute	Discrete,Check_In_Integer
0377 e5fd       |    |		Load	0x2,-0x3
0378 01cf       |    |		Execute	Vector,Slice_Read
0379 e5ff       |    |		Load	0x2,-0x1
037a e007       |    |		Load	0x0,0x7
037b 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
037c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
037d c5fb       |    |		Store	0x2,-0x5
037e 0059       | Y  |		Store_Top	Discrete,At_Offset_1
037f 7810       |x   |		Jump	0x390
0380 e007       |    |		Load	0x0,0x7								; Debug Table 0x14.0xa = 0x380,0x7
0381 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0382 e5fb       |    |		Load	0x2,-0x5
0383 e402       |    |		Load	0x2,0x2
0384 e403       |    |		Load	0x2,0x3
0385 e5fd       |    |		Load	0x2,-0x3
0386 01cf       |    |		Execute	Vector,Slice_Read
0387 00e2       |    |		Load_Encached	Integer_Cache
0388 00e0       |    |		Load_Encached	Standard_Cache
0389 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
038a e5ff       |    |		Load	0x2,-0x1
038b e007       |    |		Load	0x0,0x7
038c 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
038d 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
038e c5fb       |    |		Store	0x2,-0x5
038f 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0390 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0xb = 0x390,0x8
0391 e008       |    |		Load	0x0,0x8
0392 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0393 700b       |p   |		Jump_Nonzero	0x39f
0394 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x14.0xc = 0x394,0x9
0395 0092 07c2  |    |		Action	Push_String_Extended,0x7c2					; "setting field "
0397 e5fb       |    |		Load	0x2,-0x5
0398 e007       |    |		Load	0x0,0x7
0399 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
039a 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
039b 01cc       |    |		Execute	Vector,Catenate
039c 00da       |    |		Load_Top	At_Offset_2
039d e003       |    |		Load	0x0,0x3
039e 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
039f 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03af       |    |		.CONST	0x03af								; Address of begin
03a1 0004       |    |		.CONST	0x0004								; Address of exception handler
03a2 0005       |    |		.CONST	0x0005								; Number of locals
03a3			INIT_03a0:
03a3 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x15 = .DEBUG	0x03a3,0x0aca,0x0001,0x0000,0x0058,0x7555,0x0000,0x0619
													; Debug Table 0x15.0x0 = 0x3a3,0xffff
03a4 e5fb       |    |		Load	0x2,-0x5
03a5 e002       |    |		Load	0x0,0x2
03a6 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
03a7 e007       |    |		Load	0x0,0x7								; Debug Table 0x15.0x1 = 0x3a7,0xfffe
03a8 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
03a9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03aa e007       |    |		Load	0x0,0x7								; Debug Table 0x15.0x2 = 0x3aa,0xfffd
03ab 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
03ac 0322       | "  |		Declare_Variable	Record
03ad e008       |    |		Load	0x0,0x8								; Debug Table 0x15.0x3 = 0x3ad,0xfffc
03ae 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
03af			BODY_03a0:
03af 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x15.0x4 = 0x3af,0x1
03b0 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03b1 a5fb       |    |		Store_Unchecked	0x2,-0x5
03b2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x15.0x5 = 0x3b2,0x2
03b3 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03b4 820f       |    |		Call	0x1,0xf
03b5 a5fa       |    |		Store_Unchecked	0x2,-0x6
03b6 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x15.0x6 = 0x3b6,0x3
03b7 703a       |p:  |		Jump_Nonzero	0x3f2
03b8 e007       |    |		Load	0x0,0x7								; Debug Table 0x15.0x7 = 0x3b8,0x4
03b9 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
03ba e007       |    |		Load	0x0,0x7
03bb 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
03bc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03bd e5ff       |    |		Load	0x2,-0x1
03be e402       |    |		Load	0x2,0x2
03bf 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03c0 8211       |    |		Call	0x1,0x11
03c1 e007       |    |		Load	0x0,0x7
03c2 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
03c3 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
03c4 c403       |    |		Store	0x2,0x3
03c5 0059       | Y  |		Store_Top	Discrete,At_Offset_1
03c6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x8 = 0x3c6,0x5
03c7 e008       |    |		Load	0x0,0x8
03c8 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
03c9 700a       |p   |		Jump_Nonzero	0x3d4
03ca e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x15.0x9 = 0x3ca,0x6
03cb 0092 07c3  |    |		Action	Push_String_Extended,0x7c3					; "restoring field "
03cd e402       |    |		Load	0x2,0x2
03ce 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03cf 8211       |    |		Call	0x1,0x11
03d0 01cc       |    |		Execute	Vector,Catenate
03d1 00da       |    |		Load_Top	At_Offset_2
03d2 e003       |    |		Load	0x0,0x3
03d3 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
03d4 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15.0xa = 0x3d4,0x7
03d5 e007       |    |		Load	0x0,0x7
03d6 1b27       | '  |		Execute	Package,Field_Read,Field_Number 0x27
03d7 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03d8 00da       |    |		Load_Top	At_Offset_2
03d9 017d       | }  |		Execute	Record,Structure_Write
03da 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x15.0xb = 0x3da,0x8
03db 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03dc 680d       |h   |		Jump_Zero	0x3ea
03dd e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x15.0xc = 0x3dd,0x9
03de 00db       |    |		Load_Top	At_Offset_3
03df e5fc       |    |		Load	0x2,-0x4
03e0 e5fd       |    |		Load	0x2,-0x3
03e1 e402       |    |		Load	0x2,0x2
03e2 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03e3 8212       |    |		Call	0x1,0x12
03e4 e404       |    |		Load	0x2,0x4
03e5 e5ff       |    |		Load	0x2,-0x1
03e6 821e       |    |		Call	0x1,0x1e
03e7 c403       |    |		Store	0x2,0x3
03e8 c5fb       |    |		Store	0x2,-0x5
03e9 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03ea 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15.0xd = 0x3ea,0xa
03eb e5fc       |    |		Load	0x2,-0x4
03ec e402       |    |		Load	0x2,0x2
03ed 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03ee e404       |    |		Load	0x2,0x4
03ef e5ff       |    |		Load	0x2,-0x1
03f0 821f       |    |		Call	0x1,0x1f
03f1 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
03f2 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03f3 0000 0000  |    |		.BLANK	0000[0x5]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 0401       |    |		.CONST	0x0401								; Address of begin
03f9 0004       |    |		.CONST	0x0004								; Address of exception handler
03fa 0003       |    |		.CONST	0x0003								; Number of locals
03fb			INIT_03f8:
03fb 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x16 = .DEBUG	0x03fb,0x0ae8,0x0001,0x0000,0x0058,0x7555,0x0000,0x06d2
													; Debug Table 0x16.0x0 = 0x3fb,0xffff
03fc 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
03fd e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x16.0x1 = 0x3fd,0xfffe
03fe e5f9       |    |		Load	0x2,-0x7
03ff e002       |    |		Load	0x0,0x2
0400 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0401			BODY_03f8:
0401 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x16.0x2 = 0x401,0x1
0402 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0403 a5f9       |    |		Store_Unchecked	0x2,-0x7
0404 00cf       |    |		Action	Mark_Auxiliary
0405 780a       |x   |		Jump	0x410
0406 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x16.0x3 = 0x406,0x3
0407 e5f9       |    |		Load	0x2,-0x7
0408 e5fa       |    |		Load	0x2,-0x6
0409 e5fb       |    |		Load	0x2,-0x5
040a e5fe       |    |		Load	0x2,-0x2
040b e5ff       |    |		Load	0x2,-0x1
040c 8220       |    |		Call	0x1,0x20
040d c5f9       |    |		Store	0x2,-0x7
040e 005b       | [  |		Store_Top	Discrete,At_Offset_3
040f 00c9       |    |		Action	Pop_Auxiliary_Loop
0410 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x16.0x4 = 0x410,0x2
0411 6ff4       |o   |		Jump_Zero	0x406
0412 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0413 0000 0000  |    |		.BLANK	0000[0x5]
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 0426       | &  |		.CONST	0x0426								; Address of begin
0419 0004       |    |		.CONST	0x0004								; Address of exception handler
041a 0005       |    |		.CONST	0x0005								; Number of locals
041b			INIT_0418:
041b e004       |    |		Load	0x0,0x4								; Debug Table 0x17 = .DEBUG	0x041b,0x0af4,0x0001,0x0000,0x0058,0x7555,0x0000,0x0727
													; Debug Table 0x17.0x0 = 0x41b,0xffff
041c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
041d 02c7       |    |		Declare_Variable	Any
041e 00d8       |    |		Load_Top	At_Offset_0
041f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0420 e009       |    |		Load	0x0,0x9								; Debug Table 0x17.0x1 = 0x420,0xfffe
0421 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0422 e008       |    |		Load	0x0,0x8								; Debug Table 0x17.0x2 = 0x422,0xfffd
0423 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0424 e008       |    |		Load	0x0,0x8								; Debug Table 0x17.0x3 = 0x424,0xfffc
0425 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0426			BODY_0418:
0426 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x4 = 0x426,0x1
0427 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0428 a5fc       |    |		Store_Unchecked	0x2,-0x4
0429 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x5 = 0x429,0x2
042a 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
042b 820f       |    |		Call	0x1,0xf
042c a5fb       |    |		Store_Unchecked	0x2,-0x5
042d e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x17.0x6 = 0x42d,0x3
042e 7039       |p9  |		Jump_Nonzero	0x468
042f e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x17.0x7 = 0x42f,0x4
0430 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0431 8214       |    |		Call	0x1,0x14
0432 c402       |    |		Store	0x2,0x2
0433 e00a       |    |		Load	0x0,0xa								; Debug Table 0x17.0x8 = 0x433,0x5
0434 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0435 e00a       |    |		Load	0x0,0xa
0436 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0437 e5fe       |    |		Load	0x2,-0x2
0438 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0439 8215       |    |		Call	0x1,0x15
043a e00a       |    |		Load	0x0,0xa
043b 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
043c c403       |    |		Store	0x2,0x3
043d 005a       | Z  |		Store_Top	Discrete,At_Offset_2
043e 00cf       |    |		Action	Mark_Auxiliary
043f 0007       |    |		Action	Break_Optional							; Debug Table 0x17.0x9 = 0x43f,0x6
0440 e007       |    |		Load	0x0,0x7								; Debug Table 0x17.0xa = 0x440,0x7
0441 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0442 e402       |    |		Load	0x2,0x2
0443 e403       |    |		Load	0x2,0x3
0444 e5fe       |    |		Load	0x2,-0x2
0445 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0446 8216       |    |		Call	0x1,0x16
0447 e5fe       |    |		Load	0x2,-0x2
0448 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0449 8217       |    |		Call	0x1,0x17
044a e5ff       |    |		Load	0x2,-0x1
044b e007       |    |		Load	0x0,0x7
044c 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
044d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
044e 005a       | Z  |		Store_Top	Discrete,At_Offset_2
044f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x17.0xb = 0x44f,0x8
0450 0e52       | R  |		Execute_Immediate	Not_Equal,0x52
0451 7005       |p   |		Jump_Nonzero	0x457
0452 e402       |    |		Load	0x2,0x2								; Debug Table 0x17.0xc = 0x452,0x9
0453 8210       |    |		Call	0x1,0x10
0454 c402       |    |		Store	0x2,0x2
0455 00c9       |    |		Action	Pop_Auxiliary_Loop
0456 7fe9       |    |		Jump	0x440
0457 00ce       |    |		Action	Pop_Auxiliary
0458 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0xd = 0x458,0xa
0459 e008       |    |		Load	0x0,0x8
045a 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
045b 700c       |p   |		Jump_Nonzero	0x468
045c e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x17.0xe = 0x45c,0xb
045d 0092 07c4  |    |		Action	Push_String_Extended,0x7c4					; "restoring comment "
045f 4820       |H   |		Short_Literal	0x20
0460 e5fe       |    |		Load	0x2,-0x2
0461 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0462 e005       |    |		Load	0x0,0x5
0463 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0464 01cc       |    |		Execute	Vector,Catenate
0465 00da       |    |		Load_Top	At_Offset_2
0466 e003       |    |		Load	0x0,0x3
0467 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0468 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0469 0000 0000  |    |		.BLANK	0000[0x7]
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0479       | y  |		.CONST	0x0479								; Address of begin
0471 0004       |    |		.CONST	0x0004								; Address of exception handler
0472 0003       |    |		.CONST	0x0003								; Number of locals
0473			INIT_0470:
0473 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x18 = .DEBUG	0x0473,0x0b14,0x0001,0x0000,0x0058,0x7555,0x0000,0x07d4
													; Debug Table 0x18.0x0 = 0x473,0xffff
0474 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0475 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x18.0x1 = 0x475,0xfffe
0476 e5fc       |    |		Load	0x2,-0x4
0477 e002       |    |		Load	0x0,0x2
0478 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0479			BODY_0470:
0479 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x2 = 0x479,0x1
047a 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
047b a5fc       |    |		Store_Unchecked	0x2,-0x4
047c 00cf       |    |		Action	Mark_Auxiliary
047d 780c       |x   |		Jump	0x48a
047e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x18.0x3 = 0x47e,0x3
047f e5fc       |    |		Load	0x2,-0x4
0480 e5fd       |    |		Load	0x2,-0x3
0481 e5fe       |    |		Load	0x2,-0x2
0482 e5fc       |    |		Load	0x2,-0x4
0483 e002       |    |		Load	0x0,0x2
0484 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0485 e5ff       |    |		Load	0x2,-0x1
0486 8222       | "  |		Call	0x1,0x22
0487 c5fc       |    |		Store	0x2,-0x4
0488 005b       | [  |		Store_Top	Discrete,At_Offset_3
0489 00c9       |    |		Action	Pop_Auxiliary_Loop
048a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x18.0x4 = 0x48a,0x2
048b 6ff2       |o   |		Jump_Zero	0x47e
048c 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
048d 0000 0000  |    |		.XXX[0x3]
048f 0000       |    |
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0497       |    |		.CONST	0x0497								; Address of begin
0491 0004       |    |		.CONST	0x0004								; Address of exception handler
0492 0003       |    |		.CONST	0x0003								; Number of locals
0493			INIT_0490:
0493 e009       |    |		Load	0x0,0x9								; Debug Table 0x19 = .DEBUG	0x0493,0x0b20,0x0001,0x0000,0x0058,0x7555,0x0000,0x0820
													; Debug Table 0x19.0x0 = 0x493,0xffff
0494 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0495 e008       |    |		Load	0x0,0x8								; Debug Table 0x19.0x1 = 0x495,0xfffe
0496 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0497			BODY_0490:
0497 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x19.0x2 = 0x497,0x1
0498 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0499 a5fc       |    |		Store_Unchecked	0x2,-0x4
049a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x19.0x3 = 0x49a,0x2
049b 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
049c 820f       |    |		Call	0x1,0xf
049d a5fb       |    |		Store_Unchecked	0x2,-0x5
049e e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x19.0x4 = 0x49e,0x3
049f 7033       |p3  |		Jump_Nonzero	0x4d3
04a0 e00a       |    |		Load	0x0,0xa								; Debug Table 0x19.0x5 = 0x4a0,0x4
04a1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04a2 e00a       |    |		Load	0x0,0xa
04a3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
04a4 e5fe       |    |		Load	0x2,-0x2
04a5 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
04a6 e00a       |    |		Load	0x0,0xa
04a7 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04a8 005b       | [  |		Store_Top	Discrete,At_Offset_3
04a9 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04aa 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x6 = 0x4aa,0x5
04ab e008       |    |		Load	0x0,0x8
04ac 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
04ad 6819       |h   |		Jump_Zero	0x4c7
04ae e007       |    |		Load	0x0,0x7								; Debug Table 0x19.0x7 = 0x4ae,0x6
04af 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
04b0 00da       |    |		Load_Top	At_Offset_2
04b1 e5ff       |    |		Load	0x2,-0x1
04b2 e007       |    |		Load	0x0,0x7
04b3 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
04b4 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
04b5 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04b6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x8 = 0x4b6,0x7
04b7 e008       |    |		Load	0x0,0x8
04b8 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
04b9 700c       |p   |		Jump_Nonzero	0x4c6
04ba e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x19.0x9 = 0x4ba,0x8
04bb 0092 07c5  |    |		Action	Push_String_Extended,0x7c5					; "restoring user "
04bd 4820       |H   |		Short_Literal	0x20
04be e5fe       |    |		Load	0x2,-0x2
04bf 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
04c0 e005       |    |		Load	0x0,0x5
04c1 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
04c2 01cc       |    |		Execute	Vector,Catenate
04c3 00da       |    |		Load_Top	At_Offset_2
04c4 e003       |    |		Load	0x0,0x3
04c5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
04c6 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04c7 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x19.0xa = 0x4c7,0x9
04c8 4806       |H   |		Short_Literal	0x6
04c9 0092 07c6  |    |		Action	Push_String_Extended,0x7c6					; "Can't find user "
04cb 4820       |H   |		Short_Literal	0x20
04cc e5fe       |    |		Load	0x2,-0x2
04cd 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
04ce e005       |    |		Load	0x0,0x5
04cf 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
04d0 01cc       |    |		Execute	Vector,Catenate
04d1 e00b       |    |		Load	0x0,0xb
04d2 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
04d3 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04d4 0000 0000  |    |		.BLANK	0000[0x4]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04e1       |    |		.CONST	0x04e1								; Address of begin
04d9 0004       |    |		.CONST	0x0004								; Address of exception handler
04da 0003       |    |		.CONST	0x0003								; Number of locals
04db			INIT_04d8:
04db 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1a = .DEBUG	0x04db,0x0b38,0x0001,0x0000,0x0058,0x7555,0x0000,0x08b7
													; Debug Table 0x1a.0x0 = 0x4db,0xffff
04dc 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
04dd e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x1a.0x1 = 0x4dd,0xfffe
04de e5fc       |    |		Load	0x2,-0x4
04df e002       |    |		Load	0x0,0x2
04e0 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04e1			BODY_04d8:
04e1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0x2 = 0x4e1,0x1
04e2 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
04e3 a5fc       |    |		Store_Unchecked	0x2,-0x4
04e4 00cf       |    |		Action	Mark_Auxiliary
04e5 780c       |x   |		Jump	0x4f2
04e6 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1a.0x3 = 0x4e6,0x3
04e7 e5fc       |    |		Load	0x2,-0x4
04e8 e5fd       |    |		Load	0x2,-0x3
04e9 e5fe       |    |		Load	0x2,-0x2
04ea e5fc       |    |		Load	0x2,-0x4
04eb e002       |    |		Load	0x0,0x2
04ec 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
04ed e5ff       |    |		Load	0x2,-0x1
04ee 8224       | $  |		Call	0x1,0x24
04ef c5fc       |    |		Store	0x2,-0x4
04f0 005b       | [  |		Store_Top	Discrete,At_Offset_3
04f1 00c9       |    |		Action	Pop_Auxiliary_Loop
04f2 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1a.0x4 = 0x4f2,0x2
04f3 6ff2       |o   |		Jump_Zero	0x4e6
04f4 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04f5 0000 0000  |    |		.XXX[0x3]
04f7 0000       |    |
04f8 ; --------------------------------------------------------------------------------------
04f8 ; SUBPROGRAM
04f8 ; --------------------------------------------------------------------------------------
04f8 0508       |    |		.CONST	0x0508								; Address of begin
04f9 0004       |    |		.CONST	0x0004								; Address of exception handler
04fa 0005       |    |		.CONST	0x0005								; Number of locals
04fb			INIT_04f8:
04fb e004       |    |		Load	0x0,0x4								; Debug Table 0x1b = .DEBUG	0x04fb,0x0b44,0x0001,0x0000,0x0058,0x7555,0x0000,0x0903
													; Debug Table 0x1b.0x0 = 0x4fb,0xffff
04fc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04fd 02c7       |    |		Declare_Variable	Any
04fe 00d8       |    |		Load_Top	At_Offset_0
04ff 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0500 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x1b.0x1 = 0x500,0xfffe
0501 e001       |    |		Load	0x0,0x1								; Debug Table 0x1b.0x2 = 0x501,0xfffd
0502 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0503 02c7       |    |		Declare_Variable	Any
0504 00d8       |    |		Load_Top	At_Offset_0
0505 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0506 e008       |    |		Load	0x0,0x8								; Debug Table 0x1b.0x3 = 0x506,0xfffc
0507 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0508			BODY_04f8:
0508 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x1b.0x4 = 0x508,0x1
0509 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
050a a5fa       |    |		Store_Unchecked	0x2,-0x6
050b e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x1b.0x5 = 0x50b,0x2
050c 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
050d 820f       |    |		Call	0x1,0xf
050e a5f9       |    |		Store_Unchecked	0x2,-0x7
050f e5f9       |    |		Load	0x2,-0x7							; Debug Table 0x1b.0x6 = 0x50f,0x3
0510 7053       |pS  |		Jump_Nonzero	0x564
0511 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x1b.0x7 = 0x511,0x4
0512 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0513 8214       |    |		Call	0x1,0x14
0514 c402       |    |		Store	0x2,0x2
0515 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x1b.0x8 = 0x515,0x5
0516 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0517 8218       |    |		Call	0x1,0x18
0518 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0519 e008       |    |		Load	0x0,0x8								; Debug Table 0x1b.0x9 = 0x519,0x6
051a 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
051b 00da       |    |		Load_Top	At_Offset_2
051c 0120       |    |		Execute	Any,Is_Value
051d 6803       |h   |		Jump_Zero	0x521
051e e001       |    |		Load	0x0,0x1
051f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0520 7801       |x   |		Jump	0x522
0521 00da       |    |		Load_Top	At_Offset_2
0522 e5fd       |    |		Load	0x2,-0x3
0523 e5fe       |    |		Load	0x2,-0x2
0524 e5fc       |    |		Load	0x2,-0x4
0525 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0526 821a       |    |		Call	0x1,0x1a
0527 e00c       |    |		Load	0x0,0xc
0528 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0529 c404       |    |		Store	0x2,0x4
052a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
052b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1b.0xa = 0x52b,0x7
052c e008       |    |		Load	0x0,0x8
052d 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
052e 6829       |h)  |		Jump_Zero	0x558
052f 00cf       |    |		Action	Mark_Auxiliary
0530 0007       |    |		Action	Break_Optional							; Debug Table 0x1b.0xb = 0x530,0x8
0531 e007       |    |		Load	0x0,0x7								; Debug Table 0x1b.0xc = 0x531,0x9
0532 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0533 e402       |    |		Load	0x2,0x2
0534 e403       |    |		Load	0x2,0x3
0535 e5fc       |    |		Load	0x2,-0x4
0536 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0537 8219       |    |		Call	0x1,0x19
0538 e404       |    |		Load	0x2,0x4
0539 e5ff       |    |		Load	0x2,-0x1
053a e007       |    |		Load	0x0,0x7
053b 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
053c 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
053d 005a       | Z  |		Store_Top	Discrete,At_Offset_2
053e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1b.0xd = 0x53e,0xa
053f 0e52       | R  |		Execute_Immediate	Not_Equal,0x52
0540 7005       |p   |		Jump_Nonzero	0x546
0541 e402       |    |		Load	0x2,0x2								; Debug Table 0x1b.0xe = 0x541,0xb
0542 8210       |    |		Call	0x1,0x10
0543 c402       |    |		Store	0x2,0x2
0544 00c9       |    |		Action	Pop_Auxiliary_Loop
0545 7feb       |    |		Jump	0x531
0546 00ce       |    |		Action	Pop_Auxiliary
0547 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1b.0xf = 0x547,0xc
0548 e008       |    |		Load	0x0,0x8
0549 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
054a 700c       |p   |		Jump_Nonzero	0x557
054b e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x1b.0x10 = 0x54b,0xd
054c 0092 07c7  |    |		Action	Push_String_Extended,0x7c7					; "adding version "
054e 4820       |H   |		Short_Literal	0x20
054f e5fc       |    |		Load	0x2,-0x4
0550 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0551 e005       |    |		Load	0x0,0x5
0552 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0553 01cc       |    |		Execute	Vector,Catenate
0554 00da       |    |		Load_Top	At_Offset_2
0555 e003       |    |		Load	0x0,0x3
0556 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0557 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0558 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x1b.0x11 = 0x558,0xe
0559 4806       |H   |		Short_Literal	0x6
055a 0092 07c8  |    |		Action	Push_String_Extended,0x7c8					; "Can't find version "
055c 4820       |H   |		Short_Literal	0x20
055d e5fc       |    |		Load	0x2,-0x4
055e 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
055f e005       |    |		Load	0x0,0x5
0560 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0561 01cc       |    |		Execute	Vector,Catenate
0562 e00b       |    |		Load	0x0,0xb
0563 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0564 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0565 0000 0000  |    |		.XXX[0x3]
0567 0000       |    |
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 0571       | q  |		.CONST	0x0571								; Address of begin
0569 0004       |    |		.CONST	0x0004								; Address of exception handler
056a 0003       |    |		.CONST	0x0003								; Number of locals
056b			INIT_0568:
056b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1c = .DEBUG	0x056b,0x0b6a,0x0001,0x0000,0x0058,0x7555,0x0000,0x09db
													; Debug Table 0x1c.0x0 = 0x56b,0xffff
056c 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
056d e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x1c.0x1 = 0x56d,0xfffe
056e e5fa       |    |		Load	0x2,-0x6
056f e002       |    |		Load	0x0,0x2
0570 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0571			BODY_0568:
0571 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1c.0x2 = 0x571,0x1
0572 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0573 a5fa       |    |		Store_Unchecked	0x2,-0x6
0574 00cf       |    |		Action	Mark_Auxiliary
0575 780e       |x   |		Jump	0x584
0576 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1c.0x3 = 0x576,0x3
0577 e5fa       |    |		Load	0x2,-0x6
0578 e5fb       |    |		Load	0x2,-0x5
0579 e5fc       |    |		Load	0x2,-0x4
057a e5fa       |    |		Load	0x2,-0x6
057b e002       |    |		Load	0x0,0x2
057c 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
057d e5fd       |    |		Load	0x2,-0x3
057e e5fe       |    |		Load	0x2,-0x2
057f e5ff       |    |		Load	0x2,-0x1
0580 8226       | &  |		Call	0x1,0x26
0581 c5fa       |    |		Store	0x2,-0x6
0582 005b       | [  |		Store_Top	Discrete,At_Offset_3
0583 00c9       |    |		Action	Pop_Auxiliary_Loop
0584 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1c.0x4 = 0x584,0x2
0585 6ff0       |o   |		Jump_Zero	0x576
0586 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0587 0000       |    |		.XXX[0x1]
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 0597       |    |		.CONST	0x0597								; Address of begin
0589 0004       |    |		.CONST	0x0004								; Address of exception handler
058a 0004       |    |		.CONST	0x0004								; Number of locals
058b			INIT_0588:
058b e004       |    |		Load	0x0,0x4								; Debug Table 0x1d = .DEBUG	0x058b,0x0b76,0x0001,0x0000,0x0058,0x7555,0x0000,0x0a31
													; Debug Table 0x1d.0x0 = 0x58b,0xffff
058c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
058d 02c7       |    |		Declare_Variable	Any
058e 00d8       |    |		Load_Top	At_Offset_0
058f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0590 e001       |    |		Load	0x0,0x1								; Debug Table 0x1d.0x1 = 0x590,0xfffe
0591 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0592 02c7       |    |		Declare_Variable	Any
0593 00d8       |    |		Load_Top	At_Offset_0
0594 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0595 e008       |    |		Load	0x0,0x8								; Debug Table 0x1d.0x2 = 0x595,0xfffd
0596 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0597			BODY_0588:
0597 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x1d.0x3 = 0x597,0x1
0598 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0599 a5fa       |    |		Store_Unchecked	0x2,-0x6
059a e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x1d.0x4 = 0x59a,0x2
059b 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
059c 820f       |    |		Call	0x1,0xf
059d a5f9       |    |		Store_Unchecked	0x2,-0x7
059e e5f9       |    |		Load	0x2,-0x7							; Debug Table 0x1d.0x5 = 0x59e,0x3
059f 704b       |pK  |		Jump_Nonzero	0x5eb
05a0 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x1d.0x6 = 0x5a0,0x4
05a1 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
05a2 8214       |    |		Call	0x1,0x14
05a3 c402       |    |		Store	0x2,0x2
05a4 e008       |    |		Load	0x0,0x8								; Debug Table 0x1d.0x7 = 0x5a4,0x5
05a5 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
05a6 00da       |    |		Load_Top	At_Offset_2
05a7 0120       |    |		Execute	Any,Is_Value
05a8 6803       |h   |		Jump_Zero	0x5ac
05a9 e001       |    |		Load	0x0,0x1
05aa 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
05ab 7801       |x   |		Jump	0x5ad
05ac 00da       |    |		Load_Top	At_Offset_2
05ad e5fd       |    |		Load	0x2,-0x3
05ae e5fe       |    |		Load	0x2,-0x2
05af e5fc       |    |		Load	0x2,-0x4
05b0 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
05b1 821a       |    |		Call	0x1,0x1a
05b2 e00c       |    |		Load	0x0,0xc
05b3 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
05b4 c403       |    |		Store	0x2,0x3
05b5 0059       | Y  |		Store_Top	Discrete,At_Offset_1
05b6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0x8 = 0x5b6,0x6
05b7 e008       |    |		Load	0x0,0x8
05b8 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
05b9 6825       |h%  |		Jump_Zero	0x5df
05ba 00cf       |    |		Action	Mark_Auxiliary
05bb 0007       |    |		Action	Break_Optional							; Debug Table 0x1d.0x9 = 0x5bb,0x7
05bc e007       |    |		Load	0x0,0x7								; Debug Table 0x1d.0xa = 0x5bc,0x8
05bd 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
05be e402       |    |		Load	0x2,0x2
05bf e403       |    |		Load	0x2,0x3
05c0 e5ff       |    |		Load	0x2,-0x1
05c1 e007       |    |		Load	0x0,0x7
05c2 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
05c3 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
05c4 005a       | Z  |		Store_Top	Discrete,At_Offset_2
05c5 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1d.0xb = 0x5c5,0x9
05c6 0e52       | R  |		Execute_Immediate	Not_Equal,0x52
05c7 7005       |p   |		Jump_Nonzero	0x5cd
05c8 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1d.0xc = 0x5c8,0xa
05c9 8210       |    |		Call	0x1,0x10
05ca c402       |    |		Store	0x2,0x2
05cb 00c9       |    |		Action	Pop_Auxiliary_Loop
05cc 7fef       |    |		Jump	0x5bc
05cd 00ce       |    |		Action	Pop_Auxiliary
05ce 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0xd = 0x5ce,0xb
05cf e008       |    |		Load	0x0,0x8
05d0 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
05d1 700c       |p   |		Jump_Nonzero	0x5de
05d2 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x1d.0xe = 0x5d2,0xc
05d3 0092 07c9  |    |		Action	Push_String_Extended,0x7c9					; "adding configuration "
05d5 4820       |H   |		Short_Literal	0x20
05d6 e5fc       |    |		Load	0x2,-0x4
05d7 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
05d8 e005       |    |		Load	0x0,0x5
05d9 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
05da 01cc       |    |		Execute	Vector,Catenate
05db 00da       |    |		Load_Top	At_Offset_2
05dc e003       |    |		Load	0x0,0x3
05dd 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
05de 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
05df e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x1d.0xf = 0x5df,0xd
05e0 4806       |H   |		Short_Literal	0x6
05e1 0092 07ca  |    |		Action	Push_String_Extended,0x7ca					; "Can't find configuration "
05e3 4820       |H   |		Short_Literal	0x20
05e4 e5fc       |    |		Load	0x2,-0x4
05e5 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
05e6 e005       |    |		Load	0x0,0x5
05e7 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
05e8 01cc       |    |		Execute	Vector,Catenate
05e9 e00b       |    |		Load	0x0,0xb
05ea 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
05eb 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
05ec 0000 0000  |    |		.BLANK	0000[0x4]
05f0 ; --------------------------------------------------------------------------------------
05f0 ; SUBPROGRAM
05f0 ; --------------------------------------------------------------------------------------
05f0 05f9       |    |		.CONST	0x05f9								; Address of begin
05f1 0004       |    |		.CONST	0x0004								; Address of exception handler
05f2 0003       |    |		.CONST	0x0003								; Number of locals
05f3			INIT_05f0:
05f3 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1e = .DEBUG	0x05f3,0x0b98,0x0001,0x0000,0x0058,0x7555,0x0000,0x0af5
													; Debug Table 0x1e.0x0 = 0x5f3,0xffff
05f4 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
05f5 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x1e.0x1 = 0x5f5,0xfffe
05f6 e5f9       |    |		Load	0x2,-0x7
05f7 e002       |    |		Load	0x0,0x2
05f8 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
05f9			BODY_05f0:
05f9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0x2 = 0x5f9,0x1
05fa 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
05fb a5f9       |    |		Store_Unchecked	0x2,-0x7
05fc 00cf       |    |		Action	Mark_Auxiliary
05fd 780e       |x   |		Jump	0x60c
05fe 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1e.0x3 = 0x5fe,0x3
05ff e5f9       |    |		Load	0x2,-0x7
0600 e5fa       |    |		Load	0x2,-0x6
0601 e5fb       |    |		Load	0x2,-0x5
0602 e5f9       |    |		Load	0x2,-0x7
0603 e002       |    |		Load	0x0,0x2
0604 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0605 e5fc       |    |		Load	0x2,-0x4
0606 e5fd       |    |		Load	0x2,-0x3
0607 e5ff       |    |		Load	0x2,-0x1
0608 8228       | (  |		Call	0x1,0x28
0609 c5f9       |    |		Store	0x2,-0x7
060a 005b       | [  |		Store_Top	Discrete,At_Offset_3
060b 00c9       |    |		Action	Pop_Auxiliary_Loop
060c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1e.0x4 = 0x60c,0x2
060d 0f00       |    |		Execute_Immediate	Equal,0x0
060e e5f9       |    |		Load	0x2,-0x7
060f e5fb       |    |		Load	0x2,-0x5
0610 01dc       |    |		Execute	Vector,Last
0611 027a       | z  |		Execute	Discrete,Less_Equal
0612 0279       | y  |		Execute	Discrete,And
0613 77ea       |w   |		Jump_Nonzero	0x5fe
0614 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
0615 0000 0000  |    |		.XXX[0x3]
0617 0000       |    |
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 0627       | '  |		.CONST	0x0627								; Address of begin
0619 0004       |    |		.CONST	0x0004								; Address of exception handler
061a 0006       |    |		.CONST	0x0006								; Number of locals
061b			INIT_0618:
061b 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x1f = .DEBUG	0x061b,0x0ba4,0x0001,0x0000,0x0058,0x7555,0x0000,0x0b5b
													; Debug Table 0x1f.0x0 = 0x61b,0xffff
061c e004       |    |		Load	0x0,0x4								; Debug Table 0x1f.0x1 = 0x61c,0xfffe
061d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
061e 02c7       |    |		Declare_Variable	Any
061f 00d8       |    |		Load_Top	At_Offset_0
0620 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0621 e009       |    |		Load	0x0,0x9								; Debug Table 0x1f.0x2 = 0x621,0xfffd
0622 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0623 e008       |    |		Load	0x0,0x8								; Debug Table 0x1f.0x3 = 0x623,0xfffc
0624 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0625 e008       |    |		Load	0x0,0x8								; Debug Table 0x1f.0x4 = 0x625,0xfffb
0626 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0627			BODY_0618:
0627 e007       |    |		Load	0x0,0x7								; Debug Table 0x1f.0x5 = 0x627,0x1
0628 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0629 e5fe       |    |		Load	0x2,-0x2
062a 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
062b 821b       |    |		Call	0x1,0x1b
062c e5ff       |    |		Load	0x2,-0x1
062d e007       |    |		Load	0x0,0x7
062e 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
062f 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0630 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0631 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x6 = 0x631,0x2
0632 e008       |    |		Load	0x0,0x8
0633 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0634 7009       |p   |		Jump_Nonzero	0x63e
0635 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x1f.0x7 = 0x635,0x3
0636 0092 07cb  |    |		Action	Push_String_Extended,0x7cb					; "setting the status "
0638 e5fe       |    |		Load	0x2,-0x2
0639 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
063a 01cc       |    |		Execute	Vector,Catenate
063b 00da       |    |		Load_Top	At_Offset_2
063c e003       |    |		Load	0x0,0x3
063d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
063e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1f.0x8 = 0x63e,0x4
063f e5fd       |    |		Load	0x2,-0x3
0640 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0641 0092 07cc  |    |		Action	Push_String_Extended,0x7cc					; " at "
0643 e005       |    |		Load	0x0,0x5
0644 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0645 0a04       |    |		Execute_Immediate	Plus,0x4
0646 c402       |    |		Store	0x2,0x2
0647 e402       |    |		Load	0x2,0x2								; Debug Table 0x1f.0x9 = 0x647,0x5
0648 e5fd       |    |		Load	0x2,-0x3
0649 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
064a 01dc       |    |		Execute	Vector,Last
064b e5fd       |    |		Load	0x2,-0x3
064c 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
064d 01cf       |    |		Execute	Vector,Slice_Read
064e 8214       |    |		Call	0x1,0x14
064f c403       |    |		Store	0x2,0x3
0650 e00a       |    |		Load	0x0,0xa								; Debug Table 0x1f.0xa = 0x650,0x6
0651 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0652 e00a       |    |		Load	0x0,0xa
0653 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0654 4820       |H   |		Short_Literal	0x20
0655 e5fd       |    |		Load	0x2,-0x3
0656 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0657 01cb       |    |		Execute	Vector,Append
0658 8215       |    |		Call	0x1,0x15
0659 e00a       |    |		Load	0x0,0xa
065a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
065b c404       |    |		Store	0x2,0x4
065c 005a       | Z  |		Store_Top	Discrete,At_Offset_2
065d e007       |    |		Load	0x0,0x7								; Debug Table 0x1f.0xb = 0x65d,0x7
065e 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
065f e007       |    |		Load	0x0,0x7
0660 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
0661 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
0662 0322       | "  |		Declare_Variable	Record
0663 e404       |    |		Load	0x2,0x4
0664 00d9       |    |		Load_Top	At_Offset_1
0665 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0666 e403       |    |		Load	0x2,0x3
0667 e004       |    |		Load	0x0,0x4
0668 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0669 0119       |    |		Execute	Any,Check_In_Formal_Type
066a 00d9       |    |		Load_Top	At_Offset_1
066b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
066c e5ff       |    |		Load	0x2,-0x1
066d e007       |    |		Load	0x0,0x7
066e 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
066f 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0670 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0671 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0xc = 0x671,0x8
0672 e008       |    |		Load	0x0,0x8
0673 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0674 700c       |p   |		Jump_Nonzero	0x681
0675 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x1f.0xd = 0x675,0x9
0676 0092 07cd  |    |		Action	Push_String_Extended,0x7cd					; "setting the create_info "
0678 4820       |H   |		Short_Literal	0x20
0679 e5fd       |    |		Load	0x2,-0x3
067a 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
067b e005       |    |		Load	0x0,0x5
067c 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
067d 01cc       |    |		Execute	Vector,Catenate
067e 00da       |    |		Load_Top	At_Offset_2
067f e003       |    |		Load	0x0,0x3
0680 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0681 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x1f.0xe = 0x681,0xa
0682 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0683 820f       |    |		Call	0x1,0xf
0684 7043       |pC  |		Jump_Nonzero	0x6c8
0685 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1f.0xf = 0x685,0xb
0686 e5fc       |    |		Load	0x2,-0x4
0687 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0688 0092 07cc  |    |		Action	Push_String_Extended,0x7cc					; " at "
068a e005       |    |		Load	0x0,0x5
068b 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
068c 0a04       |    |		Execute_Immediate	Plus,0x4
068d c402       |    |		Store	0x2,0x2
068e e402       |    |		Load	0x2,0x2								; Debug Table 0x1f.0x10 = 0x68e,0xc
068f e5fc       |    |		Load	0x2,-0x4
0690 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0691 01dc       |    |		Execute	Vector,Last
0692 e5fc       |    |		Load	0x2,-0x4
0693 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0694 01cf       |    |		Execute	Vector,Slice_Read
0695 8214       |    |		Call	0x1,0x14
0696 c403       |    |		Store	0x2,0x3
0697 e00a       |    |		Load	0x0,0xa								; Debug Table 0x1f.0x11 = 0x697,0xd
0698 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0699 e00a       |    |		Load	0x0,0xa
069a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
069b 4820       |H   |		Short_Literal	0x20
069c e5fc       |    |		Load	0x2,-0x4
069d 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
069e 01cb       |    |		Execute	Vector,Append
069f 8215       |    |		Call	0x1,0x15
06a0 e00a       |    |		Load	0x0,0xa
06a1 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
06a2 c404       |    |		Store	0x2,0x4
06a3 005a       | Z  |		Store_Top	Discrete,At_Offset_2
06a4 e007       |    |		Load	0x0,0x7								; Debug Table 0x1f.0x12 = 0x6a4,0xe
06a5 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
06a6 e007       |    |		Load	0x0,0x7
06a7 1b26       | &  |		Execute	Package,Field_Read,Field_Number 0x26
06a8 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
06a9 0322       | "  |		Declare_Variable	Record
06aa e404       |    |		Load	0x2,0x4
06ab 00d9       |    |		Load_Top	At_Offset_1
06ac 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
06ad e403       |    |		Load	0x2,0x3
06ae e004       |    |		Load	0x0,0x4
06af 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06b0 0119       |    |		Execute	Any,Check_In_Formal_Type
06b1 00d9       |    |		Load_Top	At_Offset_1
06b2 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
06b3 e5ff       |    |		Load	0x2,-0x1
06b4 e007       |    |		Load	0x0,0x7
06b5 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
06b6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
06b7 0059       | Y  |		Store_Top	Discrete,At_Offset_1
06b8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1f.0x13 = 0x6b8,0xf
06b9 e008       |    |		Load	0x0,0x8
06ba 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
06bb 700c       |p   |		Jump_Nonzero	0x6c8
06bc e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x1f.0x14 = 0x6bc,0x10
06bd 0092 07ce  |    |		Action	Push_String_Extended,0x7ce					; "setting the close_info "
06bf 4820       |H   |		Short_Literal	0x20
06c0 e5fc       |    |		Load	0x2,-0x4
06c1 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
06c2 e005       |    |		Load	0x0,0x5
06c3 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
06c4 01cc       |    |		Execute	Vector,Catenate
06c5 00da       |    |		Load_Top	At_Offset_2
06c6 e003       |    |		Load	0x0,0x3
06c7 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
06c8 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
06c9 0000 0000  |    |		.BLANK	0000[0x7]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 070b       |    |		.CONST	0x070b								; Address of begin
06d1 079a       |    |		.CONST	0x079a								; Address of exception handler
06d2 000e       |    |		.CONST	0x000e								; Number of locals
06d3			INIT_06d0:
06d3 e00d       |    |		Load	0x0,0xd								; Debug Table 0x20 = .DEBUG	0x06d3,0x0bd0,0x0001,0x0000,0x0058,0x7555,0x0000,0x0c8d
													; Debug Table 0x20.0x0 = 0x6d3,0xffff
06d4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06d5 02c7       |    |		Declare_Variable	Any
06d6 e00d       |    |		Load	0x0,0xd
06d7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
06d8 c402       |    |		Store	0x2,0x2
06d9 e007       |    |		Load	0x0,0x7								; Debug Table 0x20.0x1 = 0x6d9,0xfffe
06da 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
06db e007       |    |		Load	0x0,0x7								; Debug Table 0x20.0x2 = 0x6db,0xfffd
06dc 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
06dd e008       |    |		Load	0x0,0x8								; Debug Table 0x20.0x3 = 0x6dd,0xfffc
06de 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
06df e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x4 = 0x6df,0xfffb
06e0 e5fa       |    |		Load	0x2,-0x6
06e1 e002       |    |		Load	0x0,0x2
06e2 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
06e3 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x5 = 0x6e3,0xfffa
06e4 00d9       |    |		Load_Top	At_Offset_1
06e5 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06e6 e002       |    |		Load	0x0,0x2
06e7 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
06e8 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x6 = 0x6e8,0xfff9
06e9 00d9       |    |		Load_Top	At_Offset_1
06ea 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06eb e002       |    |		Load	0x0,0x2
06ec 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
06ed e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x7 = 0x6ed,0xfff8
06ee 00d9       |    |		Load_Top	At_Offset_1
06ef 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06f0 e002       |    |		Load	0x0,0x2
06f1 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
06f2 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x8 = 0x6f2,0xfff7
06f3 00d9       |    |		Load_Top	At_Offset_1
06f4 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06f5 e002       |    |		Load	0x0,0x2
06f6 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
06f7 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x9 = 0x6f7,0xfff6
06f8 00d9       |    |		Load_Top	At_Offset_1
06f9 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06fa e002       |    |		Load	0x0,0x2
06fb 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
06fc e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0xa = 0x6fc,0xfff5
06fd 00d9       |    |		Load_Top	At_Offset_1
06fe 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
06ff e002       |    |		Load	0x0,0x2
0700 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0701 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0xb = 0x701,0xfff4
0702 00d9       |    |		Load_Top	At_Offset_1
0703 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0704 e002       |    |		Load	0x0,0x2
0705 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0706 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0xc = 0x706,0xfff3
0707 00d9       |    |		Load_Top	At_Offset_1
0708 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0709 e002       |    |		Load	0x0,0x2
070a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
070b			BODY_06d0:
070b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x20.0xd = 0x70b,0x1
070c 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
070d a5fa       |    |		Store_Unchecked	0x2,-0x6
070e e009       |    |		Load	0x0,0x9								; Debug Table 0x20.0xe = 0x70e,0x2
070f 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0710 e00d       |    |		Load	0x0,0xd
0711 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0712 c402       |    |		Store	0x2,0x2
0713 e007       |    |		Load	0x0,0x7								; Debug Table 0x20.0xf = 0x713,0x3
0714 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0715 4802       |H   |		Short_Literal	0x2
0716 e402       |    |		Load	0x2,0x2
0717 e5fc       |    |		Load	0x2,-0x4
0718 e5fe       |    |		Load	0x2,-0x2
0719 e5ff       |    |		Load	0x2,-0x1
071a e40a       |    |		Load	0x2,0xa
071b 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
071c e00c       |    |		Load	0x0,0xc
071d 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
071e c403       |    |		Store	0x2,0x3
071f e007       |    |		Load	0x0,0x7								; Debug Table 0x20.0x10 = 0x71f,0x4
0720 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0721 e007       |    |		Load	0x0,0x7
0722 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0723 e00e       |    |		Load	0x0,0xe
0724 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0725 00f0       |    |		Load_Encached	Segment_Cache
0726 e407       |    |		Load	0x2,0x7
0727 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0728 8213       |    |		Call	0x1,0x13
0729 e007       |    |		Load	0x0,0x7
072a 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
072b e403       |    |		Load	0x2,0x3
072c e5fe       |    |		Load	0x2,-0x2
072d e5ff       |    |		Load	0x2,-0x1
072e e406       |    |		Load	0x2,0x6
072f 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0730 e002       |    |		Load	0x0,0x2
0731 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0732 e007       |    |		Load	0x0,0x7
0733 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
0734 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0735 c404       |    |		Store	0x2,0x4
0736 c405       |    |		Store	0x2,0x5
0737 e405       |    |		Load	0x2,0x5								; Debug Table 0x20.0x11 = 0x737,0x5
0738 e008       |    |		Load	0x0,0x8
0739 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
073a 700d       |p   |		Jump_Nonzero	0x748
073b e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x20.0x12 = 0x73b,0x6
073c 0092 07cf  |    |		Action	Push_String_Extended,0x7cf					; "creating "
073e e5fe       |    |		Load	0x2,-0x2
073f e5ff       |    |		Load	0x2,-0x1
0740 e406       |    |		Load	0x2,0x6
0741 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0742 e002       |    |		Load	0x0,0x2
0743 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0744 01cc       |    |		Execute	Vector,Catenate
0745 e405       |    |		Load	0x2,0x5
0746 e003       |    |		Load	0x0,0x3
0747 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0748 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x20.0x13 = 0x748,0x7
0749 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
074a 0c0b       |    |		Execute_Immediate	Greater_Equal,0xb
074b 6806       |h   |		Jump_Zero	0x752
074c e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x20.0x14 = 0x74c,0x8
074d e5fa       |    |		Load	0x2,-0x6
074e e002       |    |		Load	0x0,0x2
074f 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0750 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0751 a5fa       |    |		Store_Unchecked	0x2,-0x6
0752 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x20.0x15 = 0x752,0x9
0753 e5fc       |    |		Load	0x2,-0x4
0754 e5fd       |    |		Load	0x2,-0x3
0755 e5fe       |    |		Load	0x2,-0x2
0756 e5ff       |    |		Load	0x2,-0x1
0757 e403       |    |		Load	0x2,0x3
0758 e404       |    |		Load	0x2,0x4
0759 8221       | !  |		Call	0x1,0x21
075a c5fa       |    |		Store	0x2,-0x6
075b e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x20.0x16 = 0x75b,0xa
075c e5fc       |    |		Load	0x2,-0x4
075d e5fd       |    |		Load	0x2,-0x3
075e e404       |    |		Load	0x2,0x4
075f 8223       | #  |		Call	0x1,0x23
0760 c5fa       |    |		Store	0x2,-0x6
0761 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x20.0x17 = 0x761,0xb
0762 e5fc       |    |		Load	0x2,-0x4
0763 e5fd       |    |		Load	0x2,-0x3
0764 e404       |    |		Load	0x2,0x4
0765 8225       | %  |		Call	0x1,0x25
0766 c5fa       |    |		Store	0x2,-0x6
0767 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x20.0x18 = 0x767,0xc
0768 e5fc       |    |		Load	0x2,-0x4
0769 e5fd       |    |		Load	0x2,-0x3
076a e5fe       |    |		Load	0x2,-0x2
076b e5ff       |    |		Load	0x2,-0x1
076c e404       |    |		Load	0x2,0x4
076d 8227       | '  |		Call	0x1,0x27
076e c5fa       |    |		Store	0x2,-0x6
076f e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x20.0x19 = 0x76f,0xd
0770 e5fc       |    |		Load	0x2,-0x4
0771 e5fd       |    |		Load	0x2,-0x3
0772 e5fe       |    |		Load	0x2,-0x2
0773 e5ff       |    |		Load	0x2,-0x1
0774 e403       |    |		Load	0x2,0x3
0775 e404       |    |		Load	0x2,0x4
0776 8229       | )  |		Call	0x1,0x29
0777 c5fa       |    |		Store	0x2,-0x6
0778 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x20.0x1a = 0x778,0xe
0779 00d9       |    |		Load_Top	At_Offset_1
077a 00db       |    |		Load_Top	At_Offset_3
077b e40c       |    |		Load	0x2,0xc
077c e404       |    |		Load	0x2,0x4
077d 822a       | *  |		Call	0x1,0x2a
077e e404       |    |		Load	0x2,0x4								; Debug Table 0x20.0x1b = 0x77e,0xf
077f e007       |    |		Load	0x0,0x7
0780 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
0781 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0782 c5fb       |    |		Store	0x2,-0x5
0783 e007       |    |		Load	0x0,0x7								; Debug Table 0x20.0x1c = 0x783,0x10
0784 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0785 e404       |    |		Load	0x2,0x4
0786 e007       |    |		Load	0x0,0x7
0787 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
0788 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0789 c404       |    |		Store	0x2,0x4
078a c405       |    |		Store	0x2,0x5
078b e007       |    |		Load	0x0,0x7								; Debug Table 0x20.0x1d = 0x78b,0x11
078c 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
078d e403       |    |		Load	0x2,0x3
078e e007       |    |		Load	0x0,0x7
078f 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0790 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0791 c403       |    |		Store	0x2,0x3
0792 c405       |    |		Store	0x2,0x5
0793 e402       |    |		Load	0x2,0x2								; Debug Table 0x20.0x1e = 0x793,0x12
0794 4801       |H   |		Short_Literal	0x1
0795 4801       |H   |		Short_Literal	0x1
0796 e00d       |    |		Load	0x0,0xd
0797 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0798 c402       |    |		Store	0x2,0x2
0799 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
079a			TRAP_06d0:
079a 0007       |    |		Action	Break_Optional
079b e402       |    |		Load	0x2,0x2								; Debug Table 0x20.0x1f = 0x79b,0x13
079c 4801       |H   |		Short_Literal	0x1
079d 4800       |H   |		Short_Literal	0x0
079e e00d       |    |		Load	0x0,0xd
079f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
07a0 c402       |    |		Store	0x2,0x2
07a1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x20.0x20 = 0x7a1,0x14
07a2 0101       |    |		Execute	Exception,Reraise
07a3 0000 0000  |    |		.BLANK	0000[0x5]
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07af       |    |		.CONST	0x07af								; Address of begin
07a9 0004       |    |		.CONST	0x0004								; Address of exception handler
07aa 0002       |    |		.CONST	0x0002								; Number of locals
07ab			INIT_07a8:
07ab e5fc       |    |		Load	0x2,-0x4							; Debug Table 0x21 = .DEBUG	0x07ab,0x0c14,0x0004,0x0000,0x0058,0x7555,0x0000,0x0537
													; Debug Table 0x21.0x0 = 0x7ab,0xffff
07ac e5f9       |    |		Load	0x2,-0x7
07ad e002       |    |		Load	0x0,0x2
07ae 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
07af			BODY_07a8:
07af 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x21.0x1 = 0x7af,0x1
07b0 2c02       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
07b1 a5f9       |    |		Store_Unchecked	0x2,-0x7
07b2 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x21.0x2 = 0x7b2,0x2
07b3 e5fb       |    |		Load	0x2,-0x5
07b4 00da       |    |		Load_Top	At_Offset_2
07b5 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07b6 e5fe       |    |		Load	0x2,-0x2
07b7 e5ff       |    |		Load	0x2,-0x1
07b8 821d       |    |		Call	0x1,0x1d
07b9 c5fa       |    |		Store	0x2,-0x6
07ba 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07bb ; --------------------------------------------------------------------------------------
07bb ; STRING TABLE
07bb ; --------------------------------------------------------------------------------------
07bb 002c       | ,  |		.STRTAB	0x002c->0x07d1							; "Work_Order is stored in an unsupported format."
07bc 0058       | X  |		.STRTAB	0x0058->0x07e8							; "Work_Order is stored in an unsupported archive format."
07bd 008c       |    |		.STRTAB	0x008c->0x0803							; " => "
07be 008e       |    |		.STRTAB	0x008e->0x0805							; " for \x22"
07bf 0092       |    |		.STRTAB	0x0092->0x0808							; "\x22 => \x22"
07c0 0096       |    |		.STRTAB	0x0096->0x080b							; "setting default for field "
07c1 00ae       |    |		.STRTAB	0x00ae->0x0818							; "setting elements of field "
07c2 00c6       |    |		.STRTAB	0x00c6->0x0825							; "setting field "
07c3 00d2       |    |		.STRTAB	0x00d2->0x082c							; "restoring field "
07c4 00e0       |    |		.STRTAB	0x00e0->0x0834							; "restoring comment "
07c5 00f0       |    |		.STRTAB	0x00f0->0x083d							; "restoring user "
07c6 00fd       |    |		.STRTAB	0x00fd->0x0844							; "Can't find user "
07c7 010b       |    |		.STRTAB	0x010b->0x084c							; "adding version "
07c8 0118       |    |		.STRTAB	0x0118->0x0854							; "Can't find version "
07c9 0129       | )  |		.STRTAB	0x0129->0x085d							; "adding configuration "
07ca 013c       | <  |		.STRTAB	0x013c->0x0868							; "Can't find configuration "
07cb 0153       | S  |		.STRTAB	0x0153->0x0874							; "setting the status "
07cc 0164       | d  |		.STRTAB	0x0164->0x087e							; " at "
07cd 0166       | f  |		.STRTAB	0x0166->0x0880							; "setting the create_info "
07ce 017c       | |  |		.STRTAB	0x017c->0x088c							; "setting the close_info "
07cf 0191       |    |		.STRTAB	0x0191->0x0897							; "creating "
07d0 0198       |    |		.STREND 0x0198->0x089c
07d1 576f 726b  |Work|		.STRTAB_STRINGS
089c 0000 0000  |    |		.BLANK	0000[0x4]
08a0 ; --------------------------------------------------------------------------------------
08a0 ; Debug Table
08a0 ; --------------------------------------------------------------------------------------
08a0 0003 0022  |   "|		.CONST	0x0003,0x0022
08a2 000b 09b2  |    |		.DEBUG	0x000b,0x09b2,0x8000,0x0000,0x0058,0x6d05,0x0000,0x0009
08aa 000e 09b6  |    |		.DEBUG	0x000e,0x09b6,0x8000,0x0000,0x0058,0x7555,0x0000,0x0025
08b2 0053 09f6  | S  |		.DEBUG	0x0053,0x09f6,0x0001,0x0000,0x0058,0x6d05,0x0000,0x000a
08ba 007b 0a02  | {  |		.DEBUG	0x007b,0x0a02,0x0001,0x0000,0x0058,0x7555,0x0000,0x0026
08c2 009b 0a0e  |    |		.DEBUG	0x009b,0x0a0e,0x0002,0x0000,0x0058,0x7555,0x0000,0x0071
08ca 00a3 0a12  |    |		.DEBUG	0x00a3,0x0a12,0x0002,0x0000,0x0058,0x7555,0x0000,0x0086
08d2 00b3 0a16  |    |		.DEBUG	0x00b3,0x0a16,0x0002,0x0000,0x0058,0x7555,0x0000,0x00a1
08da 00db 0a20  |    |		.DEBUG	0x00db,0x0a20,0x0002,0x0000,0x0058,0x7555,0x0000,0x00e1
08e2 010b 0a2c  |   ,|		.DEBUG	0x010b,0x0a2c,0x0002,0x0000,0x0058,0x7555,0x0000,0x012f
08ea 0123 0a34  | # 4|		.DEBUG	0x0123,0x0a34,0x0002,0x0000,0x0058,0x7555,0x0000,0x0162
08f2 0143 0a3c  | C <|		.DEBUG	0x0143,0x0a3c,0x0002,0x0000,0x0058,0x7555,0x0000,0x019e
08fa 0173 0a46  | s F|		.DEBUG	0x0173,0x0a46,0x0002,0x0000,0x0058,0x7555,0x0000,0x01e9
0902 0193 0a4e  |   N|		.DEBUG	0x0193,0x0a4e,0x0002,0x0000,0x0058,0x7555,0x0000,0x021c
090a 01b3 0a56  |   V|		.DEBUG	0x01b3,0x0a56,0x0002,0x0000,0x0058,0x7555,0x0000,0x024f
0912 01db 0a5e  |   ^|		.DEBUG	0x01db,0x0a5e,0x0002,0x0000,0x0058,0x7555,0x0000,0x028c
091a 01f3 0a66  |   f|		.DEBUG	0x01f3,0x0a66,0x0002,0x0000,0x0058,0x7555,0x0000,0x02bf
0922 020b 0a6c  |   l|		.DEBUG	0x020b,0x0a6c,0x0002,0x0000,0x0058,0x7555,0x0000,0x02e4
092a 0223 0a72  | # r|		.DEBUG	0x0223,0x0a72,0x0001,0x0000,0x0058,0x7555,0x0000,0x0315
0932 028b 0a8c  |    |		.DEBUG	0x028b,0x0a8c,0x0001,0x0000,0x0058,0x7555,0x0000,0x03e3
093a 0313 0aa2  |    |		.DEBUG	0x0313,0x0aa2,0x0001,0x0000,0x0058,0x7555,0x0000,0x04ca
0942 0333 0aae  | 3  |		.DEBUG	0x0333,0x0aae,0x0001,0x0000,0x0058,0x7555,0x0000,0x053e
094a 03a3 0aca  |    |		.DEBUG	0x03a3,0x0aca,0x0001,0x0000,0x0058,0x7555,0x0000,0x0619
0952 03fb 0ae8  |    |		.DEBUG	0x03fb,0x0ae8,0x0001,0x0000,0x0058,0x7555,0x0000,0x06d2
095a 041b 0af4  |    |		.DEBUG	0x041b,0x0af4,0x0001,0x0000,0x0058,0x7555,0x0000,0x0727
0962 0473 0b14  | s  |		.DEBUG	0x0473,0x0b14,0x0001,0x0000,0x0058,0x7555,0x0000,0x07d4
096a 0493 0b20  |    |		.DEBUG	0x0493,0x0b20,0x0001,0x0000,0x0058,0x7555,0x0000,0x0820
0972 04db 0b38  |   8|		.DEBUG	0x04db,0x0b38,0x0001,0x0000,0x0058,0x7555,0x0000,0x08b7
097a 04fb 0b44  |   D|		.DEBUG	0x04fb,0x0b44,0x0001,0x0000,0x0058,0x7555,0x0000,0x0903
0982 056b 0b6a  | k j|		.DEBUG	0x056b,0x0b6a,0x0001,0x0000,0x0058,0x7555,0x0000,0x09db
098a 058b 0b76  |   v|		.DEBUG	0x058b,0x0b76,0x0001,0x0000,0x0058,0x7555,0x0000,0x0a31
0992 05f3 0b98  |    |		.DEBUG	0x05f3,0x0b98,0x0001,0x0000,0x0058,0x7555,0x0000,0x0af5
099a 061b 0ba4  |    |		.DEBUG	0x061b,0x0ba4,0x0001,0x0000,0x0058,0x7555,0x0000,0x0b5b
09a2 06d3 0bd0  |    |		.DEBUG	0x06d3,0x0bd0,0x0001,0x0000,0x0058,0x7555,0x0000,0x0c8d
09aa 07ab 0c14  |    |		.DEBUG	0x07ab,0x0c14,0x0004,0x0000,0x0058,0x7555,0x0000,0x0537
09b2 ; --------------------------------------------------------------------------------------
09b2 ; Debug3 Subtable 0x0
09b2 ; --------------------------------------------------------------------------------------
09b2 0001 0000  |    |		.DBG3TAB	0x0001,0x0000
09b4 000b ffff  |    |		.CONST	0x000b,0xffff
09b6 ; --------------------------------------------------------------------------------------
09b6 ; Debug3 Subtable 0x1
09b6 ; --------------------------------------------------------------------------------------
09b6 001f 0000  |    |		.DBG3TAB	0x001f,0x0000
09b8 000e ffff  |    |		.CONST	0x000e,0xffff
09ba 0010 fffe  |    |		.CONST	0x0010,0xfffe
09bc 0012 fffd  |    |		.CONST	0x0012,0xfffd
09be 0014 fffc  |    |		.CONST	0x0014,0xfffc
09c0 0016 fffb  |    |		.CONST	0x0016,0xfffb
09c2 0018 fffa  |    |		.CONST	0x0018,0xfffa
09c4 001a fff9  |    |		.CONST	0x001a,0xfff9
09c6 001c fff8  |    |		.CONST	0x001c,0xfff8
09c8 001e fff7  |    |		.CONST	0x001e,0xfff7
09ca 0020 fff6  |    |		.CONST	0x0020,0xfff6
09cc 0022 fff5  | "  |		.CONST	0x0022,0xfff5
09ce 0024 fff4  | $  |		.CONST	0x0024,0xfff4
09d0 0026 fff3  | &  |		.CONST	0x0026,0xfff3
09d2 0028 fff2  | (  |		.CONST	0x0028,0xfff2
09d4 002a fff1  | *  |		.CONST	0x002a,0xfff1
09d6 002c fff0  | ,  |		.CONST	0x002c,0xfff0
09d8 002e ffef  | .  |		.CONST	0x002e,0xffef
09da 0030 ffee  | 0  |		.CONST	0x0030,0xffee
09dc 0032 ffed  | 2  |		.CONST	0x0032,0xffed
09de 0034 ffec  | 4  |		.CONST	0x0034,0xffec
09e0 0036 ffeb  | 6  |		.CONST	0x0036,0xffeb
09e2 0038 ffea  | 8  |		.CONST	0x0038,0xffea
09e4 003a ffe9  | :  |		.CONST	0x003a,0xffe9
09e6 003c ffe8  | <  |		.CONST	0x003c,0xffe8
09e8 003e ffe7  | >  |		.CONST	0x003e,0xffe7
09ea 0040 ffe6  | @  |		.CONST	0x0040,0xffe6
09ec 0042 ffe5  | B  |		.CONST	0x0042,0xffe5
09ee 0044 ffe4  | D  |		.CONST	0x0044,0xffe4
09f0 0046 ffe3  | F  |		.CONST	0x0046,0xffe3
09f2 0048 ffe2  | H  |		.CONST	0x0048,0xffe2
09f4 004a ffe1  | J  |		.CONST	0x004a,0xffe1
09f6 ; --------------------------------------------------------------------------------------
09f6 ; Debug3 Subtable 0x2
09f6 ; --------------------------------------------------------------------------------------
09f6 0003 0002  |    |		.DBG3TAB	0x0003,0x0002
09f8 0053 ffff  | S  |		.CONST	0x0053,0xffff
09fa 0057 fffe  | W  |		.CONST	0x0057,0xfffe
09fc 0059 fffd  | Y  |		.CONST	0x0059,0xfffd
09fe 005b 0001  | [  |		.CONST	0x005b,0x0001
0a00 0064 0002  | d  |		.CONST	0x0064,0x0002
0a02 ; --------------------------------------------------------------------------------------
0a02 ; Debug3 Subtable 0x3
0a02 ; --------------------------------------------------------------------------------------
0a02 0000 0005  |    |		.DBG3TAB	0x0000,0x0005
0a04 007b 0001  | {  |		.CONST	0x007b,0x0001
0a06 0084 0002  |    |		.CONST	0x0084,0x0002
0a08 0087 0003  |    |		.CONST	0x0087,0x0003
0a0a 008c 0004  |    |		.CONST	0x008c,0x0004
0a0c 008f 0005  |    |		.CONST	0x008f,0x0005
0a0e ; --------------------------------------------------------------------------------------
0a0e ; Debug3 Subtable 0x4
0a0e ; --------------------------------------------------------------------------------------
0a0e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0a10 009b 0001  |    |		.CONST	0x009b,0x0001
0a12 ; --------------------------------------------------------------------------------------
0a12 ; Debug3 Subtable 0x5
0a12 ; --------------------------------------------------------------------------------------
0a12 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0a14 00a3 0001  |    |		.CONST	0x00a3,0x0001
0a16 ; --------------------------------------------------------------------------------------
0a16 ; Debug3 Subtable 0x6
0a16 ; --------------------------------------------------------------------------------------
0a16 0002 0002  |    |		.DBG3TAB	0x0002,0x0002
0a18 00b3 ffff  |    |		.CONST	0x00b3,0xffff
0a1a 00bb fffe  |    |		.CONST	0x00bb,0xfffe
0a1c 00c3 0001  |    |		.CONST	0x00c3,0x0001
0a1e 00cd 0002  |    |		.CONST	0x00cd,0x0002
0a20 ; --------------------------------------------------------------------------------------
0a20 ; Debug3 Subtable 0x7
0a20 ; --------------------------------------------------------------------------------------
0a20 0002 0003  |    |		.DBG3TAB	0x0002,0x0003
0a22 00db ffff  |    |		.CONST	0x00db,0xffff
0a24 00dc fffe  |    |		.CONST	0x00dc,0xfffe
0a26 00e5 0001  |    |		.CONST	0x00e5,0x0001
0a28 00f0 0002  |    |		.CONST	0x00f0,0x0002
0a2a 00fa 0003  |    |		.CONST	0x00fa,0x0003
0a2c ; --------------------------------------------------------------------------------------
0a2c ; Debug3 Subtable 0x8
0a2c ; --------------------------------------------------------------------------------------
0a2c 0002 0001  |    |		.DBG3TAB	0x0002,0x0001
0a2e 010b ffff  |    |		.CONST	0x010b,0xffff
0a30 0113 fffe  |    |		.CONST	0x0113,0xfffe
0a32 011b 0001  |    |		.CONST	0x011b,0x0001
0a34 ; --------------------------------------------------------------------------------------
0a34 ; Debug3 Subtable 0x9
0a34 ; --------------------------------------------------------------------------------------
0a34 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0a36 0123 ffff  | #  |		.CONST	0x0123,0xffff
0a38 012a 0001  | *  |		.CONST	0x012a,0x0001
0a3a 0134 0002  | 4  |		.CONST	0x0134,0x0002
0a3c ; --------------------------------------------------------------------------------------
0a3c ; Debug3 Subtable 0xa
0a3c ; --------------------------------------------------------------------------------------
0a3c 0003 0001  |    |		.DBG3TAB	0x0003,0x0001
0a3e 0143 ffff  | C  |		.CONST	0x0143,0xffff
0a40 014a fffe  | J  |		.CONST	0x014a,0xfffe
0a42 0155 fffd  | U  |		.CONST	0x0155,0xfffd
0a44 0160 0001  | `  |		.CONST	0x0160,0x0001
0a46 ; --------------------------------------------------------------------------------------
0a46 ; Debug3 Subtable 0xb
0a46 ; --------------------------------------------------------------------------------------
0a46 0002 0001  |    |		.DBG3TAB	0x0002,0x0001
0a48 0173 ffff  | s  |		.CONST	0x0173,0xffff
0a4a 017c fffe  | |  |		.CONST	0x017c,0xfffe
0a4c 0185 0001  |    |		.CONST	0x0185,0x0001
0a4e ; --------------------------------------------------------------------------------------
0a4e ; Debug3 Subtable 0xc
0a4e ; --------------------------------------------------------------------------------------
0a4e 0002 0001  |    |		.DBG3TAB	0x0002,0x0001
0a50 0193 ffff  |    |		.CONST	0x0193,0xffff
0a52 019c fffe  |    |		.CONST	0x019c,0xfffe
0a54 01a4 0001  |    |		.CONST	0x01a4,0x0001
0a56 ; --------------------------------------------------------------------------------------
0a56 ; Debug3 Subtable 0xd
0a56 ; --------------------------------------------------------------------------------------
0a56 0002 0001  |    |		.DBG3TAB	0x0002,0x0001
0a58 01b3 ffff  |    |		.CONST	0x01b3,0xffff
0a5a 01bb fffe  |    |		.CONST	0x01bb,0xfffe
0a5c 01c7 0001  |    |		.CONST	0x01c7,0x0001
0a5e ; --------------------------------------------------------------------------------------
0a5e ; Debug3 Subtable 0xe
0a5e ; --------------------------------------------------------------------------------------
0a5e 0002 0001  |    |		.DBG3TAB	0x0002,0x0001
0a60 01db ffff  |    |		.CONST	0x01db,0xffff
0a62 01e3 fffe  |    |		.CONST	0x01e3,0xfffe
0a64 01eb 0001  |    |		.CONST	0x01eb,0x0001
0a66 ; --------------------------------------------------------------------------------------
0a66 ; Debug3 Subtable 0xf
0a66 ; --------------------------------------------------------------------------------------
0a66 0001 0001  |    |		.DBG3TAB	0x0001,0x0001
0a68 01f3 ffff  |    |		.CONST	0x01f3,0xffff
0a6a 01fb 0001  |    |		.CONST	0x01fb,0x0001
0a6c ; --------------------------------------------------------------------------------------
0a6c ; Debug3 Subtable 0x10
0a6c ; --------------------------------------------------------------------------------------
0a6c 0001 0001  |    |		.DBG3TAB	0x0001,0x0001
0a6e 020b ffff  |    |		.CONST	0x020b,0xffff
0a70 0213 0001  |    |		.CONST	0x0213,0x0001
0a72 ; --------------------------------------------------------------------------------------
0a72 ; Debug3 Subtable 0x11
0a72 ; --------------------------------------------------------------------------------------
0a72 0003 0009  |    |		.DBG3TAB	0x0003,0x0009
0a74 0223 ffff  | #  |		.CONST	0x0223,0xffff
0a76 022c fffe  | ,  |		.CONST	0x022c,0xfffe
0a78 0230 fffd  | 0  |		.CONST	0x0230,0xfffd
0a7a 0232 0001  | 2  |		.CONST	0x0232,0x0001
0a7c 0237 0002  | 7  |		.CONST	0x0237,0x0002
0a7e 023a 0003  | :  |		.CONST	0x023a,0x0003
0a80 0241 0004  | A  |		.CONST	0x0241,0x0004
0a82 0247 0005  | G  |		.CONST	0x0247,0x0005
0a84 0257 0006  | W  |		.CONST	0x0257,0x0006
0a86 0268 0007  | h  |		.CONST	0x0268,0x0007
0a88 0277 0008  | w  |		.CONST	0x0277,0x0008
0a8a 027b 0009  | {  |		.CONST	0x027b,0x0009
0a8c ; --------------------------------------------------------------------------------------
0a8c ; Debug3 Subtable 0x12
0a8c ; --------------------------------------------------------------------------------------
0a8c 0003 0007  |    |		.DBG3TAB	0x0003,0x0007
0a8e 028b ffff  |    |		.CONST	0x028b,0xffff
0a90 0293 fffe  |    |		.CONST	0x0293,0xfffe
0a92 0294 fffd  |    |		.CONST	0x0294,0xfffd
0a94 0296 0001  |    |		.CONST	0x0296,0x0001
0a96 029c 0002  |    |		.CONST	0x029c,0x0002
0a98 02bb 0003  |    |		.CONST	0x02bb,0x0003
0a9a 02c1 0004  |    |		.CONST	0x02c1,0x0004
0a9c 02de 0005  |    |		.CONST	0x02de,0x0005
0a9e 02fc 0006  |    |		.CONST	0x02fc,0x0006
0aa0 0300 0007  |    |		.CONST	0x0300,0x0007
0aa2 ; --------------------------------------------------------------------------------------
0aa2 ; Debug3 Subtable 0x13
0aa2 ; --------------------------------------------------------------------------------------
0aa2 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
0aa4 0313 ffff  |    |		.CONST	0x0313,0xffff
0aa6 0319 0001  |    |		.CONST	0x0319,0x0001
0aa8 031c 0002  |    |		.CONST	0x031c,0x0002
0aaa 0324 0003  | $  |		.CONST	0x0324,0x0003
0aac 0328 0004  | (  |		.CONST	0x0328,0x0004
0aae ; --------------------------------------------------------------------------------------
0aae ; Debug3 Subtable 0x14
0aae ; --------------------------------------------------------------------------------------
0aae 0004 0009  |    |		.DBG3TAB	0x0004,0x0009
0ab0 0333 ffff  | 3  |		.CONST	0x0333,0xffff
0ab2 033c fffe  | <  |		.CONST	0x033c,0xfffe
0ab4 0340 fffd  | @  |		.CONST	0x0340,0xfffd
0ab6 0346 fffc  | F  |		.CONST	0x0346,0xfffc
0ab8 0348 0001  | H  |		.CONST	0x0348,0x0001
0aba 034a 0002  | J  |		.CONST	0x034a,0x0002
0abc 0351 0003  | Q  |		.CONST	0x0351,0x0003
0abe 0357 0004  | W  |		.CONST	0x0357,0x0004
0ac0 0368 0005  | h  |		.CONST	0x0368,0x0005
0ac2 036e 0006  | n  |		.CONST	0x036e,0x0006
0ac4 0380 0007  |    |		.CONST	0x0380,0x0007
0ac6 0390 0008  |    |		.CONST	0x0390,0x0008
0ac8 0394 0009  |    |		.CONST	0x0394,0x0009
0aca ; --------------------------------------------------------------------------------------
0aca ; Debug3 Subtable 0x15
0aca ; --------------------------------------------------------------------------------------
0aca 0004 000a  |    |		.DBG3TAB	0x0004,0x000a
0acc 03a3 ffff  |    |		.CONST	0x03a3,0xffff
0ace 03a7 fffe  |    |		.CONST	0x03a7,0xfffe
0ad0 03aa fffd  |    |		.CONST	0x03aa,0xfffd
0ad2 03ad fffc  |    |		.CONST	0x03ad,0xfffc
0ad4 03af 0001  |    |		.CONST	0x03af,0x0001
0ad6 03b2 0002  |    |		.CONST	0x03b2,0x0002
0ad8 03b6 0003  |    |		.CONST	0x03b6,0x0003
0ada 03b8 0004  |    |		.CONST	0x03b8,0x0004
0adc 03c6 0005  |    |		.CONST	0x03c6,0x0005
0ade 03ca 0006  |    |		.CONST	0x03ca,0x0006
0ae0 03d4 0007  |    |		.CONST	0x03d4,0x0007
0ae2 03da 0008  |    |		.CONST	0x03da,0x0008
0ae4 03dd 0009  |    |		.CONST	0x03dd,0x0009
0ae6 03ea 000a  |    |		.CONST	0x03ea,0x000a
0ae8 ; --------------------------------------------------------------------------------------
0ae8 ; Debug3 Subtable 0x16
0ae8 ; --------------------------------------------------------------------------------------
0ae8 0002 0003  |    |		.DBG3TAB	0x0002,0x0003
0aea 03fb ffff  |    |		.CONST	0x03fb,0xffff
0aec 03fd fffe  |    |		.CONST	0x03fd,0xfffe
0aee 0401 0001  |    |		.CONST	0x0401,0x0001
0af0 0406 0003  |    |		.CONST	0x0406,0x0003
0af2 0410 0002  |    |		.CONST	0x0410,0x0002
0af4 ; --------------------------------------------------------------------------------------
0af4 ; Debug3 Subtable 0x17
0af4 ; --------------------------------------------------------------------------------------
0af4 0004 000b  |    |		.DBG3TAB	0x0004,0x000b
0af6 041b ffff  |    |		.CONST	0x041b,0xffff
0af8 0420 fffe  |    |		.CONST	0x0420,0xfffe
0afa 0422 fffd  | "  |		.CONST	0x0422,0xfffd
0afc 0424 fffc  | $  |		.CONST	0x0424,0xfffc
0afe 0426 0001  | &  |		.CONST	0x0426,0x0001
0b00 0429 0002  | )  |		.CONST	0x0429,0x0002
0b02 042d 0003  | -  |		.CONST	0x042d,0x0003
0b04 042f 0004  | /  |		.CONST	0x042f,0x0004
0b06 0433 0005  | 3  |		.CONST	0x0433,0x0005
0b08 043f 0006  | ?  |		.CONST	0x043f,0x0006
0b0a 0440 0007  | @  |		.CONST	0x0440,0x0007
0b0c 044f 0008  | O  |		.CONST	0x044f,0x0008
0b0e 0452 0009  | R  |		.CONST	0x0452,0x0009
0b10 0458 000a  | X  |		.CONST	0x0458,0x000a
0b12 045c 000b  | \  |		.CONST	0x045c,0x000b
0b14 ; --------------------------------------------------------------------------------------
0b14 ; Debug3 Subtable 0x18
0b14 ; --------------------------------------------------------------------------------------
0b14 0002 0003  |    |		.DBG3TAB	0x0002,0x0003
0b16 0473 ffff  | s  |		.CONST	0x0473,0xffff
0b18 0475 fffe  | u  |		.CONST	0x0475,0xfffe
0b1a 0479 0001  | y  |		.CONST	0x0479,0x0001
0b1c 047e 0003  | ~  |		.CONST	0x047e,0x0003
0b1e 048a 0002  |    |		.CONST	0x048a,0x0002
0b20 ; --------------------------------------------------------------------------------------
0b20 ; Debug3 Subtable 0x19
0b20 ; --------------------------------------------------------------------------------------
0b20 0002 0009  |    |		.DBG3TAB	0x0002,0x0009
0b22 0493 ffff  |    |		.CONST	0x0493,0xffff
0b24 0495 fffe  |    |		.CONST	0x0495,0xfffe
0b26 0497 0001  |    |		.CONST	0x0497,0x0001
0b28 049a 0002  |    |		.CONST	0x049a,0x0002
0b2a 049e 0003  |    |		.CONST	0x049e,0x0003
0b2c 04a0 0004  |    |		.CONST	0x04a0,0x0004
0b2e 04aa 0005  |    |		.CONST	0x04aa,0x0005
0b30 04ae 0006  |    |		.CONST	0x04ae,0x0006
0b32 04b6 0007  |    |		.CONST	0x04b6,0x0007
0b34 04ba 0008  |    |		.CONST	0x04ba,0x0008
0b36 04c7 0009  |    |		.CONST	0x04c7,0x0009
0b38 ; --------------------------------------------------------------------------------------
0b38 ; Debug3 Subtable 0x1a
0b38 ; --------------------------------------------------------------------------------------
0b38 0002 0003  |    |		.DBG3TAB	0x0002,0x0003
0b3a 04db ffff  |    |		.CONST	0x04db,0xffff
0b3c 04dd fffe  |    |		.CONST	0x04dd,0xfffe
0b3e 04e1 0001  |    |		.CONST	0x04e1,0x0001
0b40 04e6 0003  |    |		.CONST	0x04e6,0x0003
0b42 04f2 0002  |    |		.CONST	0x04f2,0x0002
0b44 ; --------------------------------------------------------------------------------------
0b44 ; Debug3 Subtable 0x1b
0b44 ; --------------------------------------------------------------------------------------
0b44 0004 000e  |    |		.DBG3TAB	0x0004,0x000e
0b46 04fb ffff  |    |		.CONST	0x04fb,0xffff
0b48 0500 fffe  |    |		.CONST	0x0500,0xfffe
0b4a 0501 fffd  |    |		.CONST	0x0501,0xfffd
0b4c 0506 fffc  |    |		.CONST	0x0506,0xfffc
0b4e 0508 0001  |    |		.CONST	0x0508,0x0001
0b50 050b 0002  |    |		.CONST	0x050b,0x0002
0b52 050f 0003  |    |		.CONST	0x050f,0x0003
0b54 0511 0004  |    |		.CONST	0x0511,0x0004
0b56 0515 0005  |    |		.CONST	0x0515,0x0005
0b58 0519 0006  |    |		.CONST	0x0519,0x0006
0b5a 052b 0007  | +  |		.CONST	0x052b,0x0007
0b5c 0530 0008  | 0  |		.CONST	0x0530,0x0008
0b5e 0531 0009  | 1  |		.CONST	0x0531,0x0009
0b60 053e 000a  | >  |		.CONST	0x053e,0x000a
0b62 0541 000b  | A  |		.CONST	0x0541,0x000b
0b64 0547 000c  | G  |		.CONST	0x0547,0x000c
0b66 054b 000d  | K  |		.CONST	0x054b,0x000d
0b68 0558 000e  | X  |		.CONST	0x0558,0x000e
0b6a ; --------------------------------------------------------------------------------------
0b6a ; Debug3 Subtable 0x1c
0b6a ; --------------------------------------------------------------------------------------
0b6a 0002 0003  |    |		.DBG3TAB	0x0002,0x0003
0b6c 056b ffff  | k  |		.CONST	0x056b,0xffff
0b6e 056d fffe  | m  |		.CONST	0x056d,0xfffe
0b70 0571 0001  | q  |		.CONST	0x0571,0x0001
0b72 0576 0003  | v  |		.CONST	0x0576,0x0003
0b74 0584 0002  |    |		.CONST	0x0584,0x0002
0b76 ; --------------------------------------------------------------------------------------
0b76 ; Debug3 Subtable 0x1d
0b76 ; --------------------------------------------------------------------------------------
0b76 0003 000d  |    |		.DBG3TAB	0x0003,0x000d
0b78 058b ffff  |    |		.CONST	0x058b,0xffff
0b7a 0590 fffe  |    |		.CONST	0x0590,0xfffe
0b7c 0595 fffd  |    |		.CONST	0x0595,0xfffd
0b7e 0597 0001  |    |		.CONST	0x0597,0x0001
0b80 059a 0002  |    |		.CONST	0x059a,0x0002
0b82 059e 0003  |    |		.CONST	0x059e,0x0003
0b84 05a0 0004  |    |		.CONST	0x05a0,0x0004
0b86 05a4 0005  |    |		.CONST	0x05a4,0x0005
0b88 05b6 0006  |    |		.CONST	0x05b6,0x0006
0b8a 05bb 0007  |    |		.CONST	0x05bb,0x0007
0b8c 05bc 0008  |    |		.CONST	0x05bc,0x0008
0b8e 05c5 0009  |    |		.CONST	0x05c5,0x0009
0b90 05c8 000a  |    |		.CONST	0x05c8,0x000a
0b92 05ce 000b  |    |		.CONST	0x05ce,0x000b
0b94 05d2 000c  |    |		.CONST	0x05d2,0x000c
0b96 05df 000d  |    |		.CONST	0x05df,0x000d
0b98 ; --------------------------------------------------------------------------------------
0b98 ; Debug3 Subtable 0x1e
0b98 ; --------------------------------------------------------------------------------------
0b98 0002 0003  |    |		.DBG3TAB	0x0002,0x0003
0b9a 05f3 ffff  |    |		.CONST	0x05f3,0xffff
0b9c 05f5 fffe  |    |		.CONST	0x05f5,0xfffe
0b9e 05f9 0001  |    |		.CONST	0x05f9,0x0001
0ba0 05fe 0003  |    |		.CONST	0x05fe,0x0003
0ba2 060c 0002  |    |		.CONST	0x060c,0x0002
0ba4 ; --------------------------------------------------------------------------------------
0ba4 ; Debug3 Subtable 0x1f
0ba4 ; --------------------------------------------------------------------------------------
0ba4 0005 0010  |    |		.DBG3TAB	0x0005,0x0010
0ba6 061b ffff  |    |		.CONST	0x061b,0xffff
0ba8 061c fffe  |    |		.CONST	0x061c,0xfffe
0baa 0621 fffd  | !  |		.CONST	0x0621,0xfffd
0bac 0623 fffc  | #  |		.CONST	0x0623,0xfffc
0bae 0625 fffb  | %  |		.CONST	0x0625,0xfffb
0bb0 0627 0001  | '  |		.CONST	0x0627,0x0001
0bb2 0631 0002  | 1  |		.CONST	0x0631,0x0002
0bb4 0635 0003  | 5  |		.CONST	0x0635,0x0003
0bb6 063e 0004  | >  |		.CONST	0x063e,0x0004
0bb8 0647 0005  | G  |		.CONST	0x0647,0x0005
0bba 0650 0006  | P  |		.CONST	0x0650,0x0006
0bbc 065d 0007  | ]  |		.CONST	0x065d,0x0007
0bbe 0671 0008  | q  |		.CONST	0x0671,0x0008
0bc0 0675 0009  | u  |		.CONST	0x0675,0x0009
0bc2 0681 000a  |    |		.CONST	0x0681,0x000a
0bc4 0685 000b  |    |		.CONST	0x0685,0x000b
0bc6 068e 000c  |    |		.CONST	0x068e,0x000c
0bc8 0697 000d  |    |		.CONST	0x0697,0x000d
0bca 06a4 000e  |    |		.CONST	0x06a4,0x000e
0bcc 06b8 000f  |    |		.CONST	0x06b8,0x000f
0bce 06bc 0010  |    |		.CONST	0x06bc,0x0010
0bd0 ; --------------------------------------------------------------------------------------
0bd0 ; Debug3 Subtable 0x20
0bd0 ; --------------------------------------------------------------------------------------
0bd0 000d 0014  |    |		.DBG3TAB	0x000d,0x0014
0bd2 06d3 ffff  |    |		.CONST	0x06d3,0xffff
0bd4 06d9 fffe  |    |		.CONST	0x06d9,0xfffe
0bd6 06db fffd  |    |		.CONST	0x06db,0xfffd
0bd8 06dd fffc  |    |		.CONST	0x06dd,0xfffc
0bda 06df fffb  |    |		.CONST	0x06df,0xfffb
0bdc 06e3 fffa  |    |		.CONST	0x06e3,0xfffa
0bde 06e8 fff9  |    |		.CONST	0x06e8,0xfff9
0be0 06ed fff8  |    |		.CONST	0x06ed,0xfff8
0be2 06f2 fff7  |    |		.CONST	0x06f2,0xfff7
0be4 06f7 fff6  |    |		.CONST	0x06f7,0xfff6
0be6 06fc fff5  |    |		.CONST	0x06fc,0xfff5
0be8 0701 fff4  |    |		.CONST	0x0701,0xfff4
0bea 0706 fff3  |    |		.CONST	0x0706,0xfff3
0bec 070b 0001  |    |		.CONST	0x070b,0x0001
0bee 070e 0002  |    |		.CONST	0x070e,0x0002
0bf0 0713 0003  |    |		.CONST	0x0713,0x0003
0bf2 071f 0004  |    |		.CONST	0x071f,0x0004
0bf4 0737 0005  | 7  |		.CONST	0x0737,0x0005
0bf6 073b 0006  | ;  |		.CONST	0x073b,0x0006
0bf8 0748 0007  | H  |		.CONST	0x0748,0x0007
0bfa 074c 0008  | L  |		.CONST	0x074c,0x0008
0bfc 0752 0009  | R  |		.CONST	0x0752,0x0009
0bfe 075b 000a  | [  |		.CONST	0x075b,0x000a
0c00 0761 000b  | a  |		.CONST	0x0761,0x000b
0c02 0767 000c  | g  |		.CONST	0x0767,0x000c
0c04 076f 000d  | o  |		.CONST	0x076f,0x000d
0c06 0778 000e  | x  |		.CONST	0x0778,0x000e
0c08 077e 000f  | ~  |		.CONST	0x077e,0x000f
0c0a 0783 0010  |    |		.CONST	0x0783,0x0010
0c0c 078b 0011  |    |		.CONST	0x078b,0x0011
0c0e 0793 0012  |    |		.CONST	0x0793,0x0012
0c10 079b 0013  |    |		.CONST	0x079b,0x0013
0c12 07a1 0014  |    |		.CONST	0x07a1,0x0014
0c14 ; --------------------------------------------------------------------------------------
0c14 ; Debug3 Subtable 0x21
0c14 ; --------------------------------------------------------------------------------------
0c14 0001 0002  |    |		.DBG3TAB	0x0001,0x0002
0c16 07ab ffff  |    |		.CONST	0x07ab,0xffff
0c18 07af 0001  |    |		.CONST	0x07af,0x0001
0c1a 07b2 0002  |    |		.CONST	0x07b2,0x0002
0c1c 0000 0000  |    |		.BLANK	0000[0x1e4]