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

⟦dfd795d0d⟧

    Length: 6144 (0x1800)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« 
        └─⟦this⟧ 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0a70       | p  |		.CONST	0x0a70								; 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 8006       |    |		.CONST	0x8006								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 03e1       |    |		.CONST	0x03e1								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0062       | b  |		.CONST	0x0062								; Number of locals
000b			INIT_0008:
000b 029a 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Outer_Call,Visible,Unelaborated
000d 029a 046b  |   k|		Declare_Subprogram	INIT_0468,For_Outer_Call,Visible,Unelaborated
000f 029a 04f3  |    |		Declare_Subprogram	INIT_04f0,For_Outer_Call,Visible,Unelaborated
0011 029a 05b3  |    |		Declare_Subprogram	INIT_05b0,For_Outer_Call,Visible,Unelaborated
0013 029a 05d3  |    |		Declare_Subprogram	INIT_05d0,For_Outer_Call,Visible,Unelaborated
0015 029a 0603  |    |		Declare_Subprogram	INIT_0600,For_Outer_Call,Visible,Unelaborated
0017 029a 0613  |    |		Declare_Subprogram	INIT_0610,For_Outer_Call,Visible,Unelaborated
0019 029a 0653  |   S|		Declare_Subprogram	INIT_0650,For_Outer_Call,Visible,Unelaborated
001b 480b       |H   |		Short_Literal	0xb
001c 032b       | +  |		Declare_Type	Record,Incomplete,Visible
001d 03a6       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible,Values_Relative
001e 00d9       |    |		Load_Top	At_Offset_1
001f 02a0       |    |		Declare_Subprogram	Null_Subprogram
0020 00da       |    |		Load_Top	At_Offset_2
0021 03a3       |    |		Complete_Type	Heap_Access,By_Defining
0022 029a 06cb  |    |		Declare_Subprogram	INIT_06c8,For_Outer_Call,Visible,Unelaborated
0024 029a 06db  |    |		Declare_Subprogram	INIT_06d8,For_Outer_Call,Visible,Unelaborated
0026 e001       |    |		Load	0x0,0x1
0027 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0028 0129       | )  |		Execute	Any,Make_Visible
0029 4804       |H   |		Short_Literal	0x4
002a 0093 09ab  |    |		push_full_address	INIT_09a8
002c 02a0       |    |		Declare_Subprogram	Null_Subprogram
002d 038d       |    |		Declare_Type	Package,Defined,Visible,Not_Elaborated
002e 03a6       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible,Values_Relative
002f e002       |    |		Load	0x0,0x2
0030 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0031 00d9       |    |		Load_Top	At_Offset_1
0032 03a2       |    |		Complete_Type	Heap_Access,By_Renaming
0033 029a 06e3  |    |		Declare_Subprogram	INIT_06e0,For_Outer_Call,Visible,Unelaborated
0035 029a 06f3  |    |		Declare_Subprogram	INIT_06f0,For_Outer_Call,Visible,Unelaborated
0037 480c       |H   |		Short_Literal	0xc
0038 032b       | +  |		Declare_Type	Record,Incomplete,Visible
0039 03a6       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible,Values_Relative
003a 00d9       |    |		Load_Top	At_Offset_1
003b 02a0       |    |		Declare_Subprogram	Null_Subprogram
003c 00da       |    |		Load_Top	At_Offset_2
003d 03a3       |    |		Complete_Type	Heap_Access,By_Defining
003e 029a 06fb  |    |		Declare_Subprogram	INIT_06f8,For_Outer_Call,Visible,Unelaborated
0040 029a 070b  |    |		Declare_Subprogram	INIT_0708,For_Outer_Call,Visible,Unelaborated
0042 4802       |H   |		Short_Literal	0x2
0043 032b       | +  |		Declare_Type	Record,Incomplete,Visible
0044 03a6       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible,Values_Relative
0045 00d9       |    |		Load_Top	At_Offset_1
0046 02a0       |    |		Declare_Subprogram	Null_Subprogram
0047 00da       |    |		Load_Top	At_Offset_2
0048 03a3       |    |		Complete_Type	Heap_Access,By_Defining
0049 029a 0713  |    |		Declare_Subprogram	INIT_0710,For_Outer_Call,Visible,Unelaborated
004b 029a 0723  |   #|		Declare_Subprogram	INIT_0720,For_Outer_Call,Visible,Unelaborated
004d 03a6       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible,Values_Relative
004e e002       |    |		Load	0x0,0x2
004f 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0050 00d9       |    |		Load_Top	At_Offset_1
0051 03a2       |    |		Complete_Type	Heap_Access,By_Renaming
0052 029a 072b  |   +|		Declare_Subprogram	INIT_0728,For_Outer_Call,Visible,Unelaborated
0054 029a 073b  |   ;|		Declare_Subprogram	INIT_0738,For_Outer_Call,Visible,Unelaborated
0056 4803       |H   |		Short_Literal	0x3
0057 032b       | +  |		Declare_Type	Record,Incomplete,Visible
0058 03a6       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible,Values_Relative
0059 00d9       |    |		Load_Top	At_Offset_1
005a 02a0       |    |		Declare_Subprogram	Null_Subprogram
005b 00da       |    |		Load_Top	At_Offset_2
005c 03a3       |    |		Complete_Type	Heap_Access,By_Defining
005d 029a 0743  |   C|		Declare_Subprogram	INIT_0740,For_Outer_Call,Visible,Unelaborated
005f 029a 0753  |   S|		Declare_Subprogram	INIT_0750,For_Outer_Call,Visible,Unelaborated
0061 4803       |H   |		Short_Literal	0x3
0062 032b       | +  |		Declare_Type	Record,Incomplete,Visible
0063 03a6       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible,Values_Relative
0064 00d9       |    |		Load_Top	At_Offset_1
0065 02a0       |    |		Declare_Subprogram	Null_Subprogram
0066 00da       |    |		Load_Top	At_Offset_2
0067 03a3       |    |		Complete_Type	Heap_Access,By_Defining
0068 029a 075b  |   [|		Declare_Subprogram	INIT_0758,For_Outer_Call,Visible,Unelaborated
006a 029a 076b  |   k|		Declare_Subprogram	INIT_0768,For_Outer_Call,Visible,Unelaborated
006c e002       |    |		Load	0x0,0x2
006d 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
006e 0129       | )  |		Execute	Any,Make_Visible
006f 029a 0773  |   s|		Declare_Subprogram	INIT_0770,For_Outer_Call,Visible,Unelaborated
0071 029a 0783  |    |		Declare_Subprogram	INIT_0780,For_Outer_Call,Visible,Unelaborated
0073 4802       |H   |		Short_Literal	0x2
0074 032b       | +  |		Declare_Type	Record,Incomplete,Visible
0075 03a6       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible,Values_Relative
0076 00d9       |    |		Load_Top	At_Offset_1
0077 02a0       |    |		Declare_Subprogram	Null_Subprogram
0078 00da       |    |		Load_Top	At_Offset_2
0079 03a3       |    |		Complete_Type	Heap_Access,By_Defining
007a 029a 078b  |    |		Declare_Subprogram	INIT_0788,For_Outer_Call,Visible,Unelaborated
007c 029a 079b  |    |		Declare_Subprogram	INIT_0798,For_Outer_Call,Visible,Unelaborated
007e 4804       |H   |		Short_Literal	0x4
007f 032b       | +  |		Declare_Type	Record,Incomplete,Visible
0080 03a6       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible,Values_Relative
0081 00d9       |    |		Load_Top	At_Offset_1
0082 02a0       |    |		Declare_Subprogram	Null_Subprogram
0083 00da       |    |		Load_Top	At_Offset_2
0084 03a3       |    |		Complete_Type	Heap_Access,By_Defining
0085 029a 07a3  |    |		Declare_Subprogram	INIT_07a0,For_Outer_Call,Visible,Unelaborated
0087 029a 07b3  |    |		Declare_Subprogram	INIT_07b0,For_Outer_Call,Visible,Unelaborated
0089 00e3       |    |		Load_Encached	Natural_Cache
008a 4800       |H   |		Short_Literal	0x0
008b 4801       |H   |		Short_Literal	0x1
008c 4801       |H   |		Short_Literal	0x1
008d 4803       |H   |		Short_Literal	0x3
008e 0319       |    |		Declare_Type	Variant_Record,Incomplete,Visible
008f 029f 0983  |    |		Declare_Subprogram	INIT_0980,For_Call
0091 00d9       |    |		Load_Top	At_Offset_1
0092 012a       | *  |		Execute	Any,Change_Utility
0093 0007       |    |		Action	Break_Optional
0094 03a6       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible,Values_Relative
0095 00d9       |    |		Load_Top	At_Offset_1
0096 02a0       |    |		Declare_Subprogram	Null_Subprogram
0097 00da       |    |		Load_Top	At_Offset_2
0098 03a3       |    |		Complete_Type	Heap_Access,By_Defining
0099 029a 07bb  |    |		Declare_Subprogram	INIT_07b8,For_Outer_Call,Visible,Unelaborated
009b 029a 07f3  |    |		Declare_Subprogram	INIT_07f0,For_Outer_Call,Visible,Unelaborated
009d 029a 07fb  |    |		Declare_Subprogram	INIT_07f8,For_Outer_Call,Visible,Unelaborated
009f 029a 0803  |    |		Declare_Subprogram	INIT_0800,For_Outer_Call,Visible,Unelaborated
00a1 e216       |    |		Load	0x1,0x16
00a2 e003       |    |		Load	0x0,0x3
00a3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00a4 e004       |    |		Load	0x0,0x4
00a5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00a6 e004       |    |		Load	0x0,0x4
00a7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00a8 e004       |    |		Load	0x0,0x4
00a9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00aa e004       |    |		Load	0x0,0x4
00ab 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00ac 00e1       |    |		Load_Encached	Boolean_Cache
00ad e004       |    |		Load	0x0,0x4
00ae 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00af 00e1       |    |		Load_Encached	Boolean_Cache
00b0 00e3       |    |		Load_Encached	Natural_Cache
00b1 e23d       | =  |		Load	0x1,0x3d
00b2 02a0       |    |		Declare_Subprogram	Null_Subprogram
00b3 e215       |    |		Load	0x1,0x15
00b4 0326       | &  |		Complete_Type	Record,By_Defining
00b5 e003       |    |		Load	0x0,0x3
00b6 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00b7 e21f       |    |		Load	0x1,0x1f
00b8 00e1       |    |		Load_Encached	Boolean_Cache
00b9 00e1       |    |		Load_Encached	Boolean_Cache
00ba 00e1       |    |		Load_Encached	Boolean_Cache
00bb e23d       | =  |		Load	0x1,0x3d
00bc e004       |    |		Load	0x0,0x4
00bd 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00be 00e1       |    |		Load_Encached	Boolean_Cache
00bf e004       |    |		Load	0x0,0x4
00c0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00c1 e235       | 5  |		Load	0x1,0x35
00c2 e005       |    |		Load	0x0,0x5
00c3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00c4 e005       |    |		Load	0x0,0x5
00c5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00c6 029f 094b  |   K|		Declare_Subprogram	INIT_0948,For_Call
00c8 e21e       |    |		Load	0x1,0x1e
00c9 0326       | &  |		Complete_Type	Record,By_Defining
00ca e239       | 9  |		Load	0x1,0x39
00cb 00e2       |    |		Load_Encached	Integer_Cache
00cc 02a0       |    |		Declare_Subprogram	Null_Subprogram
00cd e234       | 4  |		Load	0x1,0x34
00ce 0326       | &  |		Complete_Type	Record,By_Defining
00cf e006       |    |		Load	0x0,0x6
00d0 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
00d1 e003       |    |		Load	0x0,0x3
00d2 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00d3 e007       |    |		Load	0x0,0x7
00d4 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
00d5 e239       | 9  |		Load	0x1,0x39
00d6 02a0       |    |		Declare_Subprogram	Null_Subprogram
00d7 e238       | 8  |		Load	0x1,0x38
00d8 0326       | &  |		Complete_Type	Record,By_Defining
00d9 e003       |    |		Load	0x0,0x3
00da 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00db e22a       | *  |		Load	0x1,0x2a
00dc e005       |    |		Load	0x0,0x5
00dd 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00de 029f 096b  |   k|		Declare_Subprogram	INIT_0968,For_Call
00e0 e229       | )  |		Load	0x1,0x29
00e1 0326       | &  |		Complete_Type	Record,By_Defining
00e2 e22e       | .  |		Load	0x1,0x2e
00e3 e002       |    |		Load	0x0,0x2
00e4 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
00e5 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
00e6 e231       | 1  |		Load	0x1,0x31
00e7 02a0       |    |		Declare_Subprogram	Null_Subprogram
00e8 e22d       | -  |		Load	0x1,0x2d
00e9 0326       | &  |		Complete_Type	Record,By_Defining
00ea e223       | #  |		Load	0x1,0x23
00eb e21b       |    |		Load	0x1,0x1b
00ec 02a0       |    |		Declare_Subprogram	Null_Subprogram
00ed e222       | "  |		Load	0x1,0x22
00ee 0326       | &  |		Complete_Type	Record,By_Defining
00ef 00e3       |    |		Load_Encached	Natural_Cache
00f0 0266       | f  |		Execute	Discrete,Bounds
00f1 e005       |    |		Load	0x0,0x5
00f2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00f3 029f 0813  |    |		Declare_Subprogram	INIT_0810,For_Call
00f5 4801       |H   |		Short_Literal	0x1
00f6 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
00f7 00e2       |    |		Load_Encached	Integer_Cache
00f8 4801       |H   |		Short_Literal	0x1
00f9 6366       |cf  |		Indirect_Literal	Discrete,0x460,{0x00000000, 0x7fffffff}
00fa 00db       |    |		Load_Top	At_Offset_3
00fb 034f       | O  |		Declare_Type	Array,Constrained,Visible,Bounds_With_Object
00fc 029f 0983  |    |		Declare_Subprogram	INIT_0980,For_Call
00fe 4800       |H   |		Short_Literal	0x0
00ff 4801       |H   |		Short_Literal	0x1
0100 4801       |H   |		Short_Literal	0x1
0101 e23c       | <  |		Load	0x1,0x3c
0102 0307       |    |		Complete_Type	Variant_Record,By_Defining
0103 00bf       |    |		Action	Accept_Activation
0104 e001       |    |		Load	0x0,0x1
0105 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0106 02a0       |    |		Declare_Subprogram	Null_Subprogram
0107 03ad       |    |		Declare_Type	Heap_Access,Defined
0108 e008       |    |		Load	0x0,0x8
0109 e009       |    |		Load	0x0,0x9
010a e001       |    |		Load	0x0,0x1
010b 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
010c 00db       |    |		Load_Top	At_Offset_3
010d e00a       |    |		Load	0x0,0xa
010e 1b2e       | .  |		Execute	Package,Field_Read,Field_Number 0x2e
010f 0387       |    |		Declare_Variable	Package
0110 00d8       |    |		Load_Top	At_Offset_0
0111 020f       |    |		Execute	Module,Activate
0112 e00b       |    |		Load	0x0,0xb
0113 e00c       |    |		Load	0x0,0xc
0114 e001       |    |		Load	0x0,0x1
0115 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0116 e243       | C  |		Load	0x1,0x43
0117 e00d       |    |		Load	0x0,0xd
0118 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0119 0387       |    |		Declare_Variable	Package
011a 00d8       |    |		Load_Top	At_Offset_0
011b 020f       |    |		Execute	Module,Activate
011c e00e       |    |		Load	0x0,0xe
011d e00f       |    |		Load	0x0,0xf
011e e001       |    |		Load	0x0,0x1
011f 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0120 e00a       |    |		Load	0x0,0xa
0121 1b2d       | -  |		Execute	Package,Field_Read,Field_Number 0x2d
0122 0387       |    |		Declare_Variable	Package
0123 00d8       |    |		Load_Top	At_Offset_0
0124 020f       |    |		Execute	Module,Activate
0125 e001       |    |		Load	0x0,0x1
0126 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0127 e010       |    |		Load	0x0,0x10
0128 0322       | "  |		Declare_Variable	Record
0129 e010       |    |		Load	0x0,0x10
012a 012c       | ,  |		Execute	Any,Size
012b 00d9       |    |		Load_Top	At_Offset_1
012c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
012d e011       |    |		Load	0x0,0x11
012e 012c       | ,  |		Execute	Any,Size
012f 00d9       |    |		Load_Top	At_Offset_1
0130 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0131 e215       |    |		Load	0x1,0x15
0132 012c       | ,  |		Execute	Any,Size
0133 00d9       |    |		Load_Top	At_Offset_1
0134 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0135 e012       |    |		Load	0x0,0x12
0136 012c       | ,  |		Execute	Any,Size
0137 00d9       |    |		Load_Top	At_Offset_1
0138 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0139 e21e       |    |		Load	0x1,0x1e
013a 012c       | ,  |		Execute	Any,Size
013b 00d9       |    |		Load_Top	At_Offset_1
013c 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
013d e013       |    |		Load	0x0,0x13
013e 012c       | ,  |		Execute	Any,Size
013f 00d9       |    |		Load_Top	At_Offset_1
0140 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0141 e229       | )  |		Load	0x1,0x29
0142 012c       | ,  |		Execute	Any,Size
0143 00d9       |    |		Load_Top	At_Offset_1
0144 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
0145 e014       |    |		Load	0x0,0x14
0146 012c       | ,  |		Execute	Any,Size
0147 00d9       |    |		Load_Top	At_Offset_1
0148 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0149 e222       | "  |		Load	0x1,0x22
014a 012c       | ,  |		Execute	Any,Size
014b 00d9       |    |		Load_Top	At_Offset_1
014c 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
014d e22d       | -  |		Load	0x1,0x2d
014e 012c       | ,  |		Execute	Any,Size
014f 00d9       |    |		Load_Top	At_Offset_1
0150 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0151 e234       | 4  |		Load	0x1,0x34
0152 012c       | ,  |		Execute	Any,Size
0153 00d9       |    |		Load_Top	At_Offset_1
0154 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
0155 e238       | 8  |		Load	0x1,0x38
0156 012c       | ,  |		Execute	Any,Size
0157 00d9       |    |		Load_Top	At_Offset_1
0158 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
0159 4800       |H   |		Short_Literal	0x0
015a 00d9       |    |		Load_Top	At_Offset_1
015b 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
015c e015       |    |		Load	0x0,0x15
015d 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
015e 02c7       |    |		Declare_Variable	Any
015f 00d8       |    |		Load_Top	At_Offset_0
0160 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0161 e016       |    |		Load	0x0,0x16
0162 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0163 02c7       |    |		Declare_Variable	Any
0164 00d8       |    |		Load_Top	At_Offset_0
0165 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0166 e011       |    |		Load	0x0,0x11
0167 0322       | "  |		Declare_Variable	Record
0168 00db       |    |		Load_Top	At_Offset_3
0169 00d9       |    |		Load_Top	At_Offset_1
016a 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
016b 4800       |H   |		Short_Literal	0x0
016c 00d9       |    |		Load_Top	At_Offset_1
016d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
016e 4800       |H   |		Short_Literal	0x0
016f 00d9       |    |		Load_Top	At_Offset_1
0170 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0171 4800       |H   |		Short_Literal	0x0
0172 00d9       |    |		Load_Top	At_Offset_1
0173 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0174 4800       |H   |		Short_Literal	0x0
0175 00d9       |    |		Load_Top	At_Offset_1
0176 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0177 4800       |H   |		Short_Literal	0x0
0178 00d9       |    |		Load_Top	At_Offset_1
0179 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
017a e004       |    |		Load	0x0,0x4
017b 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
017c 00d9       |    |		Load_Top	At_Offset_1
017d 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
017e e004       |    |		Load	0x0,0x4
017f 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0180 00d9       |    |		Load_Top	At_Offset_1
0181 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
0182 4800       |H   |		Short_Literal	0x0
0183 00d9       |    |		Load_Top	At_Offset_1
0184 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0185 4800       |H   |		Short_Literal	0x0
0186 00d9       |    |		Load_Top	At_Offset_1
0187 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0188 e004       |    |		Load	0x0,0x4
0189 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
018a 00d9       |    |		Load_Top	At_Offset_1
018b 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
018c 4800       |H   |		Short_Literal	0x0
018d 00d9       |    |		Load_Top	At_Offset_1
018e 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
018f 4801       |H   |		Short_Literal	0x1
0190 00d9       |    |		Load_Top	At_Offset_1
0191 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
0192 e226       | &  |		Load	0x1,0x26
0193 00d9       |    |		Load_Top	At_Offset_1
0194 380d       |8   |		Execute	Record,Field_Write,Field_Number 0xd
0195 e226       | &  |		Load	0x1,0x26
0196 00d9       |    |		Load_Top	At_Offset_1
0197 380e       |8   |		Execute	Record,Field_Write,Field_Number 0xe
0198 e21b       |    |		Load	0x1,0x1b
0199 00d9       |    |		Load_Top	At_Offset_1
019a 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
019b e216       |    |		Load	0x1,0x16
019c 00d9       |    |		Load_Top	At_Offset_1
019d 3810       |8   |		Execute	Record,Field_Write,Field_Number 0x10
019e 4800       |H   |		Short_Literal	0x0
019f 00d9       |    |		Load_Top	At_Offset_1
01a0 3811       |8   |		Execute	Record,Field_Write,Field_Number 0x11
01a1 00da       |    |		Load_Top	At_Offset_2
01a2 e011       |    |		Load	0x0,0x11
01a3 3012       |0   |		Execute	Record,Field_Type,Field_Number 0x12
01a4 0119       |    |		Execute	Any,Check_In_Formal_Type
01a5 00d9       |    |		Load_Top	At_Offset_1
01a6 3812       |8   |		Execute	Record,Field_Write,Field_Number 0x12
01a7 00d9       |    |		Load_Top	At_Offset_1
01a8 e011       |    |		Load	0x0,0x11
01a9 3013       |0   |		Execute	Record,Field_Type,Field_Number 0x13
01aa 0119       |    |		Execute	Any,Check_In_Formal_Type
01ab 00d9       |    |		Load_Top	At_Offset_1
01ac 3813       |8   |		Execute	Record,Field_Write,Field_Number 0x13
01ad e017       |    |		Load	0x0,0x17
01ae 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01af 00d9       |    |		Load_Top	At_Offset_1
01b0 3814       |8   |		Execute	Record,Field_Write,Field_Number 0x14
01b1 e018       |    |		Load	0x0,0x18
01b2 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01b3 00d9       |    |		Load_Top	At_Offset_1
01b4 3815       |8   |		Execute	Record,Field_Write,Field_Number 0x15
01b5 e019       |    |		Load	0x0,0x19
01b6 e01a       |    |		Load	0x0,0x1a
01b7 e012       |    |		Load	0x0,0x12
01b8 e21b       |    |		Load	0x1,0x1b
01b9 e016       |    |		Load	0x0,0x16
01ba 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
01bb 0387       |    |		Declare_Variable	Package
01bc 00d8       |    |		Load_Top	At_Offset_0
01bd 020f       |    |		Execute	Module,Activate
01be e012       |    |		Load	0x0,0x12
01bf 0322       | "  |		Declare_Variable	Record
01c0 4801       |H   |		Short_Literal	0x1
01c1 00d9       |    |		Load_Top	At_Offset_1
01c2 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01c3 4801       |H   |		Short_Literal	0x1
01c4 00d9       |    |		Load_Top	At_Offset_1
01c5 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01c6 4800       |H   |		Short_Literal	0x0
01c7 00d9       |    |		Load_Top	At_Offset_1
01c8 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01c9 4800       |H   |		Short_Literal	0x0
01ca 00d9       |    |		Load_Top	At_Offset_1
01cb 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
01cc 4801       |H   |		Short_Literal	0x1
01cd 00d9       |    |		Load_Top	At_Offset_1
01ce 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
01cf 4800       |H   |		Short_Literal	0x0
01d0 00d9       |    |		Load_Top	At_Offset_1
01d1 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
01d2 4800       |H   |		Short_Literal	0x0
01d3 00d9       |    |		Load_Top	At_Offset_1
01d4 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
01d5 4800       |H   |		Short_Literal	0x0
01d6 00d9       |    |		Load_Top	At_Offset_1
01d7 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
01d8 4800       |H   |		Short_Literal	0x0
01d9 00d9       |    |		Load_Top	At_Offset_1
01da 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
01db 4800       |H   |		Short_Literal	0x0
01dc 00d9       |    |		Load_Top	At_Offset_1
01dd 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
01de 4800       |H   |		Short_Literal	0x0
01df 00d9       |    |		Load_Top	At_Offset_1
01e0 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
01e1 e004       |    |		Load	0x0,0x4
01e2 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01e3 00d9       |    |		Load_Top	At_Offset_1
01e4 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
01e5 e004       |    |		Load	0x0,0x4
01e6 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
01e7 00d9       |    |		Load_Top	At_Offset_1
01e8 380c       |8   |		Execute	Record,Field_Write,Field_Number 0xc
01e9 00d8       |    |		Load_Top	At_Offset_0
01ea 340d       |4   |		Execute	Record,Field_Reference,Field_Number 0xd
01eb e01b       |    |		Load	0x0,0x1b
01ec 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
01ed e01c       |    |		Load	0x0,0x1c
01ee 3002       |0   |		Execute	Record,Field_Type,Field_Number 0x2
01ef 0119       |    |		Execute	Any,Check_In_Formal_Type
01f0 00d9       |    |		Load_Top	At_Offset_1
01f1 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01f2 e01b       |    |		Load	0x0,0x1b
01f3 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01f4 e01c       |    |		Load	0x0,0x1c
01f5 3000       |0   |		Execute	Record,Field_Type,Field_Number 0x0
01f6 0119       |    |		Execute	Any,Check_In_Formal_Type
01f7 00d9       |    |		Load_Top	At_Offset_1
01f8 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01f9 e01b       |    |		Load	0x0,0x1b
01fa 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
01fb 00d9       |    |		Load_Top	At_Offset_1
01fc 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01fd e01b       |    |		Load	0x0,0x1b
01fe 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
01ff 00d9       |    |		Load_Top	At_Offset_1
0200 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0201 4800       |H   |		Short_Literal	0x0
0202 00d0       |    |		Action	Swap_Control
0203 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0204 e01d       |    |		Load	0x0,0x1d
0205 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0206 e012       |    |		Load	0x0,0x12
0207 300e       |0   |		Execute	Record,Field_Type,Field_Number 0xe
0208 0119       |    |		Execute	Any,Check_In_Formal_Type
0209 00d9       |    |		Load_Top	At_Offset_1
020a 380e       |8   |		Execute	Record,Field_Write,Field_Number 0xe
020b e01d       |    |		Load	0x0,0x1d
020c 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
020d e012       |    |		Load	0x0,0x12
020e 300f       |0   |		Execute	Record,Field_Type,Field_Number 0xf
020f 0119       |    |		Execute	Any,Check_In_Formal_Type
0210 00d9       |    |		Load_Top	At_Offset_1
0211 380f       |8   |		Execute	Record,Field_Write,Field_Number 0xf
0212 e01d       |    |		Load	0x0,0x1d
0213 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0214 e012       |    |		Load	0x0,0x12
0215 3010       |0   |		Execute	Record,Field_Type,Field_Number 0x10
0216 0119       |    |		Execute	Any,Check_In_Formal_Type
0217 00d9       |    |		Load_Top	At_Offset_1
0218 3810       |8   |		Execute	Record,Field_Write,Field_Number 0x10
0219 4800       |H   |		Short_Literal	0x0
021a 00d9       |    |		Load_Top	At_Offset_1
021b 3811       |8   |		Execute	Record,Field_Write,Field_Number 0x11
021c e21b       |    |		Load	0x1,0x1b
021d 00d9       |    |		Load_Top	At_Offset_1
021e 3812       |8   |		Execute	Record,Field_Write,Field_Number 0x12
021f e21b       |    |		Load	0x1,0x1b
0220 00d9       |    |		Load_Top	At_Offset_1
0221 3813       |8   |		Execute	Record,Field_Write,Field_Number 0x13
0222 e21b       |    |		Load	0x1,0x1b
0223 00d9       |    |		Load_Top	At_Offset_1
0224 3814       |8   |		Execute	Record,Field_Write,Field_Number 0x14
0225 e21b       |    |		Load	0x1,0x1b
0226 00d9       |    |		Load_Top	At_Offset_1
0227 3815       |8   |		Execute	Record,Field_Write,Field_Number 0x15
0228 e21b       |    |		Load	0x1,0x1b
0229 00d9       |    |		Load_Top	At_Offset_1
022a 3816       |8   |		Execute	Record,Field_Write,Field_Number 0x16
022b e231       | 1  |		Load	0x1,0x31
022c 00d9       |    |		Load_Top	At_Offset_1
022d 3817       |8   |		Execute	Record,Field_Write,Field_Number 0x17
022e 4800       |H   |		Short_Literal	0x0
022f 00d9       |    |		Load_Top	At_Offset_1
0230 3818       |8   |		Execute	Record,Field_Write,Field_Number 0x18
0231 e22e       | .  |		Load	0x1,0x2e
0232 00d9       |    |		Load_Top	At_Offset_1
0233 3819       |8   |		Execute	Record,Field_Write,Field_Number 0x19
0234 e002       |    |		Load	0x0,0x2
0235 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0236 1b2c       | ,  |		Execute	Package,Field_Read,Field_Number 0x2c
0237 e012       |    |		Load	0x0,0x12
0238 301a       |0   |		Execute	Record,Field_Type,Field_Number 0x1a
0239 0119       |    |		Execute	Any,Check_In_Formal_Type
023a 00d9       |    |		Load_Top	At_Offset_1
023b 381a       |8   |		Execute	Record,Field_Write,Field_Number 0x1a
023c e21f       |    |		Load	0x1,0x1f
023d 00d9       |    |		Load_Top	At_Offset_1
023e 381b       |8   |		Execute	Record,Field_Write,Field_Number 0x1b
023f 4800       |H   |		Short_Literal	0x0
0240 00d9       |    |		Load_Top	At_Offset_1
0241 381c       |8   |		Execute	Record,Field_Write,Field_Number 0x1c
0242 e01e       |    |		Load	0x0,0x1e
0243 e01f       |    |		Load	0x0,0x1f
0244 e013       |    |		Load	0x0,0x13
0245 e226       | &  |		Load	0x1,0x26
0246 e016       |    |		Load	0x0,0x16
0247 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0248 0387       |    |		Declare_Variable	Package
0249 00d8       |    |		Load_Top	At_Offset_0
024a 020f       |    |		Execute	Module,Activate
024b e013       |    |		Load	0x0,0x13
024c 0322       | "  |		Declare_Variable	Record
024d e01b       |    |		Load	0x0,0x1b
024e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
024f e013       |    |		Load	0x0,0x13
0250 3000       |0   |		Execute	Record,Field_Type,Field_Number 0x0
0251 0119       |    |		Execute	Any,Check_In_Formal_Type
0252 00d9       |    |		Load_Top	At_Offset_1
0253 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0254 e004       |    |		Load	0x0,0x4
0255 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0256 00d9       |    |		Load_Top	At_Offset_1
0257 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0258 e01b       |    |		Load	0x0,0x1b
0259 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
025a e013       |    |		Load	0x0,0x13
025b 3002       |0   |		Execute	Record,Field_Type,Field_Number 0x2
025c 0119       |    |		Execute	Any,Check_In_Formal_Type
025d 00d9       |    |		Load_Top	At_Offset_1
025e 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
025f e004       |    |		Load	0x0,0x4
0260 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0261 00d9       |    |		Load_Top	At_Offset_1
0262 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0263 e226       | &  |		Load	0x1,0x26
0264 00d9       |    |		Load_Top	At_Offset_1
0265 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0266 e231       | 1  |		Load	0x1,0x31
0267 00d9       |    |		Load_Top	At_Offset_1
0268 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
0269 4801       |H   |		Short_Literal	0x1
026a 00d9       |    |		Load_Top	At_Offset_1
026b 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
026c 4801       |H   |		Short_Literal	0x1
026d 00d9       |    |		Load_Top	At_Offset_1
026e 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
026f e22a       | *  |		Load	0x1,0x2a
0270 00d9       |    |		Load_Top	At_Offset_1
0271 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0272 e020       |    |		Load	0x0,0x20
0273 e021       | !  |		Load	0x0,0x21
0274 e014       |    |		Load	0x0,0x14
0275 e231       | 1  |		Load	0x1,0x31
0276 e016       |    |		Load	0x0,0x16
0277 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0278 0387       |    |		Declare_Variable	Package
0279 00d8       |    |		Load_Top	At_Offset_0
027a 020f       |    |		Execute	Module,Activate
027b e014       |    |		Load	0x0,0x14
027c 0322       | "  |		Declare_Variable	Record
027d e226       | &  |		Load	0x1,0x26
027e 00d9       |    |		Load_Top	At_Offset_1
027f 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0280 e004       |    |		Load	0x0,0x4
0281 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0282 00d9       |    |		Load_Top	At_Offset_1
0283 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0284 4800       |H   |		Short_Literal	0x0
0285 00d9       |    |		Load_Top	At_Offset_1
0286 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0287 e21b       |    |		Load	0x1,0x1b
0288 00d9       |    |		Load_Top	At_Offset_1
0289 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
028a e01b       |    |		Load	0x0,0x1b
028b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
028c e014       |    |		Load	0x0,0x14
028d 3004       |0   |		Execute	Record,Field_Type,Field_Number 0x4
028e 0119       |    |		Execute	Any,Check_In_Formal_Type
028f 00d9       |    |		Load_Top	At_Offset_1
0290 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0291 e014       |    |		Load	0x0,0x14
0292 3005       |0   |		Execute	Record,Field_Type,Field_Number 0x5
0293 0337       | 7  |		Declare_Variable	Array
0294 4805       |H   |		Short_Literal	0x5
0295 4802       |H   |		Short_Literal	0x2
0296 4800       |H   |		Short_Literal	0x0
0297 00d9       |    |		Load_Top	At_Offset_1
0298 e252       | R  |		Load	0x1,0x52
0299 01d6       |    |		Execute	Vector,Field_Write
029a 3ffb       |?   |		Loop_Increasing	0x296
029b e014       |    |		Load	0x0,0x14
029c 3005       |0   |		Execute	Record,Field_Type,Field_Number 0x5
029d 0119       |    |		Execute	Any,Check_In_Formal_Type
029e 00d9       |    |		Load_Top	At_Offset_1
029f 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
02a0 4800       |H   |		Short_Literal	0x0
02a1 00d9       |    |		Load_Top	At_Offset_1
02a2 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
02a3 e223       | #  |		Load	0x1,0x23
02a4 00d9       |    |		Load_Top	At_Offset_1
02a5 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
02a6 e231       | 1  |		Load	0x1,0x31
02a7 00d9       |    |		Load_Top	At_Offset_1
02a8 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
02a9 e022       | "  |		Load	0x0,0x22
02aa e023       | #  |		Load	0x0,0x23
02ab e215       |    |		Load	0x1,0x15
02ac e216       |    |		Load	0x1,0x16
02ad e016       |    |		Load	0x0,0x16
02ae 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02af 0387       |    |		Declare_Variable	Package
02b0 00d8       |    |		Load_Top	At_Offset_0
02b1 020f       |    |		Execute	Module,Activate
02b2 e215       |    |		Load	0x1,0x15
02b3 0322       | "  |		Declare_Variable	Record
02b4 e216       |    |		Load	0x1,0x16
02b5 00d9       |    |		Load_Top	At_Offset_1
02b6 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02b7 4800       |H   |		Short_Literal	0x0
02b8 00d9       |    |		Load_Top	At_Offset_1
02b9 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02ba e004       |    |		Load	0x0,0x4
02bb 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02bc 00d9       |    |		Load_Top	At_Offset_1
02bd 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
02be e004       |    |		Load	0x0,0x4
02bf 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02c0 00d9       |    |		Load_Top	At_Offset_1
02c1 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
02c2 e004       |    |		Load	0x0,0x4
02c3 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02c4 00d9       |    |		Load_Top	At_Offset_1
02c5 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
02c6 e004       |    |		Load	0x0,0x4
02c7 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02c8 00d9       |    |		Load_Top	At_Offset_1
02c9 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
02ca 4800       |H   |		Short_Literal	0x0
02cb 00d9       |    |		Load_Top	At_Offset_1
02cc 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
02cd e004       |    |		Load	0x0,0x4
02ce 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02cf 00d9       |    |		Load_Top	At_Offset_1
02d0 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
02d1 4800       |H   |		Short_Literal	0x0
02d2 00d9       |    |		Load_Top	At_Offset_1
02d3 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
02d4 4800       |H   |		Short_Literal	0x0
02d5 00d9       |    |		Load_Top	At_Offset_1
02d6 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
02d7 e23d       | =  |		Load	0x1,0x3d
02d8 00d9       |    |		Load_Top	At_Offset_1
02d9 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
02da e024       | $  |		Load	0x0,0x24
02db e025       | %  |		Load	0x0,0x25
02dc e21e       |    |		Load	0x1,0x1e
02dd e21f       |    |		Load	0x1,0x1f
02de e016       |    |		Load	0x0,0x16
02df 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02e0 0387       |    |		Declare_Variable	Package
02e1 00d8       |    |		Load_Top	At_Offset_0
02e2 020f       |    |		Execute	Module,Activate
02e3 e21e       |    |		Load	0x1,0x1e
02e4 0322       | "  |		Declare_Variable	Record
02e5 4800       |H   |		Short_Literal	0x0
02e6 00d9       |    |		Load_Top	At_Offset_1
02e7 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02e8 e21f       |    |		Load	0x1,0x1f
02e9 00d9       |    |		Load_Top	At_Offset_1
02ea 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02eb 4800       |H   |		Short_Literal	0x0
02ec 00d9       |    |		Load_Top	At_Offset_1
02ed 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
02ee 4800       |H   |		Short_Literal	0x0
02ef 00d9       |    |		Load_Top	At_Offset_1
02f0 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
02f1 4800       |H   |		Short_Literal	0x0
02f2 00d9       |    |		Load_Top	At_Offset_1
02f3 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
02f4 e23d       | =  |		Load	0x1,0x3d
02f5 00d9       |    |		Load_Top	At_Offset_1
02f6 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
02f7 e004       |    |		Load	0x0,0x4
02f8 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
02f9 00d9       |    |		Load_Top	At_Offset_1
02fa 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
02fb 4800       |H   |		Short_Literal	0x0
02fc 00d9       |    |		Load_Top	At_Offset_1
02fd 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
02fe e004       |    |		Load	0x0,0x4
02ff 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0300 00d9       |    |		Load_Top	At_Offset_1
0301 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
0302 e235       | 5  |		Load	0x1,0x35
0303 00d9       |    |		Load_Top	At_Offset_1
0304 3809       |8   |		Execute	Record,Field_Write,Field_Number 0x9
0305 e01d       |    |		Load	0x0,0x1d
0306 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0307 e21e       |    |		Load	0x1,0x1e
0308 300a       |0   |		Execute	Record,Field_Type,Field_Number 0xa
0309 0119       |    |		Execute	Any,Check_In_Formal_Type
030a 00d9       |    |		Load_Top	At_Offset_1
030b 380a       |8   |		Execute	Record,Field_Write,Field_Number 0xa
030c e01d       |    |		Load	0x0,0x1d
030d 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
030e e21e       |    |		Load	0x1,0x1e
030f 300b       |0   |		Execute	Record,Field_Type,Field_Number 0xb
0310 0119       |    |		Execute	Any,Check_In_Formal_Type
0311 00d9       |    |		Load_Top	At_Offset_1
0312 380b       |8   |		Execute	Record,Field_Write,Field_Number 0xb
0313 e026       | &  |		Load	0x0,0x26
0314 e027       | '  |		Load	0x0,0x27
0315 e234       | 4  |		Load	0x1,0x34
0316 e235       | 5  |		Load	0x1,0x35
0317 e016       |    |		Load	0x0,0x16
0318 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0319 0387       |    |		Declare_Variable	Package
031a 00d8       |    |		Load_Top	At_Offset_0
031b 020f       |    |		Execute	Module,Activate
031c e234       | 4  |		Load	0x1,0x34
031d 0322       | "  |		Declare_Variable	Record
031e e239       | 9  |		Load	0x1,0x39
031f 00d9       |    |		Load_Top	At_Offset_1
0320 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0321 4800       |H   |		Short_Literal	0x0
0322 00d9       |    |		Load_Top	At_Offset_1
0323 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0324 e028       | (  |		Load	0x0,0x28
0325 e029       | )  |		Load	0x0,0x29
0326 e238       | 8  |		Load	0x1,0x38
0327 e239       | 9  |		Load	0x1,0x39
0328 e016       |    |		Load	0x0,0x16
0329 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
032a 0387       |    |		Declare_Variable	Package
032b 00d8       |    |		Load_Top	At_Offset_0
032c 020f       |    |		Execute	Module,Activate
032d e238       | 8  |		Load	0x1,0x38
032e 0322       | "  |		Declare_Variable	Record
032f 4800       |H   |		Short_Literal	0x0
0330 00d9       |    |		Load_Top	At_Offset_1
0331 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0332 4800       |H   |		Short_Literal	0x0
0333 00d9       |    |		Load_Top	At_Offset_1
0334 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0335 e007       |    |		Load	0x0,0x7
0336 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0337 00d9       |    |		Load_Top	At_Offset_1
0338 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0339 e239       | 9  |		Load	0x1,0x39
033a 00d9       |    |		Load_Top	At_Offset_1
033b 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
033c e02a       | *  |		Load	0x0,0x2a
033d e02b       | +  |		Load	0x0,0x2b
033e e229       | )  |		Load	0x1,0x29
033f e22a       | *  |		Load	0x1,0x2a
0340 e016       |    |		Load	0x0,0x16
0341 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0342 0387       |    |		Declare_Variable	Package
0343 00d8       |    |		Load_Top	At_Offset_0
0344 020f       |    |		Execute	Module,Activate
0345 e229       | )  |		Load	0x1,0x29
0346 0322       | "  |		Declare_Variable	Record
0347 4800       |H   |		Short_Literal	0x0
0348 00d9       |    |		Load_Top	At_Offset_1
0349 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
034a e22a       | *  |		Load	0x1,0x2a
034b 00d9       |    |		Load_Top	At_Offset_1
034c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
034d e01d       |    |		Load	0x0,0x1d
034e 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
034f e229       | )  |		Load	0x1,0x29
0350 3002       |0   |		Execute	Record,Field_Type,Field_Number 0x2
0351 0119       |    |		Execute	Any,Check_In_Formal_Type
0352 00d9       |    |		Load_Top	At_Offset_1
0353 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0354 e02c       | ,  |		Load	0x0,0x2c
0355 e02d       | -  |		Load	0x0,0x2d
0356 e22d       | -  |		Load	0x1,0x2d
0357 e22e       | .  |		Load	0x1,0x2e
0358 e016       |    |		Load	0x0,0x16
0359 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
035a 0387       |    |		Declare_Variable	Package
035b 00d8       |    |		Load_Top	At_Offset_0
035c 020f       |    |		Execute	Module,Activate
035d e22d       | -  |		Load	0x1,0x2d
035e 0322       | "  |		Declare_Variable	Record
035f e22e       | .  |		Load	0x1,0x2e
0360 00d9       |    |		Load_Top	At_Offset_1
0361 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0362 e22d       | -  |		Load	0x1,0x2d
0363 3001       |0   |		Execute	Record,Field_Type,Field_Number 0x1
0364 0337       | 7  |		Declare_Variable	Array
0365 4805       |H   |		Short_Literal	0x5
0366 4800       |H   |		Short_Literal	0x0
0367 4800       |H   |		Short_Literal	0x0
0368 00d9       |    |		Load_Top	At_Offset_1
0369 e25e       | ^  |		Load	0x1,0x5e
036a 01d6       |    |		Execute	Vector,Field_Write
036b 3ffb       |?   |		Loop_Increasing	0x367
036c e22d       | -  |		Load	0x1,0x2d
036d 3001       |0   |		Execute	Record,Field_Type,Field_Number 0x1
036e 0119       |    |		Execute	Any,Check_In_Formal_Type
036f 00d9       |    |		Load_Top	At_Offset_1
0370 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0371 e231       | 1  |		Load	0x1,0x31
0372 00d9       |    |		Load_Top	At_Offset_1
0373 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0374 e02e       | .  |		Load	0x0,0x2e
0375 e02f       | /  |		Load	0x0,0x2f
0376 e222       | "  |		Load	0x1,0x22
0377 e223       | #  |		Load	0x1,0x23
0378 e016       |    |		Load	0x0,0x16
0379 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
037a 0387       |    |		Declare_Variable	Package
037b 00d8       |    |		Load_Top	At_Offset_0
037c 020f       |    |		Execute	Module,Activate
037d e222       | "  |		Load	0x1,0x22
037e 0322       | "  |		Declare_Variable	Record
037f e223       | #  |		Load	0x1,0x23
0380 00d9       |    |		Load_Top	At_Offset_1
0381 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0382 e21b       |    |		Load	0x1,0x1b
0383 00d9       |    |		Load_Top	At_Offset_1
0384 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0385 e030       | 0  |		Load	0x0,0x30
0386 e031       | 1  |		Load	0x0,0x31
0387 e23c       | <  |		Load	0x1,0x3c
0388 e23d       | =  |		Load	0x1,0x3d
0389 e016       |    |		Load	0x0,0x16
038a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
038b 0387       |    |		Declare_Variable	Package
038c 00d8       |    |		Load_Top	At_Offset_0
038d 020f       |    |		Execute	Module,Activate
038e 029d 082b  |   +|		Declare_Subprogram	INIT_0828,For_Outer_Call
0390 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0391 00c7       |    |		Action	Elaborate_Subprogram
0392 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
0393 00c7       |    |		Action	Elaborate_Subprogram
0394 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0395 00c7       |    |		Action	Elaborate_Subprogram
0396 029d 0853  |   S|		Declare_Subprogram	INIT_0850,For_Outer_Call
0398 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
0399 00c7       |    |		Action	Elaborate_Subprogram
039a 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
039b 00c7       |    |		Action	Elaborate_Subprogram
039c 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
039d 00c7       |    |		Action	Elaborate_Subprogram
039e 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
039f 00c7       |    |		Action	Elaborate_Subprogram
03a0 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
03a1 00c7       |    |		Action	Elaborate_Subprogram
03a2 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
03a3 00c7       |    |		Action	Elaborate_Subprogram
03a4 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
03a5 00c7       |    |		Action	Elaborate_Subprogram
03a6 e032       | 2  |		Load	0x0,0x32
03a7 e033       | 3  |		Load	0x0,0x33
03a8 e016       |    |		Load	0x0,0x16
03a9 e00d       |    |		Load	0x0,0xd
03aa e034       | 4  |		Load	0x0,0x34
03ab e035       | 5  |		Load	0x0,0x35
03ac e036       | 6  |		Load	0x0,0x36
03ad e037       | 7  |		Load	0x0,0x37
03ae 00b6       |    |		Action	Make_Scope
03af 4809       |H   |		Short_Literal	0x9
03b0 e21a       |    |		Load	0x1,0x1a
03b1 020e       |    |		Execute	Module,Augment_Imports
03b2 e21a       |    |		Load	0x1,0x1a
03b3 020d       |    |		Execute	Module,Elaborate
03b4 0007       |    |		Action	Break_Optional
03b5 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
03b6 00c7       |    |		Action	Elaborate_Subprogram
03b7 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
03b8 00c7       |    |		Action	Elaborate_Subprogram
03b9 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
03ba 00c7       |    |		Action	Elaborate_Subprogram
03bb 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
03bc 00c7       |    |		Action	Elaborate_Subprogram
03bd 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
03be 00c7       |    |		Action	Elaborate_Subprogram
03bf 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25
03c0 00c7       |    |		Action	Elaborate_Subprogram
03c1 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
03c2 00c7       |    |		Action	Elaborate_Subprogram
03c3 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
03c4 00c7       |    |		Action	Elaborate_Subprogram
03c5 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
03c6 00c7       |    |		Action	Elaborate_Subprogram
03c7 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
03c8 00c7       |    |		Action	Elaborate_Subprogram
03c9 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
03ca 00c7       |    |		Action	Elaborate_Subprogram
03cb 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
03cc 00c7       |    |		Action	Elaborate_Subprogram
03cd 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
03ce 00c7       |    |		Action	Elaborate_Subprogram
03cf 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
03d0 00c7       |    |		Action	Elaborate_Subprogram
03d1 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36
03d2 00c7       |    |		Action	Elaborate_Subprogram
03d3 1d37       | 7  |		Execute_Immediate	Reference_Lex_1,0x37
03d4 00c7       |    |		Action	Elaborate_Subprogram
03d5 1d3a       | :  |		Execute_Immediate	Reference_Lex_1,0x3a
03d6 00c7       |    |		Action	Elaborate_Subprogram
03d7 1d3b       | ;  |		Execute_Immediate	Reference_Lex_1,0x3b
03d8 00c7       |    |		Action	Elaborate_Subprogram
03d9 1d3e       | >  |		Execute_Immediate	Reference_Lex_1,0x3e
03da 00c7       |    |		Action	Elaborate_Subprogram
03db 1d3f       | ?  |		Execute_Immediate	Reference_Lex_1,0x3f
03dc 00c7       |    |		Action	Elaborate_Subprogram
03dd 1d40       | @  |		Execute_Immediate	Reference_Lex_1,0x40
03de 00c7       |    |		Action	Elaborate_Subprogram
03df 1d41       | A  |		Execute_Immediate	Reference_Lex_1,0x41
03e0 00c7       |    |		Action	Elaborate_Subprogram
03e1			BODY_0008:
03e1 00bc       |    |		Action	Signal_Activated
03e2 00bb       |    |		Action	Signal_Completion
03e3 0000 0000  |    |		.BLANK	0000[0x5]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03f5       |    |		.CONST	0x03f5								; Address of begin
03e9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ea 0005       |    |		.CONST	0x0005								; Number of locals
03eb			INIT_03e8:
03eb e002       |    |		Load	0x0,0x2
03ec 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
03ed 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03ee e001       |    |		Load	0x0,0x1
03ef 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
03f0 e002       |    |		Load	0x0,0x2
03f1 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
03f2 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
03f3 e243       | C  |		Load	0x1,0x43
03f4 0007       |    |		Action	Break_Optional
03f5			BODY_03e8:
03f5 e5fb       |    |		Load	0x2,-0x5
03f6 e002       |    |		Load	0x0,0x2
03f7 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
03f8 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
03f9 e5ff       |    |		Load	0x2,-0x1
03fa 8214       |    |		Call	0x1,0x14
03fb 005b       | [  |		Store_Top	Discrete,At_Offset_3
03fc c5fb       |    |		Store	0x2,-0x5
03fd e5fb       |    |		Load	0x2,-0x5
03fe 705a       |pZ  |		Jump_Nonzero	0x459
03ff e5fb       |    |		Load	0x2,-0x5
0400 e5fc       |    |		Load	0x2,-0x4
0401 e5fe       |    |		Load	0x2,-0x2
0402 e5ff       |    |		Load	0x2,-0x1
0403 e404       |    |		Load	0x2,0x4
0404 8261       | a  |		Call	0x1,0x61
0405 4802       |H   |		Short_Literal	0x2
0406 8262       | b  |		Call	0x1,0x62
0407 c5fc       |    |		Store	0x2,-0x4
0408 c5fb       |    |		Store	0x2,-0x5
0409 e5fb       |    |		Load	0x2,-0x5
040a 704e       |pN  |		Jump_Nonzero	0x459
040b 4800       |H   |		Short_Literal	0x0
040c e00a       |    |		Load	0x0,0xa
040d 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
040e e5fc       |    |		Load	0x2,-0x4
040f e246       | F  |		Load	0x1,0x46
0410 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0411 e00a       |    |		Load	0x0,0xa
0412 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0413 e5fc       |    |		Load	0x2,-0x4
0414 e244       | D  |		Load	0x1,0x44
0415 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0416 e245       | E  |		Load	0x1,0x45
0417 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0418 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0419 e00a       |    |		Load	0x0,0xa
041a 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
041b e5fc       |    |		Load	0x2,-0x4
041c e244       | D  |		Load	0x1,0x44
041d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
041e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
041f 00d8       |    |		Load_Top	At_Offset_0
0420 e245       | E  |		Load	0x1,0x45
0421 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0422 00db       |    |		Load_Top	At_Offset_3
0423 e00d       |    |		Load	0x0,0xd
0424 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0425 4800       |H   |		Short_Literal	0x0
0426 e00a       |    |		Load	0x0,0xa
0427 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0428 e5fc       |    |		Load	0x2,-0x4
0429 e246       | F  |		Load	0x1,0x46
042a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
042b e24b       | K  |		Load	0x1,0x4b
042c e002       |    |		Load	0x0,0x2
042d 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
042e e403       |    |		Load	0x2,0x3
042f 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
0430 a402       |    |		Store_Unchecked	0x2,0x2
0431 00db       |    |		Load_Top	At_Offset_3
0432 e038       | 8  |		Load	0x0,0x38
0433 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0434 a247       | G  |		Store_Unchecked	0x1,0x47
0435 e247       | G  |		Load	0x1,0x47
0436 e00a       |    |		Load	0x0,0xa
0437 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0438 e5fc       |    |		Load	0x2,-0x4
0439 e246       | F  |		Load	0x1,0x46
043a 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
043b 00d9       |    |		Load_Top	At_Offset_1
043c e402       |    |		Load	0x2,0x2
043d 0217       |    |		Execute	Heap_Access,All_Reference
043e 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
043f 601c       |`   |		Indirect_Literal	Discrete,0x45c,{0x00000000, 0x00014000}
0440 601b       |`   |		Indirect_Literal	Discrete,0x45c,{0x00000000, 0x00014000}
0441 4800       |H   |		Short_Literal	0x0
0442 e403       |    |		Load	0x2,0x3
0443 e016       |    |		Load	0x0,0x16
0444 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0445 e402       |    |		Load	0x2,0x2
0446 0217       |    |		Execute	Heap_Access,All_Reference
0447 3813       |8   |		Execute	Record,Field_Write,Field_Number 0x13
0448 487f       |H   |		Short_Literal	0x7f
0449 00db       |    |		Load_Top	At_Offset_3
044a e015       |    |		Load	0x0,0x15
044b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
044c e015       |    |		Load	0x0,0x15
044d 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
044e e402       |    |		Load	0x2,0x2
044f 0217       |    |		Execute	Heap_Access,All_Reference
0450 3812       |8   |		Execute	Record,Field_Write,Field_Number 0x12
0451 00db       |    |		Load_Top	At_Offset_3
0452 e017       |    |		Load	0x0,0x17
0453 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0454 00db       |    |		Load_Top	At_Offset_3
0455 e018       |    |		Load	0x0,0x18
0456 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0457 00db       |    |		Load_Top	At_Offset_3
0458 a5fd       |    |		Store_Unchecked	0x2,-0x3
0459 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
045a 0000 0000  |    |		.XXX[0x2]
045c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00014000}
0460 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
0464 0000 0000  |    |		.BLANK	0000[0x4]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 0481       |    |		.CONST	0x0481								; Address of begin
0469 0004       |    |		.CONST	0x0004								; Address of exception handler
046a 0006       |    |		.CONST	0x0006								; Number of locals
046b			INIT_0468:
046b e002       |    |		Load	0x0,0x2
046c 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
046d 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
046e e039       | 9  |		Load	0x0,0x39
046f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0470 02c7       |    |		Declare_Variable	Any
0471 00d8       |    |		Load_Top	At_Offset_0
0472 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0473 e01b       |    |		Load	0x0,0x1b
0474 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0475 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0476 02c7       |    |		Declare_Variable	Any
0477 00d8       |    |		Load_Top	At_Offset_0
0478 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0479 e01b       |    |		Load	0x0,0x1b
047a 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
047b 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
047c 02c7       |    |		Declare_Variable	Any
047d 00d8       |    |		Load_Top	At_Offset_0
047e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
047f e01b       |    |		Load	0x0,0x1b
0480 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0481			BODY_0468:
0481 e5fd       |    |		Load	0x2,-0x3
0482 e002       |    |		Load	0x0,0x2
0483 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0484 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0485 e5ff       |    |		Load	0x2,-0x1
0486 8214       |    |		Call	0x1,0x14
0487 c402       |    |		Store	0x2,0x2
0488 c5fd       |    |		Store	0x2,-0x3
0489 e5fd       |    |		Load	0x2,-0x3
048a 7058       |pX  |		Jump_Nonzero	0x4e3
048b 0092 0a25  |   %|		Action	Push_String_Extended,0xa25					; "Destroying state file "
048d e5fe       |    |		Load	0x2,-0x2
048e e5ff       |    |		Load	0x2,-0x1
048f e402       |    |		Load	0x2,0x2
0490 8261       | a  |		Call	0x1,0x61
0491 01cc       |    |		Execute	Vector,Catenate
0492 0092 0a26  |   &|		Action	Push_String_Extended,0xa26					; "."
0494 01cc       |    |		Execute	Vector,Catenate
0495 803a       | :  |		Call	0x0,0x3a
0496 e01b       |    |		Load	0x0,0x1b
0497 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0498 00da       |    |		Load_Top	At_Offset_2
0499 0120       |    |		Execute	Any,Is_Value
049a 6802       |h   |		Jump_Zero	0x49d
049b 00f1       |    |		Load_Encached	Diana_Temp_Seq
049c 7801       |x   |		Jump	0x49e
049d 00da       |    |		Load_Top	At_Offset_2
049e e404       |    |		Load	0x2,0x4
049f 0120       |    |		Execute	Any,Is_Value
04a0 6804       |h   |		Jump_Zero	0x4a5
04a1 e01b       |    |		Load	0x0,0x1b
04a2 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
04a3 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
04a4 7801       |x   |		Jump	0x4a6
04a5 e404       |    |		Load	0x2,0x4
04a6 e403       |    |		Load	0x2,0x3
04a7 0120       |    |		Execute	Any,Is_Value
04a8 6803       |h   |		Jump_Zero	0x4ac
04a9 e039       | 9  |		Load	0x0,0x39
04aa 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04ab 7801       |x   |		Jump	0x4ad
04ac e403       |    |		Load	0x2,0x3
04ad 603a       |`:  |		Indirect_Literal	Discrete,0x4e8,{0x00000000, 0x00004000}
04ae e03b       | ;  |		Load	0x0,0x3b
04af 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
04b0 4800       |H   |		Short_Literal	0x0
04b1 e01b       |    |		Load	0x0,0x1b
04b2 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
04b3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
04b4 e01b       |    |		Load	0x0,0x1b
04b5 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
04b6 4800       |H   |		Short_Literal	0x0
04b7 e03c       | <  |		Load	0x0,0x3c
04b8 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
04b9 e01b       |    |		Load	0x0,0x1b
04ba 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
04bb 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
04bc e5fe       |    |		Load	0x2,-0x2
04bd e5ff       |    |		Load	0x2,-0x1
04be e402       |    |		Load	0x2,0x2
04bf 8261       | a  |		Call	0x1,0x61
04c0 e01b       |    |		Load	0x0,0x1b
04c1 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
04c2 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
04c3 c403       |    |		Store	0x2,0x3
04c4 c404       |    |		Store	0x2,0x4
04c5 c405       |    |		Store	0x2,0x5
04c6 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04c7 00d8       |    |		Load_Top	At_Offset_0
04c8 681a       |h   |		Jump_Zero	0x4e3
04c9 e03d       | =  |		Load	0x0,0x3d
04ca 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04cb 4801       |H   |		Short_Literal	0x1
04cc 4802       |H   |		Short_Literal	0x2
04cd e007       |    |		Load	0x0,0x7
04ce 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
04cf 0334       | 4  |		Declare_Variable	Array,With_Constraint
04d0 e5fe       |    |		Load	0x2,-0x2
04d1 e5ff       |    |		Load	0x2,-0x1
04d2 e402       |    |		Load	0x2,0x2
04d3 8261       | a  |		Call	0x1,0x61
04d4 e007       |    |		Load	0x0,0x7
04d5 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
04d6 4801       |H   |		Short_Literal	0x1
04d7 00da       |    |		Load_Top	At_Offset_2
04d8 01d6       |    |		Execute	Vector,Field_Write
04d9 00da       |    |		Load_Top	At_Offset_2
04da e007       |    |		Load	0x0,0x7
04db 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
04dc 4802       |H   |		Short_Literal	0x2
04dd 00da       |    |		Load_Top	At_Offset_2
04de 01d6       |    |		Execute	Vector,Field_Write
04df 6004       |`   |		Indirect_Literal	Discrete,0x4e4,{0x00000000, 0x00005006}
04e0 e03d       | =  |		Load	0x0,0x3d
04e1 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
04e2 c5fd       |    |		Store	0x2,-0x3
04e3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04e4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00005006}
04e8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
04ec 0000 0000  |    |		.BLANK	0000[0x4]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f8       |    |		.CONST	0x04f8								; Address of begin
04f1 0580       |    |		.CONST	0x0580								; Address of exception handler
04f2 0003       |    |		.CONST	0x0003								; Number of locals
04f3			INIT_04f0:
04f3 e002       |    |		Load	0x0,0x2
04f4 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
04f5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04f6 e01b       |    |		Load	0x0,0x1b
04f7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04f8			BODY_04f0:
04f8 e00a       |    |		Load	0x0,0xa
04f9 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
04fa e5fc       |    |		Load	0x2,-0x4
04fb 4800       |H   |		Short_Literal	0x0
04fc 67eb       |g   |		Indirect_Literal	Discrete,0x4e8,{0x00000000, 0x00004000}
04fd e03b       | ;  |		Load	0x0,0x3b
04fe 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
04ff e03c       | <  |		Load	0x0,0x3c
0500 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0501 e01b       |    |		Load	0x0,0x1b
0502 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0503 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0504 4800       |H   |		Short_Literal	0x0
0505 e5fe       |    |		Load	0x2,-0x2
0506 e5ff       |    |		Load	0x2,-0x1
0507 e00a       |    |		Load	0x0,0xa
0508 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0509 c5fc       |    |		Store	0x2,-0x4
050a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
050b 00d8       |    |		Load_Top	At_Offset_0
050c 6818       |h   |		Jump_Zero	0x525
050d e03d       | =  |		Load	0x0,0x3d
050e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
050f 4801       |H   |		Short_Literal	0x1
0510 4802       |H   |		Short_Literal	0x2
0511 e007       |    |		Load	0x0,0x7
0512 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0513 0334       | 4  |		Declare_Variable	Array,With_Constraint
0514 e5fe       |    |		Load	0x2,-0x2
0515 e007       |    |		Load	0x0,0x7
0516 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0517 4801       |H   |		Short_Literal	0x1
0518 00da       |    |		Load_Top	At_Offset_2
0519 01d6       |    |		Execute	Vector,Field_Write
051a 00da       |    |		Load_Top	At_Offset_2
051b e007       |    |		Load	0x0,0x7
051c 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
051d 4802       |H   |		Short_Literal	0x2
051e 00da       |    |		Load_Top	At_Offset_2
051f 01d6       |    |		Execute	Vector,Field_Write
0520 608b       |`   |		Indirect_Literal	Discrete,0x5ac,{0x00000000, 0x00005001}
0521 e03d       | =  |		Load	0x0,0x3d
0522 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0523 c5fb       |    |		Store	0x2,-0x5
0524 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0525 0092 0a27  |   '|		Action	Push_String_Extended,0xa27					; "Opened state file \x22"
0527 e5fe       |    |		Load	0x2,-0x2
0528 01cc       |    |		Execute	Vector,Catenate
0529 0092 0a28  |   (|		Action	Push_String_Extended,0xa28					; "\x22 in "
052b 01cc       |    |		Execute	Vector,Catenate
052c e5ff       |    |		Load	0x2,-0x1
052d e00a       |    |		Load	0x0,0xa
052e 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
052f 011c       |    |		Execute	Any,Convert_Unchecked
0530 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0531 01cc       |    |		Execute	Vector,Catenate
0532 0092 0a29  |   )|		Action	Push_String_Extended,0xa29					; " Mode."
0534 01cc       |    |		Execute	Vector,Catenate
0535 803a       | :  |		Call	0x0,0x3a
0536 e00a       |    |		Load	0x0,0xa
0537 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0538 e5fc       |    |		Load	0x2,-0x4
0539 e246       | F  |		Load	0x1,0x46
053a 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
053b a247       | G  |		Store_Unchecked	0x1,0x47
053c e247       | G  |		Load	0x1,0x47
053d e00a       |    |		Load	0x0,0xa
053e 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
053f e5fc       |    |		Load	0x2,-0x4
0540 e244       | D  |		Load	0x1,0x44
0541 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0542 e245       | E  |		Load	0x1,0x45
0543 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0544 e03e       | >  |		Load	0x0,0x3e
0545 e03f       | ?  |		Load	0x0,0x3f
0546 a040       | @  |		Store_Unchecked	0x0,0x40
0547 e00d       |    |		Load	0x0,0xd
0548 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0549 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
054a 00d9       |    |		Load_Top	At_Offset_1
054b 0217       |    |		Execute	Heap_Access,All_Reference
054c 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
054d e248       | H  |		Load	0x1,0x48
054e 017e       | ~  |		Execute	Record,Not_Equal
054f 6812       |h   |		Jump_Zero	0x562
0550 e03d       | =  |		Load	0x0,0x3d
0551 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0552 4801       |H   |		Short_Literal	0x1
0553 4801       |H   |		Short_Literal	0x1
0554 e007       |    |		Load	0x0,0x7
0555 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0556 0334       | 4  |		Declare_Variable	Array,With_Constraint
0557 e5fe       |    |		Load	0x2,-0x2
0558 e007       |    |		Load	0x0,0x7
0559 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
055a 4801       |H   |		Short_Literal	0x1
055b 00da       |    |		Load_Top	At_Offset_2
055c 01d6       |    |		Execute	Vector,Field_Write
055d 604a       |`J  |		Indirect_Literal	Discrete,0x5a8,{0x00000000, 0x00005013}
055e e03d       | =  |		Load	0x0,0x3d
055f 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0560 c5fb       |    |		Store	0x2,-0x5
0561 781b       |x   |		Jump	0x57d
0562 00d9       |    |		Load_Top	At_Offset_1
0563 0217       |    |		Execute	Heap_Access,All_Reference
0564 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0565 00da       |    |		Load_Top	At_Offset_2
0566 0217       |    |		Execute	Heap_Access,All_Reference
0567 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0568 e003       |    |		Load	0x0,0x3
0569 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
056a 027c       | |  |		Execute	Discrete,Less
056b 6811       |h   |		Jump_Zero	0x57d
056c e03d       | =  |		Load	0x0,0x3d
056d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
056e 4801       |H   |		Short_Literal	0x1
056f 4801       |H   |		Short_Literal	0x1
0570 e007       |    |		Load	0x0,0x7
0571 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0572 0334       | 4  |		Declare_Variable	Array,With_Constraint
0573 e5fe       |    |		Load	0x2,-0x2
0574 e007       |    |		Load	0x0,0x7
0575 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0576 4801       |H   |		Short_Literal	0x1
0577 00da       |    |		Load_Top	At_Offset_2
0578 01d6       |    |		Execute	Vector,Field_Write
0579 602a       |`*  |		Indirect_Literal	Discrete,0x5a4,{0x00000000, 0x00005014}
057a e03d       | =  |		Load	0x0,0x3d
057b 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
057c c5fb       |    |		Store	0x2,-0x5
057d 00d9       |    |		Load_Top	At_Offset_1
057e a5fd       |    |		Store_Unchecked	0x2,-0x3
057f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0580			TRAP_04f0:
0580 e03d       | =  |		Load	0x0,0x3d
0581 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0582 010f       |    |		Execute	Exception,Equal
0583 7008       |p   |		Jump_Nonzero	0x58c
0584 e03d       | =  |		Load	0x0,0x3d
0585 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0586 010f       |    |		Execute	Exception,Equal
0587 7004       |p   |		Jump_Nonzero	0x58c
0588 e03d       | =  |		Load	0x0,0x3d
0589 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
058a 010f       |    |		Execute	Exception,Equal
058b 6802       |h   |		Jump_Zero	0x58e
058c 00d8       |    |		Load_Top	At_Offset_0
058d 0101       |    |		Execute	Exception,Reraise
058e e03d       | =  |		Load	0x0,0x3d
058f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0590 4801       |H   |		Short_Literal	0x1
0591 4801       |H   |		Short_Literal	0x1
0592 e007       |    |		Load	0x0,0x7
0593 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0594 0334       | 4  |		Declare_Variable	Array,With_Constraint
0595 e5fe       |    |		Load	0x2,-0x2
0596 e007       |    |		Load	0x0,0x7
0597 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0598 4801       |H   |		Short_Literal	0x1
0599 00da       |    |		Load_Top	At_Offset_2
059a 01d6       |    |		Execute	Vector,Field_Write
059b 6004       |`   |		Indirect_Literal	Discrete,0x5a0,{0x00000000, 0x0000500d}
059c e03d       | =  |		Load	0x0,0x3d
059d 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
059e c5fb       |    |		Store	0x2,-0x5
059f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05a0 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000500d}
05a4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00005014}
05a8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00005013}
05ac 0000 0000  |    |		.LITERAL	{0x00000000, 0x00005001}
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05b6       |    |		.CONST	0x05b6								; Address of begin
05b1 0004       |    |		.CONST	0x0004								; Address of exception handler
05b2 0002       |    |		.CONST	0x0002								; Number of locals
05b3			INIT_05b0:
05b3 e002       |    |		Load	0x0,0x2
05b4 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
05b5 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
05b6			BODY_05b0:
05b6 e5fa       |    |		Load	0x2,-0x6
05b7 e002       |    |		Load	0x0,0x2
05b8 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
05b9 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
05ba e5fe       |    |		Load	0x2,-0x2
05bb 8214       |    |		Call	0x1,0x14
05bc 005a       | Z  |		Store_Top	Discrete,At_Offset_2
05bd c5fa       |    |		Store	0x2,-0x6
05be e5fa       |    |		Load	0x2,-0x6
05bf 700e       |p   |		Jump_Nonzero	0x5ce
05c0 e5fa       |    |		Load	0x2,-0x6
05c1 e5fb       |    |		Load	0x2,-0x5
05c2 e002       |    |		Load	0x0,0x2
05c3 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
05c4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05c5 e5fd       |    |		Load	0x2,-0x3
05c6 e5fe       |    |		Load	0x2,-0x2
05c7 e402       |    |		Load	0x2,0x2
05c8 8261       | a  |		Call	0x1,0x61
05c9 e5ff       |    |		Load	0x2,-0x1
05ca 820f       |    |		Call	0x1,0xf
05cb c5fc       |    |		Store	0x2,-0x4
05cc c5fb       |    |		Store	0x2,-0x5
05cd c5fa       |    |		Store	0x2,-0x6
05ce 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
05cf 0000       |    |		.XXX[0x1]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d6       |    |		.CONST	0x05d6								; Address of begin
05d1 05e9       |    |		.CONST	0x05e9								; Address of exception handler
05d2 0002       |    |		.CONST	0x0002								; Number of locals
05d3			INIT_05d0:
05d3 e002       |    |		Load	0x0,0x2
05d4 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
05d5 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
05d6			BODY_05d0:
05d6 00db       |    |		Load_Top	At_Offset_3
05d7 7003       |p   |		Jump_Nonzero	0x5db
05d8 6023       |`#  |		Indirect_Literal	Discrete,0x5fc,{0x00000000, 0x0000500e}
05d9 a5fd       |    |		Store_Unchecked	0x2,-0x3
05da 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05db e5fe       |    |		Load	0x2,-0x2
05dc 7005       |p   |		Jump_Nonzero	0x5e2
05dd 00db       |    |		Load_Top	At_Offset_3
05de 0217       |    |		Execute	Heap_Access,All_Reference
05df 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05e0 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
05e1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05e2 00db       |    |		Load_Top	At_Offset_3
05e3 0217       |    |		Execute	Heap_Access,All_Reference
05e4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05e5 e5ff       |    |		Load	0x2,-0x1
05e6 0217       |    |		Execute	Heap_Access,All_Reference
05e7 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
05e8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05e9			TRAP_05d0:
05e9 4885       |H   |		Short_Literal	0x85
05ea 010f       |    |		Execute	Exception,Equal
05eb 6803       |h   |		Jump_Zero	0x5ef
05ec 600b       |`   |		Indirect_Literal	Discrete,0x5f8,{0x00000000, 0x00005010}
05ed a5fd       |    |		Store_Unchecked	0x2,-0x3
05ee 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05ef 6004       |`   |		Indirect_Literal	Discrete,0x5f4,{0x00000000, 0x00005008}
05f0 a5fd       |    |		Store_Unchecked	0x2,-0x3
05f1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05f2 0000 0000  |    |		.XXX[0x2]
05f4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00005008}
05f8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00005010}
05fc 0000 0000  |    |		.LITERAL	{0x00000000, 0x0000500e}
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 0603       |    |		.CONST	0x0603								; Address of begin
0601 0004       |    |		.CONST	0x0004								; Address of exception handler
0602 0001       |    |		.CONST	0x0001								; Number of locals
0603			BODY_0600:
0603			INIT_0600:
0603 00da       |    |		Load_Top	At_Offset_2
0604 0217       |    |		Execute	Heap_Access,All_Reference
0605 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0606 00db       |    |		Load_Top	At_Offset_3
0607 0217       |    |		Execute	Heap_Access,All_Reference
0608 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
0609 0217       |    |		Execute	Heap_Access,All_Reference
060a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
060b e5ff       |    |		Load	0x2,-0x1
060c 0217       |    |		Execute	Heap_Access,All_Reference
060d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
060e 8261       | a  |		Call	0x1,0x61
060f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0621       | !  |		.CONST	0x0621								; Address of begin
0611 0004       |    |		.CONST	0x0004								; Address of exception handler
0612 0005       |    |		.CONST	0x0005								; Number of locals
0613			INIT_0610:
0613 e03d       | =  |		Load	0x0,0x3d
0614 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0615 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0616 e002       |    |		Load	0x0,0x2
0617 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0618 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0619 e01b       |    |		Load	0x0,0x1b
061a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
061b 02c7       |    |		Declare_Variable	Any
061c 00d8       |    |		Load_Top	At_Offset_0
061d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
061e e01b       |    |		Load	0x0,0x1b
061f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0620 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0621			BODY_0610:
0621 00db       |    |		Load_Top	At_Offset_3
0622 e002       |    |		Load	0x0,0x2
0623 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0624 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0625 e5ff       |    |		Load	0x2,-0x1
0626 8214       |    |		Call	0x1,0x14
0627 c403       |    |		Store	0x2,0x3
0628 c402       |    |		Store	0x2,0x2
0629 00db       |    |		Load_Top	At_Offset_3
062a 701e       |p   |		Jump_Nonzero	0x649
062b e01b       |    |		Load	0x0,0x1b
062c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
062d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
062e 00da       |    |		Load_Top	At_Offset_2
062f 0120       |    |		Execute	Any,Is_Value
0630 6803       |h   |		Jump_Zero	0x634
0631 e01b       |    |		Load	0x0,0x1b
0632 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0633 7801       |x   |		Jump	0x635
0634 00da       |    |		Load_Top	At_Offset_2
0635 6016       |`   |		Indirect_Literal	Discrete,0x64c,{0x00000000, 0x00004000}
0636 e03b       | ;  |		Load	0x0,0x3b
0637 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0638 e03c       | <  |		Load	0x0,0x3c
0639 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
063a e01b       |    |		Load	0x0,0x1b
063b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
063c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
063d e5fe       |    |		Load	0x2,-0x2
063e e5ff       |    |		Load	0x2,-0x1
063f e403       |    |		Load	0x2,0x3
0640 8261       | a  |		Call	0x1,0x61
0641 e01b       |    |		Load	0x0,0x1b
0642 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0643 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0644 c404       |    |		Store	0x2,0x4
0645 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0646 00d8       |    |		Load_Top	At_Offset_0
0647 0f00       |    |		Execute_Immediate	Equal,0x0
0648 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0649 4800       |H   |		Short_Literal	0x0
064a 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
064b 0000       |    |		.XXX[0x1]
064c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0660       | `  |		.CONST	0x0660								; Address of begin
0651 0004       |    |		.CONST	0x0004								; Address of exception handler
0652 0003       |    |		.CONST	0x0003								; Number of locals
0653			INIT_0650:
0653 e01b       |    |		Load	0x0,0x1b
0654 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0655 02c7       |    |		Declare_Variable	Any
0656 00db       |    |		Load_Top	At_Offset_3
0657 e01b       |    |		Load	0x0,0x1b
0658 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0659 a402       |    |		Store_Unchecked	0x2,0x2
065a 00db       |    |		Load_Top	At_Offset_3
065b e01b       |    |		Load	0x0,0x1b
065c 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
065d e01b       |    |		Load	0x0,0x1b
065e 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
065f 03f1       |    |		Declare_Variable	Discrete,With_Value
0660			BODY_0650:
0660 00d9       |    |		Load_Top	At_Offset_1
0661 e01b       |    |		Load	0x0,0x1b
0662 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0663 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0664 012f       | /  |		Execute	Any,Equal
0665 6838       |h8  |		Jump_Zero	0x69e
0666 00d8       |    |		Load_Top	At_Offset_0
0667 e041       | A  |		Load	0x0,0x41
0668 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0669 027f       |    |		Execute	Discrete,Equal
066a 6803       |h   |		Jump_Zero	0x66e
066b 4802       |H   |		Short_Literal	0x2
066c a5fe       |    |		Store_Unchecked	0x2,-0x2
066d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
066e 00d8       |    |		Load_Top	At_Offset_0
066f e041       | A  |		Load	0x0,0x41
0670 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0671 027f       |    |		Execute	Discrete,Equal
0672 6803       |h   |		Jump_Zero	0x676
0673 4801       |H   |		Short_Literal	0x1
0674 a5fe       |    |		Store_Unchecked	0x2,-0x2
0675 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0676 00d8       |    |		Load_Top	At_Offset_0
0677 e041       | A  |		Load	0x0,0x41
0678 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0679 027f       |    |		Execute	Discrete,Equal
067a 6803       |h   |		Jump_Zero	0x67e
067b 4803       |H   |		Short_Literal	0x3
067c a5fe       |    |		Store_Unchecked	0x2,-0x2
067d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
067e 4800       |H   |		Short_Literal	0x0
067f a5fe       |    |		Store_Unchecked	0x2,-0x2
0680 e03d       | =  |		Load	0x0,0x3d
0681 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0682 4801       |H   |		Short_Literal	0x1
0683 4803       |H   |		Short_Literal	0x3
0684 e007       |    |		Load	0x0,0x7
0685 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0686 0334       | 4  |		Declare_Variable	Array,With_Constraint
0687 e5ff       |    |		Load	0x2,-0x1
0688 e007       |    |		Load	0x0,0x7
0689 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
068a 4801       |H   |		Short_Literal	0x1
068b 00da       |    |		Load_Top	At_Offset_2
068c 01d6       |    |		Execute	Vector,Field_Write
068d 00db       |    |		Load_Top	At_Offset_3
068e e007       |    |		Load	0x0,0x7
068f 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0690 4802       |H   |		Short_Literal	0x2
0691 00da       |    |		Load_Top	At_Offset_2
0692 01d6       |    |		Execute	Vector,Field_Write
0693 00da       |    |		Load_Top	At_Offset_2
0694 e007       |    |		Load	0x0,0x7
0695 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0696 4803       |H   |		Short_Literal	0x3
0697 00da       |    |		Load_Top	At_Offset_2
0698 01d6       |    |		Execute	Vector,Field_Write
0699 602a       |`*  |		Indirect_Literal	Discrete,0x6c4,{0x00000000, 0x00002805}
069a e03d       | =  |		Load	0x0,0x3d
069b 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
069c c5fd       |    |		Store	0x2,-0x3
069d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
069e 4800       |H   |		Short_Literal	0x0
069f a5fe       |    |		Store_Unchecked	0x2,-0x2
06a0 e03d       | =  |		Load	0x0,0x3d
06a1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
06a2 4801       |H   |		Short_Literal	0x1
06a3 4803       |H   |		Short_Literal	0x3
06a4 e007       |    |		Load	0x0,0x7
06a5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
06a6 0334       | 4  |		Declare_Variable	Array,With_Constraint
06a7 e5ff       |    |		Load	0x2,-0x1
06a8 e007       |    |		Load	0x0,0x7
06a9 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
06aa 4801       |H   |		Short_Literal	0x1
06ab 00da       |    |		Load_Top	At_Offset_2
06ac 01d6       |    |		Execute	Vector,Field_Write
06ad 00db       |    |		Load_Top	At_Offset_3
06ae e007       |    |		Load	0x0,0x7
06af 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
06b0 4802       |H   |		Short_Literal	0x2
06b1 00da       |    |		Load_Top	At_Offset_2
06b2 01d6       |    |		Execute	Vector,Field_Write
06b3 00da       |    |		Load_Top	At_Offset_2
06b4 e007       |    |		Load	0x0,0x7
06b5 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
06b6 4803       |H   |		Short_Literal	0x3
06b7 00da       |    |		Load_Top	At_Offset_2
06b8 01d6       |    |		Execute	Vector,Field_Write
06b9 6006       |`   |		Indirect_Literal	Discrete,0x6c0,{0x00000000, 0x00002804}
06ba e03d       | =  |		Load	0x0,0x3d
06bb 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
06bc c5fd       |    |		Store	0x2,-0x3
06bd 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06be 0000 0000  |    |		.XXX[0x2]
06c0 0000 0000  |    |		.LITERAL	{0x00000000, 0x00002804}
06c4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00002805}
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06cb       |    |		.CONST	0x06cb								; Address of begin
06c9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ca 0001       |    |		.CONST	0x0001								; Number of locals
06cb			BODY_06c8:
06cb			INIT_06c8:
06cb 00da       |    |		Load_Top	At_Offset_2
06cc 0217       |    |		Execute	Heap_Access,All_Reference
06cd 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
06ce e253       | S  |		Load	0x1,0x53
06cf e252       | R  |		Load	0x1,0x52
06d0 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
06d1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06d2 0000 0000  |    |		.BLANK	0000[0x6]
06d8 ; --------------------------------------------------------------------------------------
06d8 ; SUBPROGRAM
06d8 ; --------------------------------------------------------------------------------------
06d8 06db       |    |		.CONST	0x06db								; Address of begin
06d9 0004       |    |		.CONST	0x0004								; Address of exception handler
06da 0001       |    |		.CONST	0x0001								; Number of locals
06db			BODY_06d8:
06db			INIT_06d8:
06db 00da       |    |		Load_Top	At_Offset_2
06dc e252       | R  |		Load	0x1,0x52
06dd 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
06de 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
06df 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
06e0 ; --------------------------------------------------------------------------------------
06e0 ; SUBPROGRAM
06e0 ; --------------------------------------------------------------------------------------
06e0 06e3       |    |		.CONST	0x06e3								; Address of begin
06e1 0004       |    |		.CONST	0x0004								; Address of exception handler
06e2 0001       |    |		.CONST	0x0001								; Number of locals
06e3			BODY_06e0:
06e3			INIT_06e0:
06e3 00da       |    |		Load_Top	At_Offset_2
06e4 0217       |    |		Execute	Heap_Access,All_Reference
06e5 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
06e6 e24d       | M  |		Load	0x1,0x4d
06e7 e24c       | L  |		Load	0x1,0x4c
06e8 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
06e9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06ea 0000 0000  |    |		.BLANK	0000[0x6]
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 06f3       |    |		.CONST	0x06f3								; Address of begin
06f1 0004       |    |		.CONST	0x0004								; Address of exception handler
06f2 0001       |    |		.CONST	0x0001								; Number of locals
06f3			BODY_06f0:
06f3			INIT_06f0:
06f3 00da       |    |		Load_Top	At_Offset_2
06f4 e24c       | L  |		Load	0x1,0x4c
06f5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
06f6 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
06f7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 06fb       |    |		.CONST	0x06fb								; Address of begin
06f9 0004       |    |		.CONST	0x0004								; Address of exception handler
06fa 0001       |    |		.CONST	0x0001								; Number of locals
06fb			BODY_06f8:
06fb			INIT_06f8:
06fb 00da       |    |		Load_Top	At_Offset_2
06fc e002       |    |		Load	0x0,0x2
06fd 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
06fe 185f       | _  |		Execute	Package,Field_Execute,Field_Number 0x5f
06ff 0217       |    |		Execute	Heap_Access,All_Reference
0700 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
0701 e255       | U  |		Load	0x1,0x55
0702 e254       | T  |		Load	0x1,0x54
0703 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0704 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0705 0000 0000  |    |		.XXX[0x3]
0707 0000       |    |
0708 ; --------------------------------------------------------------------------------------
0708 ; SUBPROGRAM
0708 ; --------------------------------------------------------------------------------------
0708 070b       |    |		.CONST	0x070b								; Address of begin
0709 0004       |    |		.CONST	0x0004								; Address of exception handler
070a 0001       |    |		.CONST	0x0001								; Number of locals
070b			BODY_0708:
070b			INIT_0708:
070b 00da       |    |		Load_Top	At_Offset_2
070c e254       | T  |		Load	0x1,0x54
070d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
070e 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
070f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 0713       |    |		.CONST	0x0713								; Address of begin
0711 0004       |    |		.CONST	0x0004								; Address of exception handler
0712 0001       |    |		.CONST	0x0001								; Number of locals
0713			BODY_0710:
0713			INIT_0710:
0713 00da       |    |		Load_Top	At_Offset_2
0714 0217       |    |		Execute	Heap_Access,All_Reference
0715 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
0716 e25f       | _  |		Load	0x1,0x5f
0717 e25e       | ^  |		Load	0x1,0x5e
0718 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0719 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
071a 0000 0000  |    |		.BLANK	0000[0x6]
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0723       | #  |		.CONST	0x0723								; Address of begin
0721 0004       |    |		.CONST	0x0004								; Address of exception handler
0722 0001       |    |		.CONST	0x0001								; Number of locals
0723			BODY_0720:
0723			INIT_0720:
0723 00da       |    |		Load_Top	At_Offset_2
0724 e25e       | ^  |		Load	0x1,0x5e
0725 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0726 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0727 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0728 ; --------------------------------------------------------------------------------------
0728 ; SUBPROGRAM
0728 ; --------------------------------------------------------------------------------------
0728 072b       | +  |		.CONST	0x072b								; Address of begin
0729 0004       |    |		.CONST	0x0004								; Address of exception handler
072a 0001       |    |		.CONST	0x0001								; Number of locals
072b			BODY_0728:
072b			INIT_0728:
072b 00da       |    |		Load_Top	At_Offset_2
072c 0217       |    |		Execute	Heap_Access,All_Reference
072d 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
072e e24f       | O  |		Load	0x1,0x4f
072f e24e       | N  |		Load	0x1,0x4e
0730 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0731 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0732 0000 0000  |    |		.BLANK	0000[0x6]
0738 ; --------------------------------------------------------------------------------------
0738 ; SUBPROGRAM
0738 ; --------------------------------------------------------------------------------------
0738 073b       | ;  |		.CONST	0x073b								; Address of begin
0739 0004       |    |		.CONST	0x0004								; Address of exception handler
073a 0001       |    |		.CONST	0x0001								; Number of locals
073b			BODY_0738:
073b			INIT_0738:
073b 00da       |    |		Load_Top	At_Offset_2
073c e24e       | N  |		Load	0x1,0x4e
073d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
073e 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
073f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0743       | C  |		.CONST	0x0743								; Address of begin
0741 0004       |    |		.CONST	0x0004								; Address of exception handler
0742 0001       |    |		.CONST	0x0001								; Number of locals
0743			BODY_0740:
0743			INIT_0740:
0743 00da       |    |		Load_Top	At_Offset_2
0744 e002       |    |		Load	0x0,0x2
0745 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0746 1861       | a  |		Execute	Package,Field_Execute,Field_Number 0x61
0747 0217       |    |		Execute	Heap_Access,All_Reference
0748 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
0749 e25b       | [  |		Load	0x1,0x5b
074a e25a       | Z  |		Load	0x1,0x5a
074b 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
074c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
074d 0000 0000  |    |		.XXX[0x3]
074f 0000       |    |
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 0753       | S  |		.CONST	0x0753								; Address of begin
0751 0004       |    |		.CONST	0x0004								; Address of exception handler
0752 0001       |    |		.CONST	0x0001								; Number of locals
0753			BODY_0750:
0753			INIT_0750:
0753 00da       |    |		Load_Top	At_Offset_2
0754 e25a       | Z  |		Load	0x1,0x5a
0755 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0756 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0757 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0758 ; --------------------------------------------------------------------------------------
0758 ; SUBPROGRAM
0758 ; --------------------------------------------------------------------------------------
0758 075b       | [  |		.CONST	0x075b								; Address of begin
0759 0004       |    |		.CONST	0x0004								; Address of exception handler
075a 0001       |    |		.CONST	0x0001								; Number of locals
075b			BODY_0758:
075b			INIT_0758:
075b 00da       |    |		Load_Top	At_Offset_2
075c 0217       |    |		Execute	Heap_Access,All_Reference
075d 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
075e e25d       | ]  |		Load	0x1,0x5d
075f e25c       | \  |		Load	0x1,0x5c
0760 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0761 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0762 0000 0000  |    |		.BLANK	0000[0x6]
0768 ; --------------------------------------------------------------------------------------
0768 ; SUBPROGRAM
0768 ; --------------------------------------------------------------------------------------
0768 076b       | k  |		.CONST	0x076b								; Address of begin
0769 0004       |    |		.CONST	0x0004								; Address of exception handler
076a 0001       |    |		.CONST	0x0001								; Number of locals
076b			BODY_0768:
076b			INIT_0768:
076b 00da       |    |		Load_Top	At_Offset_2
076c e25c       | \  |		Load	0x1,0x5c
076d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
076e 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
076f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0770 ; --------------------------------------------------------------------------------------
0770 ; SUBPROGRAM
0770 ; --------------------------------------------------------------------------------------
0770 0773       | s  |		.CONST	0x0773								; Address of begin
0771 0004       |    |		.CONST	0x0004								; Address of exception handler
0772 0001       |    |		.CONST	0x0001								; Number of locals
0773			BODY_0770:
0773			INIT_0770:
0773 00da       |    |		Load_Top	At_Offset_2
0774 0217       |    |		Execute	Heap_Access,All_Reference
0775 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
0776 e251       | Q  |		Load	0x1,0x51
0777 e250       | P  |		Load	0x1,0x50
0778 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0779 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
077a 0000 0000  |    |		.BLANK	0000[0x6]
0780 ; --------------------------------------------------------------------------------------
0780 ; SUBPROGRAM
0780 ; --------------------------------------------------------------------------------------
0780 0783       |    |		.CONST	0x0783								; Address of begin
0781 0004       |    |		.CONST	0x0004								; Address of exception handler
0782 0001       |    |		.CONST	0x0001								; Number of locals
0783			BODY_0780:
0783			INIT_0780:
0783 00da       |    |		Load_Top	At_Offset_2
0784 e250       | P  |		Load	0x1,0x50
0785 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0786 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
0787 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 078b       |    |		.CONST	0x078b								; Address of begin
0789 0004       |    |		.CONST	0x0004								; Address of exception handler
078a 0001       |    |		.CONST	0x0001								; Number of locals
078b			BODY_0788:
078b			INIT_0788:
078b 00da       |    |		Load_Top	At_Offset_2
078c 0217       |    |		Execute	Heap_Access,All_Reference
078d 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
078e e257       | W  |		Load	0x1,0x57
078f e256       | V  |		Load	0x1,0x56
0790 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0791 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0792 0000 0000  |    |		.BLANK	0000[0x6]
0798 ; --------------------------------------------------------------------------------------
0798 ; SUBPROGRAM
0798 ; --------------------------------------------------------------------------------------
0798 079b       |    |		.CONST	0x079b								; Address of begin
0799 0004       |    |		.CONST	0x0004								; Address of exception handler
079a 0001       |    |		.CONST	0x0001								; Number of locals
079b			BODY_0798:
079b			INIT_0798:
079b 00da       |    |		Load_Top	At_Offset_2
079c e256       | V  |		Load	0x1,0x56
079d 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
079e 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
079f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a3       |    |		.CONST	0x07a3								; Address of begin
07a1 0004       |    |		.CONST	0x0004								; Address of exception handler
07a2 0001       |    |		.CONST	0x0001								; Number of locals
07a3			BODY_07a0:
07a3			INIT_07a0:
07a3 00da       |    |		Load_Top	At_Offset_2
07a4 0217       |    |		Execute	Heap_Access,All_Reference
07a5 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
07a6 e259       | Y  |		Load	0x1,0x59
07a7 e258       | X  |		Load	0x1,0x58
07a8 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
07a9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07aa 0000 0000  |    |		.BLANK	0000[0x6]
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07b3       |    |		.CONST	0x07b3								; Address of begin
07b1 0004       |    |		.CONST	0x0004								; Address of exception handler
07b2 0001       |    |		.CONST	0x0001								; Number of locals
07b3			BODY_07b0:
07b3			INIT_07b0:
07b3 00da       |    |		Load_Top	At_Offset_2
07b4 e258       | X  |		Load	0x1,0x58
07b5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
07b6 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
07b7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07b8 ; --------------------------------------------------------------------------------------
07b8 ; SUBPROGRAM
07b8 ; --------------------------------------------------------------------------------------
07b8 07bb       |    |		.CONST	0x07bb								; Address of begin
07b9 0004       |    |		.CONST	0x0004								; Address of exception handler
07ba 0001       |    |		.CONST	0x0001								; Number of locals
07bb			BODY_07b8:
07bb			INIT_07b8:
07bb 00db       |    |		Load_Top	At_Offset_3
07bc 0217       |    |		Execute	Heap_Access,All_Reference
07bd 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
07be 00db       |    |		Load_Top	At_Offset_3
07bf e23c       | <  |		Load	0x1,0x3c
07c0 1c08       |    |		Execute_Immediate	Run_Utility,0x8
07c1 4800       |H   |		Short_Literal	0x0
07c2 00d9       |    |		Load_Top	At_Offset_1
07c3 2802       |(   |		Execute	Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
07c4 4801       |H   |		Short_Literal	0x1
07c5 e5ff       |    |		Load	0x2,-0x1
07c6 e242       | B  |		Load	0x1,0x42
07c7 0334       | 4  |		Declare_Variable	Array,With_Constraint
07c8 00d8       |    |		Load_Top	At_Offset_0
07c9 01dc       |    |		Execute	Vector,Last
07ca 4801       |H   |		Short_Literal	0x1
07cb 0263       | c  |		Execute	Discrete,Above_Bound
07cc 7009       |p   |		Jump_Nonzero	0x7d6
07cd e01d       |    |		Load	0x0,0x1d
07ce 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
07cf e005       |    |		Load	0x0,0x5
07d0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
07d1 0119       |    |		Execute	Any,Check_In_Formal_Type
07d2 00d9       |    |		Load_Top	At_Offset_1
07d3 e404       |    |		Load	0x2,0x4
07d4 01d6       |    |		Execute	Vector,Field_Write
07d5 3ff7       |?   |		Loop_Increasing	0x7cd
07d6 00d9       |    |		Load_Top	At_Offset_1
07d7 00d8       |    |		Load_Top	At_Offset_0
07d8 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
07d9 00da       |    |		Load_Top	At_Offset_2
07da 01da       |    |		Execute	Vector,Bounds
07db 00da       |    |		Load_Top	At_Offset_2
07dc 01da       |    |		Execute	Vector,Bounds
07dd 00da       |    |		Load_Top	At_Offset_2
07de 027f       |    |		Execute	Discrete,Equal
07df 7001       |p   |		Jump_Nonzero	0x7e1
07e0 08e0       |    |		Execute_Immediate	Raise,0xe0
07e1 00cd       |    |		Action	Spare6_Action
07e2 027f       |    |		Execute	Discrete,Equal
07e3 7001       |p   |		Jump_Nonzero	0x7e5
07e4 08e0       |    |		Execute_Immediate	Raise,0xe0
07e5 00d2       |    |		Pop_Control	Pop_Count_2
07e6 00d9       |    |		Load_Top	At_Offset_1
07e7 2903       |)   |		Execute	Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3
07e8 e260       | `  |		Load	0x1,0x60
07e9 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
07ea 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
07eb 0000 0000  |    |		.BLANK	0000[0x5]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07f3       |    |		.CONST	0x07f3								; Address of begin
07f1 0004       |    |		.CONST	0x0004								; Address of exception handler
07f2 0001       |    |		.CONST	0x0001								; Number of locals
07f3			BODY_07f0:
07f3			INIT_07f0:
07f3 00da       |    |		Load_Top	At_Offset_2
07f4 e260       | `  |		Load	0x1,0x60
07f5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
07f6 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
07f7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
07f8 ; --------------------------------------------------------------------------------------
07f8 ; SUBPROGRAM
07f8 ; --------------------------------------------------------------------------------------
07f8 07fb       |    |		.CONST	0x07fb								; Address of begin
07f9 0004       |    |		.CONST	0x0004								; Address of exception handler
07fa 0001       |    |		.CONST	0x0001								; Number of locals
07fb			BODY_07f8:
07fb			INIT_07f8:
07fb 00da       |    |		Load_Top	At_Offset_2
07fc e038       | 8  |		Load	0x0,0x38
07fd 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
07fe 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07ff 0000       |    |		.XXX[0x1]
0800 ; --------------------------------------------------------------------------------------
0800 ; SUBPROGRAM
0800 ; --------------------------------------------------------------------------------------
0800 0803       |    |		.CONST	0x0803								; Address of begin
0801 0004       |    |		.CONST	0x0004								; Address of exception handler
0802 0001       |    |		.CONST	0x0001								; Number of locals
0803			BODY_0800:
0803			INIT_0800:
0803 e247       | G  |		Load	0x1,0x47
0804 00db       |    |		Load_Top	At_Offset_3
0805 e03e       | >  |		Load	0x0,0x3e
0806 e03f       | ?  |		Load	0x0,0x3f
0807 a040       | @  |		Store_Unchecked	0x0,0x40
0808 e00d       |    |		Load	0x0,0xd
0809 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
080a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
080b 0000 0000  |    |		.BLANK	0000[0x5]
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 0813       |    |		.CONST	0x0813								; Address of begin
0811 0004       |    |		.CONST	0x0004								; Address of exception handler
0812 0001       |    |		.CONST	0x0001								; Number of locals
0813			BODY_0810:
0813			INIT_0810:
0813 00d1       |    |		Pop_Control	Pop_Count_1
0814 00da       |    |		Load_Top	At_Offset_2
0815 01dc       |    |		Execute	Vector,Last
0816 00db       |    |		Load_Top	At_Offset_3
0817 01dd       |    |		Execute	Vector,First
0818 0263       | c  |		Execute	Discrete,Above_Bound
0819 700a       |p   |		Jump_Nonzero	0x824
081a 00d8       |    |		Load_Top	At_Offset_0
081b e5ff       |    |		Load	0x2,-0x1
081c 01d5       |    |		Execute	Vector,Field_Reference
081d 0125       | %  |		Execute	Any,Set_Constraint
081e 00d8       |    |		Load_Top	At_Offset_0
081f e5ff       |    |		Load	0x2,-0x1
0820 01d5       |    |		Execute	Vector,Field_Reference
0821 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0822 0a01       |    |		Execute_Immediate	Plus,0x1
0823 7ff4       |    |		Jump	0x818
0824 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0825 0000 0000  |    |		.XXX[0x3]
0827 0000       |    |
0828 ; --------------------------------------------------------------------------------------
0828 ; SUBPROGRAM
0828 ; --------------------------------------------------------------------------------------
0828 082b       | +  |		.CONST	0x082b								; Address of begin
0829 0004       |    |		.CONST	0x0004								; Address of exception handler
082a 0001       |    |		.CONST	0x0001								; Number of locals
082b			BODY_0828:
082b			INIT_0828:
082b 00da       |    |		Load_Top	At_Offset_2
082c 0f02       |    |		Execute_Immediate	Equal,0x2
082d 680f       |h   |		Jump_Zero	0x83d
082e 00db       |    |		Load_Top	At_Offset_3
082f e01b       |    |		Load	0x0,0x1b
0830 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0831 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0832 0092 0a26  |   &|		Action	Push_String_Extended,0xa26					; "."
0834 01cc       |    |		Execute	Vector,Catenate
0835 e5fd       |    |		Load	0x2,-0x3
0836 e003       |    |		Load	0x0,0x3
0837 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0838 01cc       |    |		Execute	Vector,Catenate
0839 0092 0a2a  |   *|		Action	Push_String_Extended,0xa2a					; "_State_File"
083b 01cc       |    |		Execute	Vector,Catenate
083c 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
083d 00db       |    |		Load_Top	At_Offset_3
083e e01b       |    |		Load	0x0,0x1b
083f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0840 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0841 0092 0a2b  |   +|		Action	Push_String_Extended,0xa2b					; ".State.Tool_State."
0843 01cc       |    |		Execute	Vector,Catenate
0844 e5fd       |    |		Load	0x2,-0x3
0845 e003       |    |		Load	0x0,0x3
0846 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0847 01cc       |    |		Execute	Vector,Catenate
0848 0092 0a2a  |   *|		Action	Push_String_Extended,0xa2a					; "_State_File"
084a 01cc       |    |		Execute	Vector,Catenate
084b 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
084c 0000 0000  |    |		.BLANK	0000[0x4]
0850 ; --------------------------------------------------------------------------------------
0850 ; SUBPROGRAM
0850 ; --------------------------------------------------------------------------------------
0850 086b       | k  |		.CONST	0x086b								; Address of begin
0851 0004       |    |		.CONST	0x0004								; Address of exception handler
0852 0006       |    |		.CONST	0x0006								; Number of locals
0853			INIT_0850:
0853 e039       | 9  |		Load	0x0,0x39
0854 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0855 02c7       |    |		Declare_Variable	Any
0856 00d8       |    |		Load_Top	At_Offset_0
0857 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0858 e01b       |    |		Load	0x0,0x1b
0859 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
085a 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
085b 02c7       |    |		Declare_Variable	Any
085c 00d8       |    |		Load_Top	At_Offset_0
085d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
085e e01b       |    |		Load	0x0,0x1b
085f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0860 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0861 02c7       |    |		Declare_Variable	Any
0862 00d8       |    |		Load_Top	At_Offset_0
0863 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0864 e01b       |    |		Load	0x0,0x1b
0865 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0866 e01b       |    |		Load	0x0,0x1b
0867 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0868 02ff       |    |		Declare_Variable	Variant_Record
0869 00d8       |    |		Load_Top	At_Offset_0
086a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
086b			BODY_0850:
086b e00a       |    |		Load	0x0,0xa
086c 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
086d e5fd       |    |		Load	0x2,-0x3
086e 4800       |H   |		Short_Literal	0x0
086f 60d0       |`   |		Indirect_Literal	Discrete,0x940,{0x00000000, 0x00004000}
0870 e03b       | ;  |		Load	0x0,0x3b
0871 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0872 e03c       | <  |		Load	0x0,0x3c
0873 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0874 e01b       |    |		Load	0x0,0x1b
0875 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0876 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0877 4800       |H   |		Short_Literal	0x0
0878 e5fe       |    |		Load	0x2,-0x2
0879 e5ff       |    |		Load	0x2,-0x1
087a e00a       |    |		Load	0x0,0xa
087b 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
087c c5fd       |    |		Store	0x2,-0x3
087d 005a       | Z  |		Store_Top	Discrete,At_Offset_2
087e 00d9       |    |		Load_Top	At_Offset_1
087f 460e       |F   |		Jump_Case	0xf
0880 789d       |x   |		Jump	0x91e								; case 0x0
0881 780d       |x   |		Jump	0x88f								; case 0x1
0882 780c       |x   |		Jump	0x88f								; case 0x2
0883 780b       |x   |		Jump	0x88f								; case 0x3
0884 780a       |x   |		Jump	0x88f								; case 0x4
0885 7809       |x   |		Jump	0x88f								; case 0x5
0886 7808       |x   |		Jump	0x88f								; case 0x6
0887 7807       |x   |		Jump	0x88f								; case 0x7
0888 7806       |x   |		Jump	0x88f								; case 0x8
0889 781d       |x   |		Jump	0x8a7								; case 0x9
088a 7804       |x   |		Jump	0x88f								; case 0xa
088b 7803       |x   |		Jump	0x88f								; case 0xb
088c 7802       |x   |		Jump	0x88f								; case 0xc
088d 7801       |x   |		Jump	0x88f								; case 0xd
088e 7800       |x   |		Jump	0x88f								; case 0xe
088f e03d       | =  |		Load	0x0,0x3d
0890 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0891 4801       |H   |		Short_Literal	0x1
0892 4802       |H   |		Short_Literal	0x2
0893 e007       |    |		Load	0x0,0x7
0894 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0895 0334       | 4  |		Declare_Variable	Array,With_Constraint
0896 e5fe       |    |		Load	0x2,-0x2
0897 e007       |    |		Load	0x0,0x7
0898 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0899 4801       |H   |		Short_Literal	0x1
089a 00da       |    |		Load_Top	At_Offset_2
089b 01d6       |    |		Execute	Vector,Field_Write
089c 00db       |    |		Load_Top	At_Offset_3
089d e007       |    |		Load	0x0,0x7
089e 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
089f 4802       |H   |		Short_Literal	0x2
08a0 00da       |    |		Load_Top	At_Offset_2
08a1 01d6       |    |		Execute	Vector,Field_Write
08a2 6099       |`   |		Indirect_Literal	Discrete,0x93c,{0x00000000, 0x00005001}
08a3 e03d       | =  |		Load	0x0,0x3d
08a4 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
08a5 c5fc       |    |		Store	0x2,-0x4
08a6 7877       |xw  |		Jump	0x91e
08a7 e01b       |    |		Load	0x0,0x1b
08a8 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08a9 00db       |    |		Load_Top	At_Offset_3
08aa 0120       |    |		Execute	Any,Is_Value
08ab 6802       |h   |		Jump_Zero	0x8ae
08ac 00f1       |    |		Load_Encached	Diana_Temp_Seq
08ad 7801       |x   |		Jump	0x8af
08ae 00db       |    |		Load_Top	At_Offset_3
08af e403       |    |		Load	0x2,0x3
08b0 0120       |    |		Execute	Any,Is_Value
08b1 6804       |h   |		Jump_Zero	0x8b6
08b2 e01b       |    |		Load	0x0,0x1b
08b3 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
08b4 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
08b5 7801       |x   |		Jump	0x8b7
08b6 e403       |    |		Load	0x2,0x3
08b7 e402       |    |		Load	0x2,0x2
08b8 0120       |    |		Execute	Any,Is_Value
08b9 6803       |h   |		Jump_Zero	0x8bd
08ba e039       | 9  |		Load	0x0,0x39
08bb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08bc 7801       |x   |		Jump	0x8be
08bd e402       |    |		Load	0x2,0x2
08be e406       |    |		Load	0x2,0x6
08bf 6080       |`   |		Indirect_Literal	Discrete,0x940,{0x00000000, 0x00004000}
08c0 e03b       | ;  |		Load	0x0,0x3b
08c1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
08c2 4800       |H   |		Short_Literal	0x0
08c3 e01b       |    |		Load	0x0,0x1b
08c4 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
08c5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
08c6 e01b       |    |		Load	0x0,0x1b
08c7 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
08c8 606f       |`o  |		Indirect_Literal	Discrete,0x938,{0x00000000, 0x7fffffff}
08c9 4ffc       |O   |		Short_Literal	-0x4
08ca 4ffd       |O   |		Short_Literal	-0x3
08cb e03c       | <  |		Load	0x0,0x3c
08cc 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
08cd e01b       |    |		Load	0x0,0x1b
08ce 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
08cf 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
08d0 e01b       |    |		Load	0x0,0x1b
08d1 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
08d2 e00a       |    |		Load	0x0,0xa
08d3 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
08d4 e5fe       |    |		Load	0x2,-0x2
08d5 e01b       |    |		Load	0x0,0x1b
08d6 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
08d7 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
08d8 00d1       |    |		Pop_Control	Pop_Count_1
08d9 c402       |    |		Store	0x2,0x2
08da c403       |    |		Store	0x2,0x3
08db c404       |    |		Store	0x2,0x4
08dc 005a       | Z  |		Store_Top	Discrete,At_Offset_2
08dd 00d9       |    |		Load_Top	At_Offset_1
08de 6818       |h   |		Jump_Zero	0x8f7
08df e03d       | =  |		Load	0x0,0x3d
08e0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08e1 4801       |H   |		Short_Literal	0x1
08e2 4802       |H   |		Short_Literal	0x2
08e3 e007       |    |		Load	0x0,0x7
08e4 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
08e5 0334       | 4  |		Declare_Variable	Array,With_Constraint
08e6 e5fe       |    |		Load	0x2,-0x2
08e7 e007       |    |		Load	0x0,0x7
08e8 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
08e9 4801       |H   |		Short_Literal	0x1
08ea 00da       |    |		Load_Top	At_Offset_2
08eb 01d6       |    |		Execute	Vector,Field_Write
08ec 00db       |    |		Load_Top	At_Offset_3
08ed e007       |    |		Load	0x0,0x7
08ee 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
08ef 4802       |H   |		Short_Literal	0x2
08f0 00da       |    |		Load_Top	At_Offset_2
08f1 01d6       |    |		Execute	Vector,Field_Write
08f2 6041       |`A  |		Indirect_Literal	Discrete,0x934,{0x00000000, 0x00005002}
08f3 e03d       | =  |		Load	0x0,0x3d
08f4 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
08f5 c5fc       |    |		Store	0x2,-0x4
08f6 7827       |x'  |		Jump	0x91e
08f7 e00a       |    |		Load	0x0,0xa
08f8 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
08f9 00d9       |    |		Load_Top	At_Offset_1
08fa e5fd       |    |		Load	0x2,-0x3
08fb 4801       |H   |		Short_Literal	0x1
08fc 6043       |`C  |		Indirect_Literal	Discrete,0x940,{0x00000000, 0x00004000}
08fd e03b       | ;  |		Load	0x0,0x3b
08fe 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
08ff e5ff       |    |		Load	0x2,-0x1
0900 e00a       |    |		Load	0x0,0xa
0901 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0902 c5fd       |    |		Store	0x2,-0x3
0903 00d1       |    |		Pop_Control	Pop_Count_1
0904 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0905 00d9       |    |		Load_Top	At_Offset_1
0906 6817       |h   |		Jump_Zero	0x91e
0907 e03d       | =  |		Load	0x0,0x3d
0908 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0909 4801       |H   |		Short_Literal	0x1
090a 4802       |H   |		Short_Literal	0x2
090b e007       |    |		Load	0x0,0x7
090c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
090d 0334       | 4  |		Declare_Variable	Array,With_Constraint
090e 00da       |    |		Load_Top	At_Offset_2
090f e007       |    |		Load	0x0,0x7
0910 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0911 4801       |H   |		Short_Literal	0x1
0912 00da       |    |		Load_Top	At_Offset_2
0913 01d6       |    |		Execute	Vector,Field_Write
0914 00db       |    |		Load_Top	At_Offset_3
0915 e007       |    |		Load	0x0,0x7
0916 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0917 4802       |H   |		Short_Literal	0x2
0918 00da       |    |		Load_Top	At_Offset_2
0919 01d6       |    |		Execute	Vector,Field_Write
091a 6015       |`   |		Indirect_Literal	Discrete,0x930,{0x00000000, 0x00005004}
091b e03d       | =  |		Load	0x0,0x3d
091c 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
091d c5fc       |    |		Store	0x2,-0x4
091e 0092 0a2c  |   ,|		Action	Push_String_Extended,0xa2c					; "Created state file \x22"
0920 e5fe       |    |		Load	0x2,-0x2
0921 01cc       |    |		Execute	Vector,Catenate
0922 0092 0a2d  |   -|		Action	Push_String_Extended,0xa2d					; "\x22 (Mode = "
0924 01cc       |    |		Execute	Vector,Catenate
0925 e5ff       |    |		Load	0x2,-0x1
0926 e00a       |    |		Load	0x0,0xa
0927 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0928 011c       |    |		Execute	Any,Convert_Unchecked
0929 1c01       |    |		Execute_Immediate	Run_Utility,0x1
092a 01cc       |    |		Execute	Vector,Catenate
092b 0092 0a2e  |   .|		Action	Push_String_Extended,0xa2e					; ")."
092d 01cc       |    |		Execute	Vector,Catenate
092e 803a       | :  |		Call	0x0,0x3a
092f 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0930 0000 0000  |    |		.LITERAL	{0x00000000, 0x00005004}
0934 0000 0000  |    |		.LITERAL	{0x00000000, 0x00005002}
0938 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
093c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00005001}
0940 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0944 0000 0000  |    |		.BLANK	0000[0x4]
0948 ; --------------------------------------------------------------------------------------
0948 ; SUBPROGRAM
0948 ; --------------------------------------------------------------------------------------
0948 094b       | K  |		.CONST	0x094b								; Address of begin
0949 0004       |    |		.CONST	0x0004								; Address of exception handler
094a 0001       |    |		.CONST	0x0001								; Number of locals
094b			BODY_0948:
094b			INIT_0948:
094b 4608       |F   |		Jump_Case	0x9
094c 7808       |x   |		Jump	0x955								; case 0x0
094d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
094e 7813       |x   |		Jump	0x962								; case 0x2
094f 7812       |x   |		Jump	0x962								; case 0x3
0950 7811       |x   |		Jump	0x962								; case 0x4
0951 7810       |x   |		Jump	0x962								; case 0x5
0952 780f       |x   |		Jump	0x962								; case 0x6
0953 780e       |x   |		Jump	0x962								; case 0x7
0954 780d       |x   |		Jump	0x962								; case 0x8
0955 00da       |    |		Load_Top	At_Offset_2
0956 340a       |4   |		Execute	Record,Field_Reference,Field_Number 0xa
0957 0125       | %  |		Execute	Any,Set_Constraint
0958 00da       |    |		Load_Top	At_Offset_2
0959 340a       |4   |		Execute	Record,Field_Reference,Field_Number 0xa
095a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
095b 00da       |    |		Load_Top	At_Offset_2
095c 340b       |4   |		Execute	Record,Field_Reference,Field_Number 0xb
095d 0125       | %  |		Execute	Any,Set_Constraint
095e 00da       |    |		Load_Top	At_Offset_2
095f 340b       |4   |		Execute	Record,Field_Reference,Field_Number 0xb
0960 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0961 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0962 0869       | i  |		Execute_Immediate	Raise,0x69
0963 0000 0000  |    |		.BLANK	0000[0x5]
0968 ; --------------------------------------------------------------------------------------
0968 ; SUBPROGRAM
0968 ; --------------------------------------------------------------------------------------
0968 096b       | k  |		.CONST	0x096b								; Address of begin
0969 0004       |    |		.CONST	0x0004								; Address of exception handler
096a 0001       |    |		.CONST	0x0001								; Number of locals
096b			BODY_0968:
096b			INIT_0968:
096b 4608       |F   |		Jump_Case	0x9
096c 7808       |x   |		Jump	0x975								; case 0x0
096d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
096e 780d       |x   |		Jump	0x97c								; case 0x2
096f 780c       |x   |		Jump	0x97c								; case 0x3
0970 780b       |x   |		Jump	0x97c								; case 0x4
0971 780a       |x   |		Jump	0x97c								; case 0x5
0972 7809       |x   |		Jump	0x97c								; case 0x6
0973 7808       |x   |		Jump	0x97c								; case 0x7
0974 7807       |x   |		Jump	0x97c								; case 0x8
0975 00da       |    |		Load_Top	At_Offset_2
0976 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0977 0125       | %  |		Execute	Any,Set_Constraint
0978 00da       |    |		Load_Top	At_Offset_2
0979 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
097a 1c00       |    |		Execute_Immediate	Run_Utility,0x0
097b 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
097c 0869       | i  |		Execute_Immediate	Raise,0x69
097d 0000 0000  |    |		.XXX[0x3]
097f 0000       |    |
0980 ; --------------------------------------------------------------------------------------
0980 ; SUBPROGRAM
0980 ; SUBPROGRAM
0980 ; --------------------------------------------------------------------------------------
0980 0983       |    |		.CONST	0x0983								; Address of begin
0981 0004       |    |		.CONST	0x0004								; Address of exception handler
0982 0001       |    |		.CONST	0x0001								; Number of locals
0983			BODY_0980:
0983			BODY_0980:
0983			INIT_0980:
0983			INIT_0980:
0983 4608       |F   |		Jump_Case	0x9
0984 7808       |x   |		Jump	0x98d								; case 0x0
0985 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
0986 781d       |x   |		Jump	0x9a4								; case 0x2
0987 781c       |x   |		Jump	0x9a4								; case 0x3
0988 781b       |x   |		Jump	0x9a4								; case 0x4
0989 781a       |x   |		Jump	0x9a4								; case 0x5
098a 7819       |x   |		Jump	0x9a4								; case 0x6
098b 7805       |x   |		Jump	0x991								; case 0x7
098c 780d       |x   |		Jump	0x99a								; case 0x8
098d 00da       |    |		Load_Top	At_Offset_2
098e 2503       |%   |		Execute	Variant_Record,Field_Reference,Indirect,Field_Number 0x3
098f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0990 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0991 00db       |    |		Load_Top	At_Offset_3
0992 4801       |H   |		Short_Literal	0x1
0993 e5fe       |    |		Load	0x2,-0x2
0994 e242       | B  |		Load	0x1,0x42
0995 035b       | [  |		Declare_Type	Array,Constrained
0996 4801       |H   |		Short_Literal	0x1
0997 e5ff       |    |		Load	0x2,-0x1
0998 031b       |    |		Declare_Type	Variant_Record,Constrained
0999 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
099a 00db       |    |		Load_Top	At_Offset_3
099b 00db       |    |		Load_Top	At_Offset_3
099c 02fc       |    |		Declare_Variable	Variant_Record,With_Constraint
099d 4801       |H   |		Short_Literal	0x1
099e e5fe       |    |		Load	0x2,-0x2
099f e242       | B  |		Load	0x1,0x42
09a0 0334       | 4  |		Declare_Variable	Array,With_Constraint
09a1 2d03       |-   |		Execute	Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3
09a2 016a       | j  |		QQ_execute	Variant_Record,XXX
09a3 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
09a4 0869       | i  |		Execute_Immediate	Raise,0x69
09a5 0000 0000  |    |		.XXX[0x3]
09a7 0000       |    |
09a8 ; --------------------------------------------------------------------------------------
09a8 ; SUBPROGRAM
09a8 ; --------------------------------------------------------------------------------------
09a8 09d3       |    |		.CONST	0x09d3								; Address of begin
09a9 0004       |    |		.CONST	0x0004								; Address of exception handler
09aa 001a       |    |		.CONST	0x001a								; Number of locals
09ab			INIT_09a8:
09ab 029a 09db  |    |		Declare_Subprogram	INIT_09d8,For_Outer_Call,Visible,Unelaborated
09ad 029a 09fb  |    |		Declare_Subprogram	INIT_09f8,For_Outer_Call,Visible,Unelaborated
09af 029a 0a13  |    |		Declare_Subprogram	INIT_0a10,For_Outer_Call,Visible,Unelaborated
09b1 00bf       |    |		Action	Accept_Activation
09b2 e001       |    |		Load	0x0,0x1
09b3 e002       |    |		Load	0x0,0x2
09b4 e20f       |    |		Load	0x1,0xf
09b5 e210       |    |		Load	0x1,0x10
09b6 e003       |    |		Load	0x0,0x3
09b7 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
09b8 0387       |    |		Declare_Variable	Package
09b9 00d8       |    |		Load_Top	At_Offset_0
09ba 020f       |    |		Execute	Module,Activate
09bb e004       |    |		Load	0x0,0x4
09bc 1919       |    |		Execute	Package,Field_Reference,Field_Number 0x19
09bd 00c6       |    |		Action	Check_Subprogram_Elaborated
09be e20f       |    |		Load	0x1,0xf
09bf e210       |    |		Load	0x1,0x10
09c0 e005       |    |		Load	0x0,0x5
09c1 e006       |    |		Load	0x0,0x6
09c2 4800       |H   |		Short_Literal	0x0
09c3 0007       |    |		Action	Break_Optional
09c4 e007       |    |		Load	0x0,0x7
09c5 e008       |    |		Load	0x0,0x8
09c6 e20f       |    |		Load	0x1,0xf
09c7 e210       |    |		Load	0x1,0x10
09c8 e004       |    |		Load	0x0,0x4
09c9 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
09ca 0387       |    |		Declare_Variable	Package
09cb 00d8       |    |		Load_Top	At_Offset_0
09cc 020f       |    |		Execute	Module,Activate
09cd 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
09ce 00c7       |    |		Action	Elaborate_Subprogram
09cf 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
09d0 00c7       |    |		Action	Elaborate_Subprogram
09d1 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
09d2 00c7       |    |		Action	Elaborate_Subprogram
09d3			BODY_09a8:
09d3 00bc       |    |		Action	Signal_Activated
09d4 00bb       |    |		Action	Signal_Completion
09d5 0000 0000  |    |		.XXX[0x3]
09d7 0000       |    |
09d8 ; --------------------------------------------------------------------------------------
09d8 ; SUBPROGRAM
09d8 ; --------------------------------------------------------------------------------------
09d8 09e0       |    |		.CONST	0x09e0								; Address of begin
09d9 0004       |    |		.CONST	0x0004								; Address of exception handler
09da 0002       |    |		.CONST	0x0002								; Number of locals
09db			INIT_09d8:
09db e210       |    |		Load	0x1,0x10
09dc e5fd       |    |		Load	0x2,-0x3
09dd e5fe       |    |		Load	0x2,-0x2
09de 8213       |    |		Call	0x1,0x13
09df 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
09e0			BODY_09d8:
09e0 00d8       |    |		Load_Top	At_Offset_0
09e1 e214       |    |		Load	0x1,0x14
09e2 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
09e3 0216       |    |		Execute	Heap_Access,Convert
09e4 e214       |    |		Load	0x1,0x14
09e5 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
09e6 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
09e7 e5fe       |    |		Load	0x2,-0x2
09e8 0217       |    |		Execute	Heap_Access,All_Reference
09e9 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
09ea e5ff       |    |		Load	0x2,-0x1
09eb e20f       |    |		Load	0x1,0xf
09ec 0119       |    |		Execute	Any,Check_In_Formal_Type
09ed e214       |    |		Load	0x1,0x14
09ee 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
09ef 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
09f0 00d8       |    |		Load_Top	At_Offset_0
09f1 e210       |    |		Load	0x1,0x10
09f2 0213       |    |		Execute	Heap_Access,Check_In_Type
09f3 e21a       |    |		Load	0x1,0x1a
09f4 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
09f5 a5fd       |    |		Store_Unchecked	0x2,-0x3
09f6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
09f7 0000       |    |		.XXX[0x1]
09f8 ; --------------------------------------------------------------------------------------
09f8 ; SUBPROGRAM
09f8 ; --------------------------------------------------------------------------------------
09f8 0a00       |    |		.CONST	0x0a00								; Address of begin
09f9 0004       |    |		.CONST	0x0004								; Address of exception handler
09fa 0002       |    |		.CONST	0x0002								; Number of locals
09fb			INIT_09f8:
09fb e210       |    |		Load	0x1,0x10
09fc e5fe       |    |		Load	0x2,-0x2
09fd e5ff       |    |		Load	0x2,-0x1
09fe 8213       |    |		Call	0x1,0x13
09ff 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0a00			BODY_09f8:
0a00 00d8       |    |		Load_Top	At_Offset_0
0a01 e214       |    |		Load	0x1,0x14
0a02 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0a03 0216       |    |		Execute	Heap_Access,Convert
0a04 e214       |    |		Load	0x1,0x14
0a05 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0a06 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0a07 4800       |H   |		Short_Literal	0x0
0a08 a5fe       |    |		Store_Unchecked	0x2,-0x2
0a09 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0a0a 0000 0000  |    |		.BLANK	0000[0x6]
0a10 ; --------------------------------------------------------------------------------------
0a10 ; SUBPROGRAM
0a10 ; --------------------------------------------------------------------------------------
0a10 0a13       |    |		.CONST	0x0a13								; Address of begin
0a11 0a1f       |    |		.CONST	0x0a1f								; Address of exception handler
0a12 0001       |    |		.CONST	0x0001								; Number of locals
0a13			BODY_0a10:
0a13			INIT_0a10:
0a13 00db       |    |		Load_Top	At_Offset_3
0a14 00db       |    |		Load_Top	At_Offset_3
0a15 e009       |    |		Load	0x0,0x9
0a16 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
0a17 e215       |    |		Load	0x1,0x15
0a18 e216       |    |		Load	0x1,0x16
0a19 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0a1a e004       |    |		Load	0x0,0x4
0a1b 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0a1c e210       |    |		Load	0x1,0x10
0a1d 0213       |    |		Execute	Heap_Access,Check_In_Type
0a1e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0a1f			TRAP_0a10:
0a1f 486b       |Hk  |		Short_Literal	0x6b
0a20 010f       |    |		Execute	Exception,Equal
0a21 6802       |h   |		Jump_Zero	0xa24
0a22 e210       |    |		Load	0x1,0x10
0a23 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0a24 0100       |    |		Execute	Exception,Raise
0a25 ; --------------------------------------------------------------------------------------
0a25 ; STRING TABLE
0a25 ; --------------------------------------------------------------------------------------
0a25 0016       |    |		.STRTAB	0x0016->0x0a30							; "Destroying state file "
0a26 002a       | *  |		.STRTAB	0x002a->0x0a3b							; "."
0a27 0029       | )  |		.STRTAB	0x0029->0x0a3b							; "Opened state file \x22"
0a28 003a       | :  |		.STRTAB	0x003a->0x0a45							; "\x22 in "
0a29 003d       | =  |		.STRTAB	0x003d->0x0a47							; " Mode."
0a2a 0041       | A  |		.STRTAB	0x0041->0x0a4a							; "_State_File"
0a2b 004a       | J  |		.STRTAB	0x004a->0x0a50							; ".State.Tool_State."
0a2c 005a       | Z  |		.STRTAB	0x005a->0x0a59							; "Created state file \x22"
0a2d 006c       | l  |		.STRTAB	0x006c->0x0a63							; "\x22 (Mode = "
0a2e 0074       | t  |		.STRTAB	0x0074->0x0a68							; ")."
0a2f 0074       | t  |		.STREND 0x0074->0x0a69
0a30 4465 7374  |Dest|		.STRTAB_STRINGS
0a69 0000 0000  |    |		.BLANK	0000[0x7]
0a70 ; --------------------------------------------------------------------------------------
0a70 ; Debug Table
0a70 ; --------------------------------------------------------------------------------------
0a70 0004 000a  |    |		.DEBUG4	0x0004,0x000a,0xe364,0x0000,0x0001,0x0000
0a76 0000 0000  |    |		.BLANK	0000[0x18a]