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

⟦161e09f8e⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5800       |X   |		.CONST	0x5800								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 06c0       |    |		.CONST	0x06c0								; 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 8004       |    |		.CONST	0x8004								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 01e8       |    |		.CONST	0x01e8								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 00bc       |    |		.CONST	0x00bc								; Number of locals
000b			INIT_0008:
000b 029a 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Outer_Call,Visible,Unelaborated
000d 029a 0203  |    |		Declare_Subprogram	INIT_0200,For_Outer_Call,Visible,Unelaborated
000f 029a 020b  |    |		Declare_Subprogram	INIT_0208,For_Outer_Call,Visible,Unelaborated
0011 029a 0213  |    |		Declare_Subprogram	INIT_0210,For_Outer_Call,Visible,Unelaborated
0013 029a 021b  |    |		Declare_Subprogram	INIT_0218,For_Outer_Call,Visible,Unelaborated
0015 029a 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call,Visible,Unelaborated
0017 029a 022b  |   +|		Declare_Subprogram	INIT_0228,For_Outer_Call,Visible,Unelaborated
0019 029a 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Outer_Call,Visible,Unelaborated
001b 029a 024b  |   K|		Declare_Subprogram	INIT_0248,For_Outer_Call,Visible,Unelaborated
001d 029a 025b  |   [|		Declare_Subprogram	INIT_0258,For_Outer_Call,Visible,Unelaborated
001f 029a 026b  |   k|		Declare_Subprogram	INIT_0268,For_Outer_Call,Visible,Unelaborated
0021 029a 0273  |   s|		Declare_Subprogram	INIT_0270,For_Outer_Call,Visible,Unelaborated
0023 029a 0283  |    |		Declare_Subprogram	INIT_0280,For_Outer_Call,Visible,Unelaborated
0025 029a 0293  |    |		Declare_Subprogram	INIT_0290,For_Outer_Call,Visible,Unelaborated
0027 029a 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Outer_Call,Visible,Unelaborated
0029 029a 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call,Visible,Unelaborated
002b 029a 02c3  |    |		Declare_Subprogram	INIT_02c0,For_Outer_Call,Visible,Unelaborated
002d 029a 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Outer_Call,Visible,Unelaborated
002f 029a 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call,Visible,Unelaborated
0031 029a 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Outer_Call,Visible,Unelaborated
0033 029a 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call,Visible,Unelaborated
0035 029a 032b  |   +|		Declare_Subprogram	INIT_0328,For_Outer_Call,Visible,Unelaborated
0037 029a 0343  |   C|		Declare_Subprogram	INIT_0340,For_Outer_Call,Visible,Unelaborated
0039 029a 0353  |   S|		Declare_Subprogram	INIT_0350,For_Outer_Call,Visible,Unelaborated
003b 0093 0000  |    |		push_full_address	0x0
003d 61be       |a   |		Indirect_Literal	Discrete,0x1fc,{0x80000000, 0x00010000}
003e 0273       | s  |		Execute	Discrete,Plus
003f 0129       | )  |		Execute	Any,Make_Visible
0040 029a 0383  |    |		Declare_Subprogram	INIT_0380,For_Outer_Call,Visible,Unelaborated
0042 029a 03b3  |    |		Declare_Subprogram	INIT_03b0,For_Outer_Call,Visible,Unelaborated
0044 029a 03eb  |    |		Declare_Subprogram	INIT_03e8,For_Outer_Call,Visible,Unelaborated
0046 029a 0403  |    |		Declare_Subprogram	INIT_0400,For_Outer_Call,Visible,Unelaborated
0048 029a 0413  |    |		Declare_Subprogram	INIT_0410,For_Outer_Call,Visible,Unelaborated
004a 029a 0423  |   #|		Declare_Subprogram	INIT_0420,For_Outer_Call,Visible,Unelaborated
004c 029a 0433  |   3|		Declare_Subprogram	INIT_0430,For_Outer_Call,Visible,Unelaborated
004e 029a 043b  |   ;|		Declare_Subprogram	INIT_0438,For_Outer_Call,Visible,Unelaborated
0050 029a 0453  |   S|		Declare_Subprogram	INIT_0450,For_Outer_Call,Visible,Unelaborated
0052 029a 045b  |   [|		Declare_Subprogram	INIT_0458,For_Outer_Call,Visible,Unelaborated
0054 029a 0463  |   c|		Declare_Subprogram	INIT_0460,For_Outer_Call,Visible,Unelaborated
0056 029a 047b  |   {|		Declare_Subprogram	INIT_0478,For_Outer_Call,Visible,Unelaborated
0058 029a 0493  |    |		Declare_Subprogram	INIT_0490,For_Outer_Call,Visible,Unelaborated
005a 029a 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Outer_Call,Visible,Unelaborated
005c 029a 04c3  |    |		Declare_Subprogram	INIT_04c0,For_Outer_Call,Visible,Unelaborated
005e 029a 04db  |    |		Declare_Subprogram	INIT_04d8,For_Outer_Call,Visible,Unelaborated
0060 029a 04f3  |    |		Declare_Subprogram	INIT_04f0,For_Outer_Call,Visible,Unelaborated
0062 029a 050b  |    |		Declare_Subprogram	INIT_0508,For_Outer_Call,Visible,Unelaborated
0064 029a 0523  |   #|		Declare_Subprogram	INIT_0520,For_Outer_Call,Visible,Unelaborated
0066 029a 0533  |   3|		Declare_Subprogram	INIT_0530,For_Outer_Call,Visible,Unelaborated
0068 029a 0553  |   S|		Declare_Subprogram	INIT_0550,For_Outer_Call,Visible,Unelaborated
006a 029a 0573  |   s|		Declare_Subprogram	INIT_0570,For_Outer_Call,Visible,Unelaborated
006c 029a 0593  |    |		Declare_Subprogram	INIT_0590,For_Outer_Call,Visible,Unelaborated
006e 029a 05b3  |    |		Declare_Subprogram	INIT_05b0,For_Outer_Call,Visible,Unelaborated
0070 029a 05d3  |    |		Declare_Subprogram	INIT_05d0,For_Outer_Call,Visible,Unelaborated
0072 029a 05f3  |    |		Declare_Subprogram	INIT_05f0,For_Outer_Call,Visible,Unelaborated
0074 4818       |H   |		Short_Literal	0x18
0075 03cd       |    |		Declare_Type	Access,Incomplete,Visible,Accesses_Protected
0076 00d8       |    |		Load_Top	At_Offset_0
0077 02a0       |    |		Declare_Subprogram	Null_Subprogram
0078 4818       |H   |		Short_Literal	0x18
0079 03d4       |    |		Declare_Type	Access,Defined,Visible,Accesses_Protected
007a 00bf       |    |		Action	Accept_Activation
007b 029b 0613  |    |		Declare_Subprogram	INIT_0610,For_Outer_Call,Unelaborated
007d 029b 0623  |   #|		Declare_Subprogram	INIT_0620,For_Outer_Call,Unelaborated
007f 029d 062b  |   +|		Declare_Subprogram	INIT_0628,For_Outer_Call
0081 029d 0633  |   3|		Declare_Subprogram	INIT_0630,For_Outer_Call
0083 e002       |    |		Load	0x0,0x2
0084 e003       |    |		Load	0x0,0x3
0085 e004       |    |		Load	0x0,0x4
0086 e005       |    |		Load	0x0,0x5
0087 e006       |    |		Load	0x0,0x6
0088 e007       |    |		Load	0x0,0x7
0089 e008       |    |		Load	0x0,0x8
008a 4800       |H   |		Short_Literal	0x0
008b e009       |    |		Load	0x0,0x9
008c 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
008d 800a       |    |		Call	0x0,0xa
008e a00b       |    |		Store_Unchecked	0x0,0xb
008f a00c       |    |		Store_Unchecked	0x0,0xc
0090 e00d       |    |		Load	0x0,0xd
0091 800e       |    |		Call	0x0,0xe
0092 e00f       |    |		Load	0x0,0xf
0093 480c       |H   |		Short_Literal	0xc
0094 1d44       | D  |		Execute_Immediate	Reference_Lex_1,0x44
0095 e010       |    |		Load	0x0,0x10
0096 4800       |H   |		Short_Literal	0x0
0097 4800       |H   |		Short_Literal	0x0
0098 4801       |H   |		Short_Literal	0x1
0099 4803       |H   |		Short_Literal	0x3
009a 4802       |H   |		Short_Literal	0x2
009b 1d45       | E  |		Execute_Immediate	Reference_Lex_1,0x45
009c 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42
009d e011       |    |		Load	0x0,0x11
009e 8012       |    |		Call	0x0,0x12
009f 1d43       | C  |		Execute_Immediate	Reference_Lex_1,0x43
00a0 4850       |HP  |		Short_Literal	0x50
00a1 e013       |    |		Load	0x0,0x13
00a2 0387       |    |		Declare_Variable	Package
00a3 00d8       |    |		Load_Top	At_Offset_0
00a4 020f       |    |		Execute	Module,Activate
00a5 00d8       |    |		Load_Top	At_Offset_0
00a6 1b2a       | *  |		Execute	Package,Field_Read,Field_Number 0x2a
00a7 1d42       | B  |		Execute_Immediate	Reference_Lex_1,0x42
00a8 00c7       |    |		Action	Elaborate_Subprogram
00a9 1d43       | C  |		Execute_Immediate	Reference_Lex_1,0x43
00aa 00c7       |    |		Action	Elaborate_Subprogram
00ab 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
00ac 00c7       |    |		Action	Elaborate_Subprogram
00ad 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
00ae 00c7       |    |		Action	Elaborate_Subprogram
00af 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
00b0 00c7       |    |		Action	Elaborate_Subprogram
00b1 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
00b2 00c7       |    |		Action	Elaborate_Subprogram
00b3 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
00b4 00c7       |    |		Action	Elaborate_Subprogram
00b5 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
00b6 00c7       |    |		Action	Elaborate_Subprogram
00b7 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
00b8 00c7       |    |		Action	Elaborate_Subprogram
00b9 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
00ba 00c7       |    |		Action	Elaborate_Subprogram
00bb 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
00bc 00c7       |    |		Action	Elaborate_Subprogram
00bd 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
00be 00c7       |    |		Action	Elaborate_Subprogram
00bf 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
00c0 00c7       |    |		Action	Elaborate_Subprogram
00c1 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
00c2 00c7       |    |		Action	Elaborate_Subprogram
00c3 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
00c4 00c7       |    |		Action	Elaborate_Subprogram
00c5 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
00c6 00c7       |    |		Action	Elaborate_Subprogram
00c7 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b
00c8 00c7       |    |		Action	Elaborate_Subprogram
00c9 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c
00ca 00c7       |    |		Action	Elaborate_Subprogram
00cb 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
00cc 00c7       |    |		Action	Elaborate_Subprogram
00cd 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
00ce 00c7       |    |		Action	Elaborate_Subprogram
00cf 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f
00d0 00c7       |    |		Action	Elaborate_Subprogram
00d1 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
00d2 00c7       |    |		Action	Elaborate_Subprogram
00d3 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
00d4 00c7       |    |		Action	Elaborate_Subprogram
00d5 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
00d6 00c7       |    |		Action	Elaborate_Subprogram
00d7 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
00d8 00c7       |    |		Action	Elaborate_Subprogram
00d9 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24
00da 00c7       |    |		Action	Elaborate_Subprogram
00db 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26
00dc 00c7       |    |		Action	Elaborate_Subprogram
00dd 1d27       | '  |		Execute_Immediate	Reference_Lex_1,0x27
00de 00c7       |    |		Action	Elaborate_Subprogram
00df 00d9       |    |		Load_Top	At_Offset_1
00e0 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
00e1 02a0       |    |		Declare_Subprogram	Null_Subprogram
00e2 e240       | @  |		Load	0x1,0x40
00e3 03c7       |    |		Complete_Type	Access,By_Defining
00e4 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
00e5 00c7       |    |		Action	Elaborate_Subprogram
00e6 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
00e7 00c7       |    |		Action	Elaborate_Subprogram
00e8 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
00e9 00c7       |    |		Action	Elaborate_Subprogram
00ea 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
00eb 00c7       |    |		Action	Elaborate_Subprogram
00ec 1d2c       | ,  |		Execute_Immediate	Reference_Lex_1,0x2c
00ed 00c7       |    |		Action	Elaborate_Subprogram
00ee 00e2       |    |		Load_Encached	Integer_Cache
00ef 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00f0 e00d       |    |		Load	0x0,0xd
00f1 e014       |    |		Load	0x0,0x14
00f2 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00f3 02a0       |    |		Declare_Subprogram	Null_Subprogram
00f4 4802       |H   |		Short_Literal	0x2
00f5 032d       | -  |		Declare_Type	Record,Defined
00f6 e00d       |    |		Load	0x0,0xd
00f7 e014       |    |		Load	0x0,0x14
00f8 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00f9 e014       |    |		Load	0x0,0x14
00fa 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00fb 02a0       |    |		Declare_Subprogram	Null_Subprogram
00fc 4803       |H   |		Short_Literal	0x3
00fd 032d       | -  |		Declare_Type	Record,Defined
00fe 029d 063b  |   ;|		Declare_Subprogram	INIT_0638,For_Outer_Call
0100 e246       | F  |		Load	0x1,0x46
0101 1944       | D  |		Execute	Package,Field_Reference,Field_Number 0x44
0102 00c6       |    |		Action	Check_Subprogram_Elaborated
0103 e015       |    |		Load	0x0,0x15
0104 00e2       |    |		Load_Encached	Integer_Cache
0105 1d4b       | K  |		Execute_Immediate	Reference_Lex_1,0x4b
0106 4800       |H   |		Short_Literal	0x0
0107 e016       |    |		Load	0x0,0x16
0108 e017       |    |		Load	0x0,0x17
0109 4800       |H   |		Short_Literal	0x0
010a 0007       |    |		Action	Break_Optional
010b 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d
010c 00c7       |    |		Action	Elaborate_Subprogram
010d 1d2e       | .  |		Execute_Immediate	Reference_Lex_1,0x2e
010e 00c7       |    |		Action	Elaborate_Subprogram
010f 029d 0643  |   C|		Declare_Subprogram	INIT_0640,For_Outer_Call
0111 e246       | F  |		Load	0x1,0x46
0112 1944       | D  |		Execute	Package,Field_Reference,Field_Number 0x44
0113 00c6       |    |		Action	Check_Subprogram_Elaborated
0114 e00d       |    |		Load	0x0,0xd
0115 00e2       |    |		Load_Encached	Integer_Cache
0116 1d53       | S  |		Execute_Immediate	Reference_Lex_1,0x53
0117 4800       |H   |		Short_Literal	0x0
0118 e018       |    |		Load	0x0,0x18
0119 e019       |    |		Load	0x0,0x19
011a 4800       |H   |		Short_Literal	0x0
011b 0007       |    |		Action	Break_Optional
011c 1d31       | 1  |		Execute_Immediate	Reference_Lex_1,0x31
011d 00c7       |    |		Action	Elaborate_Subprogram
011e 029d 064b  |   K|		Declare_Subprogram	INIT_0648,For_Outer_Call
0120 e246       | F  |		Load	0x1,0x46
0121 1944       | D  |		Execute	Package,Field_Reference,Field_Number 0x44
0122 00c6       |    |		Action	Check_Subprogram_Elaborated
0123 e014       |    |		Load	0x0,0x14
0124 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0125 00e2       |    |		Load_Encached	Integer_Cache
0126 1d5b       | [  |		Execute_Immediate	Reference_Lex_1,0x5b
0127 4800       |H   |		Short_Literal	0x0
0128 e01a       |    |		Load	0x0,0x1a
0129 e01b       |    |		Load	0x0,0x1b
012a 4800       |H   |		Short_Literal	0x0
012b 0007       |    |		Action	Break_Optional
012c 1d32       | 2  |		Execute_Immediate	Reference_Lex_1,0x32
012d 00c7       |    |		Action	Elaborate_Subprogram
012e 029d 0653  |   S|		Declare_Subprogram	INIT_0650,For_Outer_Call
0130 e246       | F  |		Load	0x1,0x46
0131 1944       | D  |		Execute	Package,Field_Reference,Field_Number 0x44
0132 00c6       |    |		Action	Check_Subprogram_Elaborated
0133 e00d       |    |		Load	0x0,0xd
0134 00e2       |    |		Load_Encached	Integer_Cache
0135 1d63       | c  |		Execute_Immediate	Reference_Lex_1,0x63
0136 4800       |H   |		Short_Literal	0x0
0137 e01c       |    |		Load	0x0,0x1c
0138 e01d       |    |		Load	0x0,0x1d
0139 4800       |H   |		Short_Literal	0x0
013a 0007       |    |		Action	Break_Optional
013b 1d35       | 5  |		Execute_Immediate	Reference_Lex_1,0x35
013c 00c7       |    |		Action	Elaborate_Subprogram
013d 029d 065b  |   [|		Declare_Subprogram	INIT_0658,For_Outer_Call
013f e246       | F  |		Load	0x1,0x46
0140 1944       | D  |		Execute	Package,Field_Reference,Field_Number 0x44
0141 00c6       |    |		Action	Check_Subprogram_Elaborated
0142 e014       |    |		Load	0x0,0x14
0143 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0144 00e2       |    |		Load_Encached	Integer_Cache
0145 1d6b       | k  |		Execute_Immediate	Reference_Lex_1,0x6b
0146 4800       |H   |		Short_Literal	0x0
0147 e01e       |    |		Load	0x0,0x1e
0148 e01f       |    |		Load	0x0,0x1f
0149 4800       |H   |		Short_Literal	0x0
014a 0007       |    |		Action	Break_Optional
014b 1d36       | 6  |		Execute_Immediate	Reference_Lex_1,0x36
014c 00c7       |    |		Action	Elaborate_Subprogram
014d 029d 0663  |   c|		Declare_Subprogram	INIT_0660,For_Outer_Call
014f e246       | F  |		Load	0x1,0x46
0150 1944       | D  |		Execute	Package,Field_Reference,Field_Number 0x44
0151 00c6       |    |		Action	Check_Subprogram_Elaborated
0152 e014       |    |		Load	0x0,0x14
0153 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0154 00e2       |    |		Load_Encached	Integer_Cache
0155 1d73       | s  |		Execute_Immediate	Reference_Lex_1,0x73
0156 4800       |H   |		Short_Literal	0x0
0157 e020       |    |		Load	0x0,0x20
0158 e021       | !  |		Load	0x0,0x21
0159 4800       |H   |		Short_Literal	0x0
015a 0007       |    |		Action	Break_Optional
015b 1d37       | 7  |		Execute_Immediate	Reference_Lex_1,0x37
015c 00c7       |    |		Action	Elaborate_Subprogram
015d 1d2f       | /  |		Execute_Immediate	Reference_Lex_1,0x2f
015e 00c7       |    |		Action	Elaborate_Subprogram
015f 029d 066b  |   k|		Declare_Subprogram	INIT_0668,For_Outer_Call
0161 e246       | F  |		Load	0x1,0x46
0162 1944       | D  |		Execute	Package,Field_Reference,Field_Number 0x44
0163 00c6       |    |		Action	Check_Subprogram_Elaborated
0164 e014       |    |		Load	0x0,0x14
0165 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0166 00e2       |    |		Load_Encached	Integer_Cache
0167 1d7b       | {  |		Execute_Immediate	Reference_Lex_1,0x7b
0168 4800       |H   |		Short_Literal	0x0
0169 e022       | "  |		Load	0x0,0x22
016a e023       | #  |		Load	0x0,0x23
016b 4800       |H   |		Short_Literal	0x0
016c 0007       |    |		Action	Break_Optional
016d 1d30       | 0  |		Execute_Immediate	Reference_Lex_1,0x30
016e 00c7       |    |		Action	Elaborate_Subprogram
016f 029d 0673  |   s|		Declare_Subprogram	INIT_0670,For_Outer_Call
0171 e246       | F  |		Load	0x1,0x46
0172 1944       | D  |		Execute	Package,Field_Reference,Field_Number 0x44
0173 00c6       |    |		Action	Check_Subprogram_Elaborated
0174 e024       | $  |		Load	0x0,0x24
0175 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0176 00e2       |    |		Load_Encached	Integer_Cache
0177 1d83       |    |		Execute_Immediate	Reference_Lex_1,0x83
0178 4800       |H   |		Short_Literal	0x0
0179 e025       | %  |		Load	0x0,0x25
017a e026       | &  |		Load	0x0,0x26
017b 4800       |H   |		Short_Literal	0x0
017c 0007       |    |		Action	Break_Optional
017d 1d33       | 3  |		Execute_Immediate	Reference_Lex_1,0x33
017e 00c7       |    |		Action	Elaborate_Subprogram
017f 029d 067b  |   {|		Declare_Subprogram	INIT_0678,For_Outer_Call
0181 e246       | F  |		Load	0x1,0x46
0182 1944       | D  |		Execute	Package,Field_Reference,Field_Number 0x44
0183 00c6       |    |		Action	Check_Subprogram_Elaborated
0184 00e1       |    |		Load_Encached	Boolean_Cache
0185 00e2       |    |		Load_Encached	Integer_Cache
0186 1d8b       |    |		Execute_Immediate	Reference_Lex_1,0x8b
0187 4800       |H   |		Short_Literal	0x0
0188 e027       | '  |		Load	0x0,0x27
0189 e028       | (  |		Load	0x0,0x28
018a 4800       |H   |		Short_Literal	0x0
018b 0007       |    |		Action	Break_Optional
018c 1d34       | 4  |		Execute_Immediate	Reference_Lex_1,0x34
018d 00c7       |    |		Action	Elaborate_Subprogram
018e 029d 0683  |    |		Declare_Subprogram	INIT_0680,For_Outer_Call
0190 e246       | F  |		Load	0x1,0x46
0191 1942       | B  |		Execute	Package,Field_Reference,Field_Number 0x42
0192 00c6       |    |		Action	Check_Subprogram_Elaborated
0193 00e1       |    |		Load_Encached	Boolean_Cache
0194 1d93       |    |		Execute_Immediate	Reference_Lex_1,0x93
0195 4800       |H   |		Short_Literal	0x0
0196 e029       | )  |		Load	0x0,0x29
0197 e02a       | *  |		Load	0x0,0x2a
0198 4800       |H   |		Short_Literal	0x0
0199 0007       |    |		Action	Break_Optional
019a 1d3e       | >  |		Execute_Immediate	Reference_Lex_1,0x3e
019b 00c7       |    |		Action	Elaborate_Subprogram
019c 1d38       | 8  |		Execute_Immediate	Reference_Lex_1,0x38
019d 00c7       |    |		Action	Elaborate_Subprogram
019e 029d 068b  |    |		Declare_Subprogram	INIT_0688,For_Outer_Call
01a0 e246       | F  |		Load	0x1,0x46
01a1 1942       | B  |		Execute	Package,Field_Reference,Field_Number 0x42
01a2 00c6       |    |		Action	Check_Subprogram_Elaborated
01a3 e015       |    |		Load	0x0,0x15
01a4 1d9a       |    |		Execute_Immediate	Reference_Lex_1,0x9a
01a5 4800       |H   |		Short_Literal	0x0
01a6 e02b       | +  |		Load	0x0,0x2b
01a7 e02c       | ,  |		Load	0x0,0x2c
01a8 4800       |H   |		Short_Literal	0x0
01a9 0007       |    |		Action	Break_Optional
01aa 1d39       | 9  |		Execute_Immediate	Reference_Lex_1,0x39
01ab 00c7       |    |		Action	Elaborate_Subprogram
01ac 029d 0693  |    |		Declare_Subprogram	INIT_0690,For_Outer_Call
01ae e246       | F  |		Load	0x1,0x46
01af 1942       | B  |		Execute	Package,Field_Reference,Field_Number 0x42
01b0 00c6       |    |		Action	Check_Subprogram_Elaborated
01b1 e249       | I  |		Load	0x1,0x49
01b2 1da1       |    |		Execute_Immediate	Reference_Lex_1,0xa1
01b3 4800       |H   |		Short_Literal	0x0
01b4 e02d       | -  |		Load	0x0,0x2d
01b5 e02e       | .  |		Load	0x0,0x2e
01b6 4800       |H   |		Short_Literal	0x0
01b7 0007       |    |		Action	Break_Optional
01b8 1d3a       | :  |		Execute_Immediate	Reference_Lex_1,0x3a
01b9 00c7       |    |		Action	Elaborate_Subprogram
01ba 029d 06a3  |    |		Declare_Subprogram	INIT_06a0,For_Outer_Call
01bc e246       | F  |		Load	0x1,0x46
01bd 1942       | B  |		Execute	Package,Field_Reference,Field_Number 0x42
01be 00c6       |    |		Action	Check_Subprogram_Elaborated
01bf e24a       | J  |		Load	0x1,0x4a
01c0 1da8       |    |		Execute_Immediate	Reference_Lex_1,0xa8
01c1 4800       |H   |		Short_Literal	0x0
01c2 e02f       | /  |		Load	0x0,0x2f
01c3 e030       | 0  |		Load	0x0,0x30
01c4 4800       |H   |		Short_Literal	0x0
01c5 0007       |    |		Action	Break_Optional
01c6 1d3f       | ?  |		Execute_Immediate	Reference_Lex_1,0x3f
01c7 00c7       |    |		Action	Elaborate_Subprogram
01c8 029d 06b3  |    |		Declare_Subprogram	INIT_06b0,For_Outer_Call
01ca e246       | F  |		Load	0x1,0x46
01cb 1942       | B  |		Execute	Package,Field_Reference,Field_Number 0x42
01cc 00c6       |    |		Action	Check_Subprogram_Elaborated
01cd e014       |    |		Load	0x0,0x14
01ce 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
01cf 1daf       |    |		Execute_Immediate	Reference_Lex_1,0xaf
01d0 4800       |H   |		Short_Literal	0x0
01d1 e031       | 1  |		Load	0x0,0x31
01d2 e032       | 2  |		Load	0x0,0x32
01d3 4800       |H   |		Short_Literal	0x0
01d4 0007       |    |		Action	Break_Optional
01d5 1d3c       | <  |		Execute_Immediate	Reference_Lex_1,0x3c
01d6 00c7       |    |		Action	Elaborate_Subprogram
01d7 1d3b       | ;  |		Execute_Immediate	Reference_Lex_1,0x3b
01d8 00c7       |    |		Action	Elaborate_Subprogram
01d9 029d 06bb  |    |		Declare_Subprogram	INIT_06b8,For_Outer_Call
01db e246       | F  |		Load	0x1,0x46
01dc 1942       | B  |		Execute	Package,Field_Reference,Field_Number 0x42
01dd 00c6       |    |		Action	Check_Subprogram_Elaborated
01de e024       | $  |		Load	0x0,0x24
01df 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01e0 1db6       |    |		Execute_Immediate	Reference_Lex_1,0xb6
01e1 4800       |H   |		Short_Literal	0x0
01e2 e033       | 3  |		Load	0x0,0x33
01e3 e034       | 4  |		Load	0x0,0x34
01e4 4800       |H   |		Short_Literal	0x0
01e5 0007       |    |		Action	Break_Optional
01e6 1d3d       | =  |		Execute_Immediate	Reference_Lex_1,0x3d
01e7 00c7       |    |		Action	Elaborate_Subprogram
01e8			BODY_0008:
01e8 00bc       |    |		Action	Signal_Activated
01e9 00bb       |    |		Action	Signal_Completion
01ea 0000 0000  |    |		.BLANK	0000[0x6]
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3       |    |		.CONST	0x01f3								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0001       |    |		.CONST	0x0001								; Number of locals
01f3			BODY_01f0:
01f3			INIT_01f0:
01f3 e247       | G  |		Load	0x1,0x47
01f4 00db       |    |		Load_Top	At_Offset_3
01f5 e246       | F  |		Load	0x1,0x46
01f6 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
01f7 c247       | G  |		Store	0x1,0x47
01f8 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01f9 0000 0000  |    |		.XXX[0x3]
01fb 0000       |    |
01fc 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203       |    |		.CONST	0x0203								; Address of begin
0201 0004       |    |		.CONST	0x0004								; Address of exception handler
0202 0001       |    |		.CONST	0x0001								; Number of locals
0203			BODY_0200:
0203			INIT_0200:
0203 e247       | G  |		Load	0x1,0x47
0204 e246       | F  |		Load	0x1,0x46
0205 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0206 00ca       |    |		Action	Exit_Nullary_Function
0207 0000       |    |		.XXX[0x1]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b       |    |		.CONST	0x020b								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0001       |    |		.CONST	0x0001								; Number of locals
020b			BODY_0208:
020b			INIT_0208:
020b 00da       |    |		Load_Top	At_Offset_2
020c e247       | G  |		Load	0x1,0x47
020d e246       | F  |		Load	0x1,0x46
020e 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
020f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213       |    |		.CONST	0x0213								; Address of begin
0211 0004       |    |		.CONST	0x0004								; Address of exception handler
0212 0001       |    |		.CONST	0x0001								; Number of locals
0213			BODY_0210:
0213			INIT_0210:
0213 00da       |    |		Load_Top	At_Offset_2
0214 e247       | G  |		Load	0x1,0x47
0215 e246       | F  |		Load	0x1,0x46
0216 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0217 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b       |    |		.CONST	0x021b								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0001       |    |		.CONST	0x0001								; Number of locals
021b			BODY_0218:
021b			INIT_0218:
021b 00da       |    |		Load_Top	At_Offset_2
021c e247       | G  |		Load	0x1,0x47
021d e246       | F  |		Load	0x1,0x46
021e 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
021f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223       | #  |		.CONST	0x0223								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0001       |    |		.CONST	0x0001								; Number of locals
0223			BODY_0220:
0223			INIT_0220:
0223 00da       |    |		Load_Top	At_Offset_2
0224 e247       | G  |		Load	0x1,0x47
0225 e246       | F  |		Load	0x1,0x46
0226 1830       | 0  |		Execute	Package,Field_Execute,Field_Number 0x30
0227 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b       | +  |		.CONST	0x022b								; Address of begin
0229 0230       | 0  |		.CONST	0x0230								; Address of exception handler
022a 0001       |    |		.CONST	0x0001								; Number of locals
022b			BODY_0228:
022b			INIT_0228:
022b 00da       |    |		Load_Top	At_Offset_2
022c e247       | G  |		Load	0x1,0x47
022d e246       | F  |		Load	0x1,0x46
022e 1831       | 1  |		Execute	Package,Field_Execute,Field_Number 0x31
022f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0230			TRAP_0228:
0230 e246       | F  |		Load	0x1,0x46
0231 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0232 010f       |    |		Execute	Exception,Equal
0233 6802       |h   |		Jump_Zero	0x236
0234 e225       | %  |		Load	0x1,0x25
0235 0257       | W  |		Execute	Discrete,Raise
0236 0100       |    |		Execute	Exception,Raise
0237 0000       |    |		.XXX[0x1]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b       | ;  |		.CONST	0x023b								; Address of begin
0239 0240       | @  |		.CONST	0x0240								; Address of exception handler
023a 0001       |    |		.CONST	0x0001								; Number of locals
023b			BODY_0238:
023b			INIT_0238:
023b 00da       |    |		Load_Top	At_Offset_2
023c e247       | G  |		Load	0x1,0x47
023d e246       | F  |		Load	0x1,0x46
023e 1832       | 2  |		Execute	Package,Field_Execute,Field_Number 0x32
023f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0240			TRAP_0238:
0240 e246       | F  |		Load	0x1,0x46
0241 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0242 010f       |    |		Execute	Exception,Equal
0243 6802       |h   |		Jump_Zero	0x246
0244 e225       | %  |		Load	0x1,0x25
0245 0257       | W  |		Execute	Discrete,Raise
0246 0100       |    |		Execute	Exception,Raise
0247 0000       |    |		.XXX[0x1]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b       | K  |		.CONST	0x024b								; Address of begin
0249 0250       | P  |		.CONST	0x0250								; Address of exception handler
024a 0001       |    |		.CONST	0x0001								; Number of locals
024b			BODY_0248:
024b			INIT_0248:
024b 00da       |    |		Load_Top	At_Offset_2
024c e247       | G  |		Load	0x1,0x47
024d e246       | F  |		Load	0x1,0x46
024e 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
024f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0250			TRAP_0248:
0250 e246       | F  |		Load	0x1,0x46
0251 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0252 010f       |    |		Execute	Exception,Equal
0253 6802       |h   |		Jump_Zero	0x256
0254 e225       | %  |		Load	0x1,0x25
0255 0257       | W  |		Execute	Discrete,Raise
0256 0100       |    |		Execute	Exception,Raise
0257 0000       |    |		.XXX[0x1]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b       | [  |		.CONST	0x025b								; Address of begin
0259 0260       | `  |		.CONST	0x0260								; Address of exception handler
025a 0001       |    |		.CONST	0x0001								; Number of locals
025b			BODY_0258:
025b			INIT_0258:
025b 00da       |    |		Load_Top	At_Offset_2
025c e247       | G  |		Load	0x1,0x47
025d e246       | F  |		Load	0x1,0x46
025e 1834       | 4  |		Execute	Package,Field_Execute,Field_Number 0x34
025f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0260			TRAP_0258:
0260 e246       | F  |		Load	0x1,0x46
0261 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0262 010f       |    |		Execute	Exception,Equal
0263 6802       |h   |		Jump_Zero	0x266
0264 e225       | %  |		Load	0x1,0x25
0265 0257       | W  |		Execute	Discrete,Raise
0266 0100       |    |		Execute	Exception,Raise
0267 0000       |    |		.XXX[0x1]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b       | k  |		.CONST	0x026b								; Address of begin
0269 0004       |    |		.CONST	0x0004								; Address of exception handler
026a 0001       |    |		.CONST	0x0001								; Number of locals
026b			BODY_0268:
026b			INIT_0268:
026b 00da       |    |		Load_Top	At_Offset_2
026c e247       | G  |		Load	0x1,0x47
026d e246       | F  |		Load	0x1,0x46
026e 1835       | 5  |		Execute	Package,Field_Execute,Field_Number 0x35
026f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273       | s  |		.CONST	0x0273								; Address of begin
0271 0278       | x  |		.CONST	0x0278								; Address of exception handler
0272 0001       |    |		.CONST	0x0001								; Number of locals
0273			BODY_0270:
0273			INIT_0270:
0273 00da       |    |		Load_Top	At_Offset_2
0274 e247       | G  |		Load	0x1,0x47
0275 e246       | F  |		Load	0x1,0x46
0276 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
0277 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0278			TRAP_0270:
0278 e246       | F  |		Load	0x1,0x46
0279 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
027a 010f       |    |		Execute	Exception,Equal
027b 6802       |h   |		Jump_Zero	0x27e
027c e225       | %  |		Load	0x1,0x25
027d 0257       | W  |		Execute	Discrete,Raise
027e 0100       |    |		Execute	Exception,Raise
027f 0000       |    |		.XXX[0x1]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283       |    |		.CONST	0x0283								; Address of begin
0281 0288       |    |		.CONST	0x0288								; Address of exception handler
0282 0001       |    |		.CONST	0x0001								; Number of locals
0283			BODY_0280:
0283			INIT_0280:
0283 00da       |    |		Load_Top	At_Offset_2
0284 e247       | G  |		Load	0x1,0x47
0285 e246       | F  |		Load	0x1,0x46
0286 1837       | 7  |		Execute	Package,Field_Execute,Field_Number 0x37
0287 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0288			TRAP_0280:
0288 e246       | F  |		Load	0x1,0x46
0289 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
028a 010f       |    |		Execute	Exception,Equal
028b 6802       |h   |		Jump_Zero	0x28e
028c e225       | %  |		Load	0x1,0x25
028d 0257       | W  |		Execute	Discrete,Raise
028e 0100       |    |		Execute	Exception,Raise
028f 0000       |    |		.XXX[0x1]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293       |    |		.CONST	0x0293								; Address of begin
0291 0298       |    |		.CONST	0x0298								; Address of exception handler
0292 0001       |    |		.CONST	0x0001								; Number of locals
0293			BODY_0290:
0293			INIT_0290:
0293 00da       |    |		Load_Top	At_Offset_2
0294 e247       | G  |		Load	0x1,0x47
0295 e246       | F  |		Load	0x1,0x46
0296 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0297 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0298			TRAP_0290:
0298 e246       | F  |		Load	0x1,0x46
0299 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
029a 010f       |    |		Execute	Exception,Equal
029b 6802       |h   |		Jump_Zero	0x29e
029c e225       | %  |		Load	0x1,0x25
029d 0257       | W  |		Execute	Discrete,Raise
029e 0100       |    |		Execute	Exception,Raise
029f 0000       |    |		.XXX[0x1]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3       |    |		.CONST	0x02a3								; Address of begin
02a1 02a8       |    |		.CONST	0x02a8								; Address of exception handler
02a2 0001       |    |		.CONST	0x0001								; Number of locals
02a3			BODY_02a0:
02a3			INIT_02a0:
02a3 00da       |    |		Load_Top	At_Offset_2
02a4 e247       | G  |		Load	0x1,0x47
02a5 e246       | F  |		Load	0x1,0x46
02a6 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
02a7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02a8			TRAP_02a0:
02a8 e246       | F  |		Load	0x1,0x46
02a9 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
02aa 010f       |    |		Execute	Exception,Equal
02ab 6802       |h   |		Jump_Zero	0x2ae
02ac e225       | %  |		Load	0x1,0x25
02ad 0257       | W  |		Execute	Discrete,Raise
02ae 0100       |    |		Execute	Exception,Raise
02af 0000       |    |		.XXX[0x1]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3       |    |		.CONST	0x02b3								; Address of begin
02b1 02b8       |    |		.CONST	0x02b8								; Address of exception handler
02b2 0001       |    |		.CONST	0x0001								; Number of locals
02b3			BODY_02b0:
02b3			INIT_02b0:
02b3 00da       |    |		Load_Top	At_Offset_2
02b4 e247       | G  |		Load	0x1,0x47
02b5 e246       | F  |		Load	0x1,0x46
02b6 183a       | :  |		Execute	Package,Field_Execute,Field_Number 0x3a
02b7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02b8			TRAP_02b0:
02b8 e246       | F  |		Load	0x1,0x46
02b9 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
02ba 010f       |    |		Execute	Exception,Equal
02bb 6802       |h   |		Jump_Zero	0x2be
02bc e225       | %  |		Load	0x1,0x25
02bd 0257       | W  |		Execute	Discrete,Raise
02be 0100       |    |		Execute	Exception,Raise
02bf 0000       |    |		.XXX[0x1]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3       |    |		.CONST	0x02c3								; Address of begin
02c1 02c8       |    |		.CONST	0x02c8								; Address of exception handler
02c2 0001       |    |		.CONST	0x0001								; Number of locals
02c3			BODY_02c0:
02c3			INIT_02c0:
02c3 00da       |    |		Load_Top	At_Offset_2
02c4 e247       | G  |		Load	0x1,0x47
02c5 e246       | F  |		Load	0x1,0x46
02c6 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
02c7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02c8			TRAP_02c0:
02c8 e246       | F  |		Load	0x1,0x46
02c9 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
02ca 010f       |    |		Execute	Exception,Equal
02cb 6802       |h   |		Jump_Zero	0x2ce
02cc e225       | %  |		Load	0x1,0x25
02cd 0257       | W  |		Execute	Discrete,Raise
02ce 0100       |    |		Execute	Exception,Raise
02cf 0000       |    |		.XXX[0x1]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d3       |    |		.CONST	0x02d3								; Address of begin
02d1 0004       |    |		.CONST	0x0004								; Address of exception handler
02d2 0001       |    |		.CONST	0x0001								; Number of locals
02d3			BODY_02d0:
02d3			INIT_02d0:
02d3 e247       | G  |		Load	0x1,0x47
02d4 e5fe       |    |		Load	0x2,-0x2
02d5 e5ff       |    |		Load	0x2,-0x1
02d6 e246       | F  |		Load	0x1,0x46
02d7 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
02d8 c247       | G  |		Store	0x1,0x47
02d9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02da 0000 0000  |    |		.BLANK	0000[0x6]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e3       |    |		.CONST	0x02e3								; Address of begin
02e1 02ed       |    |		.CONST	0x02ed								; Address of exception handler
02e2 0001       |    |		.CONST	0x0001								; Number of locals
02e3			BODY_02e0:
02e3			INIT_02e0:
02e3 e247       | G  |		Load	0x1,0x47
02e4 e5fb       |    |		Load	0x2,-0x5
02e5 e5fc       |    |		Load	0x2,-0x4
02e6 e5fd       |    |		Load	0x2,-0x3
02e7 e5fe       |    |		Load	0x2,-0x2
02e8 e5ff       |    |		Load	0x2,-0x1
02e9 e246       | F  |		Load	0x1,0x46
02ea 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
02eb c247       | G  |		Store	0x1,0x47
02ec 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
02ed			TRAP_02e0:
02ed e246       | F  |		Load	0x1,0x46
02ee 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
02ef 010f       |    |		Execute	Exception,Equal
02f0 6802       |h   |		Jump_Zero	0x2f3
02f1 e225       | %  |		Load	0x1,0x25
02f2 0257       | W  |		Execute	Discrete,Raise
02f3 0100       |    |		Execute	Exception,Raise
02f4 0000 0000  |    |		.BLANK	0000[0x4]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fb       |    |		.CONST	0x02fb								; Address of begin
02f9 0302       |    |		.CONST	0x0302								; Address of exception handler
02fa 0001       |    |		.CONST	0x0001								; Number of locals
02fb			BODY_02f8:
02fb			INIT_02f8:
02fb e247       | G  |		Load	0x1,0x47
02fc e5fe       |    |		Load	0x2,-0x2
02fd e5ff       |    |		Load	0x2,-0x1
02fe e246       | F  |		Load	0x1,0x46
02ff 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0300 c247       | G  |		Store	0x1,0x47
0301 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0302			TRAP_02f8:
0302 e246       | F  |		Load	0x1,0x46
0303 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0304 010f       |    |		Execute	Exception,Equal
0305 6802       |h   |		Jump_Zero	0x308
0306 e225       | %  |		Load	0x1,0x25
0307 0257       | W  |		Execute	Discrete,Raise
0308 0100       |    |		Execute	Exception,Raise
0309 0000 0000  |    |		.BLANK	0000[0x7]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0313       |    |		.CONST	0x0313								; Address of begin
0311 031b       |    |		.CONST	0x031b								; Address of exception handler
0312 0001       |    |		.CONST	0x0001								; Number of locals
0313			BODY_0310:
0313			INIT_0310:
0313 e247       | G  |		Load	0x1,0x47
0314 e5fd       |    |		Load	0x2,-0x3
0315 e5fe       |    |		Load	0x2,-0x2
0316 e5ff       |    |		Load	0x2,-0x1
0317 e246       | F  |		Load	0x1,0x46
0318 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0319 c247       | G  |		Store	0x1,0x47
031a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
031b			TRAP_0310:
031b e246       | F  |		Load	0x1,0x46
031c 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
031d 010f       |    |		Execute	Exception,Equal
031e 6802       |h   |		Jump_Zero	0x321
031f e225       | %  |		Load	0x1,0x25
0320 0257       | W  |		Execute	Discrete,Raise
0321 0100       |    |		Execute	Exception,Raise
0322 0000 0000  |    |		.BLANK	0000[0x6]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b       | +  |		.CONST	0x032b								; Address of begin
0329 0333       | 3  |		.CONST	0x0333								; Address of exception handler
032a 0001       |    |		.CONST	0x0001								; Number of locals
032b			BODY_0328:
032b			INIT_0328:
032b e247       | G  |		Load	0x1,0x47
032c e5fd       |    |		Load	0x2,-0x3
032d e5fe       |    |		Load	0x2,-0x2
032e e5ff       |    |		Load	0x2,-0x1
032f e246       | F  |		Load	0x1,0x46
0330 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
0331 c247       | G  |		Store	0x1,0x47
0332 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0333			TRAP_0328:
0333 e246       | F  |		Load	0x1,0x46
0334 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0335 010f       |    |		Execute	Exception,Equal
0336 6802       |h   |		Jump_Zero	0x339
0337 e225       | %  |		Load	0x1,0x25
0338 0257       | W  |		Execute	Discrete,Raise
0339 0100       |    |		Execute	Exception,Raise
033a 0000 0000  |    |		.BLANK	0000[0x6]
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0343       | C  |		.CONST	0x0343								; Address of begin
0341 0349       | I  |		.CONST	0x0349								; Address of exception handler
0342 0001       |    |		.CONST	0x0001								; Number of locals
0343			BODY_0340:
0343			INIT_0340:
0343 e247       | G  |		Load	0x1,0x47
0344 00db       |    |		Load_Top	At_Offset_3
0345 e246       | F  |		Load	0x1,0x46
0346 1841       | A  |		Execute	Package,Field_Execute,Field_Number 0x41
0347 c247       | G  |		Store	0x1,0x47
0348 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0349			TRAP_0340:
0349 e246       | F  |		Load	0x1,0x46
034a 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
034b 010f       |    |		Execute	Exception,Equal
034c 6802       |h   |		Jump_Zero	0x34f
034d e225       | %  |		Load	0x1,0x25
034e 0257       | W  |		Execute	Discrete,Raise
034f 0100       |    |		Execute	Exception,Raise
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 035f       | _  |		.CONST	0x035f								; Address of begin
0351 0377       | w  |		.CONST	0x0377								; Address of exception handler
0352 0007       |    |		.CONST	0x0007								; Number of locals
0353			INIT_0350:
0353 e246       | F  |		Load	0x1,0x46
0354 1942       | B  |		Execute	Package,Field_Reference,Field_Number 0x42
0355 00c6       |    |		Action	Check_Subprogram_Elaborated
0356 e5fc       |    |		Load	0x2,-0x4
0357 4ffd       |O   |		Short_Literal	-0x3
0358 4802       |H   |		Short_Literal	0x2
0359 0099       |    |		Action	Reference_Dynamic
035a e5fe       |    |		Load	0x2,-0x2
035b e035       | 5  |		Load	0x0,0x35
035c e036       | 6  |		Load	0x0,0x36
035d 4807       |H   |		Short_Literal	0x7
035e 0007       |    |		Action	Break_Optional
035f			BODY_0350:
035f e5fa       |    |		Load	0x2,-0x6
0360 00d8       |    |		Load_Top	At_Offset_0
0361 0120       |    |		Execute	Any,Is_Value
0362 6803       |h   |		Jump_Zero	0x366
0363 e402       |    |		Load	0x2,0x2
0364 011e       |    |		Execute	Any,Convert
0365 7802       |x   |		Jump	0x368
0366 e5fc       |    |		Load	0x2,-0x4
0367 0119       |    |		Execute	Any,Check_In_Formal_Type
0368 e247       | G  |		Load	0x1,0x47
0369 e5fb       |    |		Load	0x2,-0x5
036a e402       |    |		Load	0x2,0x2
036b 4803       |H   |		Short_Literal	0x3
036c 4802       |H   |		Short_Literal	0x2
036d 0099       |    |		Action	Reference_Dynamic
036e e404       |    |		Load	0x2,0x4
036f 4805       |H   |		Short_Literal	0x5
0370 4802       |H   |		Short_Literal	0x2
0371 0099       |    |		Action	Reference_Dynamic
0372 e246       | F  |		Load	0x1,0x46
0373 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
0374 c247       | G  |		Store	0x1,0x47
0375 c5fa       |    |		Store	0x2,-0x6
0376 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
0377			TRAP_0350:
0377 e246       | F  |		Load	0x1,0x46
0378 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0379 010f       |    |		Execute	Exception,Equal
037a 6802       |h   |		Jump_Zero	0x37d
037b e225       | %  |		Load	0x1,0x25
037c 0257       | W  |		Execute	Discrete,Raise
037d 0100       |    |		Execute	Exception,Raise
037e 0000 0000  |    |		.XXX[0x2]
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0390       |    |		.CONST	0x0390								; Address of begin
0381 03a3       |    |		.CONST	0x03a3								; Address of exception handler
0382 0008       |    |		.CONST	0x0008								; Number of locals
0383			INIT_0380:
0383 e246       | F  |		Load	0x1,0x46
0384 1944       | D  |		Execute	Package,Field_Reference,Field_Number 0x44
0385 00c6       |    |		Action	Check_Subprogram_Elaborated
0386 e5fb       |    |		Load	0x2,-0x5
0387 e5fc       |    |		Load	0x2,-0x4
0388 4ffd       |O   |		Short_Literal	-0x3
0389 4802       |H   |		Short_Literal	0x2
038a 0099       |    |		Action	Reference_Dynamic
038b e5fe       |    |		Load	0x2,-0x2
038c e037       | 7  |		Load	0x0,0x37
038d e038       | 8  |		Load	0x0,0x38
038e 4808       |H   |		Short_Literal	0x8
038f 0007       |    |		Action	Break_Optional
0390			BODY_0380:
0390 e5f9       |    |		Load	0x2,-0x7
0391 e5fc       |    |		Load	0x2,-0x4
0392 0119       |    |		Execute	Any,Check_In_Formal_Type
0393 e5fa       |    |		Load	0x2,-0x6
0394 e247       | G  |		Load	0x1,0x47
0395 e402       |    |		Load	0x2,0x2
0396 e403       |    |		Load	0x2,0x3
0397 4804       |H   |		Short_Literal	0x4
0398 4802       |H   |		Short_Literal	0x2
0399 0099       |    |		Action	Reference_Dynamic
039a e405       |    |		Load	0x2,0x5
039b 4806       |H   |		Short_Literal	0x6
039c 4802       |H   |		Short_Literal	0x2
039d 0099       |    |		Action	Reference_Dynamic
039e e246       | F  |		Load	0x1,0x46
039f 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
03a0 e5fb       |    |		Load	0x2,-0x5
03a1 011d       |    |		Execute	Any,Convert_To_Formal
03a2 4407       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x7
03a3			TRAP_0380:
03a3 e246       | F  |		Load	0x1,0x46
03a4 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
03a5 010f       |    |		Execute	Exception,Equal
03a6 6802       |h   |		Jump_Zero	0x3a9
03a7 e225       | %  |		Load	0x1,0x25
03a8 0257       | W  |		Execute	Discrete,Raise
03a9 0100       |    |		Execute	Exception,Raise
03aa 0000 0000  |    |		.BLANK	0000[0x6]
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; --------------------------------------------------------------------------------------
03b0 03c2       |    |		.CONST	0x03c2								; Address of begin
03b1 03df       |    |		.CONST	0x03df								; Address of exception handler
03b2 0008       |    |		.CONST	0x0008								; Number of locals
03b3			INIT_03b0:
03b3 e246       | F  |		Load	0x1,0x46
03b4 1945       | E  |		Execute	Package,Field_Reference,Field_Number 0x45
03b5 00c6       |    |		Action	Check_Subprogram_Elaborated
03b6 e5fb       |    |		Load	0x2,-0x5
03b7 e5fc       |    |		Load	0x2,-0x4
03b8 4ffd       |O   |		Short_Literal	-0x3
03b9 4802       |H   |		Short_Literal	0x2
03ba 0099       |    |		Action	Reference_Dynamic
03bb 4ffe       |O   |		Short_Literal	-0x2
03bc 4802       |H   |		Short_Literal	0x2
03bd 0099       |    |		Action	Reference_Dynamic
03be e039       | 9  |		Load	0x0,0x39
03bf e03a       | :  |		Load	0x0,0x3a
03c0 4808       |H   |		Short_Literal	0x8
03c1 0007       |    |		Action	Break_Optional
03c2			BODY_03b0:
03c2 e5f9       |    |		Load	0x2,-0x7
03c3 00d8       |    |		Load_Top	At_Offset_0
03c4 0120       |    |		Execute	Any,Is_Value
03c5 6803       |h   |		Jump_Zero	0x3c9
03c6 e403       |    |		Load	0x2,0x3
03c7 011e       |    |		Execute	Any,Convert
03c8 7802       |x   |		Jump	0x3cb
03c9 e5fc       |    |		Load	0x2,-0x4
03ca 0119       |    |		Execute	Any,Check_In_Formal_Type
03cb e247       | G  |		Load	0x1,0x47
03cc e5fa       |    |		Load	0x2,-0x6
03cd e5fb       |    |		Load	0x2,-0x5
03ce 0119       |    |		Execute	Any,Check_In_Formal_Type
03cf e402       |    |		Load	0x2,0x2
03d0 e403       |    |		Load	0x2,0x3
03d1 4804       |H   |		Short_Literal	0x4
03d2 4802       |H   |		Short_Literal	0x2
03d3 0099       |    |		Action	Reference_Dynamic
03d4 4805       |H   |		Short_Literal	0x5
03d5 4802       |H   |		Short_Literal	0x2
03d6 0099       |    |		Action	Reference_Dynamic
03d7 4806       |H   |		Short_Literal	0x6
03d8 4802       |H   |		Short_Literal	0x2
03d9 0099       |    |		Action	Reference_Dynamic
03da e246       | F  |		Load	0x1,0x46
03db 1845       | E  |		Execute	Package,Field_Execute,Field_Number 0x45
03dc c247       | G  |		Store	0x1,0x47
03dd c5f9       |    |		Store	0x2,-0x7
03de 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
03df			TRAP_03b0:
03df e246       | F  |		Load	0x1,0x46
03e0 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
03e1 010f       |    |		Execute	Exception,Equal
03e2 6802       |h   |		Jump_Zero	0x3e5
03e3 e225       | %  |		Load	0x1,0x25
03e4 0257       | W  |		Execute	Discrete,Raise
03e5 0100       |    |		Execute	Exception,Raise
03e6 0000 0000  |    |		.XXX[0x2]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb       |    |		.CONST	0x03eb								; Address of begin
03e9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ea 0001       |    |		.CONST	0x0001								; Number of locals
03eb			BODY_03e8:
03eb			INIT_03e8:
03eb e241       | A  |		Load	0x1,0x41
03ec 03bc       |    |		Declare_Variable	Access,By_Allocation
03ed 003b       | ;  |		Store_Top	Access,At_Offset_3
03ee e240       | @  |		Load	0x1,0x40
03ef 03bc       |    |		Declare_Variable	Access,By_Allocation
03f0 00db       |    |		Load_Top	At_Offset_3
03f1 0228       | (  |		Execute	Access,All_Write
03f2 00da       |    |		Load_Top	At_Offset_2
03f3 0229       | )  |		Execute	Access,All_Read
03f4 e246       | F  |		Load	0x1,0x46
03f5 1b46       | F  |		Execute	Package,Field_Read,Field_Number 0x46
03f6 00d9       |    |		Load_Top	At_Offset_1
03f7 0229       | )  |		Execute	Access,All_Read
03f8 00d1       |    |		Pop_Control	Pop_Count_1
03f9 e247       | G  |		Load	0x1,0x47
03fa e246       | F  |		Load	0x1,0x46
03fb 1847       | G  |		Execute	Package,Field_Execute,Field_Number 0x47
03fc 00d9       |    |		Load_Top	At_Offset_1
03fd 0228       | (  |		Execute	Access,All_Write
03fe 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03ff 0000       |    |		.XXX[0x1]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0403       |    |		.CONST	0x0403								; Address of begin
0401 0004       |    |		.CONST	0x0004								; Address of exception handler
0402 0001       |    |		.CONST	0x0001								; Number of locals
0403			BODY_0400:
0403			INIT_0400:
0403 00da       |    |		Load_Top	At_Offset_2
0404 0229       | )  |		Execute	Access,All_Read
0405 00d8       |    |		Load_Top	At_Offset_0
0406 0229       | )  |		Execute	Access,All_Read
0407 e246       | F  |		Load	0x1,0x46
0408 1848       | H  |		Execute	Package,Field_Execute,Field_Number 0x48
0409 00d9       |    |		Load_Top	At_Offset_1
040a 0228       | (  |		Execute	Access,All_Write
040b 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
040c 0000 0000  |    |		.BLANK	0000[0x4]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0413       |    |		.CONST	0x0413								; Address of begin
0411 0004       |    |		.CONST	0x0004								; Address of exception handler
0412 0001       |    |		.CONST	0x0001								; Number of locals
0413			BODY_0410:
0413			INIT_0410:
0413 00da       |    |		Load_Top	At_Offset_2
0414 0229       | )  |		Execute	Access,All_Read
0415 0229       | )  |		Execute	Access,All_Read
0416 e246       | F  |		Load	0x1,0x46
0417 1849       | I  |		Execute	Package,Field_Execute,Field_Number 0x49
0418 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0419 0000 0000  |    |		.BLANK	0000[0x7]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0423       | #  |		.CONST	0x0423								; Address of begin
0421 0004       |    |		.CONST	0x0004								; Address of exception handler
0422 0001       |    |		.CONST	0x0001								; Number of locals
0423			BODY_0420:
0423			INIT_0420:
0423 00da       |    |		Load_Top	At_Offset_2
0424 0229       | )  |		Execute	Access,All_Read
0425 0229       | )  |		Execute	Access,All_Read
0426 e246       | F  |		Load	0x1,0x46
0427 184a       | J  |		Execute	Package,Field_Execute,Field_Number 0x4a
0428 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0429 0000 0000  |    |		.BLANK	0000[0x7]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0433       | 3  |		.CONST	0x0433								; Address of begin
0431 0004       |    |		.CONST	0x0004								; Address of exception handler
0432 0001       |    |		.CONST	0x0001								; Number of locals
0433			BODY_0430:
0433			INIT_0430:
0433 e247       | G  |		Load	0x1,0x47
0434 e246       | F  |		Load	0x1,0x46
0435 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0436 c247       | G  |		Store	0x1,0x47
0437 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043b       | ;  |		.CONST	0x043b								; Address of begin
0439 0446       | F  |		.CONST	0x0446								; Address of exception handler
043a 0001       |    |		.CONST	0x0001								; Number of locals
043b			BODY_0438:
043b			INIT_0438:
043b e248       | H  |		Load	0x1,0x48
043c 00db       |    |		Load_Top	At_Offset_3
043d e247       | G  |		Load	0x1,0x47
043e e24c       | L  |		Load	0x1,0x4c
043f e24d       | M  |		Load	0x1,0x4d
0440 1d4e       | N  |		Execute_Immediate	Reference_Lex_1,0x4e
0441 e24f       | O  |		Load	0x1,0x4f
0442 1d50       | P  |		Execute_Immediate	Reference_Lex_1,0x50
0443 e246       | F  |		Load	0x1,0x46
0444 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
0445 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0446			TRAP_0438:
0446 e246       | F  |		Load	0x1,0x46
0447 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0448 010f       |    |		Execute	Exception,Equal
0449 6802       |h   |		Jump_Zero	0x44c
044a e225       | %  |		Load	0x1,0x25
044b 0257       | W  |		Execute	Discrete,Raise
044c 0100       |    |		Execute	Exception,Raise
044d 0000 0000  |    |		.XXX[0x3]
044f 0000       |    |
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 0453       | S  |		.CONST	0x0453								; Address of begin
0451 0004       |    |		.CONST	0x0004								; Address of exception handler
0452 0001       |    |		.CONST	0x0001								; Number of locals
0453			BODY_0450:
0453			INIT_0450:
0453 00da       |    |		Load_Top	At_Offset_2
0454 822d       | -  |		Call	0x1,0x2d
0455 803b       | ;  |		Call	0x0,0x3b
0456 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0457 0000       |    |		.XXX[0x1]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 045b       | [  |		.CONST	0x045b								; Address of begin
0459 0004       |    |		.CONST	0x0004								; Address of exception handler
045a 0001       |    |		.CONST	0x0001								; Number of locals
045b			BODY_0458:
045b			INIT_0458:
045b 00da       |    |		Load_Top	At_Offset_2
045c 8230       | 0  |		Call	0x1,0x30
045d e014       |    |		Load	0x0,0x14
045e 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
045f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 0463       | c  |		.CONST	0x0463								; Address of begin
0461 046e       | n  |		.CONST	0x046e								; Address of exception handler
0462 0001       |    |		.CONST	0x0001								; Number of locals
0463			BODY_0460:
0463			INIT_0460:
0463 e248       | H  |		Load	0x1,0x48
0464 00db       |    |		Load_Top	At_Offset_3
0465 e247       | G  |		Load	0x1,0x47
0466 e27c       | |  |		Load	0x1,0x7c
0467 e27d       | }  |		Load	0x1,0x7d
0468 1d7e       | ~  |		Execute_Immediate	Reference_Lex_1,0x7e
0469 e27f       |    |		Load	0x1,0x7f
046a 1d80       |    |		Execute_Immediate	Reference_Lex_1,0x80
046b e246       | F  |		Load	0x1,0x46
046c 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
046d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
046e			TRAP_0460:
046e e246       | F  |		Load	0x1,0x46
046f 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0470 010f       |    |		Execute	Exception,Equal
0471 6802       |h   |		Jump_Zero	0x474
0472 e225       | %  |		Load	0x1,0x25
0473 0257       | W  |		Execute	Discrete,Raise
0474 0100       |    |		Execute	Exception,Raise
0475 0000 0000  |    |		.XXX[0x3]
0477 0000       |    |
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047b       | {  |		.CONST	0x047b								; Address of begin
0479 0486       |    |		.CONST	0x0486								; Address of exception handler
047a 0001       |    |		.CONST	0x0001								; Number of locals
047b			BODY_0478:
047b			INIT_0478:
047b e248       | H  |		Load	0x1,0x48
047c 00db       |    |		Load_Top	At_Offset_3
047d e247       | G  |		Load	0x1,0x47
047e e254       | T  |		Load	0x1,0x54
047f e255       | U  |		Load	0x1,0x55
0480 1d56       | V  |		Execute_Immediate	Reference_Lex_1,0x56
0481 e257       | W  |		Load	0x1,0x57
0482 1d58       | X  |		Execute_Immediate	Reference_Lex_1,0x58
0483 e246       | F  |		Load	0x1,0x46
0484 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
0485 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0486			TRAP_0478:
0486 e246       | F  |		Load	0x1,0x46
0487 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0488 010f       |    |		Execute	Exception,Equal
0489 6802       |h   |		Jump_Zero	0x48c
048a e225       | %  |		Load	0x1,0x25
048b 0257       | W  |		Execute	Discrete,Raise
048c 0100       |    |		Execute	Exception,Raise
048d 0000 0000  |    |		.XXX[0x3]
048f 0000       |    |
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0493       |    |		.CONST	0x0493								; Address of begin
0491 049e       |    |		.CONST	0x049e								; Address of exception handler
0492 0001       |    |		.CONST	0x0001								; Number of locals
0493			BODY_0490:
0493			INIT_0490:
0493 e248       | H  |		Load	0x1,0x48
0494 00db       |    |		Load_Top	At_Offset_3
0495 e247       | G  |		Load	0x1,0x47
0496 e25c       | \  |		Load	0x1,0x5c
0497 e25d       | ]  |		Load	0x1,0x5d
0498 1d5e       | ^  |		Execute_Immediate	Reference_Lex_1,0x5e
0499 e25f       | _  |		Load	0x1,0x5f
049a 1d60       | `  |		Execute_Immediate	Reference_Lex_1,0x60
049b e246       | F  |		Load	0x1,0x46
049c 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
049d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
049e			TRAP_0490:
049e e246       | F  |		Load	0x1,0x46
049f 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
04a0 010f       |    |		Execute	Exception,Equal
04a1 6802       |h   |		Jump_Zero	0x4a4
04a2 e225       | %  |		Load	0x1,0x25
04a3 0257       | W  |		Execute	Discrete,Raise
04a4 0100       |    |		Execute	Exception,Raise
04a5 0000 0000  |    |		.XXX[0x3]
04a7 0000       |    |
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ab       |    |		.CONST	0x04ab								; Address of begin
04a9 04b6       |    |		.CONST	0x04b6								; Address of exception handler
04aa 0001       |    |		.CONST	0x0001								; Number of locals
04ab			BODY_04a8:
04ab			INIT_04a8:
04ab e248       | H  |		Load	0x1,0x48
04ac 00db       |    |		Load_Top	At_Offset_3
04ad e247       | G  |		Load	0x1,0x47
04ae e284       |    |		Load	0x1,0x84
04af e285       |    |		Load	0x1,0x85
04b0 1d86       |    |		Execute_Immediate	Reference_Lex_1,0x86
04b1 e287       |    |		Load	0x1,0x87
04b2 1d88       |    |		Execute_Immediate	Reference_Lex_1,0x88
04b3 e246       | F  |		Load	0x1,0x46
04b4 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
04b5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04b6			TRAP_04a8:
04b6 e246       | F  |		Load	0x1,0x46
04b7 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
04b8 010f       |    |		Execute	Exception,Equal
04b9 6802       |h   |		Jump_Zero	0x4bc
04ba e225       | %  |		Load	0x1,0x25
04bb 0257       | W  |		Execute	Discrete,Raise
04bc 0100       |    |		Execute	Exception,Raise
04bd 0000 0000  |    |		.XXX[0x3]
04bf 0000       |    |
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04c3       |    |		.CONST	0x04c3								; Address of begin
04c1 04ce       |    |		.CONST	0x04ce								; Address of exception handler
04c2 0001       |    |		.CONST	0x0001								; Number of locals
04c3			BODY_04c0:
04c3			INIT_04c0:
04c3 e248       | H  |		Load	0x1,0x48
04c4 00db       |    |		Load_Top	At_Offset_3
04c5 e247       | G  |		Load	0x1,0x47
04c6 e28c       |    |		Load	0x1,0x8c
04c7 e28d       |    |		Load	0x1,0x8d
04c8 1d8e       |    |		Execute_Immediate	Reference_Lex_1,0x8e
04c9 e28f       |    |		Load	0x1,0x8f
04ca 1d90       |    |		Execute_Immediate	Reference_Lex_1,0x90
04cb e246       | F  |		Load	0x1,0x46
04cc 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
04cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04ce			TRAP_04c0:
04ce e246       | F  |		Load	0x1,0x46
04cf 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
04d0 010f       |    |		Execute	Exception,Equal
04d1 6802       |h   |		Jump_Zero	0x4d4
04d2 e225       | %  |		Load	0x1,0x25
04d3 0257       | W  |		Execute	Discrete,Raise
04d4 0100       |    |		Execute	Exception,Raise
04d5 0000 0000  |    |		.XXX[0x3]
04d7 0000       |    |
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04db       |    |		.CONST	0x04db								; Address of begin
04d9 04e6       |    |		.CONST	0x04e6								; Address of exception handler
04da 0001       |    |		.CONST	0x0001								; Number of locals
04db			BODY_04d8:
04db			INIT_04d8:
04db e248       | H  |		Load	0x1,0x48
04dc 00db       |    |		Load_Top	At_Offset_3
04dd e247       | G  |		Load	0x1,0x47
04de e264       | d  |		Load	0x1,0x64
04df e265       | e  |		Load	0x1,0x65
04e0 1d66       | f  |		Execute_Immediate	Reference_Lex_1,0x66
04e1 e267       | g  |		Load	0x1,0x67
04e2 1d68       | h  |		Execute_Immediate	Reference_Lex_1,0x68
04e3 e246       | F  |		Load	0x1,0x46
04e4 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
04e5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04e6			TRAP_04d8:
04e6 e246       | F  |		Load	0x1,0x46
04e7 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
04e8 010f       |    |		Execute	Exception,Equal
04e9 6802       |h   |		Jump_Zero	0x4ec
04ea e225       | %  |		Load	0x1,0x25
04eb 0257       | W  |		Execute	Discrete,Raise
04ec 0100       |    |		Execute	Exception,Raise
04ed 0000 0000  |    |		.XXX[0x3]
04ef 0000       |    |
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f3       |    |		.CONST	0x04f3								; Address of begin
04f1 04fe       |    |		.CONST	0x04fe								; Address of exception handler
04f2 0001       |    |		.CONST	0x0001								; Number of locals
04f3			BODY_04f0:
04f3			INIT_04f0:
04f3 e248       | H  |		Load	0x1,0x48
04f4 00db       |    |		Load_Top	At_Offset_3
04f5 e247       | G  |		Load	0x1,0x47
04f6 e26c       | l  |		Load	0x1,0x6c
04f7 e26d       | m  |		Load	0x1,0x6d
04f8 1d6e       | n  |		Execute_Immediate	Reference_Lex_1,0x6e
04f9 e26f       | o  |		Load	0x1,0x6f
04fa 1d70       | p  |		Execute_Immediate	Reference_Lex_1,0x70
04fb e246       | F  |		Load	0x1,0x46
04fc 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
04fd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04fe			TRAP_04f0:
04fe e246       | F  |		Load	0x1,0x46
04ff 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0500 010f       |    |		Execute	Exception,Equal
0501 6802       |h   |		Jump_Zero	0x504
0502 e225       | %  |		Load	0x1,0x25
0503 0257       | W  |		Execute	Discrete,Raise
0504 0100       |    |		Execute	Exception,Raise
0505 0000 0000  |    |		.XXX[0x3]
0507 0000       |    |
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050b       |    |		.CONST	0x050b								; Address of begin
0509 0516       |    |		.CONST	0x0516								; Address of exception handler
050a 0001       |    |		.CONST	0x0001								; Number of locals
050b			BODY_0508:
050b			INIT_0508:
050b e248       | H  |		Load	0x1,0x48
050c 00db       |    |		Load_Top	At_Offset_3
050d e247       | G  |		Load	0x1,0x47
050e e274       | t  |		Load	0x1,0x74
050f e275       | u  |		Load	0x1,0x75
0510 1d76       | v  |		Execute_Immediate	Reference_Lex_1,0x76
0511 e277       | w  |		Load	0x1,0x77
0512 1d78       | x  |		Execute_Immediate	Reference_Lex_1,0x78
0513 e246       | F  |		Load	0x1,0x46
0514 1844       | D  |		Execute	Package,Field_Execute,Field_Number 0x44
0515 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0516			TRAP_0508:
0516 e246       | F  |		Load	0x1,0x46
0517 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0518 010f       |    |		Execute	Exception,Equal
0519 6802       |h   |		Jump_Zero	0x51c
051a e225       | %  |		Load	0x1,0x25
051b 0257       | W  |		Execute	Discrete,Raise
051c 0100       |    |		Execute	Exception,Raise
051d 0000 0000  |    |		.XXX[0x3]
051f 0000       |    |
0520 ; --------------------------------------------------------------------------------------
0520 ; SUBPROGRAM
0520 ; --------------------------------------------------------------------------------------
0520 0523       | #  |		.CONST	0x0523								; Address of begin
0521 0004       |    |		.CONST	0x0004								; Address of exception handler
0522 0001       |    |		.CONST	0x0001								; Number of locals
0523			BODY_0520:
0523			INIT_0520:
0523 e247       | G  |		Load	0x1,0x47
0524 4800       |H   |		Short_Literal	0x0
0525 e5fe       |    |		Load	0x2,-0x2
0526 e5ff       |    |		Load	0x2,-0x1
0527 e246       | F  |		Load	0x1,0x46
0528 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0529 c247       | G  |		Store	0x1,0x47
052a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
052b 0000 0000  |    |		.BLANK	0000[0x5]
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0537       | 7  |		.CONST	0x0537								; Address of begin
0531 0545       | E  |		.CONST	0x0545								; Address of exception handler
0532 0002       |    |		.CONST	0x0002								; Number of locals
0533			INIT_0530:
0533 e015       |    |		Load	0x0,0x15
0534 0322       | "  |		Declare_Variable	Record
0535 00d8       |    |		Load_Top	At_Offset_0
0536 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0537			BODY_0530:
0537 e5fe       |    |		Load	0x2,-0x2
0538 00d9       |    |		Load_Top	At_Offset_1
0539 017d       | }  |		Execute	Record,Structure_Write
053a 00d8       |    |		Load_Top	At_Offset_0
053b e247       | G  |		Load	0x1,0x47
053c e5ff       |    |		Load	0x2,-0x1
053d e29b       |    |		Load	0x1,0x9b
053e 1d9c       |    |		Execute_Immediate	Reference_Lex_1,0x9c
053f e29d       |    |		Load	0x1,0x9d
0540 1d9e       |    |		Execute_Immediate	Reference_Lex_1,0x9e
0541 e246       | F  |		Load	0x1,0x46
0542 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
0543 c247       | G  |		Store	0x1,0x47
0544 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0545			TRAP_0530:
0545 e246       | F  |		Load	0x1,0x46
0546 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0547 010f       |    |		Execute	Exception,Equal
0548 6802       |h   |		Jump_Zero	0x54b
0549 e225       | %  |		Load	0x1,0x25
054a 0257       | W  |		Execute	Discrete,Raise
054b 0100       |    |		Execute	Exception,Raise
054c 0000 0000  |    |		.BLANK	0000[0x4]
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 055b       | [  |		.CONST	0x055b								; Address of begin
0551 0566       | f  |		.CONST	0x0566								; Address of exception handler
0552 0002       |    |		.CONST	0x0002								; Number of locals
0553			INIT_0550:
0553 e249       | I  |		Load	0x1,0x49
0554 0322       | "  |		Declare_Variable	Record
0555 e5fe       |    |		Load	0x2,-0x2
0556 00d9       |    |		Load_Top	At_Offset_1
0557 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0558 e5fd       |    |		Load	0x2,-0x3
0559 00d9       |    |		Load_Top	At_Offset_1
055a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
055b			BODY_0550:
055b 00d8       |    |		Load_Top	At_Offset_0
055c e247       | G  |		Load	0x1,0x47
055d e5ff       |    |		Load	0x2,-0x1
055e e2a2       |    |		Load	0x1,0xa2
055f 1da3       |    |		Execute_Immediate	Reference_Lex_1,0xa3
0560 e2a4       |    |		Load	0x1,0xa4
0561 1da5       |    |		Execute_Immediate	Reference_Lex_1,0xa5
0562 e246       | F  |		Load	0x1,0x46
0563 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
0564 c247       | G  |		Store	0x1,0x47
0565 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0566			TRAP_0550:
0566 e246       | F  |		Load	0x1,0x46
0567 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0568 010f       |    |		Execute	Exception,Equal
0569 6802       |h   |		Jump_Zero	0x56c
056a e225       | %  |		Load	0x1,0x25
056b 0257       | W  |		Execute	Discrete,Raise
056c 0100       |    |		Execute	Exception,Raise
056d 0000 0000  |    |		.XXX[0x3]
056f 0000       |    |
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0579       | y  |		.CONST	0x0579								; Address of begin
0571 0585       |    |		.CONST	0x0585								; Address of exception handler
0572 0002       |    |		.CONST	0x0002								; Number of locals
0573			INIT_0570:
0573 00db       |    |		Load_Top	At_Offset_3
0574 e014       |    |		Load	0x0,0x14
0575 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0576 e014       |    |		Load	0x0,0x14
0577 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0578 03f1       |    |		Declare_Variable	Discrete,With_Value
0579			BODY_0570:
0579 00d8       |    |		Load_Top	At_Offset_0
057a e247       | G  |		Load	0x1,0x47
057b e5ff       |    |		Load	0x2,-0x1
057c e2b0       |    |		Load	0x1,0xb0
057d 1db1       |    |		Execute_Immediate	Reference_Lex_1,0xb1
057e e2b2       |    |		Load	0x1,0xb2
057f 1db3       |    |		Execute_Immediate	Reference_Lex_1,0xb3
0580 e246       | F  |		Load	0x1,0x46
0581 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
0582 c247       | G  |		Store	0x1,0x47
0583 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0584 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0585			TRAP_0570:
0585 e246       | F  |		Load	0x1,0x46
0586 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
0587 010f       |    |		Execute	Exception,Equal
0588 6802       |h   |		Jump_Zero	0x58b
0589 e225       | %  |		Load	0x1,0x25
058a 0257       | W  |		Execute	Discrete,Raise
058b 0100       |    |		Execute	Exception,Raise
058c 0000 0000  |    |		.BLANK	0000[0x4]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0597       |    |		.CONST	0x0597								; Address of begin
0591 05a3       |    |		.CONST	0x05a3								; Address of exception handler
0592 0002       |    |		.CONST	0x0002								; Number of locals
0593			INIT_0590:
0593 00db       |    |		Load_Top	At_Offset_3
0594 e014       |    |		Load	0x0,0x14
0595 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0596 03f1       |    |		Declare_Variable	Discrete,With_Value
0597			BODY_0590:
0597 00d8       |    |		Load_Top	At_Offset_0
0598 e247       | G  |		Load	0x1,0x47
0599 e5ff       |    |		Load	0x2,-0x1
059a e2b0       |    |		Load	0x1,0xb0
059b 1db1       |    |		Execute_Immediate	Reference_Lex_1,0xb1
059c e2b2       |    |		Load	0x1,0xb2
059d 1db3       |    |		Execute_Immediate	Reference_Lex_1,0xb3
059e e246       | F  |		Load	0x1,0x46
059f 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
05a0 c247       | G  |		Store	0x1,0x47
05a1 0059       | Y  |		Store_Top	Discrete,At_Offset_1
05a2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05a3			TRAP_0590:
05a3 e246       | F  |		Load	0x1,0x46
05a4 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
05a5 010f       |    |		Execute	Exception,Equal
05a6 6802       |h   |		Jump_Zero	0x5a9
05a7 e225       | %  |		Load	0x1,0x25
05a8 0257       | W  |		Execute	Discrete,Raise
05a9 0100       |    |		Execute	Exception,Raise
05aa 0000 0000  |    |		.BLANK	0000[0x6]
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05b7       |    |		.CONST	0x05b7								; Address of begin
05b1 05c3       |    |		.CONST	0x05c3								; Address of exception handler
05b2 0002       |    |		.CONST	0x0002								; Number of locals
05b3			INIT_05b0:
05b3 00db       |    |		Load_Top	At_Offset_3
05b4 e024       | $  |		Load	0x0,0x24
05b5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
05b6 03f1       |    |		Declare_Variable	Discrete,With_Value
05b7			BODY_05b0:
05b7 00d8       |    |		Load_Top	At_Offset_0
05b8 e247       | G  |		Load	0x1,0x47
05b9 e5ff       |    |		Load	0x2,-0x1
05ba e2b7       |    |		Load	0x1,0xb7
05bb 1db8       |    |		Execute_Immediate	Reference_Lex_1,0xb8
05bc e2b9       |    |		Load	0x1,0xb9
05bd 1dba       |    |		Execute_Immediate	Reference_Lex_1,0xba
05be e246       | F  |		Load	0x1,0x46
05bf 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
05c0 c247       | G  |		Store	0x1,0x47
05c1 0059       | Y  |		Store_Top	Discrete,At_Offset_1
05c2 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05c3			TRAP_05b0:
05c3 e246       | F  |		Load	0x1,0x46
05c4 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
05c5 010f       |    |		Execute	Exception,Equal
05c6 6802       |h   |		Jump_Zero	0x5c9
05c7 e225       | %  |		Load	0x1,0x25
05c8 0257       | W  |		Execute	Discrete,Raise
05c9 0100       |    |		Execute	Exception,Raise
05ca 0000 0000  |    |		.BLANK	0000[0x6]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d6       |    |		.CONST	0x05d6								; Address of begin
05d1 05e2       |    |		.CONST	0x05e2								; Address of exception handler
05d2 0002       |    |		.CONST	0x0002								; Number of locals
05d3			INIT_05d0:
05d3 00db       |    |		Load_Top	At_Offset_3
05d4 00e1       |    |		Load_Encached	Boolean_Cache
05d5 03f1       |    |		Declare_Variable	Discrete,With_Value
05d6			BODY_05d0:
05d6 00d8       |    |		Load_Top	At_Offset_0
05d7 e247       | G  |		Load	0x1,0x47
05d8 e5ff       |    |		Load	0x2,-0x1
05d9 e294       |    |		Load	0x1,0x94
05da 1d95       |    |		Execute_Immediate	Reference_Lex_1,0x95
05db e296       |    |		Load	0x1,0x96
05dc 1d97       |    |		Execute_Immediate	Reference_Lex_1,0x97
05dd e246       | F  |		Load	0x1,0x46
05de 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
05df c247       | G  |		Store	0x1,0x47
05e0 0059       | Y  |		Store_Top	Discrete,At_Offset_1
05e1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
05e2			TRAP_05d0:
05e2 e246       | F  |		Load	0x1,0x46
05e3 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
05e4 010f       |    |		Execute	Exception,Equal
05e5 6802       |h   |		Jump_Zero	0x5e8
05e6 e225       | %  |		Load	0x1,0x25
05e7 0257       | W  |		Execute	Discrete,Raise
05e8 0100       |    |		Execute	Exception,Raise
05e9 0000 0000  |    |		.BLANK	0000[0x7]
05f0 ; --------------------------------------------------------------------------------------
05f0 ; SUBPROGRAM
05f0 ; --------------------------------------------------------------------------------------
05f0 05fe       |    |		.CONST	0x05fe								; Address of begin
05f1 0609       |    |		.CONST	0x0609								; Address of exception handler
05f2 0002       |    |		.CONST	0x0002								; Number of locals
05f3			INIT_05f0:
05f3 e24a       | J  |		Load	0x1,0x4a
05f4 0322       | "  |		Declare_Variable	Record
05f5 e5fe       |    |		Load	0x2,-0x2
05f6 00d9       |    |		Load_Top	At_Offset_1
05f7 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
05f8 e5fd       |    |		Load	0x2,-0x3
05f9 00d9       |    |		Load_Top	At_Offset_1
05fa 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
05fb e5fc       |    |		Load	0x2,-0x4
05fc 00d9       |    |		Load_Top	At_Offset_1
05fd 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
05fe			BODY_05f0:
05fe 00d8       |    |		Load_Top	At_Offset_0
05ff e247       | G  |		Load	0x1,0x47
0600 e5ff       |    |		Load	0x2,-0x1
0601 e2a9       |    |		Load	0x1,0xa9
0602 1daa       |    |		Execute_Immediate	Reference_Lex_1,0xaa
0603 e2ab       |    |		Load	0x1,0xab
0604 1dac       |    |		Execute_Immediate	Reference_Lex_1,0xac
0605 e246       | F  |		Load	0x1,0x46
0606 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
0607 c247       | G  |		Store	0x1,0x47
0608 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0609			TRAP_05f0:
0609 e246       | F  |		Load	0x1,0x46
060a 1b43       | C  |		Execute	Package,Field_Read,Field_Number 0x43
060b 010f       |    |		Execute	Exception,Equal
060c 6802       |h   |		Jump_Zero	0x60f
060d e225       | %  |		Load	0x1,0x25
060e 0257       | W  |		Execute	Discrete,Raise
060f 0100       |    |		Execute	Exception,Raise
0610 ; --------------------------------------------------------------------------------------
0610 ; SUBPROGRAM
0610 ; --------------------------------------------------------------------------------------
0610 0613       |    |		.CONST	0x0613								; Address of begin
0611 0004       |    |		.CONST	0x0004								; Address of exception handler
0612 0001       |    |		.CONST	0x0001								; Number of locals
0613			BODY_0610:
0613			INIT_0610:
0613 00da       |    |		Load_Top	At_Offset_2
0614 e014       |    |		Load	0x0,0x14
0615 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0616 6806       |h   |		Jump_Zero	0x61d
0617 00da       |    |		Load_Top	At_Offset_2
0618 e014       |    |		Load	0x0,0x14
0619 1842       | B  |		Execute	Package,Field_Execute,Field_Number 0x42
061a 0f07       |    |		Execute_Immediate	Equal,0x7
061b 0f00       |    |		Execute_Immediate	Equal,0x0
061c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
061d 4800       |H   |		Short_Literal	0x0
061e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
061f 0000       |    |		.XXX[0x1]
0620 ; --------------------------------------------------------------------------------------
0620 ; SUBPROGRAM
0620 ; --------------------------------------------------------------------------------------
0620 0623       | #  |		.CONST	0x0623								; Address of begin
0621 0004       |    |		.CONST	0x0004								; Address of exception handler
0622 0001       |    |		.CONST	0x0001								; Number of locals
0623			BODY_0620:
0623			INIT_0620:
0623 00ea       |    |		Load_Encached	Null_String_Cache
0624 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0625 0000 0000  |    |		.XXX[0x3]
0627 0000       |    |
0628 ; --------------------------------------------------------------------------------------
0628 ; SUBPROGRAM
0628 ; --------------------------------------------------------------------------------------
0628 062b       | +  |		.CONST	0x062b								; Address of begin
0629 0004       |    |		.CONST	0x0004								; Address of exception handler
062a 0001       |    |		.CONST	0x0001								; Number of locals
062b			BODY_0628:
062b			INIT_0628:
062b 00da       |    |		Load_Top	At_Offset_2
062c e00f       |    |		Load	0x0,0xf
062d 011c       |    |		Execute	Any,Convert_Unchecked
062e 1c01       |    |		Execute_Immediate	Run_Utility,0x1
062f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 0633       | 3  |		.CONST	0x0633								; Address of begin
0631 0004       |    |		.CONST	0x0004								; Address of exception handler
0632 0001       |    |		.CONST	0x0001								; Number of locals
0633			BODY_0630:
0633			INIT_0630:
0633 00da       |    |		Load_Top	At_Offset_2
0634 e010       |    |		Load	0x0,0x10
0635 011c       |    |		Execute	Any,Convert_Unchecked
0636 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0637 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0638 ; --------------------------------------------------------------------------------------
0638 ; SUBPROGRAM
0638 ; --------------------------------------------------------------------------------------
0638 063b       | ;  |		.CONST	0x063b								; Address of begin
0639 0004       |    |		.CONST	0x0004								; Address of exception handler
063a 0001       |    |		.CONST	0x0001								; Number of locals
063b			BODY_0638:
063b			INIT_0638:
063b 00db       |    |		Load_Top	At_Offset_3
063c 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
063d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
063e 0000 0000  |    |		.XXX[0x2]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0643       | C  |		.CONST	0x0643								; Address of begin
0641 0004       |    |		.CONST	0x0004								; Address of exception handler
0642 0001       |    |		.CONST	0x0001								; Number of locals
0643			BODY_0640:
0643			INIT_0640:
0643 00db       |    |		Load_Top	At_Offset_3
0644 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0645 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0646 0000 0000  |    |		.XXX[0x2]
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 064b       | K  |		.CONST	0x064b								; Address of begin
0649 0004       |    |		.CONST	0x0004								; Address of exception handler
064a 0001       |    |		.CONST	0x0001								; Number of locals
064b			BODY_0648:
064b			INIT_0648:
064b 00db       |    |		Load_Top	At_Offset_3
064c 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
064d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
064e 0000 0000  |    |		.XXX[0x2]
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0653       | S  |		.CONST	0x0653								; Address of begin
0651 0004       |    |		.CONST	0x0004								; Address of exception handler
0652 0001       |    |		.CONST	0x0001								; Number of locals
0653			BODY_0650:
0653			INIT_0650:
0653 00db       |    |		Load_Top	At_Offset_3
0654 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0655 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0656 0000 0000  |    |		.XXX[0x2]
0658 ; --------------------------------------------------------------------------------------
0658 ; SUBPROGRAM
0658 ; --------------------------------------------------------------------------------------
0658 065b       | [  |		.CONST	0x065b								; Address of begin
0659 0004       |    |		.CONST	0x0004								; Address of exception handler
065a 0001       |    |		.CONST	0x0001								; Number of locals
065b			BODY_0658:
065b			INIT_0658:
065b 00db       |    |		Load_Top	At_Offset_3
065c 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
065d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
065e 0000 0000  |    |		.XXX[0x2]
0660 ; --------------------------------------------------------------------------------------
0660 ; SUBPROGRAM
0660 ; --------------------------------------------------------------------------------------
0660 0663       | c  |		.CONST	0x0663								; Address of begin
0661 0004       |    |		.CONST	0x0004								; Address of exception handler
0662 0001       |    |		.CONST	0x0001								; Number of locals
0663			BODY_0660:
0663			INIT_0660:
0663 00db       |    |		Load_Top	At_Offset_3
0664 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0665 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0666 0000 0000  |    |		.XXX[0x2]
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 066b       | k  |		.CONST	0x066b								; Address of begin
0669 0004       |    |		.CONST	0x0004								; Address of exception handler
066a 0001       |    |		.CONST	0x0001								; Number of locals
066b			BODY_0668:
066b			INIT_0668:
066b 00db       |    |		Load_Top	At_Offset_3
066c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
066d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
066e 0000 0000  |    |		.XXX[0x2]
0670 ; --------------------------------------------------------------------------------------
0670 ; SUBPROGRAM
0670 ; --------------------------------------------------------------------------------------
0670 0673       | s  |		.CONST	0x0673								; Address of begin
0671 0004       |    |		.CONST	0x0004								; Address of exception handler
0672 0001       |    |		.CONST	0x0001								; Number of locals
0673			BODY_0670:
0673			INIT_0670:
0673 00db       |    |		Load_Top	At_Offset_3
0674 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0675 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0676 0000 0000  |    |		.XXX[0x2]
0678 ; --------------------------------------------------------------------------------------
0678 ; SUBPROGRAM
0678 ; --------------------------------------------------------------------------------------
0678 067b       | {  |		.CONST	0x067b								; Address of begin
0679 0004       |    |		.CONST	0x0004								; Address of exception handler
067a 0001       |    |		.CONST	0x0001								; Number of locals
067b			BODY_0678:
067b			INIT_0678:
067b 00db       |    |		Load_Top	At_Offset_3
067c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
067d 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
067e 0000 0000  |    |		.XXX[0x2]
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 0683       |    |		.CONST	0x0683								; Address of begin
0681 0004       |    |		.CONST	0x0004								; Address of exception handler
0682 0001       |    |		.CONST	0x0001								; Number of locals
0683			BODY_0680:
0683			INIT_0680:
0683 e5fd       |    |		Load	0x2,-0x3
0684 e5fe       |    |		Load	0x2,-0x2
0685 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0686 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0687 0000       |    |		.XXX[0x1]
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 068b       |    |		.CONST	0x068b								; Address of begin
0689 0004       |    |		.CONST	0x0004								; Address of exception handler
068a 0001       |    |		.CONST	0x0001								; Number of locals
068b			BODY_0688:
068b			INIT_0688:
068b e5fd       |    |		Load	0x2,-0x3
068c e5fe       |    |		Load	0x2,-0x2
068d 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
068e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
068f 0000       |    |		.XXX[0x1]
0690 ; --------------------------------------------------------------------------------------
0690 ; SUBPROGRAM
0690 ; --------------------------------------------------------------------------------------
0690 0693       |    |		.CONST	0x0693								; Address of begin
0691 0004       |    |		.CONST	0x0004								; Address of exception handler
0692 0001       |    |		.CONST	0x0001								; Number of locals
0693			BODY_0690:
0693			INIT_0690:
0693 e5fd       |    |		Load	0x2,-0x3
0694 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0695 e5fe       |    |		Load	0x2,-0x2
0696 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0697 e5fd       |    |		Load	0x2,-0x3
0698 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0699 e5fe       |    |		Load	0x2,-0x2
069a 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
069b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
069c 0000 0000  |    |		.BLANK	0000[0x4]
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06a3       |    |		.CONST	0x06a3								; Address of begin
06a1 0004       |    |		.CONST	0x0004								; Address of exception handler
06a2 0001       |    |		.CONST	0x0001								; Number of locals
06a3			BODY_06a0:
06a3			INIT_06a0:
06a3 e5fd       |    |		Load	0x2,-0x3
06a4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
06a5 e5fe       |    |		Load	0x2,-0x2
06a6 3806       |8   |		Execute	Record,Field_Write,Field_Number 0x6
06a7 e5fd       |    |		Load	0x2,-0x3
06a8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
06a9 e5fe       |    |		Load	0x2,-0x2
06aa 3807       |8   |		Execute	Record,Field_Write,Field_Number 0x7
06ab e5fd       |    |		Load	0x2,-0x3
06ac 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06ad e5fe       |    |		Load	0x2,-0x2
06ae 3808       |8   |		Execute	Record,Field_Write,Field_Number 0x8
06af 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06b0 ; --------------------------------------------------------------------------------------
06b0 ; SUBPROGRAM
06b0 ; --------------------------------------------------------------------------------------
06b0 06b3       |    |		.CONST	0x06b3								; Address of begin
06b1 0004       |    |		.CONST	0x0004								; Address of exception handler
06b2 0001       |    |		.CONST	0x0001								; Number of locals
06b3			BODY_06b0:
06b3			INIT_06b0:
06b3 e5fd       |    |		Load	0x2,-0x3
06b4 e5fe       |    |		Load	0x2,-0x2
06b5 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
06b6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06b7 0000       |    |		.XXX[0x1]
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06bb       |    |		.CONST	0x06bb								; Address of begin
06b9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ba 0001       |    |		.CONST	0x0001								; Number of locals
06bb			BODY_06b8:
06bb			INIT_06b8:
06bb e5fd       |    |		Load	0x2,-0x3
06bc e5fe       |    |		Load	0x2,-0x2
06bd 3805       |8   |		Execute	Record,Field_Write,Field_Number 0x5
06be 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06bf 0000       |    |		.XXX[0x1]
06c0 ; --------------------------------------------------------------------------------------
06c0 ; Debug Table
06c0 ; --------------------------------------------------------------------------------------
06c0 0004 0006  |    |		.DEBUG4	0x0004,0x0006,0x9a94,0x0000,0x0001,0x0000
06c6 0600 0000  |    |		.XXX[0x14]
06c8 0500 2800  |  ( |
06ca 0000 0800  |    |
06cc 0002 0000  |    |
06ce 0011 0000  |    |
06d0 0000 0800  |    |
06d2 0000 5200  |  R |
06d4 0020 2181  |  ! |
06d6 7a00 0020  |z   |
06d8 2181 8000  |!   |
06da 0000 0000  |    |		.BLANK	0000[0x17]
06f1 0018 0009  |    |		.XXX[0x22]
06f3 79ea 0500  |y   |
06f5 82b2 0000  |    |
06f7 d88e d132  |   2|
06f9 0200 1000  |    |
06fb 07c0 0000  |    |
06fd 009a 1000  |    |
06ff 00c0 0000  |    |
0701 00a0 0500  |    |
0703 0000 0100  |    |
0705 0000 4000  |  @ |
0707 0002 2000  |    |
0709 0000 0100  |    |
070b 0000 0a40  |   @|
070d 0006 062a  |   *|
070f c040 0006  | @  |
0711 062a c100  | *  |
0713 0000 0000  |    |		.BLANK	0000[0x17]
072a 0003 0000  |    |		.XXX[0x28]
072c 18af 40a0  |  @ |
072e 1056 8000  | V  |
0730 1b11 db26  |   &|
0732 4040 0200  |@@  |
0734 0020 0000  |    |
0736 0018 1900  |    |
0738 0018 0000  |    |
073a 0024 00a0  | $  |
073c 0000 0020  |    |
073e 0000 0800  |    |
0740 0000 4400  |  D |
0742 0000 0020  |    |
0744 0000 0148  |   H|
0746 0000 8086  |    |
0748 0728 0000  | (  |
074a 8086 0b28  |   (|
074c 0000 8086  |    |
074e 0bc8 0000  |    |
0750 8086 0e40  |   @|
0752 0000 0000  |    |		.BLANK	0000[0x12]
0764 6000 25e7  |` % |		.XXX[0x27]
0766 c814 020a  |    |
0768 d800 0362  |   b|
076a 3b44 c808  |;D  |
076c 0040 0004  | @  |
076e 0000 0003  |    |
0770 0320 0003  |    |
0772 0000 0004  |    |
0774 8014 0000  |    |
0776 0004 0000  |    |
0778 0100 0000  |    |
077a 0880 0000  |    |
077c 0004 0000  |    |
077e 0029 0000  | )  |
0780 1818 ab1d  |    |
0782 0000 1818  |    |
0784 ab21 0000  | !  |
0786 1818 ab25  |   %|
0788 0000 1818  |    |
078a ab28       | (  |
078b 0000 0000  |    |		.BLANK	0000[0x12]
079d 0c00 002b  |   +|		.XXX[0x1f]
079f 1902 8041  |   A|
07a1 5c00 006c  |\  l|
07a3 476c 9901  |Gl  |
07a5 0008 0005  |    |
07a7 2000 0000  |    |
07a9 2f84 0000  |/   |
07ab 6000 0000  |`   |
07ad 3002 8000  |0   |
07af 0000 8000  |    |
07b1 0020 0000  |    |
07b3 0110 0000  |    |
07b5 0000 8000  |    |
07b7 0005 2000  |    |
07b9 0202 1895  |    |
07bb 8000       |    |
07bc 0000 0000  |    |		.BLANK	0000[0x1a]
07d6 0180 0097  |    |		.XXX[0x3]
07d8 9f80       |    |
07d9 0000 0000  |    |		.BLANK	0000[0x27]