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

⟦6176e54f3⟧

    Length: 18432 (0x4800)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c0fe

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 2210       |"   |		.CONST	0x2210								; 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 8015       |    |		.CONST	0x8015								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00c1       |    |		.CONST	0x00c1								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0010       |    |		.CONST	0x0010								; Number of locals
000b			INIT_0008:
000b 4800       |H   |		Short_Literal	0x0
000c 0093 00cb  |    |		push_full_address	INIT_00c8
000e 02a0       |    |		Declare_Subprogram	Null_Subprogram
000f 038f       |    |		Declare_Type	Package,Defined,Visible
0010 0386       |    |		Declare_Variable	Package,Visible
0011 00bf       |    |		Action	Accept_Activation
0012 4800       |H   |		Short_Literal	0x0
0013 0093 1b7b  |   {|		push_full_address	INIT_1b78
0015 02a0       |    |		Declare_Subprogram	Null_Subprogram
0016 038e       |    |		Declare_Type	Package,Defined
0017 0387       |    |		Declare_Variable	Package
0018 e002       |    |		Load	0x0,0x2
0019 4801       |H   |		Short_Literal	0x1
001a e20e       |    |		Load	0x1,0xe
001b 020e       |    |		Execute	Module,Augment_Imports
001c 00d8       |    |		Load_Top	At_Offset_0
001d 020f       |    |		Execute	Module,Activate
001e 4800       |H   |		Short_Literal	0x0
001f 0093 14c3  |    |		push_full_address	INIT_14c0
0021 02a0       |    |		Declare_Subprogram	Null_Subprogram
0022 038e       |    |		Declare_Type	Package,Defined
0023 0387       |    |		Declare_Variable	Package
0024 e003       |    |		Load	0x0,0x3
0025 a004       |    |		Store_Unchecked	0x0,0x4
0026 e005       |    |		Load	0x0,0x5
0027 e006       |    |		Load	0x0,0x6
0028 e002       |    |		Load	0x0,0x2
0029 e007       |    |		Load	0x0,0x7
002a 4806       |H   |		Short_Literal	0x6
002b e20f       |    |		Load	0x1,0xf
002c 020e       |    |		Execute	Module,Augment_Imports
002d 00d8       |    |		Load_Top	At_Offset_0
002e 020f       |    |		Execute	Module,Activate
002f 4800       |H   |		Short_Literal	0x0
0030 0093 147b  |   {|		push_full_address	INIT_1478
0032 02a0       |    |		Declare_Subprogram	Null_Subprogram
0033 038e       |    |		Declare_Type	Package,Defined
0034 0387       |    |		Declare_Variable	Package
0035 e20f       |    |		Load	0x1,0xf
0036 1916       |    |		Execute	Package,Field_Reference,Field_Number 0x16
0037 e20f       |    |		Load	0x1,0xf
0038 1918       |    |		Execute	Package,Field_Reference,Field_Number 0x18
0039 4802       |H   |		Short_Literal	0x2
003a e210       |    |		Load	0x1,0x10
003b 020e       |    |		Execute	Module,Augment_Imports
003c 00d8       |    |		Load_Top	At_Offset_0
003d 020f       |    |		Execute	Module,Activate
003e a008       |    |		Store_Unchecked	0x0,0x8
003f e009       |    |		Load	0x0,0x9
0040 e00a       |    |		Load	0x0,0xa
0041 e005       |    |		Load	0x0,0x5
0042 e00b       |    |		Load	0x0,0xb
0043 e00c       |    |		Load	0x0,0xc
0044 e00d       |    |		Load	0x0,0xd
0045 e00e       |    |		Load	0x0,0xe
0046 e00f       |    |		Load	0x0,0xf
0047 e010       |    |		Load	0x0,0x10
0048 e011       |    |		Load	0x0,0x11
0049 e012       |    |		Load	0x0,0x12
004a e013       |    |		Load	0x0,0x13
004b e014       |    |		Load	0x0,0x14
004c e015       |    |		Load	0x0,0x15
004d e016       |    |		Load	0x0,0x16
004e e017       |    |		Load	0x0,0x17
004f e018       |    |		Load	0x0,0x18
0050 e019       |    |		Load	0x0,0x19
0051 e01a       |    |		Load	0x0,0x1a
0052 e01b       |    |		Load	0x0,0x1b
0053 e01c       |    |		Load	0x0,0x1c
0054 e01d       |    |		Load	0x0,0x1d
0055 e01e       |    |		Load	0x0,0x1e
0056 e01f       |    |		Load	0x0,0x1f
0057 e020       |    |		Load	0x0,0x20
0058 e021       | !  |		Load	0x0,0x21
0059 e022       | "  |		Load	0x0,0x22
005a e023       | #  |		Load	0x0,0x23
005b e024       | $  |		Load	0x0,0x24
005c e025       | %  |		Load	0x0,0x25
005d e026       | &  |		Load	0x0,0x26
005e e027       | '  |		Load	0x0,0x27
005f e028       | (  |		Load	0x0,0x28
0060 e029       | )  |		Load	0x0,0x29
0061 e02a       | *  |		Load	0x0,0x2a
0062 e02b       | +  |		Load	0x0,0x2b
0063 e02c       | ,  |		Load	0x0,0x2c
0064 e02d       | -  |		Load	0x0,0x2d
0065 e02e       | .  |		Load	0x0,0x2e
0066 e02f       | /  |		Load	0x0,0x2f
0067 e030       | 0  |		Load	0x0,0x30
0068 e031       | 1  |		Load	0x0,0x31
0069 e032       | 2  |		Load	0x0,0x32
006a e033       | 3  |		Load	0x0,0x33
006b e034       | 4  |		Load	0x0,0x34
006c e035       | 5  |		Load	0x0,0x35
006d e036       | 6  |		Load	0x0,0x36
006e e037       | 7  |		Load	0x0,0x37
006f e038       | 8  |		Load	0x0,0x38
0070 e039       | 9  |		Load	0x0,0x39
0071 e03a       | :  |		Load	0x0,0x3a
0072 e03b       | ;  |		Load	0x0,0x3b
0073 e03c       | <  |		Load	0x0,0x3c
0074 e03d       | =  |		Load	0x0,0x3d
0075 e03e       | >  |		Load	0x0,0x3e
0076 e03f       | ?  |		Load	0x0,0x3f
0077 e040       | @  |		Load	0x0,0x40
0078 e041       | A  |		Load	0x0,0x41
0079 e042       | B  |		Load	0x0,0x42
007a e043       | C  |		Load	0x0,0x43
007b e044       | D  |		Load	0x0,0x44
007c e045       | E  |		Load	0x0,0x45
007d e046       | F  |		Load	0x0,0x46
007e e047       | G  |		Load	0x0,0x47
007f e048       | H  |		Load	0x0,0x48
0080 e049       | I  |		Load	0x0,0x49
0081 e04a       | J  |		Load	0x0,0x4a
0082 e04b       | K  |		Load	0x0,0x4b
0083 e04c       | L  |		Load	0x0,0x4c
0084 e20f       |    |		Load	0x1,0xf
0085 1918       |    |		Execute	Package,Field_Reference,Field_Number 0x18
0086 e04d       | M  |		Load	0x0,0x4d
0087 e04e       | N  |		Load	0x0,0x4e
0088 e20f       |    |		Load	0x1,0xf
0089 1916       |    |		Execute	Package,Field_Reference,Field_Number 0x16
008a e20f       |    |		Load	0x1,0xf
008b 1917       |    |		Execute	Package,Field_Reference,Field_Number 0x17
008c e210       |    |		Load	0x1,0x10
008d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
008e 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
008f e20f       |    |		Load	0x1,0xf
0090 190f       |    |		Execute	Package,Field_Reference,Field_Number 0xf
0091 e20f       |    |		Load	0x1,0xf
0092 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
0093 e20f       |    |		Load	0x1,0xf
0094 1912       |    |		Execute	Package,Field_Reference,Field_Number 0x12
0095 e04f       | O  |		Load	0x0,0x4f
0096 e210       |    |		Load	0x1,0x10
0097 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0098 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
0099 e20f       |    |		Load	0x1,0xf
009a 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
009b e050       | P  |		Load	0x0,0x50
009c a051       | Q  |		Store_Unchecked	0x0,0x51
009d a052       | R  |		Store_Unchecked	0x0,0x52
009e e20f       |    |		Load	0x1,0xf
009f 191a       |    |		Execute	Package,Field_Reference,Field_Number 0x1a
00a0 e053       | S  |		Load	0x0,0x53
00a1 e007       |    |		Load	0x0,0x7
00a2 e20f       |    |		Load	0x1,0xf
00a3 1911       |    |		Execute	Package,Field_Reference,Field_Number 0x11
00a4 a054       | T  |		Store_Unchecked	0x0,0x54
00a5 a055       | U  |		Store_Unchecked	0x0,0x55
00a6 e056       | V  |		Load	0x0,0x56
00a7 e057       | W  |		Load	0x0,0x57
00a8 e058       | X  |		Load	0x0,0x58
00a9 e20e       |    |		Load	0x1,0xe
00aa 190d       |    |		Execute	Package,Field_Reference,Field_Number 0xd
00ab e20e       |    |		Load	0x1,0xe
00ac 190e       |    |		Execute	Package,Field_Reference,Field_Number 0xe
00ad e20f       |    |		Load	0x1,0xf
00ae 1914       |    |		Execute	Package,Field_Reference,Field_Number 0x14
00af e20f       |    |		Load	0x1,0xf
00b0 1910       |    |		Execute	Package,Field_Reference,Field_Number 0x10
00b1 e20f       |    |		Load	0x1,0xf
00b2 1919       |    |		Execute	Package,Field_Reference,Field_Number 0x19
00b3 e20f       |    |		Load	0x1,0xf
00b4 1915       |    |		Execute	Package,Field_Reference,Field_Number 0x15
00b5 e210       |    |		Load	0x1,0x10
00b6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00b7 190f       |    |		Execute	Package,Field_Reference,Field_Number 0xf
00b8 e20f       |    |		Load	0x1,0xf
00b9 1913       |    |		Execute	Package,Field_Reference,Field_Number 0x13
00ba e059       | Y  |		Load	0x0,0x59
00bb e05a       | Z  |		Load	0x0,0x5a
00bc 4868       |Hh  |		Short_Literal	0x68
00bd e20d       |    |		Load	0x1,0xd
00be 020e       |    |		Execute	Module,Augment_Imports
00bf e20d       |    |		Load	0x1,0xd
00c0 020f       |    |		Execute	Module,Activate
00c1			BODY_0008:
00c1 4850       |HP  |		Short_Literal	0x50
00c2 e20d       |    |		Load	0x1,0xd
00c3 1a0d       |    |		Execute	Package,Field_Write,Field_Number 0xd
00c4 00bc       |    |		Action	Signal_Activated
00c5 00bb       |    |		Action	Signal_Completion
00c6 0000 0000  |    |		.XXX[0x2]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 0141       | A  |		.CONST	0x0141								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 000e       |    |		.CONST	0x000e								; Number of locals
00cb			INIT_00c8:
00cb 00e4       |    |		Load_Encached	Positive_Cache
00cc 0129       | )  |		Execute	Any,Make_Visible
00cd 4800       |H   |		Short_Literal	0x0
00ce 0093 014b  |   K|		push_full_address	INIT_0148
00d0 02a0       |    |		Declare_Subprogram	Null_Subprogram
00d1 038f       |    |		Declare_Type	Package,Defined,Visible
00d2 0386       |    |		Declare_Variable	Package,Visible
00d3 00bf       |    |		Action	Accept_Activation
00d4 a001       |    |		Store_Unchecked	0x0,0x1
00d5 e002       |    |		Load	0x0,0x2
00d6 e003       |    |		Load	0x0,0x3
00d7 e004       |    |		Load	0x0,0x4
00d8 e005       |    |		Load	0x0,0x5
00d9 e006       |    |		Load	0x0,0x6
00da e007       |    |		Load	0x0,0x7
00db e008       |    |		Load	0x0,0x8
00dc e009       |    |		Load	0x0,0x9
00dd e00a       |    |		Load	0x0,0xa
00de e00b       |    |		Load	0x0,0xb
00df e00c       |    |		Load	0x0,0xc
00e0 e00d       |    |		Load	0x0,0xd
00e1 e00e       |    |		Load	0x0,0xe
00e2 e00f       |    |		Load	0x0,0xf
00e3 e010       |    |		Load	0x0,0x10
00e4 e011       |    |		Load	0x0,0x11
00e5 e012       |    |		Load	0x0,0x12
00e6 e013       |    |		Load	0x0,0x13
00e7 e014       |    |		Load	0x0,0x14
00e8 e015       |    |		Load	0x0,0x15
00e9 e016       |    |		Load	0x0,0x16
00ea e017       |    |		Load	0x0,0x17
00eb e018       |    |		Load	0x0,0x18
00ec e019       |    |		Load	0x0,0x19
00ed e01a       |    |		Load	0x0,0x1a
00ee e01b       |    |		Load	0x0,0x1b
00ef e01c       |    |		Load	0x0,0x1c
00f0 e01d       |    |		Load	0x0,0x1d
00f1 e01e       |    |		Load	0x0,0x1e
00f2 e01f       |    |		Load	0x0,0x1f
00f3 e020       |    |		Load	0x0,0x20
00f4 e021       | !  |		Load	0x0,0x21
00f5 e022       | "  |		Load	0x0,0x22
00f6 e023       | #  |		Load	0x0,0x23
00f7 e024       | $  |		Load	0x0,0x24
00f8 e025       | %  |		Load	0x0,0x25
00f9 e026       | &  |		Load	0x0,0x26
00fa e027       | '  |		Load	0x0,0x27
00fb e028       | (  |		Load	0x0,0x28
00fc e029       | )  |		Load	0x0,0x29
00fd e02a       | *  |		Load	0x0,0x2a
00fe e02b       | +  |		Load	0x0,0x2b
00ff e02c       | ,  |		Load	0x0,0x2c
0100 e02d       | -  |		Load	0x0,0x2d
0101 e02e       | .  |		Load	0x0,0x2e
0102 e02f       | /  |		Load	0x0,0x2f
0103 e030       | 0  |		Load	0x0,0x30
0104 e031       | 1  |		Load	0x0,0x31
0105 e032       | 2  |		Load	0x0,0x32
0106 e033       | 3  |		Load	0x0,0x33
0107 e034       | 4  |		Load	0x0,0x34
0108 e035       | 5  |		Load	0x0,0x35
0109 e036       | 6  |		Load	0x0,0x36
010a e037       | 7  |		Load	0x0,0x37
010b e038       | 8  |		Load	0x0,0x38
010c e039       | 9  |		Load	0x0,0x39
010d e03a       | :  |		Load	0x0,0x3a
010e e03b       | ;  |		Load	0x0,0x3b
010f e03c       | <  |		Load	0x0,0x3c
0110 e03d       | =  |		Load	0x0,0x3d
0111 e03e       | >  |		Load	0x0,0x3e
0112 e03f       | ?  |		Load	0x0,0x3f
0113 e040       | @  |		Load	0x0,0x40
0114 e041       | A  |		Load	0x0,0x41
0115 e042       | B  |		Load	0x0,0x42
0116 e043       | C  |		Load	0x0,0x43
0117 e044       | D  |		Load	0x0,0x44
0118 e045       | E  |		Load	0x0,0x45
0119 e046       | F  |		Load	0x0,0x46
011a a047       | G  |		Store_Unchecked	0x0,0x47
011b e048       | H  |		Load	0x0,0x48
011c e049       | I  |		Load	0x0,0x49
011d a04a       | J  |		Store_Unchecked	0x0,0x4a
011e a04b       | K  |		Store_Unchecked	0x0,0x4b
011f a04c       | L  |		Store_Unchecked	0x0,0x4c
0120 a04d       | M  |		Store_Unchecked	0x0,0x4d
0121 a04e       | N  |		Store_Unchecked	0x0,0x4e
0122 a04f       | O  |		Store_Unchecked	0x0,0x4f
0123 e050       | P  |		Load	0x0,0x50
0124 a051       | Q  |		Store_Unchecked	0x0,0x51
0125 a052       | R  |		Store_Unchecked	0x0,0x52
0126 e053       | S  |		Load	0x0,0x53
0127 a054       | T  |		Store_Unchecked	0x0,0x54
0128 a055       | U  |		Store_Unchecked	0x0,0x55
0129 a056       | V  |		Store_Unchecked	0x0,0x56
012a e057       | W  |		Load	0x0,0x57
012b e058       | X  |		Load	0x0,0x58
012c a059       | Y  |		Store_Unchecked	0x0,0x59
012d a05a       | Z  |		Store_Unchecked	0x0,0x5a
012e a05b       | [  |		Store_Unchecked	0x0,0x5b
012f e05c       | \  |		Load	0x0,0x5c
0130 e05d       | ]  |		Load	0x0,0x5d
0131 e05e       | ^  |		Load	0x0,0x5e
0132 a05f       | _  |		Store_Unchecked	0x0,0x5f
0133 a060       | `  |		Store_Unchecked	0x0,0x60
0134 a061       | a  |		Store_Unchecked	0x0,0x61
0135 a062       | b  |		Store_Unchecked	0x0,0x62
0136 a063       | c  |		Store_Unchecked	0x0,0x63
0137 a064       | d  |		Store_Unchecked	0x0,0x64
0138 a065       | e  |		Store_Unchecked	0x0,0x65
0139 a066       | f  |		Store_Unchecked	0x0,0x66
013a e067       | g  |		Load	0x0,0x67
013b e068       | h  |		Load	0x0,0x68
013c 4868       |Hh  |		Short_Literal	0x68
013d e20e       |    |		Load	0x1,0xe
013e 020e       |    |		Execute	Module,Augment_Imports
013f 00d8       |    |		Load_Top	At_Offset_0
0140 020f       |    |		Execute	Module,Activate
0141			BODY_00c8:
0141 00bc       |    |		Action	Signal_Activated
0142 00bb       |    |		Action	Signal_Completion
0143 0000 0000  |    |		.BLANK	0000[0x5]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0400       |    |		.CONST	0x0400								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 00fb       |    |		.CONST	0x00fb								; Number of locals
014b			INIT_0148:
014b 029a 040b  |    |		Declare_Subprogram	INIT_0408,For_Outer_Call,Visible,Unelaborated
014d 00bf       |    |		Action	Accept_Activation
014e 029d 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Outer_Call
0150 029d 04bb  |    |		Declare_Subprogram	INIT_04b8,For_Outer_Call
0152 029d 04cb  |    |		Declare_Subprogram	INIT_04c8,For_Outer_Call
0154 029d 04d3  |    |		Declare_Subprogram	INIT_04d0,For_Outer_Call
0156 029d 04eb  |    |		Declare_Subprogram	INIT_04e8,For_Outer_Call
0158 029d 0503  |    |		Declare_Subprogram	INIT_0500,For_Outer_Call
015a 029d 0523  |   #|		Declare_Subprogram	INIT_0520,For_Outer_Call
015c 029d 0543  |   C|		Declare_Subprogram	INIT_0540,For_Outer_Call
015e 029d 0553  |   S|		Declare_Subprogram	INIT_0550,For_Outer_Call
0160 029d 057b  |   {|		Declare_Subprogram	INIT_0578,For_Outer_Call
0162 029d 0583  |    |		Declare_Subprogram	INIT_0580,For_Outer_Call
0164 029d 0593  |    |		Declare_Subprogram	INIT_0590,For_Outer_Call
0166 029d 05ab  |    |		Declare_Subprogram	INIT_05a8,For_Outer_Call
0168 029d 05c3  |    |		Declare_Subprogram	INIT_05c0,For_Outer_Call
016a 029d 05cb  |    |		Declare_Subprogram	INIT_05c8,For_Outer_Call
016c 029d 05d3  |    |		Declare_Subprogram	INIT_05d0,For_Outer_Call
016e 029d 05db  |    |		Declare_Subprogram	INIT_05d8,For_Outer_Call
0170 029d 05e3  |    |		Declare_Subprogram	INIT_05e0,For_Outer_Call
0172 029d 05eb  |    |		Declare_Subprogram	INIT_05e8,For_Outer_Call
0174 029d 0603  |    |		Declare_Subprogram	INIT_0600,For_Outer_Call
0176 029d 061b  |    |		Declare_Subprogram	INIT_0618,For_Outer_Call
0178 029d 062b  |   +|		Declare_Subprogram	INIT_0628,For_Outer_Call
017a 029d 064b  |   K|		Declare_Subprogram	INIT_0648,For_Outer_Call
017c 029d 065b  |   [|		Declare_Subprogram	INIT_0658,For_Outer_Call
017e 029d 067b  |   {|		Declare_Subprogram	INIT_0678,For_Outer_Call
0180 029d 069b  |    |		Declare_Subprogram	INIT_0698,For_Outer_Call
0182 029d 06ab  |    |		Declare_Subprogram	INIT_06a8,For_Outer_Call
0184 029d 06e3  |    |		Declare_Subprogram	INIT_06e0,For_Outer_Call
0186 029d 0713  |    |		Declare_Subprogram	INIT_0710,For_Outer_Call
0188 029d 071b  |    |		Declare_Subprogram	INIT_0718,For_Outer_Call
018a 029d 0723  |   #|		Declare_Subprogram	INIT_0720,For_Outer_Call
018c 029d 072b  |   +|		Declare_Subprogram	INIT_0728,For_Outer_Call
018e 029d 0733  |   3|		Declare_Subprogram	INIT_0730,For_Outer_Call
0190 029d 073b  |   ;|		Declare_Subprogram	INIT_0738,For_Outer_Call
0192 029d 0743  |   C|		Declare_Subprogram	INIT_0740,For_Outer_Call
0194 029d 075b  |   [|		Declare_Subprogram	INIT_0758,For_Outer_Call
0196 029d 0763  |   c|		Declare_Subprogram	INIT_0760,For_Outer_Call
0198 029d 076b  |   k|		Declare_Subprogram	INIT_0768,For_Outer_Call
019a 029d 0773  |   s|		Declare_Subprogram	INIT_0770,For_Outer_Call
019c 029d 077b  |   {|		Declare_Subprogram	INIT_0778,For_Outer_Call
019e 029d 07a3  |    |		Declare_Subprogram	INIT_07a0,For_Outer_Call
01a0 029d 07ab  |    |		Declare_Subprogram	INIT_07a8,For_Outer_Call
01a2 029d 07d3  |    |		Declare_Subprogram	INIT_07d0,For_Outer_Call
01a4 029d 07eb  |    |		Declare_Subprogram	INIT_07e8,For_Outer_Call
01a6 029d 07f3  |    |		Declare_Subprogram	INIT_07f0,For_Outer_Call
01a8 029d 07fb  |    |		Declare_Subprogram	INIT_07f8,For_Outer_Call
01aa 029d 0813  |    |		Declare_Subprogram	INIT_0810,For_Outer_Call
01ac 029d 0833  |   3|		Declare_Subprogram	INIT_0830,For_Outer_Call
01ae 029d 084b  |   K|		Declare_Subprogram	INIT_0848,For_Outer_Call
01b0 029d 0863  |   c|		Declare_Subprogram	INIT_0860,For_Outer_Call
01b2 029d 087b  |   {|		Declare_Subprogram	INIT_0878,For_Outer_Call
01b4 029d 08a3  |    |		Declare_Subprogram	INIT_08a0,For_Outer_Call
01b6 029d 08bb  |    |		Declare_Subprogram	INIT_08b8,For_Outer_Call
01b8 029d 08d3  |    |		Declare_Subprogram	INIT_08d0,For_Outer_Call
01ba 029d 08f3  |    |		Declare_Subprogram	INIT_08f0,For_Outer_Call
01bc 029d 090b  |    |		Declare_Subprogram	INIT_0908,For_Outer_Call
01be 029d 094b  |   K|		Declare_Subprogram	INIT_0948,For_Outer_Call
01c0 029d 096b  |   k|		Declare_Subprogram	INIT_0968,For_Outer_Call
01c2 029d 097b  |   {|		Declare_Subprogram	INIT_0978,For_Outer_Call
01c4 029d 0983  |    |		Declare_Subprogram	INIT_0980,For_Outer_Call
01c6 029d 09bb  |    |		Declare_Subprogram	INIT_09b8,For_Outer_Call
01c8 029d 09cb  |    |		Declare_Subprogram	INIT_09c8,For_Outer_Call
01ca 029d 09eb  |    |		Declare_Subprogram	INIT_09e8,For_Outer_Call
01cc 029d 0a0b  |    |		Declare_Subprogram	INIT_0a08,For_Outer_Call
01ce 029d 0a1b  |    |		Declare_Subprogram	INIT_0a18,For_Outer_Call
01d0 029d 0a33  |   3|		Declare_Subprogram	INIT_0a30,For_Outer_Call
01d2 029d 0a43  |   C|		Declare_Subprogram	INIT_0a40,For_Outer_Call
01d4 029d 0a7b  |   {|		Declare_Subprogram	INIT_0a78,For_Outer_Call
01d6 029d 0a8b  |    |		Declare_Subprogram	INIT_0a88,For_Outer_Call
01d8 029d 0a93  |    |		Declare_Subprogram	INIT_0a90,For_Outer_Call
01da 029d 0a9b  |    |		Declare_Subprogram	INIT_0a98,For_Outer_Call
01dc 029d 0ab3  |    |		Declare_Subprogram	INIT_0ab0,For_Outer_Call
01de 029d 0acb  |    |		Declare_Subprogram	INIT_0ac8,For_Outer_Call
01e0 029d 0ae3  |    |		Declare_Subprogram	INIT_0ae0,For_Outer_Call
01e2 029d 0b03  |    |		Declare_Subprogram	INIT_0b00,For_Outer_Call
01e4 029d 0b23  |   #|		Declare_Subprogram	INIT_0b20,For_Outer_Call
01e6 029d 0b2b  |   +|		Declare_Subprogram	INIT_0b28,For_Outer_Call
01e8 029d 0b6b  |   k|		Declare_Subprogram	INIT_0b68,For_Outer_Call
01ea 029d 0b8b  |    |		Declare_Subprogram	INIT_0b88,For_Outer_Call
01ec 029d 0bbb  |    |		Declare_Subprogram	INIT_0bb8,For_Outer_Call
01ee a001       |    |		Store_Unchecked	0x0,0x1
01ef 00c6       |    |		Action	Check_Subprogram_Elaborated
01f0 e002       |    |		Load	0x0,0x2
01f1 e003       |    |		Load	0x0,0x3
01f2 0093 0000  |    |		push_full_address	0x0
01f4 62af       |b   |		Indirect_Literal	Discrete,0x4a4,{0x80000000, 0x00210000}
01f5 0273       | s  |		Execute	Discrete,Plus
01f6 e004       |    |		Load	0x0,0x4
01f7 0273       | s  |		Execute	Discrete,Plus
01f8 e005       |    |		Load	0x0,0x5
01f9 0273       | s  |		Execute	Discrete,Plus
01fa 4800       |H   |		Short_Literal	0x0
01fb 0007       |    |		Action	Break_Optional
01fc a001       |    |		Store_Unchecked	0x0,0x1
01fd 00c6       |    |		Action	Check_Subprogram_Elaborated
01fe e002       |    |		Load	0x0,0x2
01ff e006       |    |		Load	0x0,0x6
0200 0093 0000  |    |		push_full_address	0x0
0202 629d       |b   |		Indirect_Literal	Discrete,0x4a0,{0x80000000, 0x00200000}
0203 0273       | s  |		Execute	Discrete,Plus
0204 e004       |    |		Load	0x0,0x4
0205 0273       | s  |		Execute	Discrete,Plus
0206 e007       |    |		Load	0x0,0x7
0207 0273       | s  |		Execute	Discrete,Plus
0208 4800       |H   |		Short_Literal	0x0
0209 0007       |    |		Action	Break_Optional
020a a001       |    |		Store_Unchecked	0x0,0x1
020b 00c6       |    |		Action	Check_Subprogram_Elaborated
020c e002       |    |		Load	0x0,0x2
020d e008       |    |		Load	0x0,0x8
020e 0093 0000  |    |		push_full_address	0x0
0210 628b       |b   |		Indirect_Literal	Discrete,0x49c,{0x80000000, 0x001f0000}
0211 0273       | s  |		Execute	Discrete,Plus
0212 e004       |    |		Load	0x0,0x4
0213 0273       | s  |		Execute	Discrete,Plus
0214 e009       |    |		Load	0x0,0x9
0215 0273       | s  |		Execute	Discrete,Plus
0216 4800       |H   |		Short_Literal	0x0
0217 0007       |    |		Action	Break_Optional
0218 a001       |    |		Store_Unchecked	0x0,0x1
0219 00c6       |    |		Action	Check_Subprogram_Elaborated
021a e002       |    |		Load	0x0,0x2
021b e00a       |    |		Load	0x0,0xa
021c 0093 0000  |    |		push_full_address	0x0
021e 6279       |by  |		Indirect_Literal	Discrete,0x498,{0x80000000, 0x001e0000}
021f 0273       | s  |		Execute	Discrete,Plus
0220 e004       |    |		Load	0x0,0x4
0221 0273       | s  |		Execute	Discrete,Plus
0222 e00b       |    |		Load	0x0,0xb
0223 0273       | s  |		Execute	Discrete,Plus
0224 4800       |H   |		Short_Literal	0x0
0225 0007       |    |		Action	Break_Optional
0226 a001       |    |		Store_Unchecked	0x0,0x1
0227 00c6       |    |		Action	Check_Subprogram_Elaborated
0228 e002       |    |		Load	0x0,0x2
0229 e00c       |    |		Load	0x0,0xc
022a 0093 0000  |    |		push_full_address	0x0
022c 6267       |bg  |		Indirect_Literal	Discrete,0x494,{0x80000000, 0x001d0000}
022d 0273       | s  |		Execute	Discrete,Plus
022e e004       |    |		Load	0x0,0x4
022f 0273       | s  |		Execute	Discrete,Plus
0230 e00d       |    |		Load	0x0,0xd
0231 0273       | s  |		Execute	Discrete,Plus
0232 4800       |H   |		Short_Literal	0x0
0233 0007       |    |		Action	Break_Optional
0234 a001       |    |		Store_Unchecked	0x0,0x1
0235 00c6       |    |		Action	Check_Subprogram_Elaborated
0236 e002       |    |		Load	0x0,0x2
0237 e00e       |    |		Load	0x0,0xe
0238 0093 0000  |    |		push_full_address	0x0
023a 6255       |bU  |		Indirect_Literal	Discrete,0x490,{0x80000000, 0x001c0000}
023b 0273       | s  |		Execute	Discrete,Plus
023c e004       |    |		Load	0x0,0x4
023d 0273       | s  |		Execute	Discrete,Plus
023e e00f       |    |		Load	0x0,0xf
023f 0273       | s  |		Execute	Discrete,Plus
0240 4800       |H   |		Short_Literal	0x0
0241 0007       |    |		Action	Break_Optional
0242 a001       |    |		Store_Unchecked	0x0,0x1
0243 00c6       |    |		Action	Check_Subprogram_Elaborated
0244 e002       |    |		Load	0x0,0x2
0245 e010       |    |		Load	0x0,0x10
0246 0093 0000  |    |		push_full_address	0x0
0248 6243       |bC  |		Indirect_Literal	Discrete,0x48c,{0x80000000, 0x001b0000}
0249 0273       | s  |		Execute	Discrete,Plus
024a e004       |    |		Load	0x0,0x4
024b 0273       | s  |		Execute	Discrete,Plus
024c e011       |    |		Load	0x0,0x11
024d 0273       | s  |		Execute	Discrete,Plus
024e 4800       |H   |		Short_Literal	0x0
024f 0007       |    |		Action	Break_Optional
0250 a001       |    |		Store_Unchecked	0x0,0x1
0251 00c6       |    |		Action	Check_Subprogram_Elaborated
0252 e002       |    |		Load	0x0,0x2
0253 e012       |    |		Load	0x0,0x12
0254 0093 0000  |    |		push_full_address	0x0
0256 6231       |b1  |		Indirect_Literal	Discrete,0x488,{0x80000000, 0x001a0000}
0257 0273       | s  |		Execute	Discrete,Plus
0258 e004       |    |		Load	0x0,0x4
0259 0273       | s  |		Execute	Discrete,Plus
025a e013       |    |		Load	0x0,0x13
025b 0273       | s  |		Execute	Discrete,Plus
025c 4800       |H   |		Short_Literal	0x0
025d 0007       |    |		Action	Break_Optional
025e a001       |    |		Store_Unchecked	0x0,0x1
025f 00c6       |    |		Action	Check_Subprogram_Elaborated
0260 e002       |    |		Load	0x0,0x2
0261 e014       |    |		Load	0x0,0x14
0262 0093 0000  |    |		push_full_address	0x0
0264 621f       |b   |		Indirect_Literal	Discrete,0x484,{0x80000000, 0x00190000}
0265 0273       | s  |		Execute	Discrete,Plus
0266 e004       |    |		Load	0x0,0x4
0267 0273       | s  |		Execute	Discrete,Plus
0268 e015       |    |		Load	0x0,0x15
0269 0273       | s  |		Execute	Discrete,Plus
026a 4800       |H   |		Short_Literal	0x0
026b 0007       |    |		Action	Break_Optional
026c a001       |    |		Store_Unchecked	0x0,0x1
026d 00c6       |    |		Action	Check_Subprogram_Elaborated
026e e002       |    |		Load	0x0,0x2
026f e016       |    |		Load	0x0,0x16
0270 0093 0000  |    |		push_full_address	0x0
0272 620d       |b   |		Indirect_Literal	Discrete,0x480,{0x80000000, 0x00180000}
0273 0273       | s  |		Execute	Discrete,Plus
0274 e004       |    |		Load	0x0,0x4
0275 0273       | s  |		Execute	Discrete,Plus
0276 e017       |    |		Load	0x0,0x17
0277 0273       | s  |		Execute	Discrete,Plus
0278 4800       |H   |		Short_Literal	0x0
0279 0007       |    |		Action	Break_Optional
027a a001       |    |		Store_Unchecked	0x0,0x1
027b 00c6       |    |		Action	Check_Subprogram_Elaborated
027c e002       |    |		Load	0x0,0x2
027d e018       |    |		Load	0x0,0x18
027e 0093 0000  |    |		push_full_address	0x0
0280 61fb       |a   |		Indirect_Literal	Discrete,0x47c,{0x80000000, 0x00170000}
0281 0273       | s  |		Execute	Discrete,Plus
0282 e004       |    |		Load	0x0,0x4
0283 0273       | s  |		Execute	Discrete,Plus
0284 e019       |    |		Load	0x0,0x19
0285 0273       | s  |		Execute	Discrete,Plus
0286 4800       |H   |		Short_Literal	0x0
0287 0007       |    |		Action	Break_Optional
0288 a001       |    |		Store_Unchecked	0x0,0x1
0289 00c6       |    |		Action	Check_Subprogram_Elaborated
028a e002       |    |		Load	0x0,0x2
028b e01a       |    |		Load	0x0,0x1a
028c 0093 0000  |    |		push_full_address	0x0
028e 61e9       |a   |		Indirect_Literal	Discrete,0x478,{0x80000000, 0x00160000}
028f 0273       | s  |		Execute	Discrete,Plus
0290 e004       |    |		Load	0x0,0x4
0291 0273       | s  |		Execute	Discrete,Plus
0292 e01b       |    |		Load	0x0,0x1b
0293 0273       | s  |		Execute	Discrete,Plus
0294 4800       |H   |		Short_Literal	0x0
0295 0007       |    |		Action	Break_Optional
0296 a001       |    |		Store_Unchecked	0x0,0x1
0297 00c6       |    |		Action	Check_Subprogram_Elaborated
0298 e002       |    |		Load	0x0,0x2
0299 e01c       |    |		Load	0x0,0x1c
029a 0093 0000  |    |		push_full_address	0x0
029c 61d7       |a   |		Indirect_Literal	Discrete,0x474,{0x80000000, 0x00150000}
029d 0273       | s  |		Execute	Discrete,Plus
029e e004       |    |		Load	0x0,0x4
029f 0273       | s  |		Execute	Discrete,Plus
02a0 e01d       |    |		Load	0x0,0x1d
02a1 0273       | s  |		Execute	Discrete,Plus
02a2 4800       |H   |		Short_Literal	0x0
02a3 0007       |    |		Action	Break_Optional
02a4 a001       |    |		Store_Unchecked	0x0,0x1
02a5 00c6       |    |		Action	Check_Subprogram_Elaborated
02a6 e002       |    |		Load	0x0,0x2
02a7 e01e       |    |		Load	0x0,0x1e
02a8 0093 0000  |    |		push_full_address	0x0
02aa 61c5       |a   |		Indirect_Literal	Discrete,0x470,{0x80000000, 0x00140000}
02ab 0273       | s  |		Execute	Discrete,Plus
02ac e004       |    |		Load	0x0,0x4
02ad 0273       | s  |		Execute	Discrete,Plus
02ae e01f       |    |		Load	0x0,0x1f
02af 0273       | s  |		Execute	Discrete,Plus
02b0 4800       |H   |		Short_Literal	0x0
02b1 0007       |    |		Action	Break_Optional
02b2 a001       |    |		Store_Unchecked	0x0,0x1
02b3 00c6       |    |		Action	Check_Subprogram_Elaborated
02b4 e002       |    |		Load	0x0,0x2
02b5 e020       |    |		Load	0x0,0x20
02b6 0093 0000  |    |		push_full_address	0x0
02b8 61b3       |a   |		Indirect_Literal	Discrete,0x46c,{0x80000000, 0x00130000}
02b9 0273       | s  |		Execute	Discrete,Plus
02ba e004       |    |		Load	0x0,0x4
02bb 0273       | s  |		Execute	Discrete,Plus
02bc e021       | !  |		Load	0x0,0x21
02bd 0273       | s  |		Execute	Discrete,Plus
02be 4800       |H   |		Short_Literal	0x0
02bf 0007       |    |		Action	Break_Optional
02c0 a001       |    |		Store_Unchecked	0x0,0x1
02c1 00c6       |    |		Action	Check_Subprogram_Elaborated
02c2 e002       |    |		Load	0x0,0x2
02c3 e022       | "  |		Load	0x0,0x22
02c4 0093 0000  |    |		push_full_address	0x0
02c6 61a1       |a   |		Indirect_Literal	Discrete,0x468,{0x80000000, 0x00120000}
02c7 0273       | s  |		Execute	Discrete,Plus
02c8 e004       |    |		Load	0x0,0x4
02c9 0273       | s  |		Execute	Discrete,Plus
02ca e023       | #  |		Load	0x0,0x23
02cb 0273       | s  |		Execute	Discrete,Plus
02cc 4800       |H   |		Short_Literal	0x0
02cd 0007       |    |		Action	Break_Optional
02ce a001       |    |		Store_Unchecked	0x0,0x1
02cf 00c6       |    |		Action	Check_Subprogram_Elaborated
02d0 e002       |    |		Load	0x0,0x2
02d1 e024       | $  |		Load	0x0,0x24
02d2 0093 0000  |    |		push_full_address	0x0
02d4 618f       |a   |		Indirect_Literal	Discrete,0x464,{0x80000000, 0x00110000}
02d5 0273       | s  |		Execute	Discrete,Plus
02d6 e004       |    |		Load	0x0,0x4
02d7 0273       | s  |		Execute	Discrete,Plus
02d8 e025       | %  |		Load	0x0,0x25
02d9 0273       | s  |		Execute	Discrete,Plus
02da 4800       |H   |		Short_Literal	0x0
02db 0007       |    |		Action	Break_Optional
02dc a001       |    |		Store_Unchecked	0x0,0x1
02dd 00c6       |    |		Action	Check_Subprogram_Elaborated
02de e002       |    |		Load	0x0,0x2
02df e026       | &  |		Load	0x0,0x26
02e0 0093 0000  |    |		push_full_address	0x0
02e2 617d       |a}  |		Indirect_Literal	Discrete,0x460,{0x80000000, 0x00100000}
02e3 0273       | s  |		Execute	Discrete,Plus
02e4 e004       |    |		Load	0x0,0x4
02e5 0273       | s  |		Execute	Discrete,Plus
02e6 e027       | '  |		Load	0x0,0x27
02e7 0273       | s  |		Execute	Discrete,Plus
02e8 4800       |H   |		Short_Literal	0x0
02e9 0007       |    |		Action	Break_Optional
02ea a001       |    |		Store_Unchecked	0x0,0x1
02eb 00c6       |    |		Action	Check_Subprogram_Elaborated
02ec e002       |    |		Load	0x0,0x2
02ed e028       | (  |		Load	0x0,0x28
02ee 0093 0000  |    |		push_full_address	0x0
02f0 616b       |ak  |		Indirect_Literal	Discrete,0x45c,{0x80000000, 0x000f0000}
02f1 0273       | s  |		Execute	Discrete,Plus
02f2 e004       |    |		Load	0x0,0x4
02f3 0273       | s  |		Execute	Discrete,Plus
02f4 e029       | )  |		Load	0x0,0x29
02f5 0273       | s  |		Execute	Discrete,Plus
02f6 4800       |H   |		Short_Literal	0x0
02f7 0007       |    |		Action	Break_Optional
02f8 a001       |    |		Store_Unchecked	0x0,0x1
02f9 00c6       |    |		Action	Check_Subprogram_Elaborated
02fa e002       |    |		Load	0x0,0x2
02fb e02a       | *  |		Load	0x0,0x2a
02fc 0093 0000  |    |		push_full_address	0x0
02fe 6159       |aY  |		Indirect_Literal	Discrete,0x458,{0x80000000, 0x000e0000}
02ff 0273       | s  |		Execute	Discrete,Plus
0300 e004       |    |		Load	0x0,0x4
0301 0273       | s  |		Execute	Discrete,Plus
0302 e02b       | +  |		Load	0x0,0x2b
0303 0273       | s  |		Execute	Discrete,Plus
0304 4800       |H   |		Short_Literal	0x0
0305 0007       |    |		Action	Break_Optional
0306 a001       |    |		Store_Unchecked	0x0,0x1
0307 00c6       |    |		Action	Check_Subprogram_Elaborated
0308 e002       |    |		Load	0x0,0x2
0309 e02c       | ,  |		Load	0x0,0x2c
030a 0093 0000  |    |		push_full_address	0x0
030c 6147       |aG  |		Indirect_Literal	Discrete,0x454,{0x80000000, 0x000d0000}
030d 0273       | s  |		Execute	Discrete,Plus
030e e004       |    |		Load	0x0,0x4
030f 0273       | s  |		Execute	Discrete,Plus
0310 e02d       | -  |		Load	0x0,0x2d
0311 0273       | s  |		Execute	Discrete,Plus
0312 4800       |H   |		Short_Literal	0x0
0313 0007       |    |		Action	Break_Optional
0314 a001       |    |		Store_Unchecked	0x0,0x1
0315 00c6       |    |		Action	Check_Subprogram_Elaborated
0316 e002       |    |		Load	0x0,0x2
0317 e02e       | .  |		Load	0x0,0x2e
0318 0093 0000  |    |		push_full_address	0x0
031a 6135       |a5  |		Indirect_Literal	Discrete,0x450,{0x80000000, 0x000c0000}
031b 0273       | s  |		Execute	Discrete,Plus
031c e004       |    |		Load	0x0,0x4
031d 0273       | s  |		Execute	Discrete,Plus
031e e02f       | /  |		Load	0x0,0x2f
031f 0273       | s  |		Execute	Discrete,Plus
0320 4800       |H   |		Short_Literal	0x0
0321 0007       |    |		Action	Break_Optional
0322 a001       |    |		Store_Unchecked	0x0,0x1
0323 00c6       |    |		Action	Check_Subprogram_Elaborated
0324 e002       |    |		Load	0x0,0x2
0325 e030       | 0  |		Load	0x0,0x30
0326 0093 0000  |    |		push_full_address	0x0
0328 6123       |a#  |		Indirect_Literal	Discrete,0x44c,{0x80000000, 0x000b0000}
0329 0273       | s  |		Execute	Discrete,Plus
032a e004       |    |		Load	0x0,0x4
032b 0273       | s  |		Execute	Discrete,Plus
032c e031       | 1  |		Load	0x0,0x31
032d 0273       | s  |		Execute	Discrete,Plus
032e 4800       |H   |		Short_Literal	0x0
032f 0007       |    |		Action	Break_Optional
0330 a001       |    |		Store_Unchecked	0x0,0x1
0331 00c6       |    |		Action	Check_Subprogram_Elaborated
0332 e002       |    |		Load	0x0,0x2
0333 e032       | 2  |		Load	0x0,0x32
0334 0093 0000  |    |		push_full_address	0x0
0336 6111       |a   |		Indirect_Literal	Discrete,0x448,{0x80000000, 0x000a0000}
0337 0273       | s  |		Execute	Discrete,Plus
0338 e004       |    |		Load	0x0,0x4
0339 0273       | s  |		Execute	Discrete,Plus
033a e033       | 3  |		Load	0x0,0x33
033b 0273       | s  |		Execute	Discrete,Plus
033c 4800       |H   |		Short_Literal	0x0
033d 0007       |    |		Action	Break_Optional
033e a001       |    |		Store_Unchecked	0x0,0x1
033f 00c6       |    |		Action	Check_Subprogram_Elaborated
0340 e002       |    |		Load	0x0,0x2
0341 e034       | 4  |		Load	0x0,0x34
0342 0093 0000  |    |		push_full_address	0x0
0344 60ff       |`   |		Indirect_Literal	Discrete,0x444,{0x80000000, 0x00090000}
0345 0273       | s  |		Execute	Discrete,Plus
0346 e004       |    |		Load	0x0,0x4
0347 0273       | s  |		Execute	Discrete,Plus
0348 e035       | 5  |		Load	0x0,0x35
0349 0273       | s  |		Execute	Discrete,Plus
034a 4800       |H   |		Short_Literal	0x0
034b 0007       |    |		Action	Break_Optional
034c a001       |    |		Store_Unchecked	0x0,0x1
034d 00c6       |    |		Action	Check_Subprogram_Elaborated
034e e002       |    |		Load	0x0,0x2
034f e036       | 6  |		Load	0x0,0x36
0350 0093 0000  |    |		push_full_address	0x0
0352 60ed       |`   |		Indirect_Literal	Discrete,0x440,{0x80000000, 0x00080000}
0353 0273       | s  |		Execute	Discrete,Plus
0354 e004       |    |		Load	0x0,0x4
0355 0273       | s  |		Execute	Discrete,Plus
0356 e037       | 7  |		Load	0x0,0x37
0357 0273       | s  |		Execute	Discrete,Plus
0358 4800       |H   |		Short_Literal	0x0
0359 0007       |    |		Action	Break_Optional
035a a001       |    |		Store_Unchecked	0x0,0x1
035b 00c6       |    |		Action	Check_Subprogram_Elaborated
035c e002       |    |		Load	0x0,0x2
035d e038       | 8  |		Load	0x0,0x38
035e 0093 0000  |    |		push_full_address	0x0
0360 60db       |`   |		Indirect_Literal	Discrete,0x43c,{0x80000000, 0x00070000}
0361 0273       | s  |		Execute	Discrete,Plus
0362 e004       |    |		Load	0x0,0x4
0363 0273       | s  |		Execute	Discrete,Plus
0364 e039       | 9  |		Load	0x0,0x39
0365 0273       | s  |		Execute	Discrete,Plus
0366 4800       |H   |		Short_Literal	0x0
0367 0007       |    |		Action	Break_Optional
0368 a001       |    |		Store_Unchecked	0x0,0x1
0369 00c6       |    |		Action	Check_Subprogram_Elaborated
036a e002       |    |		Load	0x0,0x2
036b e03a       | :  |		Load	0x0,0x3a
036c 0093 0000  |    |		push_full_address	0x0
036e 60c9       |`   |		Indirect_Literal	Discrete,0x438,{0x80000000, 0x00060000}
036f 0273       | s  |		Execute	Discrete,Plus
0370 e004       |    |		Load	0x0,0x4
0371 0273       | s  |		Execute	Discrete,Plus
0372 e03b       | ;  |		Load	0x0,0x3b
0373 0273       | s  |		Execute	Discrete,Plus
0374 4800       |H   |		Short_Literal	0x0
0375 0007       |    |		Action	Break_Optional
0376 a001       |    |		Store_Unchecked	0x0,0x1
0377 00c6       |    |		Action	Check_Subprogram_Elaborated
0378 e002       |    |		Load	0x0,0x2
0379 e03c       | <  |		Load	0x0,0x3c
037a 0093 0000  |    |		push_full_address	0x0
037c 60b7       |`   |		Indirect_Literal	Discrete,0x434,{0x80000000, 0x00050000}
037d 0273       | s  |		Execute	Discrete,Plus
037e e004       |    |		Load	0x0,0x4
037f 0273       | s  |		Execute	Discrete,Plus
0380 e03d       | =  |		Load	0x0,0x3d
0381 0273       | s  |		Execute	Discrete,Plus
0382 4800       |H   |		Short_Literal	0x0
0383 0007       |    |		Action	Break_Optional
0384 a001       |    |		Store_Unchecked	0x0,0x1
0385 00c6       |    |		Action	Check_Subprogram_Elaborated
0386 e002       |    |		Load	0x0,0x2
0387 e03e       | >  |		Load	0x0,0x3e
0388 0093 0000  |    |		push_full_address	0x0
038a 60a5       |`   |		Indirect_Literal	Discrete,0x430,{0x80000000, 0x00040000}
038b 0273       | s  |		Execute	Discrete,Plus
038c e004       |    |		Load	0x0,0x4
038d 0273       | s  |		Execute	Discrete,Plus
038e e03f       | ?  |		Load	0x0,0x3f
038f 0273       | s  |		Execute	Discrete,Plus
0390 4800       |H   |		Short_Literal	0x0
0391 0007       |    |		Action	Break_Optional
0392 a001       |    |		Store_Unchecked	0x0,0x1
0393 00c6       |    |		Action	Check_Subprogram_Elaborated
0394 e002       |    |		Load	0x0,0x2
0395 e040       | @  |		Load	0x0,0x40
0396 0093 0000  |    |		push_full_address	0x0
0398 6093       |`   |		Indirect_Literal	Discrete,0x42c,{0x80000000, 0x00030000}
0399 0273       | s  |		Execute	Discrete,Plus
039a e004       |    |		Load	0x0,0x4
039b 0273       | s  |		Execute	Discrete,Plus
039c e041       | A  |		Load	0x0,0x41
039d 0273       | s  |		Execute	Discrete,Plus
039e 4800       |H   |		Short_Literal	0x0
039f 0007       |    |		Action	Break_Optional
03a0 00e5       |    |		Load_Encached	Long_Integer_Cache
03a1 00e5       |    |		Load_Encached	Long_Integer_Cache
03a2 02a0       |    |		Declare_Subprogram	Null_Subprogram
03a3 4802       |H   |		Short_Literal	0x2
03a4 032d       | -  |		Declare_Type	Record,Defined
03a5 a001       |    |		Store_Unchecked	0x0,0x1
03a6 00c6       |    |		Action	Check_Subprogram_Elaborated
03a7 e002       |    |		Load	0x0,0x2
03a8 e2da       |    |		Load	0x1,0xda
03a9 0093 0000  |    |		push_full_address	0x0
03ab 607c       |`|  |		Indirect_Literal	Discrete,0x428,{0x80000000, 0x00020000}
03ac 0273       | s  |		Execute	Discrete,Plus
03ad e004       |    |		Load	0x0,0x4
03ae 0273       | s  |		Execute	Discrete,Plus
03af e042       | B  |		Load	0x0,0x42
03b0 0273       | s  |		Execute	Discrete,Plus
03b1 4800       |H   |		Short_Literal	0x0
03b2 0007       |    |		Action	Break_Optional
03b3 e043       | C  |		Load	0x0,0x43
03b4 00e1       |    |		Load_Encached	Boolean_Cache
03b5 00e1       |    |		Load_Encached	Boolean_Cache
03b6 02a0       |    |		Declare_Subprogram	Null_Subprogram
03b7 4803       |H   |		Short_Literal	0x3
03b8 032d       | -  |		Declare_Type	Record,Defined
03b9 a001       |    |		Store_Unchecked	0x0,0x1
03ba 00c6       |    |		Action	Check_Subprogram_Elaborated
03bb e044       | D  |		Load	0x0,0x44
03bc e2df       |    |		Load	0x1,0xdf
03bd 0093 0000  |    |		push_full_address	0x0
03bf 6064       |`d  |		Indirect_Literal	Discrete,0x424,{0x80000000, 0x00010000}
03c0 0273       | s  |		Execute	Discrete,Plus
03c1 e004       |    |		Load	0x0,0x4
03c2 0273       | s  |		Execute	Discrete,Plus
03c3 e045       | E  |		Load	0x0,0x45
03c4 0273       | s  |		Execute	Discrete,Plus
03c5 4800       |H   |		Short_Literal	0x0
03c6 0007       |    |		Action	Break_Optional
03c7 e044       | D  |		Load	0x0,0x44
03c8 012c       | ,  |		Execute	Any,Size
03c9 e2df       |    |		Load	0x1,0xdf
03ca 012c       | ,  |		Execute	Any,Size
03cb 027f       |    |		Execute	Discrete,Equal
03cc 7001       |p   |		Jump_Nonzero	0x3ce
03cd 0887       |    |		Execute_Immediate	Raise,0x87
03ce 029d 0beb  |    |		Declare_Subprogram	INIT_0be8,For_Outer_Call
03d0 029d 0c0b  |    |		Declare_Subprogram	INIT_0c08,For_Outer_Call
03d2 029d 0c43  |   C|		Declare_Subprogram	INIT_0c40,For_Outer_Call
03d4 029d 0c83  |    |		Declare_Subprogram	INIT_0c80,For_Outer_Call
03d6 029d 0c8b  |    |		Declare_Subprogram	INIT_0c88,For_Outer_Call
03d8 029d 0ca3  |    |		Declare_Subprogram	INIT_0ca0,For_Outer_Call
03da 029d 0cbb  |    |		Declare_Subprogram	INIT_0cb8,For_Outer_Call
03dc 029d 0cd3  |    |		Declare_Subprogram	INIT_0cd0,For_Outer_Call
03de 029d 0cdb  |    |		Declare_Subprogram	INIT_0cd8,For_Outer_Call
03e0 029d 0ce3  |    |		Declare_Subprogram	INIT_0ce0,For_Outer_Call
03e2 029d 0cf3  |    |		Declare_Subprogram	INIT_0cf0,For_Outer_Call
03e4 029d 0d33  |   3|		Declare_Subprogram	INIT_0d30,For_Outer_Call
03e6 029d 0dbb  |    |		Declare_Subprogram	INIT_0db8,For_Outer_Call
03e8 029d 0dfb  |    |		Declare_Subprogram	INIT_0df8,For_Outer_Call
03ea 029d 0e23  |   #|		Declare_Subprogram	INIT_0e20,For_Outer_Call
03ec 029d 0e43  |   C|		Declare_Subprogram	INIT_0e40,For_Outer_Call
03ee 029d 0e53  |   S|		Declare_Subprogram	INIT_0e50,For_Outer_Call
03f0 029d 0e6b  |   k|		Declare_Subprogram	INIT_0e68,For_Outer_Call
03f2 029d 0e83  |    |		Declare_Subprogram	INIT_0e80,For_Outer_Call
03f4 029d 0e9b  |    |		Declare_Subprogram	INIT_0e98,For_Outer_Call
03f6 029d 0eab  |    |		Declare_Subprogram	INIT_0ea8,For_Outer_Call
03f8 029d 0ec3  |    |		Declare_Subprogram	INIT_0ec0,For_Outer_Call
03fa 029d 1003  |    |		Declare_Subprogram	INIT_1000,For_Outer_Call
03fc 029d 101b  |    |		Declare_Subprogram	INIT_1018,For_Outer_Call
03fe 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
03ff 00c7       |    |		Action	Elaborate_Subprogram
0400			BODY_0148:
0400 00bc       |    |		Action	Signal_Activated
0401 00bb       |    |		Action	Signal_Completion
0402 0000 0000  |    |		.BLANK	0000[0x6]
0408 ; --------------------------------------------------------------------------------------
0408 ; SUBPROGRAM
0408 ; --------------------------------------------------------------------------------------
0408 040b       |    |		.CONST	0x040b								; Address of begin
0409 0004       |    |		.CONST	0x0004								; Address of exception handler
040a 0001       |    |		.CONST	0x0001								; Number of locals
040b			BODY_0408:
040b			INIT_0408:
040b e5fd       |    |		Load	0x2,-0x3
040c 0f01       |    |		Execute_Immediate	Equal,0x1
040d 7004       |p   |		Jump_Nonzero	0x412
040e e5fc       |    |		Load	0x2,-0x4
040f e5ff       |    |		Load	0x2,-0x1
0410 82f9       |    |		Call	0x1,0xf9
0411 4405       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x5
0412 e5fe       |    |		Load	0x2,-0x2
0413 0b03       |    |		Execute_Immediate	Case_Compare,0x3
0414 7006       |p   |		Jump_Nonzero	0x41b
0415 0f09       |    |		Execute_Immediate	Equal,0x9
0416 7009       |p   |		Jump_Nonzero	0x420
0417 e5fc       |    |		Load	0x2,-0x4
0418 e5ff       |    |		Load	0x2,-0x1
0419 82f9       |    |		Call	0x1,0xf9
041a 4405       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x5
041b 00d1       |    |		Pop_Control	Pop_Count_1
041c e5fc       |    |		Load	0x2,-0x4
041d e5ff       |    |		Load	0x2,-0x1
041e 82fa       |    |		Call	0x1,0xfa
041f 4405       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x5
0420 e5fc       |    |		Load	0x2,-0x4
0421 e5ff       |    |		Load	0x2,-0x1
0422 82fb       |    |		Call	0x1,0xfb
0423 4405       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x5
0424 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
0428 8000 0000  |    |		.LITERAL	{0x80000000, 0x00020000}
042c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00030000}
0430 8000 0000  |    |		.LITERAL	{0x80000000, 0x00040000}
0434 8000 0000  |    |		.LITERAL	{0x80000000, 0x00050000}
0438 8000 0000  |    |		.LITERAL	{0x80000000, 0x00060000}
043c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00070000}
0440 8000 0000  |    |		.LITERAL	{0x80000000, 0x00080000}
0444 8000 0000  |    |		.LITERAL	{0x80000000, 0x00090000}
0448 8000 0000  |    |		.LITERAL	{0x80000000, 0x000a0000}
044c 8000 0000  |    |		.LITERAL	{0x80000000, 0x000b0000}
0450 8000 0000  |    |		.LITERAL	{0x80000000, 0x000c0000}
0454 8000 0000  |    |		.LITERAL	{0x80000000, 0x000d0000}
0458 8000 0000  |    |		.LITERAL	{0x80000000, 0x000e0000}
045c 8000 0000  |    |		.LITERAL	{0x80000000, 0x000f0000}
0460 8000 0000  |    |		.LITERAL	{0x80000000, 0x00100000}
0464 8000 0000  |    |		.LITERAL	{0x80000000, 0x00110000}
0468 8000 0000  |    |		.LITERAL	{0x80000000, 0x00120000}
046c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00130000}
0470 8000 0000  |    |		.LITERAL	{0x80000000, 0x00140000}
0474 8000 0000  |    |		.LITERAL	{0x80000000, 0x00150000}
0478 8000 0000  |    |		.LITERAL	{0x80000000, 0x00160000}
047c 8000 0000  |    |		.LITERAL	{0x80000000, 0x00170000}
0480 8000 0000  |    |		.LITERAL	{0x80000000, 0x00180000}
0484 8000 0000  |    |		.LITERAL	{0x80000000, 0x00190000}
0488 8000 0000  |    |		.LITERAL	{0x80000000, 0x001a0000}
048c 8000 0000  |    |		.LITERAL	{0x80000000, 0x001b0000}
0490 8000 0000  |    |		.LITERAL	{0x80000000, 0x001c0000}
0494 8000 0000  |    |		.LITERAL	{0x80000000, 0x001d0000}
0498 8000 0000  |    |		.LITERAL	{0x80000000, 0x001e0000}
049c 8000 0000  |    |		.LITERAL	{0x80000000, 0x001f0000}
04a0 8000 0000  |    |		.LITERAL	{0x80000000, 0x00200000}
04a4 8000 0000  |    |		.LITERAL	{0x80000000, 0x00210000}
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ab       |    |		.CONST	0x04ab								; Address of begin
04a9 0004       |    |		.CONST	0x0004								; Address of exception handler
04aa 0001       |    |		.CONST	0x0001								; Number of locals
04ab			BODY_04a8:
04ab			INIT_04a8:
04ab e5ff       |    |		Load	0x2,-0x1
04ac e046       | F  |		Load	0x0,0x46
04ad 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
04ae 011c       |    |		Execute	Any,Convert_Unchecked
04af 1c01       |    |		Execute_Immediate	Run_Utility,0x1
04b0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04b1 0000 0000  |    |		.BLANK	0000[0x7]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04bb       |    |		.CONST	0x04bb								; Address of begin
04b9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ba 0001       |    |		.CONST	0x0001								; Number of locals
04bb			BODY_04b8:
04bb			INIT_04b8:
04bb e5ff       |    |		Load	0x2,-0x1
04bc e046       | F  |		Load	0x0,0x46
04bd 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
04be 011c       |    |		Execute	Any,Convert_Unchecked
04bf 1c01       |    |		Execute_Immediate	Run_Utility,0x1
04c0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04c1 0000 0000  |    |		.BLANK	0000[0x7]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cb       |    |		.CONST	0x04cb								; Address of begin
04c9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ca 0001       |    |		.CONST	0x0001								; Number of locals
04cb			BODY_04c8:
04cb			INIT_04c8:
04cb e5ff       |    |		Load	0x2,-0x1
04cc 8047       | G  |		Call	0x0,0x47
04cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04ce 0000 0000  |    |		.XXX[0x2]
04d0 ; --------------------------------------------------------------------------------------
04d0 ; SUBPROGRAM
04d0 ; --------------------------------------------------------------------------------------
04d0 04dd       |    |		.CONST	0x04dd								; Address of begin
04d1 0004       |    |		.CONST	0x0004								; Address of exception handler
04d2 0001       |    |		.CONST	0x0001								; Number of locals
04d3			INIT_04d0:
04d3 e048       | H  |		Load	0x0,0x48
04d4 012c       | ,  |		Execute	Any,Size
04d5 0f06       |    |		Execute_Immediate	Equal,0x6
04d6 7001       |p   |		Jump_Nonzero	0x4d8
04d7 0887       |    |		Execute_Immediate	Raise,0x87
04d8 e049       | I  |		Load	0x0,0x49
04d9 012c       | ,  |		Execute	Any,Size
04da 0f07       |    |		Execute_Immediate	Equal,0x7
04db 7001       |p   |		Jump_Nonzero	BODY_04d0
04dc 0887       |    |		Execute_Immediate	Raise,0x87
04dd			BODY_04d0:
04dd e5ff       |    |		Load	0x2,-0x1
04de 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04df 090d       |    |		Execute_Immediate	Binary_Scale,0xd
04e0 e5ff       |    |		Load	0x2,-0x1
04e1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
04e2 0907       |    |		Execute_Immediate	Binary_Scale,0x7
04e3 0273       | s  |		Execute	Discrete,Plus
04e4 804a       | J  |		Call	0x0,0x4a
04e5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04e6 0000 0000  |    |		.XXX[0x2]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04f5       |    |		.CONST	0x04f5								; Address of begin
04e9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ea 0001       |    |		.CONST	0x0001								; Number of locals
04eb			INIT_04e8:
04eb e048       | H  |		Load	0x0,0x48
04ec 012c       | ,  |		Execute	Any,Size
04ed 0f06       |    |		Execute_Immediate	Equal,0x6
04ee 7001       |p   |		Jump_Nonzero	0x4f0
04ef 0887       |    |		Execute_Immediate	Raise,0x87
04f0 e049       | I  |		Load	0x0,0x49
04f1 012c       | ,  |		Execute	Any,Size
04f2 0f07       |    |		Execute_Immediate	Equal,0x7
04f3 7001       |p   |		Jump_Nonzero	BODY_04e8
04f4 0887       |    |		Execute_Immediate	Raise,0x87
04f5			BODY_04e8:
04f5 e5ff       |    |		Load	0x2,-0x1
04f6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04f7 090d       |    |		Execute_Immediate	Binary_Scale,0xd
04f8 e5ff       |    |		Load	0x2,-0x1
04f9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
04fa 0907       |    |		Execute_Immediate	Binary_Scale,0x7
04fb 0273       | s  |		Execute	Discrete,Plus
04fc 804a       | J  |		Call	0x0,0x4a
04fd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04fe 0000 0000  |    |		.XXX[0x2]
0500 ; --------------------------------------------------------------------------------------
0500 ; SUBPROGRAM
0500 ; --------------------------------------------------------------------------------------
0500 0503       |    |		.CONST	0x0503								; Address of begin
0501 0004       |    |		.CONST	0x0004								; Address of exception handler
0502 0001       |    |		.CONST	0x0001								; Number of locals
0503			BODY_0500:
0503			INIT_0500:
0503 e5ff       |    |		Load	0x2,-0x1
0504 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0505 8211       |    |		Call	0x1,0x11
0506 0092 1c00  |    |		Action	Push_String_Extended,0x1c00					; "Type_Offset"
0508 e5ff       |    |		Load	0x2,-0x1
0509 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
050a 804b       | K  |		Call	0x0,0x4b
050b 0092 1c01  |    |		Action	Push_String_Extended,0x1c01					; "To_Be_Aborted"
050d e5ff       |    |		Load	0x2,-0x1
050e 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
050f 804b       | K  |		Call	0x0,0x4b
0510 0092 1c02  |    |		Action	Push_String_Extended,0x1c02					; "Abort_Protected"
0512 e5ff       |    |		Load	0x2,-0x1
0513 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0514 804c       | L  |		Call	0x0,0x4c
0515 0092 1c03  |    |		Action	Push_String_Extended,0x1c03					; "Stack"
0517 804d       | M  |		Call	0x0,0x4d
0518 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0519 0000 0000  |    |		.BLANK	0000[0x7]
0520 ; --------------------------------------------------------------------------------------
0520 ; SUBPROGRAM
0520 ; --------------------------------------------------------------------------------------
0520 052d       | -  |		.CONST	0x052d								; Address of begin
0521 0004       |    |		.CONST	0x0004								; Address of exception handler
0522 0001       |    |		.CONST	0x0001								; Number of locals
0523			INIT_0520:
0523 e048       | H  |		Load	0x0,0x48
0524 012c       | ,  |		Execute	Any,Size
0525 0f06       |    |		Execute_Immediate	Equal,0x6
0526 7001       |p   |		Jump_Nonzero	0x528
0527 0887       |    |		Execute_Immediate	Raise,0x87
0528 e049       | I  |		Load	0x0,0x49
0529 012c       | ,  |		Execute	Any,Size
052a 0f07       |    |		Execute_Immediate	Equal,0x7
052b 7001       |p   |		Jump_Nonzero	BODY_0520
052c 0887       |    |		Execute_Immediate	Raise,0x87
052d			BODY_0520:
052d e5ff       |    |		Load	0x2,-0x1
052e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
052f 090d       |    |		Execute_Immediate	Binary_Scale,0xd
0530 e5ff       |    |		Load	0x2,-0x1
0531 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0532 0907       |    |		Execute_Immediate	Binary_Scale,0x7
0533 0273       | s  |		Execute	Discrete,Plus
0534 e5ff       |    |		Load	0x2,-0x1
0535 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0536 0273       | s  |		Execute	Discrete,Plus
0537 804a       | J  |		Call	0x0,0x4a
0538 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0539 0000 0000  |    |		.BLANK	0000[0x7]
0540 ; --------------------------------------------------------------------------------------
0540 ; SUBPROGRAM
0540 ; --------------------------------------------------------------------------------------
0540 0543       | C  |		.CONST	0x0543								; Address of begin
0541 0004       |    |		.CONST	0x0004								; Address of exception handler
0542 0001       |    |		.CONST	0x0001								; Number of locals
0543			BODY_0540:
0543			INIT_0540:
0543 e5ff       |    |		Load	0x2,-0x1
0544 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0545 8214       |    |		Call	0x1,0x14
0546 0092 1c04  |    |		Action	Push_String_Extended,0x1c04					; "Data_Offset"
0548 e5ff       |    |		Load	0x2,-0x1
0549 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
054a 804c       | L  |		Call	0x0,0x4c
054b 0092 1c03  |    |		Action	Push_String_Extended,0x1c03					; "Stack"
054d 804e       | N  |		Call	0x0,0x4e
054e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
054f 0000       |    |		.XXX[0x1]
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0553       | S  |		.CONST	0x0553								; Address of begin
0551 0004       |    |		.CONST	0x0004								; Address of exception handler
0552 0001       |    |		.CONST	0x0001								; Number of locals
0553			BODY_0550:
0553			INIT_0550:
0553 e5ff       |    |		Load	0x2,-0x1
0554 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0555 8211       |    |		Call	0x1,0x11
0556 0092 1c00  |    |		Action	Push_String_Extended,0x1c00					; "Type_Offset"
0558 e5ff       |    |		Load	0x2,-0x1
0559 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
055a 804b       | K  |		Call	0x0,0x4b
055b 0092 1c05  |    |		Action	Push_String_Extended,0x1c05					; "Bounds_With_Object"
055d e5ff       |    |		Load	0x2,-0x1
055e 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
055f 804b       | K  |		Call	0x0,0x4b
0560 0092 1c06  |    |		Action	Push_String_Extended,0x1c06					; "Derives_Privacy"
0562 e5ff       |    |		Load	0x2,-0x1
0563 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0564 804b       | K  |		Call	0x0,0x4b
0565 0092 1c07  |    |		Action	Push_String_Extended,0x1c07					; "Is_Private"
0567 e5ff       |    |		Load	0x2,-0x1
0568 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0569 804b       | K  |		Call	0x0,0x4b
056a 0092 1c08  |    |		Action	Push_String_Extended,0x1c08					; "Is_Constant"
056c e5ff       |    |		Load	0x2,-0x1
056d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
056e 804b       | K  |		Call	0x0,0x4b
056f 0092 1c09  |    |		Action	Push_String_Extended,0x1c09					; "Is_Visible"
0571 e5ff       |    |		Load	0x2,-0x1
0572 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0573 804c       | L  |		Call	0x0,0x4c
0574 0092 1c0a  |    |		Action	Push_String_Extended,0x1c0a					; "Path_Stack"
0576 804f       | O  |		Call	0x0,0x4f
0577 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057b       | {  |		.CONST	0x057b								; Address of begin
0579 0004       |    |		.CONST	0x0004								; Address of exception handler
057a 0001       |    |		.CONST	0x0001								; Number of locals
057b			BODY_0578:
057b			INIT_0578:
057b e5ff       |    |		Load	0x2,-0x1
057c 8047       | G  |		Call	0x0,0x47
057d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
057e 0000 0000  |    |		.XXX[0x2]
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 0588       |    |		.CONST	0x0588								; Address of begin
0581 0004       |    |		.CONST	0x0004								; Address of exception handler
0582 0001       |    |		.CONST	0x0001								; Number of locals
0583			INIT_0580:
0583 e050       | P  |		Load	0x0,0x50
0584 012c       | ,  |		Execute	Any,Size
0585 0f03       |    |		Execute_Immediate	Equal,0x3
0586 7001       |p   |		Jump_Nonzero	BODY_0580
0587 0887       |    |		Execute_Immediate	Raise,0x87
0588			BODY_0580:
0588 e5ff       |    |		Load	0x2,-0x1
0589 0903       |    |		Execute_Immediate	Binary_Scale,0x3
058a e5fe       |    |		Load	0x2,-0x2
058b 0273       | s  |		Execute	Discrete,Plus
058c 804a       | J  |		Call	0x0,0x4a
058d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
058e 0000 0000  |    |		.XXX[0x2]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0593       |    |		.CONST	0x0593								; Address of begin
0591 0004       |    |		.CONST	0x0004								; Address of exception handler
0592 0001       |    |		.CONST	0x0001								; Number of locals
0593			BODY_0590:
0593			INIT_0590:
0593 e5ff       |    |		Load	0x2,-0x1
0594 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0595 e5ff       |    |		Load	0x2,-0x1
0596 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0597 8218       |    |		Call	0x1,0x18
0598 0092 1c0b  |    |		Action	Push_String_Extended,0x1c0b					; "Offset"
059a e5ff       |    |		Load	0x2,-0x1
059b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
059c 8051       | Q  |		Call	0x0,0x51
059d 0092 1c0c  |    |		Action	Push_String_Extended,0x1c0c					; "Segment"
059f 804e       | N  |		Call	0x0,0x4e
05a0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05a1 0000 0000  |    |		.BLANK	0000[0x7]
05a8 ; --------------------------------------------------------------------------------------
05a8 ; SUBPROGRAM
05a8 ; --------------------------------------------------------------------------------------
05a8 05ab       |    |		.CONST	0x05ab								; Address of begin
05a9 0004       |    |		.CONST	0x0004								; Address of exception handler
05aa 0001       |    |		.CONST	0x0001								; Number of locals
05ab			BODY_05a8:
05ab			INIT_05a8:
05ab e5ff       |    |		Load	0x2,-0x1
05ac 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
05ad e5ff       |    |		Load	0x2,-0x1
05ae 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
05af 8218       |    |		Call	0x1,0x18
05b0 0092 1c0b  |    |		Action	Push_String_Extended,0x1c0b					; "Offset"
05b2 e5ff       |    |		Load	0x2,-0x1
05b3 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05b4 8217       |    |		Call	0x1,0x17
05b5 0092 1c0d  |    |		Action	Push_String_Extended,0x1c0d					; "Children_Start"
05b7 e5ff       |    |		Load	0x2,-0x1
05b8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05b9 8051       | Q  |		Call	0x0,0x51
05ba 0092 1c0c  |    |		Action	Push_String_Extended,0x1c0c					; "Segment"
05bc 8052       | R  |		Call	0x0,0x52
05bd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05be 0000 0000  |    |		.XXX[0x2]
05c0 ; --------------------------------------------------------------------------------------
05c0 ; SUBPROGRAM
05c0 ; --------------------------------------------------------------------------------------
05c0 05c3       |    |		.CONST	0x05c3								; Address of begin
05c1 0004       |    |		.CONST	0x0004								; Address of exception handler
05c2 0001       |    |		.CONST	0x0001								; Number of locals
05c3			BODY_05c0:
05c3			INIT_05c0:
05c3 e5ff       |    |		Load	0x2,-0x1
05c4 8047       | G  |		Call	0x0,0x47
05c5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05c6 0000 0000  |    |		.XXX[0x2]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cb       |    |		.CONST	0x05cb								; Address of begin
05c9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ca 0001       |    |		.CONST	0x0001								; Number of locals
05cb			BODY_05c8:
05cb			INIT_05c8:
05cb e5ff       |    |		Load	0x2,-0x1
05cc 8047       | G  |		Call	0x0,0x47
05cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05ce 0000 0000  |    |		.XXX[0x2]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d3       |    |		.CONST	0x05d3								; Address of begin
05d1 0004       |    |		.CONST	0x0004								; Address of exception handler
05d2 0001       |    |		.CONST	0x0001								; Number of locals
05d3			BODY_05d0:
05d3			INIT_05d0:
05d3 e5ff       |    |		Load	0x2,-0x1
05d4 8047       | G  |		Call	0x0,0x47
05d5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05d6 0000 0000  |    |		.XXX[0x2]
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05db       |    |		.CONST	0x05db								; Address of begin
05d9 0004       |    |		.CONST	0x0004								; Address of exception handler
05da 0001       |    |		.CONST	0x0001								; Number of locals
05db			BODY_05d8:
05db			INIT_05d8:
05db e5ff       |    |		Load	0x2,-0x1
05dc 8047       | G  |		Call	0x0,0x47
05dd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05de 0000 0000  |    |		.XXX[0x2]
05e0 ; --------------------------------------------------------------------------------------
05e0 ; SUBPROGRAM
05e0 ; --------------------------------------------------------------------------------------
05e0 05e3       |    |		.CONST	0x05e3								; Address of begin
05e1 0004       |    |		.CONST	0x0004								; Address of exception handler
05e2 0001       |    |		.CONST	0x0001								; Number of locals
05e3			BODY_05e0:
05e3			INIT_05e0:
05e3 e5ff       |    |		Load	0x2,-0x1
05e4 8047       | G  |		Call	0x0,0x47
05e5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05e6 0000 0000  |    |		.XXX[0x2]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05f5       |    |		.CONST	0x05f5								; Address of begin
05e9 0004       |    |		.CONST	0x0004								; Address of exception handler
05ea 0001       |    |		.CONST	0x0001								; Number of locals
05eb			INIT_05e8:
05eb e048       | H  |		Load	0x0,0x48
05ec 012c       | ,  |		Execute	Any,Size
05ed 0f06       |    |		Execute_Immediate	Equal,0x6
05ee 7001       |p   |		Jump_Nonzero	0x5f0
05ef 0887       |    |		Execute_Immediate	Raise,0x87
05f0 e049       | I  |		Load	0x0,0x49
05f1 012c       | ,  |		Execute	Any,Size
05f2 0f07       |    |		Execute_Immediate	Equal,0x7
05f3 7001       |p   |		Jump_Nonzero	BODY_05e8
05f4 0887       |    |		Execute_Immediate	Raise,0x87
05f5			BODY_05e8:
05f5 e5ff       |    |		Load	0x2,-0x1
05f6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05f7 090d       |    |		Execute_Immediate	Binary_Scale,0xd
05f8 e5ff       |    |		Load	0x2,-0x1
05f9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
05fa 0907       |    |		Execute_Immediate	Binary_Scale,0x7
05fb 0273       | s  |		Execute	Discrete,Plus
05fc 804a       | J  |		Call	0x0,0x4a
05fd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05fe 0000 0000  |    |		.XXX[0x2]
0600 ; --------------------------------------------------------------------------------------
0600 ; SUBPROGRAM
0600 ; --------------------------------------------------------------------------------------
0600 060d       |    |		.CONST	0x060d								; Address of begin
0601 0004       |    |		.CONST	0x0004								; Address of exception handler
0602 0001       |    |		.CONST	0x0001								; Number of locals
0603			INIT_0600:
0603 e048       | H  |		Load	0x0,0x48
0604 012c       | ,  |		Execute	Any,Size
0605 0f06       |    |		Execute_Immediate	Equal,0x6
0606 7001       |p   |		Jump_Nonzero	0x608
0607 0887       |    |		Execute_Immediate	Raise,0x87
0608 e049       | I  |		Load	0x0,0x49
0609 012c       | ,  |		Execute	Any,Size
060a 0f07       |    |		Execute_Immediate	Equal,0x7
060b 7001       |p   |		Jump_Nonzero	BODY_0600
060c 0887       |    |		Execute_Immediate	Raise,0x87
060d			BODY_0600:
060d e5ff       |    |		Load	0x2,-0x1
060e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
060f 090d       |    |		Execute_Immediate	Binary_Scale,0xd
0610 e5ff       |    |		Load	0x2,-0x1
0611 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0612 0907       |    |		Execute_Immediate	Binary_Scale,0x7
0613 0273       | s  |		Execute	Discrete,Plus
0614 804a       | J  |		Call	0x0,0x4a
0615 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0616 0000 0000  |    |		.XXX[0x2]
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 061b       |    |		.CONST	0x061b								; Address of begin
0619 0004       |    |		.CONST	0x0004								; Address of exception handler
061a 0001       |    |		.CONST	0x0001								; Number of locals
061b			BODY_0618:
061b			INIT_0618:
061b e5ff       |    |		Load	0x2,-0x1
061c 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
061d 8220       |    |		Call	0x1,0x20
061e 0092 1c0e  |    |		Action	Push_String_Extended,0x1c0e					; "Control_Offset"
0620 e5ff       |    |		Load	0x2,-0x1
0621 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0622 804c       | L  |		Call	0x0,0x4c
0623 0092 1c03  |    |		Action	Push_String_Extended,0x1c03					; "Stack"
0625 804e       | N  |		Call	0x0,0x4e
0626 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0627 0000       |    |		.XXX[0x1]
0628 ; --------------------------------------------------------------------------------------
0628 ; SUBPROGRAM
0628 ; --------------------------------------------------------------------------------------
0628 063d       | =  |		.CONST	0x063d								; Address of begin
0629 0004       |    |		.CONST	0x0004								; Address of exception handler
062a 0003       |    |		.CONST	0x0003								; Number of locals
062b			INIT_0628:
062b e050       | P  |		Load	0x0,0x50
062c 012c       | ,  |		Execute	Any,Size
062d 0f03       |    |		Execute_Immediate	Equal,0x3
062e 7001       |p   |		Jump_Nonzero	0x630
062f 0887       |    |		Execute_Immediate	Raise,0x87
0630 e5fe       |    |		Load	0x2,-0x2
0631 0903       |    |		Execute_Immediate	Binary_Scale,0x3
0632 e5fd       |    |		Load	0x2,-0x3
0633 0273       | s  |		Execute	Discrete,Plus
0634 0904       |    |		Execute_Immediate	Binary_Scale,0x4
0635 00d8       |    |		Load_Top	At_Offset_0
0636 e053       | S  |		Load	0x0,0x53
0637 0260       | `  |		Execute	Discrete,In_Type
0638 7001       |p   |		Jump_Nonzero	0x63a
0639 0801       |    |		Execute_Immediate	Raise,0x1
063a 00d8       |    |		Load_Top	At_Offset_0
063b e5ff       |    |		Load	0x2,-0x1
063c 8054       | T  |		Call	0x0,0x54
063d			BODY_0628:
063d 4811       |H   |		Short_Literal	0x11
063e e403       |    |		Load	0x2,0x3
063f 8055       | U  |		Call	0x0,0x55
0640 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0641 0000 0000  |    |		.BLANK	0000[0x7]
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 e5ff       |    |		Load	0x2,-0x1
064c e5fe       |    |		Load	0x2,-0x2
064d 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
064e e5fe       |    |		Load	0x2,-0x2
064f 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0650 e5fe       |    |		Load	0x2,-0x2
0651 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0652 8223       | #  |		Call	0x1,0x23
0653 01cc       |    |		Execute	Vector,Catenate
0654 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0655 0000 0000  |    |		.XXX[0x3]
0657 0000       |    |
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 e5ff       |    |		Load	0x2,-0x1
065c 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
065d 8222       | "  |		Call	0x1,0x22
065e 0092 1c0f  |    |		Action	Push_String_Extended,0x1c0f					; "Subprog_Site"
0660 e5ff       |    |		Load	0x2,-0x1
0661 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0662 820e       |    |		Call	0x1,0xe
0663 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0665 e5ff       |    |		Load	0x2,-0x1
0666 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0667 804b       | K  |		Call	0x0,0x4b
0668 0092 1c09  |    |		Action	Push_String_Extended,0x1c09					; "Is_Visible"
066a e5ff       |    |		Load	0x2,-0x1
066b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
066c 804c       | L  |		Call	0x0,0x4c
066d 0092 1c11  |    |		Action	Push_String_Extended,0x1c11					; "Scope_For_Site"
066f 804d       | M  |		Call	0x0,0x4d
0670 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0671 0000 0000  |    |		.BLANK	0000[0x7]
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 e5ff       |    |		Load	0x2,-0x1
067c 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
067d 821b       |    |		Call	0x1,0x1b
067e 0092 1c12  |    |		Action	Push_String_Extended,0x1c12					; "Lex_Level"
0680 e5ff       |    |		Load	0x2,-0x1
0681 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0682 8219       |    |		Call	0x1,0x19
0683 0092 1c13  |    |		Action	Push_String_Extended,0x1c13					; "Subprog_Start"
0685 e5ff       |    |		Load	0x2,-0x1
0686 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0687 820e       |    |		Call	0x1,0xe
0688 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
068a e5ff       |    |		Load	0x2,-0x1
068b 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
068c 8222       | "  |		Call	0x1,0x22
068d 0092 1c14  |    |		Action	Push_String_Extended,0x1c14					; "Declare_Frame"
068f 804d       | M  |		Call	0x0,0x4d
0690 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0691 0000 0000  |    |		.BLANK	0000[0x7]
0698 ; --------------------------------------------------------------------------------------
0698 ; SUBPROGRAM
0698 ; --------------------------------------------------------------------------------------
0698 069b       |    |		.CONST	0x069b								; Address of begin
0699 0004       |    |		.CONST	0x0004								; Address of exception handler
069a 0001       |    |		.CONST	0x0001								; Number of locals
069b			BODY_0698:
069b			INIT_0698:
069b e5ff       |    |		Load	0x2,-0x1
069c 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
069d 0092 1c15  |    |		Action	Push_String_Extended,0x1c15					; "start pc = "
069f 8224       | $  |		Call	0x1,0x24
06a0 0092 1c16  |    |		Action	Push_String_Extended,0x1c16					; "; lex = "
06a2 01cc       |    |		Execute	Vector,Catenate
06a3 e5ff       |    |		Load	0x2,-0x1
06a4 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
06a5 821b       |    |		Call	0x1,0x1b
06a6 01cc       |    |		Execute	Vector,Catenate
06a7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06a8 ; --------------------------------------------------------------------------------------
06a8 ; SUBPROGRAM
06a8 ; --------------------------------------------------------------------------------------
06a8 06ca       |    |		.CONST	0x06ca								; Address of begin
06a9 0004       |    |		.CONST	0x0004								; Address of exception handler
06aa 0009       |    |		.CONST	0x0009								; Number of locals
06ab			INIT_06a8:
06ab 029f 1033  |   3|		Declare_Subprogram	INIT_1030,For_Call
06ad a056       | V  |		Store_Unchecked	0x0,0x56
06ae 00c6       |    |		Action	Check_Subprogram_Elaborated
06af e046       | F  |		Load	0x0,0x46
06b0 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
06b1 00d8       |    |		Load_Top	At_Offset_0
06b2 012c       | ,  |		Execute	Any,Size
06b3 e403       |    |		Load	0x2,0x3
06b4 0266       | f  |		Execute	Discrete,Bounds
06b5 029f 103b  |   ;|		Declare_Subprogram	INIT_1038,For_Call
06b7 03fa       |    |		Declare_Type	Discrete,Defined,With_Size
06b8 00cd       |    |		Action	Spare6_Action
06b9 00e1       |    |		Load_Encached	Boolean_Cache
06ba e046       | F  |		Load	0x0,0x46
06bb 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
06bc 4802       |H   |		Short_Literal	0x2
06bd 4802       |H   |		Short_Literal	0x2
06be 0099       |    |		Action	Reference_Dynamic
06bf 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
06c0 0093 0000  |    |		push_full_address	0x0
06c2 6019       |`   |		Indirect_Literal	Discrete,0x6dc,{0x80000000, 0x00230000}
06c3 0273       | s  |		Execute	Discrete,Plus
06c4 e004       |    |		Load	0x0,0x4
06c5 0273       | s  |		Execute	Discrete,Plus
06c6 e057       | W  |		Load	0x0,0x57
06c7 0273       | s  |		Execute	Discrete,Plus
06c8 4809       |H   |		Short_Literal	0x9
06c9 0007       |    |		Action	Break_Optional
06ca			BODY_06a8:
06ca e5ff       |    |		Load	0x2,-0x1
06cb e403       |    |		Load	0x2,0x3
06cc e404       |    |		Load	0x2,0x4
06cd e405       |    |		Load	0x2,0x5
06ce 4806       |H   |		Short_Literal	0x6
06cf 4802       |H   |		Short_Literal	0x2
06d0 0099       |    |		Action	Reference_Dynamic
06d1 4807       |H   |		Short_Literal	0x7
06d2 4802       |H   |		Short_Literal	0x2
06d3 0099       |    |		Action	Reference_Dynamic
06d4 4808       |H   |		Short_Literal	0x8
06d5 4802       |H   |		Short_Literal	0x2
06d6 0099       |    |		Action	Reference_Dynamic
06d7 8056       | V  |		Call	0x0,0x56
06d8 00e9       |    |		Load_Encached	String_Cache
06d9 01c6       |    |		Execute	Vector,Convert_To_Formal
06da 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
06db 0000       |    |		.XXX[0x1]
06dc 8000 0000  |    |		.LITERAL	{0x80000000, 0x00230000}
06e0 ; --------------------------------------------------------------------------------------
06e0 ; SUBPROGRAM
06e0 ; --------------------------------------------------------------------------------------
06e0 06ed       |    |		.CONST	0x06ed								; Address of begin
06e1 0004       |    |		.CONST	0x0004								; Address of exception handler
06e2 0004       |    |		.CONST	0x0004								; Number of locals
06e3			INIT_06e0:
06e3 4880       |H   |		Short_Literal	0x80
06e4 e058       | X  |		Load	0x0,0x58
06e5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
06e6 1c08       |    |		Execute_Immediate	Run_Utility,0x8
06e7 00d8       |    |		Load_Top	At_Offset_0
06e8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
06e9 029f 1063  |   c|		Declare_Subprogram	INIT_1060,For_Call
06eb 029f 107b  |   {|		Declare_Subprogram	INIT_1078,For_Call
06ed			BODY_06e0:
06ed 4800       |H   |		Short_Literal	0x0
06ee e5ff       |    |		Load	0x2,-0x1
06ef 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
06f0 804c       | L  |		Call	0x0,0x4c
06f1 0092 1c17  |    |		Action	Push_String_Extended,0x1c17					; "distributor"
06f3 8403       |    |		Call	0x2,0x3
06f4 4801       |H   |		Short_Literal	0x1
06f5 e5ff       |    |		Load	0x2,-0x1
06f6 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
06f7 8220       |    |		Call	0x1,0x20
06f8 0092 1c18  |    |		Action	Push_String_Extended,0x1c18					; "control extent"
06fa 8403       |    |		Call	0x2,0x3
06fb 4801       |H   |		Short_Literal	0x1
06fc e5ff       |    |		Load	0x2,-0x1
06fd 3408       |4   |		Execute	Record,Field_Reference,Field_Number 0x8
06fe 8228       | (  |		Call	0x1,0x28
06ff 0092 1c19  |    |		Action	Push_String_Extended,0x1c19					; "break mask"
0701 8403       |    |		Call	0x2,0x3
0702 0092 1c1a  |    |		Action	Push_String_Extended,0x1c1a					; "Is_Catalogued "
0704 e5ff       |    |		Load	0x2,-0x1
0705 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0706 8404       |    |		Call	0x2,0x4
0707 0092 1c1b  |    |		Action	Push_String_Extended,0x1c1b					; "Is_Wired "
0709 e5ff       |    |		Load	0x2,-0x1
070a 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
070b 8404       |    |		Call	0x2,0x4
070c e402       |    |		Load	0x2,0x2
070d e058       | X  |		Load	0x0,0x58
070e 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
070f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 0713       |    |		.CONST	0x0713								; Address of begin
0711 0004       |    |		.CONST	0x0004								; Address of exception handler
0712 0001       |    |		.CONST	0x0001								; Number of locals
0713			BODY_0710:
0713			INIT_0710:
0713 e5ff       |    |		Load	0x2,-0x1
0714 8047       | G  |		Call	0x0,0x47
0715 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0716 0000 0000  |    |		.XXX[0x2]
0718 ; --------------------------------------------------------------------------------------
0718 ; SUBPROGRAM
0718 ; --------------------------------------------------------------------------------------
0718 071b       |    |		.CONST	0x071b								; Address of begin
0719 0004       |    |		.CONST	0x0004								; Address of exception handler
071a 0001       |    |		.CONST	0x0001								; Number of locals
071b			BODY_0718:
071b			INIT_0718:
071b e5ff       |    |		Load	0x2,-0x1
071c 8047       | G  |		Call	0x0,0x47
071d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
071e 0000 0000  |    |		.XXX[0x2]
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0723       | #  |		.CONST	0x0723								; Address of begin
0721 0004       |    |		.CONST	0x0004								; Address of exception handler
0722 0001       |    |		.CONST	0x0001								; Number of locals
0723			BODY_0720:
0723			INIT_0720:
0723 e5ff       |    |		Load	0x2,-0x1
0724 8047       | G  |		Call	0x0,0x47
0725 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0726 0000 0000  |    |		.XXX[0x2]
0728 ; --------------------------------------------------------------------------------------
0728 ; SUBPROGRAM
0728 ; --------------------------------------------------------------------------------------
0728 072b       | +  |		.CONST	0x072b								; Address of begin
0729 0004       |    |		.CONST	0x0004								; Address of exception handler
072a 0001       |    |		.CONST	0x0001								; Number of locals
072b			BODY_0728:
072b			INIT_0728:
072b e5ff       |    |		Load	0x2,-0x1
072c 8047       | G  |		Call	0x0,0x47
072d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
072e 0000 0000  |    |		.XXX[0x2]
0730 ; --------------------------------------------------------------------------------------
0730 ; SUBPROGRAM
0730 ; --------------------------------------------------------------------------------------
0730 0733       | 3  |		.CONST	0x0733								; Address of begin
0731 0004       |    |		.CONST	0x0004								; Address of exception handler
0732 0001       |    |		.CONST	0x0001								; Number of locals
0733			BODY_0730:
0733			INIT_0730:
0733 e5ff       |    |		Load	0x2,-0x1
0734 8047       | G  |		Call	0x0,0x47
0735 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0736 0000 0000  |    |		.XXX[0x2]
0738 ; --------------------------------------------------------------------------------------
0738 ; SUBPROGRAM
0738 ; --------------------------------------------------------------------------------------
0738 073b       | ;  |		.CONST	0x073b								; Address of begin
0739 0004       |    |		.CONST	0x0004								; Address of exception handler
073a 0001       |    |		.CONST	0x0001								; Number of locals
073b			BODY_0738:
073b			INIT_0738:
073b e5ff       |    |		Load	0x2,-0x1
073c 8047       | G  |		Call	0x0,0x47
073d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
073e 0000 0000  |    |		.XXX[0x2]
0740 ; --------------------------------------------------------------------------------------
0740 ; SUBPROGRAM
0740 ; --------------------------------------------------------------------------------------
0740 0743       | C  |		.CONST	0x0743								; Address of begin
0741 0004       |    |		.CONST	0x0004								; Address of exception handler
0742 0001       |    |		.CONST	0x0001								; Number of locals
0743			BODY_0740:
0743			INIT_0740:
0743 e5ff       |    |		Load	0x2,-0x1
0744 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0745 822f       | /  |		Call	0x1,0x2f
0746 0092 1c1c  |    |		Action	Push_String_Extended,0x1c1c					; "Delay_Duration"
0748 e5ff       |    |		Load	0x2,-0x1
0749 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
074a 820e       |    |		Call	0x1,0xe
074b 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
074d e5ff       |    |		Load	0x2,-0x1
074e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
074f 822e       | .  |		Call	0x1,0x2e
0750 0092 1c1d  |    |		Action	Push_String_Extended,0x1c1d					; "Timed_Choice"
0752 8052       | R  |		Call	0x0,0x52
0753 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0754 0000 0000  |    |		.BLANK	0000[0x4]
0758 ; --------------------------------------------------------------------------------------
0758 ; SUBPROGRAM
0758 ; --------------------------------------------------------------------------------------
0758 075b       | [  |		.CONST	0x075b								; Address of begin
0759 0004       |    |		.CONST	0x0004								; Address of exception handler
075a 0001       |    |		.CONST	0x0001								; Number of locals
075b			BODY_0758:
075b			INIT_0758:
075b e5ff       |    |		Load	0x2,-0x1
075c 8047       | G  |		Call	0x0,0x47
075d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
075e 0000 0000  |    |		.XXX[0x2]
0760 ; --------------------------------------------------------------------------------------
0760 ; SUBPROGRAM
0760 ; --------------------------------------------------------------------------------------
0760 0763       | c  |		.CONST	0x0763								; Address of begin
0761 0004       |    |		.CONST	0x0004								; Address of exception handler
0762 0001       |    |		.CONST	0x0001								; Number of locals
0763			BODY_0760:
0763			INIT_0760:
0763 e5ff       |    |		Load	0x2,-0x1
0764 8047       | G  |		Call	0x0,0x47
0765 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0766 0000 0000  |    |		.XXX[0x2]
0768 ; --------------------------------------------------------------------------------------
0768 ; SUBPROGRAM
0768 ; --------------------------------------------------------------------------------------
0768 076b       | k  |		.CONST	0x076b								; Address of begin
0769 0004       |    |		.CONST	0x0004								; Address of exception handler
076a 0001       |    |		.CONST	0x0001								; Number of locals
076b			BODY_0768:
076b			INIT_0768:
076b e5ff       |    |		Load	0x2,-0x1
076c 8047       | G  |		Call	0x0,0x47
076d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
076e 0000 0000  |    |		.XXX[0x2]
0770 ; --------------------------------------------------------------------------------------
0770 ; SUBPROGRAM
0770 ; --------------------------------------------------------------------------------------
0770 0773       | s  |		.CONST	0x0773								; Address of begin
0771 0004       |    |		.CONST	0x0004								; Address of exception handler
0772 0001       |    |		.CONST	0x0001								; Number of locals
0773			BODY_0770:
0773			INIT_0770:
0773 e5ff       |    |		Load	0x2,-0x1
0774 8047       | G  |		Call	0x0,0x47
0775 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0776 0000 0000  |    |		.XXX[0x2]
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 077b       | {  |		.CONST	0x077b								; Address of begin
0779 0004       |    |		.CONST	0x0004								; Address of exception handler
077a 0001       |    |		.CONST	0x0001								; Number of locals
077b			BODY_0778:
077b			INIT_0778:
077b e5ff       |    |		Load	0x2,-0x1
077c 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
077d 8233       | 3  |		Call	0x1,0x33
077e 0092 1c1e  |    |		Action	Push_String_Extended,0x1c1e					; "Member_Index"
0780 e5ff       |    |		Load	0x2,-0x1
0781 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0782 8233       | 3  |		Call	0x1,0x33
0783 0092 1c1f  |    |		Action	Push_String_Extended,0x1c1f					; "First_Member"
0785 e5ff       |    |		Load	0x2,-0x1
0786 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0787 820e       |    |		Call	0x1,0xe
0788 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
078a e5ff       |    |		Load	0x2,-0x1
078b 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
078c 8221       | !  |		Call	0x1,0x21
078d 0092 1c20  |    |		Action	Push_String_Extended,0x1c20					; "Member_Site"
078f e5ff       |    |		Load	0x2,-0x1
0790 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0791 8232       | 2  |		Call	0x1,0x32
0792 0092 1c21  |   !|		Action	Push_String_Extended,0x1c21					; "Entry_Params"
0794 e5ff       |    |		Load	0x2,-0x1
0795 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0796 8231       | 1  |		Call	0x1,0x31
0797 0092 1c22  |   "|		Action	Push_String_Extended,0x1c22					; "Entry_Name"
0799 8059       | Y  |		Call	0x0,0x59
079a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
079b 0000 0000  |    |		.BLANK	0000[0x5]
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a3       |    |		.CONST	0x07a3								; Address of begin
07a1 0004       |    |		.CONST	0x0004								; Address of exception handler
07a2 0001       |    |		.CONST	0x0001								; Number of locals
07a3			BODY_07a0:
07a3			INIT_07a0:
07a3 e5ff       |    |		Load	0x2,-0x1
07a4 8047       | G  |		Call	0x0,0x47
07a5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07a6 0000 0000  |    |		.XXX[0x2]
07a8 ; --------------------------------------------------------------------------------------
07a8 ; SUBPROGRAM
07a8 ; --------------------------------------------------------------------------------------
07a8 07ab       |    |		.CONST	0x07ab								; Address of begin
07a9 0004       |    |		.CONST	0x0004								; Address of exception handler
07aa 0001       |    |		.CONST	0x0001								; Number of locals
07ab			BODY_07a8:
07ab			INIT_07a8:
07ab e5ff       |    |		Load	0x2,-0x1
07ac 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
07ad 821e       |    |		Call	0x1,0x1e
07ae 0092 1c23  |   #|		Action	Push_String_Extended,0x1c23					; "Raise_Index"
07b0 e5ff       |    |		Load	0x2,-0x1
07b1 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
07b2 821d       |    |		Call	0x1,0x1d
07b3 0092 1c24  |   $|		Action	Push_String_Extended,0x1c24					; "Raise_Offset"
07b5 e5ff       |    |		Load	0x2,-0x1
07b6 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
07b7 804b       | K  |		Call	0x0,0x4b
07b8 0092 1c25  |   %|		Action	Push_String_Extended,0x1c25					; "Reraising"
07ba e5ff       |    |		Load	0x2,-0x1
07bb 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
07bc 821c       |    |		Call	0x1,0x1c
07bd 0092 1c26  |   &|		Action	Push_String_Extended,0x1c26					; "Exception_Name"
07bf e5ff       |    |		Load	0x2,-0x1
07c0 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
07c1 820e       |    |		Call	0x1,0xe
07c2 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
07c4 e5ff       |    |		Load	0x2,-0x1
07c5 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07c6 8051       | Q  |		Call	0x0,0x51
07c7 0092 1c27  |   '|		Action	Push_String_Extended,0x1c27					; "Raise_Segment"
07c9 8059       | Y  |		Call	0x0,0x59
07ca 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07cb 0000 0000  |    |		.BLANK	0000[0x5]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07d3       |    |		.CONST	0x07d3								; Address of begin
07d1 0004       |    |		.CONST	0x0004								; Address of exception handler
07d2 0001       |    |		.CONST	0x0001								; Number of locals
07d3			BODY_07d0:
07d3			INIT_07d0:
07d3 0092 1c28  |   (|		Action	Push_String_Extended,0x1c28					; "pc = "
07d5 e5ff       |    |		Load	0x2,-0x1
07d6 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
07d7 e5ff       |    |		Load	0x2,-0x1
07d8 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
07d9 e5ff       |    |		Load	0x2,-0x1
07da 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
07db 8223       | #  |		Call	0x1,0x23
07dc 01cc       |    |		Execute	Vector,Catenate
07dd 0092 1c29  |   )|		Action	Push_String_Extended,0x1c29					; "; "
07df 01cc       |    |		Execute	Vector,Catenate
07e0 e5ff       |    |		Load	0x2,-0x1
07e1 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
07e2 805a       | Z  |		Call	0x0,0x5a
07e3 01cc       |    |		Execute	Vector,Catenate
07e4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07e5 0000 0000  |    |		.XXX[0x3]
07e7 0000       |    |
07e8 ; --------------------------------------------------------------------------------------
07e8 ; SUBPROGRAM
07e8 ; --------------------------------------------------------------------------------------
07e8 07eb       |    |		.CONST	0x07eb								; Address of begin
07e9 0004       |    |		.CONST	0x0004								; Address of exception handler
07ea 0001       |    |		.CONST	0x0001								; Number of locals
07eb			BODY_07e8:
07eb			INIT_07e8:
07eb e5ff       |    |		Load	0x2,-0x1
07ec 8047       | G  |		Call	0x0,0x47
07ed 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07ee 0000 0000  |    |		.XXX[0x2]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07f3       |    |		.CONST	0x07f3								; Address of begin
07f1 0004       |    |		.CONST	0x0004								; Address of exception handler
07f2 0001       |    |		.CONST	0x0001								; Number of locals
07f3			BODY_07f0:
07f3			INIT_07f0:
07f3 e5ff       |    |		Load	0x2,-0x1
07f4 8047       | G  |		Call	0x0,0x47
07f5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
07f6 0000 0000  |    |		.XXX[0x2]
07f8 ; --------------------------------------------------------------------------------------
07f8 ; SUBPROGRAM
07f8 ; --------------------------------------------------------------------------------------
07f8 07fb       |    |		.CONST	0x07fb								; Address of begin
07f9 0004       |    |		.CONST	0x0004								; Address of exception handler
07fa 0001       |    |		.CONST	0x0001								; Number of locals
07fb			BODY_07f8:
07fb			INIT_07f8:
07fb e5ff       |    |		Load	0x2,-0x1
07fc 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
07fd 823a       | :  |		Call	0x1,0x3a
07fe 0092 1c2a  |   *|		Action	Push_String_Extended,0x1c2a					; "Mantissa"
0800 e5ff       |    |		Load	0x2,-0x1
0801 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0802 8239       | 9  |		Call	0x1,0x39
0803 0092 1c2b  |   +|		Action	Push_String_Extended,0x1c2b					; "Exponent"
0805 e5ff       |    |		Load	0x2,-0x1
0806 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0807 804b       | K  |		Call	0x0,0x4b
0808 0092 1c2c  |   ,|		Action	Push_String_Extended,0x1c2c					; "Is_Negative"
080a 8052       | R  |		Call	0x0,0x52
080b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
080c 0000 0000  |    |		.BLANK	0000[0x4]
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 0823       | #  |		.CONST	0x0823								; Address of begin
0811 0004       |    |		.CONST	0x0004								; Address of exception handler
0812 0007       |    |		.CONST	0x0007								; Number of locals
0813			INIT_0810:
0813 a05b       | [  |		Store_Unchecked	0x0,0x5b
0814 00c6       |    |		Action	Check_Subprogram_Elaborated
0815 e05c       | \  |		Load	0x0,0x5c
0816 00e6       |    |		Load_Encached	Float_Cache
0817 e05d       | ]  |		Load	0x0,0x5d
0818 e05e       | ^  |		Load	0x0,0x5e
0819 4806       |H   |		Short_Literal	0x6
081a 0007       |    |		Action	Break_Optional
081b e5ff       |    |		Load	0x2,-0x1
081c 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
081d e402       |    |		Load	0x2,0x2
081e e403       |    |		Load	0x2,0x3
081f 4804       |H   |		Short_Literal	0x4
0820 4802       |H   |		Short_Literal	0x2
0821 0099       |    |		Action	Reference_Dynamic
0822 805b       | [  |		Call	0x0,0x5b
0823			BODY_0810:
0823 00d8       |    |		Load_Top	At_Offset_0
0824 805f       | _  |		Call	0x0,0x5f
0825 8060       | `  |		Call	0x0,0x60
0826 00e9       |    |		Load_Encached	String_Cache
0827 01c6       |    |		Execute	Vector,Convert_To_Formal
0828 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0829 0000 0000  |    |		.BLANK	0000[0x7]
0830 ; --------------------------------------------------------------------------------------
0830 ; SUBPROGRAM
0830 ; --------------------------------------------------------------------------------------
0830 0833       | 3  |		.CONST	0x0833								; Address of begin
0831 0004       |    |		.CONST	0x0004								; Address of exception handler
0832 0001       |    |		.CONST	0x0001								; Number of locals
0833			BODY_0830:
0833			INIT_0830:
0833 e5ff       |    |		Load	0x2,-0x1
0834 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0835 823b       | ;  |		Call	0x1,0x3b
0836 0092 1c2d  |   -|		Action	Push_String_Extended,0x1c2d					; "Val_Part"
0838 e5ff       |    |		Load	0x2,-0x1
0839 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
083a 820e       |    |		Call	0x1,0xe
083b 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
083d e5ff       |    |		Load	0x2,-0x1
083e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
083f 8216       |    |		Call	0x1,0x16
0840 0092 1c2e  |   .|		Action	Push_String_Extended,0x1c2e					; "Typ_Part"
0842 8052       | R  |		Call	0x0,0x52
0843 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0844 0000 0000  |    |		.BLANK	0000[0x4]
0848 ; --------------------------------------------------------------------------------------
0848 ; SUBPROGRAM
0848 ; --------------------------------------------------------------------------------------
0848 084b       | K  |		.CONST	0x084b								; Address of begin
0849 0004       |    |		.CONST	0x0004								; Address of exception handler
084a 0001       |    |		.CONST	0x0001								; Number of locals
084b			BODY_0848:
084b			INIT_0848:
084b e5ff       |    |		Load	0x2,-0x1
084c 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
084d 8222       | "  |		Call	0x1,0x22
084e 0092 1c2f  |   /|		Action	Push_String_Extended,0x1c2f					; "Var_Site"
0850 e5ff       |    |		Load	0x2,-0x1
0851 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0852 820e       |    |		Call	0x1,0xe
0853 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0855 e5ff       |    |		Load	0x2,-0x1
0856 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0857 804b       | K  |		Call	0x0,0x4b
0858 0092 1c09  |    |		Action	Push_String_Extended,0x1c09					; "Is_Visible"
085a 8052       | R  |		Call	0x0,0x52
085b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
085c 0000 0000  |    |		.BLANK	0000[0x4]
0860 ; --------------------------------------------------------------------------------------
0860 ; SUBPROGRAM
0860 ; --------------------------------------------------------------------------------------
0860 0863       | c  |		.CONST	0x0863								; Address of begin
0861 0004       |    |		.CONST	0x0004								; Address of exception handler
0862 0001       |    |		.CONST	0x0001								; Number of locals
0863			BODY_0860:
0863			INIT_0860:
0863 e5ff       |    |		Load	0x2,-0x1
0864 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0865 820e       |    |		Call	0x1,0xe
0866 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0868 e5ff       |    |		Load	0x2,-0x1
0869 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
086a 8232       | 2  |		Call	0x1,0x32
086b 0092 1c21  |   !|		Action	Push_String_Extended,0x1c21					; "Entry_Params"
086d e5ff       |    |		Load	0x2,-0x1
086e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
086f 8231       | 1  |		Call	0x1,0x31
0870 0092 1c22  |   "|		Action	Push_String_Extended,0x1c22					; "Entry_Name"
0872 8052       | R  |		Call	0x0,0x52
0873 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0874 0000 0000  |    |		.BLANK	0000[0x4]
0878 ; --------------------------------------------------------------------------------------
0878 ; SUBPROGRAM
0878 ; --------------------------------------------------------------------------------------
0878 087b       | {  |		.CONST	0x087b								; Address of begin
0879 0004       |    |		.CONST	0x0004								; Address of exception handler
087a 0001       |    |		.CONST	0x0001								; Number of locals
087b			BODY_0878:
087b			INIT_0878:
087b e5ff       |    |		Load	0x2,-0x1
087c 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
087d 8233       | 3  |		Call	0x1,0x33
087e 0092 1c1f  |    |		Action	Push_String_Extended,0x1c1f					; "First_Member"
0880 e5ff       |    |		Load	0x2,-0x1
0881 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0882 8234       | 4  |		Call	0x1,0x34
0883 0092 1c30  |   0|		Action	Push_String_Extended,0x1c30					; "Last_Bias"
0885 e5ff       |    |		Load	0x2,-0x1
0886 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0887 820e       |    |		Call	0x1,0xe
0888 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
088a e5ff       |    |		Load	0x2,-0x1
088b 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
088c 8221       | !  |		Call	0x1,0x21
088d 0092 1c31  |   1|		Action	Push_String_Extended,0x1c31					; "Family_Site"
088f e5ff       |    |		Load	0x2,-0x1
0890 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0891 8232       | 2  |		Call	0x1,0x32
0892 0092 1c21  |   !|		Action	Push_String_Extended,0x1c21					; "Entry_Params"
0894 e5ff       |    |		Load	0x2,-0x1
0895 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0896 8231       | 1  |		Call	0x1,0x31
0897 0092 1c22  |   "|		Action	Push_String_Extended,0x1c22					; "Entry_Name"
0899 8059       | Y  |		Call	0x0,0x59
089a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
089b 0000 0000  |    |		.BLANK	0000[0x5]
08a0 ; --------------------------------------------------------------------------------------
08a0 ; SUBPROGRAM
08a0 ; --------------------------------------------------------------------------------------
08a0 08a3       |    |		.CONST	0x08a3								; Address of begin
08a1 0004       |    |		.CONST	0x0004								; Address of exception handler
08a2 0001       |    |		.CONST	0x0001								; Number of locals
08a3			BODY_08a0:
08a3			INIT_08a0:
08a3 e5ff       |    |		Load	0x2,-0x1
08a4 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
08a5 8214       |    |		Call	0x1,0x14
08a6 0092 1c32  |   2|		Action	Push_String_Extended,0x1c32					; "Pointer"
08a8 e5ff       |    |		Load	0x2,-0x1
08a9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
08aa 820e       |    |		Call	0x1,0xe
08ab 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
08ad e5ff       |    |		Load	0x2,-0x1
08ae 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
08af 8216       |    |		Call	0x1,0x16
08b0 0092 1c2e  |   .|		Action	Push_String_Extended,0x1c2e					; "Typ_Part"
08b2 8052       | R  |		Call	0x0,0x52
08b3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08b4 0000 0000  |    |		.BLANK	0000[0x4]
08b8 ; --------------------------------------------------------------------------------------
08b8 ; SUBPROGRAM
08b8 ; --------------------------------------------------------------------------------------
08b8 08bb       |    |		.CONST	0x08bb								; Address of begin
08b9 0004       |    |		.CONST	0x0004								; Address of exception handler
08ba 0001       |    |		.CONST	0x0001								; Number of locals
08bb			BODY_08b8:
08bb			INIT_08b8:
08bb e5ff       |    |		Load	0x2,-0x1
08bc 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
08bd 8215       |    |		Call	0x1,0x15
08be 0092 1c32  |   2|		Action	Push_String_Extended,0x1c32					; "Pointer"
08c0 e5ff       |    |		Load	0x2,-0x1
08c1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
08c2 820e       |    |		Call	0x1,0xe
08c3 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
08c5 e5ff       |    |		Load	0x2,-0x1
08c6 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
08c7 8216       |    |		Call	0x1,0x16
08c8 0092 1c2e  |   .|		Action	Push_String_Extended,0x1c2e					; "Typ_Part"
08ca 8052       | R  |		Call	0x0,0x52
08cb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08cc 0000 0000  |    |		.BLANK	0000[0x4]
08d0 ; --------------------------------------------------------------------------------------
08d0 ; SUBPROGRAM
08d0 ; --------------------------------------------------------------------------------------
08d0 08d3       |    |		.CONST	0x08d3								; Address of begin
08d1 0004       |    |		.CONST	0x0004								; Address of exception handler
08d2 0001       |    |		.CONST	0x0001								; Number of locals
08d3			BODY_08d0:
08d3			INIT_08d0:
08d3 e5ff       |    |		Load	0x2,-0x1
08d4 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
08d5 804c       | L  |		Call	0x0,0x4c
08d6 0092 1c33  |   3|		Action	Push_String_Extended,0x1c33					; "Declarer_Name"
08d8 e5ff       |    |		Load	0x2,-0x1
08d9 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
08da 804c       | L  |		Call	0x0,0x4c
08db 0092 1c34  |   4|		Action	Push_String_Extended,0x1c34					; "Module_Imports"
08dd e5ff       |    |		Load	0x2,-0x1
08de 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
08df 820e       |    |		Call	0x1,0xe
08e0 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
08e2 e5ff       |    |		Load	0x2,-0x1
08e3 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
08e4 8216       |    |		Call	0x1,0x16
08e5 0092 1c35  |   5|		Action	Push_String_Extended,0x1c35					; "Module_Type"
08e7 804d       | M  |		Call	0x0,0x4d
08e8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
08e9 0000 0000  |    |		.BLANK	0000[0x7]
08f0 ; --------------------------------------------------------------------------------------
08f0 ; SUBPROGRAM
08f0 ; --------------------------------------------------------------------------------------
08f0 08f3       |    |		.CONST	0x08f3								; Address of begin
08f1 0004       |    |		.CONST	0x0004								; Address of exception handler
08f2 0001       |    |		.CONST	0x0001								; Number of locals
08f3			BODY_08f0:
08f3			INIT_08f0:
08f3 0092 1c36  |   6|		Action	Push_String_Extended,0x1c36					; "import space = "
08f5 e5ff       |    |		Load	0x2,-0x1
08f6 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
08f7 804c       | L  |		Call	0x0,0x4c
08f8 01cc       |    |		Execute	Vector,Catenate
08f9 0092 1c37  |   7|		Action	Push_String_Extended,0x1c37					; "; declared by "
08fb 01cc       |    |		Execute	Vector,Catenate
08fc e5ff       |    |		Load	0x2,-0x1
08fd 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
08fe 804c       | L  |		Call	0x0,0x4c
08ff 01cc       |    |		Execute	Vector,Catenate
0900 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0901 0000 0000  |    |		.BLANK	0000[0x7]
0908 ; --------------------------------------------------------------------------------------
0908 ; SUBPROGRAM
0908 ; --------------------------------------------------------------------------------------
0908 0913       |    |		.CONST	0x0913								; Address of begin
0909 0004       |    |		.CONST	0x0004								; Address of exception handler
090a 0003       |    |		.CONST	0x0003								; Number of locals
090b			INIT_0908:
090b 48a5       |H   |		Short_Literal	0xa5
090c e058       | X  |		Load	0x0,0x58
090d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
090e 1c08       |    |		Execute_Immediate	Run_Utility,0x8
090f 00d8       |    |		Load_Top	At_Offset_0
0910 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0911 029f 108b  |    |		Declare_Subprogram	INIT_1088,For_Call
0913			BODY_0908:
0913 e402       |    |		Load	0x2,0x2
0914 0092 1c38  |   8|		Action	Push_String_Extended,0x1c38					; "type frame = "
0916 e5ff       |    |		Load	0x2,-0x1
0917 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0918 8211       |    |		Call	0x1,0x11
0919 01cc       |    |		Execute	Vector,Catenate
091a 0092 1c29  |   )|		Action	Push_String_Extended,0x1c29					; "; "
091c 01cc       |    |		Execute	Vector,Catenate
091d 0092 1c39  |   9|		Action	Push_String_Extended,0x1c39					; "data frame = "
091f 01cc       |    |		Execute	Vector,Catenate
0920 e5ff       |    |		Load	0x2,-0x1
0921 340a       |4   |		Execute	Record,Field_Reference,Field_Number 0xa
0922 8214       |    |		Call	0x1,0x14
0923 01cc       |    |		Execute	Vector,Catenate
0924 0092 1c3a  |   :|		Action	Push_String_Extended,0x1c3a					; " "
0926 01cc       |    |		Execute	Vector,Catenate
0927 e058       | X  |		Load	0x0,0x58
0928 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0929 00d1       |    |		Pop_Control	Pop_Count_1
092a 0092 1c3b  |   ;|		Action	Push_String_Extended,0x1c3b					; "In_Rendezvous "
092c e5ff       |    |		Load	0x2,-0x1
092d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
092e 8403       |    |		Call	0x2,0x3
092f 0092 1c3c  |   <|		Action	Push_String_Extended,0x1c3c					; "In_Utility "
0931 e5ff       |    |		Load	0x2,-0x1
0932 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0933 8403       |    |		Call	0x2,0x3
0934 0092 1c3d  |   =|		Action	Push_String_Extended,0x1c3d					; "Has_Package "
0936 e5ff       |    |		Load	0x2,-0x1
0937 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0938 8403       |    |		Call	0x2,0x3
0939 0092 1c3e  |   >|		Action	Push_String_Extended,0x1c3e					; "Has_Children "
093b e5ff       |    |		Load	0x2,-0x1
093c 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
093d 8403       |    |		Call	0x2,0x3
093e e402       |    |		Load	0x2,0x2
093f e058       | X  |		Load	0x0,0x58
0940 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0941 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0942 0000 0000  |    |		.BLANK	0000[0x6]
0948 ; --------------------------------------------------------------------------------------
0948 ; SUBPROGRAM
0948 ; --------------------------------------------------------------------------------------
0948 094d       | M  |		.CONST	0x094d								; Address of begin
0949 0004       |    |		.CONST	0x0004								; Address of exception handler
094a 0002       |    |		.CONST	0x0002								; Number of locals
094b			INIT_0948:
094b 029f 109b  |    |		Declare_Subprogram	INIT_1098,For_Call
094d			BODY_0948:
094d 0092 1c3f  |   ?|		Action	Push_String_Extended,0x1c3f					; "enclosing frame = "
094f e5ff       |    |		Load	0x2,-0x1
0950 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0951 804c       | L  |		Call	0x0,0x4c
0952 01cc       |    |		Execute	Vector,Catenate
0953 0092 1c40  |   @|		Action	Push_String_Extended,0x1c40					; ", "
0955 01cc       |    |		Execute	Vector,Catenate
0956 e5ff       |    |		Load	0x2,-0x1
0957 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0958 8220       |    |		Call	0x1,0x20
0959 01cc       |    |		Execute	Vector,Catenate
095a 0092 1c41  |   A|		Action	Push_String_Extended,0x1c41					; "Auxiliary_Marked"
095c e5ff       |    |		Load	0x2,-0x1
095d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
095e 8402       |    |		Call	0x2,0x2
095f 01cc       |    |		Execute	Vector,Catenate
0960 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0961 0000 0000  |    |		.BLANK	0000[0x7]
0968 ; --------------------------------------------------------------------------------------
0968 ; SUBPROGRAM
0968 ; --------------------------------------------------------------------------------------
0968 096b       | k  |		.CONST	0x096b								; Address of begin
0969 0004       |    |		.CONST	0x0004								; Address of exception handler
096a 0001       |    |		.CONST	0x0001								; Number of locals
096b			BODY_0968:
096b			INIT_0968:
096b e5ff       |    |		Load	0x2,-0x1
096c e5fe       |    |		Load	0x2,-0x2
096d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
096e 804c       | L  |		Call	0x0,0x4c
096f 01cc       |    |		Execute	Vector,Catenate
0970 0092 1c40  |   @|		Action	Push_String_Extended,0x1c40					; ", "
0972 01cc       |    |		Execute	Vector,Catenate
0973 e5fe       |    |		Load	0x2,-0x2
0974 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0975 8214       |    |		Call	0x1,0x14
0976 01cc       |    |		Execute	Vector,Catenate
0977 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0978 ; --------------------------------------------------------------------------------------
0978 ; SUBPROGRAM
0978 ; --------------------------------------------------------------------------------------
0978 097b       | {  |		.CONST	0x097b								; Address of begin
0979 0004       |    |		.CONST	0x0004								; Address of exception handler
097a 0001       |    |		.CONST	0x0001								; Number of locals
097b			BODY_0978:
097b			INIT_0978:
097b e5ff       |    |		Load	0x2,-0x1
097c 8047       | G  |		Call	0x0,0x47
097d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
097e 0000 0000  |    |		.XXX[0x2]
0980 ; --------------------------------------------------------------------------------------
0980 ; SUBPROGRAM
0980 ; --------------------------------------------------------------------------------------
0980 0983       |    |		.CONST	0x0983								; Address of begin
0981 0004       |    |		.CONST	0x0004								; Address of exception handler
0982 0001       |    |		.CONST	0x0001								; Number of locals
0983			BODY_0980:
0983			INIT_0980:
0983 e5ff       |    |		Load	0x2,-0x1
0984 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0985 8248       | H  |		Call	0x1,0x48
0986 0092 1c42  |   B|		Action	Push_String_Extended,0x1c42					; "Forcing_Instruction"
0988 e5ff       |    |		Load	0x2,-0x1
0989 3408       |4   |		Execute	Record,Field_Reference,Field_Number 0x8
098a 8228       | (  |		Call	0x1,0x28
098b 0092 1c43  |   C|		Action	Push_String_Extended,0x1c43					; "Breakpoint_Mask"
098d e5ff       |    |		Load	0x2,-0x1
098e 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
098f 820e       |    |		Call	0x1,0xe
0990 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0992 e5ff       |    |		Load	0x2,-0x1
0993 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0994 8220       |    |		Call	0x1,0x20
0995 0092 1c44  |   D|		Action	Push_String_Extended,0x1c44					; "Control_Extent"
0997 e5ff       |    |		Load	0x2,-0x1
0998 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0999 804b       | K  |		Call	0x0,0x4b
099a 0092 1c45  |   E|		Action	Push_String_Extended,0x1c45					; "Force_Breakpoint"
099c e5ff       |    |		Load	0x2,-0x1
099d 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
099e 804b       | K  |		Call	0x0,0x4b
099f 0092 1c46  |   F|		Action	Push_String_Extended,0x1c46					; "Is_Wired"
09a1 e5ff       |    |		Load	0x2,-0x1
09a2 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
09a3 804b       | K  |		Call	0x0,0x4b
09a4 0092 1c47  |   G|		Action	Push_String_Extended,0x1c47					; "Is_Catalogued"
09a6 e5ff       |    |		Load	0x2,-0x1
09a7 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
09a8 804b       | K  |		Call	0x0,0x4b
09a9 0092 1c48  |   H|		Action	Push_String_Extended,0x1c48					; "Queue_Not_Empty"
09ab e5ff       |    |		Load	0x2,-0x1
09ac 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
09ad 804b       | K  |		Call	0x0,0x4b
09ae 0092 1c49  |   I|		Action	Push_String_Extended,0x1c49					; "Queue_Allocated"
09b0 e5ff       |    |		Load	0x2,-0x1
09b1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
09b2 804c       | L  |		Call	0x0,0x4c
09b3 0092 1c4a  |   J|		Action	Push_String_Extended,0x1c4a					; "Distributor"
09b5 8061       | a  |		Call	0x0,0x61
09b6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09b7 0000       |    |		.XXX[0x1]
09b8 ; --------------------------------------------------------------------------------------
09b8 ; SUBPROGRAM
09b8 ; --------------------------------------------------------------------------------------
09b8 09bb       |    |		.CONST	0x09bb								; Address of begin
09b9 0004       |    |		.CONST	0x0004								; Address of exception handler
09ba 0001       |    |		.CONST	0x0001								; Number of locals
09bb			BODY_09b8:
09bb			INIT_09b8:
09bb e5ff       |    |		Load	0x2,-0x1
09bc e046       | F  |		Load	0x0,0x46
09bd 1b24       | $  |		Execute	Package,Field_Read,Field_Number 0x24
09be 011c       |    |		Execute	Any,Convert_Unchecked
09bf 1c01       |    |		Execute_Immediate	Run_Utility,0x1
09c0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09c1 0000 0000  |    |		.BLANK	0000[0x7]
09c8 ; --------------------------------------------------------------------------------------
09c8 ; SUBPROGRAM
09c8 ; --------------------------------------------------------------------------------------
09c8 09cb       |    |		.CONST	0x09cb								; Address of begin
09c9 0004       |    |		.CONST	0x0004								; Address of exception handler
09ca 0001       |    |		.CONST	0x0001								; Number of locals
09cb			BODY_09c8:
09cb			INIT_09c8:
09cb e5ff       |    |		Load	0x2,-0x1
09cc 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
09cd 824a       | J  |		Call	0x1,0x4a
09ce 0092 1c4b  |   K|		Action	Push_String_Extended,0x1c4b					; "Break_Cause"
09d0 e5ff       |    |		Load	0x2,-0x1
09d1 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
09d2 8219       |    |		Call	0x1,0x19
09d3 0092 1c4c  |   L|		Action	Push_String_Extended,0x1c4c					; "Break_Address"
09d5 e5ff       |    |		Load	0x2,-0x1
09d6 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
09d7 820e       |    |		Call	0x1,0xe
09d8 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
09da e5ff       |    |		Load	0x2,-0x1
09db 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
09dc 8228       | (  |		Call	0x1,0x28
09dd 0092 1c4d  |   M|		Action	Push_String_Extended,0x1c4d					; "Restore_Enable"
09df e5ff       |    |		Load	0x2,-0x1
09e0 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
09e1 804c       | L  |		Call	0x0,0x4c
09e2 0092 1c4e  |   N|		Action	Push_String_Extended,0x1c4e					; "Debugging_Scope"
09e4 8062       | b  |		Call	0x0,0x62
09e5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
09e6 0000 0000  |    |		.XXX[0x2]
09e8 ; --------------------------------------------------------------------------------------
09e8 ; SUBPROGRAM
09e8 ; --------------------------------------------------------------------------------------
09e8 09eb       |    |		.CONST	0x09eb								; Address of begin
09e9 0004       |    |		.CONST	0x0004								; Address of exception handler
09ea 0001       |    |		.CONST	0x0001								; Number of locals
09eb			BODY_09e8:
09eb			INIT_09e8:
09eb 0092 1c4f  |   O|		Action	Push_String_Extended,0x1c4f					; "debugging scope = "
09ed e5ff       |    |		Load	0x2,-0x1
09ee 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
09ef 804c       | L  |		Call	0x0,0x4c
09f0 01cc       |    |		Execute	Vector,Catenate
09f1 0092 1c50  |   P|		Action	Push_String_Extended,0x1c50					; "; restore enable = "
09f3 01cc       |    |		Execute	Vector,Catenate
09f4 e5ff       |    |		Load	0x2,-0x1
09f5 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
09f6 8228       | (  |		Call	0x1,0x28
09f7 01cc       |    |		Execute	Vector,Catenate
09f8 e5ff       |    |		Load	0x2,-0x1
09f9 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
09fa 0092 1c51  |   Q|		Action	Push_String_Extended,0x1c51					; "; break address = "
09fc 8224       | $  |		Call	0x1,0x24
09fd 01cc       |    |		Execute	Vector,Catenate
09fe 0092 1c52  |   R|		Action	Push_String_Extended,0x1c52					; "; cause = "
0a00 01cc       |    |		Execute	Vector,Catenate
0a01 e5ff       |    |		Load	0x2,-0x1
0a02 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0a03 824a       | J  |		Call	0x1,0x4a
0a04 01cc       |    |		Execute	Vector,Catenate
0a05 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a06 0000 0000  |    |		.XXX[0x2]
0a08 ; --------------------------------------------------------------------------------------
0a08 ; SUBPROGRAM
0a08 ; --------------------------------------------------------------------------------------
0a08 0a0b       |    |		.CONST	0x0a0b								; Address of begin
0a09 0004       |    |		.CONST	0x0004								; Address of exception handler
0a0a 0001       |    |		.CONST	0x0001								; Number of locals
0a0b			BODY_0a08:
0a0b			INIT_0a08:
0a0b e5ff       |    |		Load	0x2,-0x1
0a0c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0a0d 8063       | c  |		Call	0x0,0x63
0a0e 0092 1c53  |   S|		Action	Push_String_Extended,0x1c53					; "Node"
0a10 e5ff       |    |		Load	0x2,-0x1
0a11 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0a12 804c       | L  |		Call	0x0,0x4c
0a13 0092 1c54  |   T|		Action	Push_String_Extended,0x1c54					; "Name"
0a15 804e       | N  |		Call	0x0,0x4e
0a16 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a17 0000       |    |		.XXX[0x1]
0a18 ; --------------------------------------------------------------------------------------
0a18 ; SUBPROGRAM
0a18 ; --------------------------------------------------------------------------------------
0a18 0a1b       |    |		.CONST	0x0a1b								; Address of begin
0a19 0004       |    |		.CONST	0x0004								; Address of exception handler
0a1a 0001       |    |		.CONST	0x0001								; Number of locals
0a1b			BODY_0a18:
0a1b			INIT_0a18:
0a1b e5ff       |    |		Load	0x2,-0x1
0a1c 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0a1d 824d       | M  |		Call	0x1,0x4d
0a1e 0092 1c2d  |   -|		Action	Push_String_Extended,0x1c2d					; "Val_Part"
0a20 e5ff       |    |		Load	0x2,-0x1
0a21 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0a22 820e       |    |		Call	0x1,0xe
0a23 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0a25 e5ff       |    |		Load	0x2,-0x1
0a26 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0a27 8216       |    |		Call	0x1,0x16
0a28 0092 1c2e  |   .|		Action	Push_String_Extended,0x1c2e					; "Typ_Part"
0a2a 8052       | R  |		Call	0x0,0x52
0a2b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a2c 0000 0000  |    |		.BLANK	0000[0x4]
0a30 ; --------------------------------------------------------------------------------------
0a30 ; SUBPROGRAM
0a30 ; --------------------------------------------------------------------------------------
0a30 0a33       | 3  |		.CONST	0x0a33								; Address of begin
0a31 0004       |    |		.CONST	0x0004								; Address of exception handler
0a32 0001       |    |		.CONST	0x0001								; Number of locals
0a33			BODY_0a30:
0a33			INIT_0a30:
0a33 e5ff       |    |		Load	0x2,-0x1
0a34 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0a35 820e       |    |		Call	0x1,0xe
0a36 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0a38 e5ff       |    |		Load	0x2,-0x1
0a39 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0a3a 8213       |    |		Call	0x1,0x13
0a3b 0092 1c55  |   U|		Action	Push_String_Extended,0x1c55					; "Dependence_Site"
0a3d 804e       | N  |		Call	0x0,0x4e
0a3e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a3f 0000       |    |		.XXX[0x1]
0a40 ; --------------------------------------------------------------------------------------
0a40 ; SUBPROGRAM
0a40 ; --------------------------------------------------------------------------------------
0a40 0a43       | C  |		.CONST	0x0a43								; Address of begin
0a41 0004       |    |		.CONST	0x0004								; Address of exception handler
0a42 0001       |    |		.CONST	0x0001								; Number of locals
0a43			BODY_0a40:
0a43			INIT_0a40:
0a43 e5ff       |    |		Load	0x2,-0x1
0a44 340b       |4   |		Execute	Record,Field_Reference,Field_Number 0xb
0a45 8221       | !  |		Call	0x1,0x21
0a46 0092 1c56  |   V|		Action	Push_String_Extended,0x1c56					; "Select_Site"
0a48 e5ff       |    |		Load	0x2,-0x1
0a49 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0a4a 8236       | 6  |		Call	0x1,0x36
0a4b 0092 1c57  |   W|		Action	Push_String_Extended,0x1c57					; "Field_Count"
0a4d e5ff       |    |		Load	0x2,-0x1
0a4e 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0a4f 820e       |    |		Call	0x1,0xe
0a50 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0a52 e5ff       |    |		Load	0x2,-0x1
0a53 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0a54 8220       |    |		Call	0x1,0x20
0a55 0092 1c58  |   X|		Action	Push_String_Extended,0x1c58					; "Select_Ref"
0a57 e5ff       |    |		Load	0x2,-0x1
0a58 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0a59 804b       | K  |		Call	0x0,0x4b
0a5a 0092 1c59  |   Y|		Action	Push_String_Extended,0x1c59					; "Some_Choice_Open"
0a5c e5ff       |    |		Load	0x2,-0x1
0a5d 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0a5e 804b       | K  |		Call	0x0,0x4b
0a5f 0092 1c5a  |   Z|		Action	Push_String_Extended,0x1c5a					; "Terminate_Is_Open"
0a61 e5ff       |    |		Load	0x2,-0x1
0a62 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0a63 804b       | K  |		Call	0x0,0x4b
0a64 0092 1c5b  |   [|		Action	Push_String_Extended,0x1c5b					; "Has_Terminate"
0a66 e5ff       |    |		Load	0x2,-0x1
0a67 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0a68 804b       | K  |		Call	0x0,0x4b
0a69 0092 1c5c  |   \|		Action	Push_String_Extended,0x1c5c					; "Timed_Is_Open"
0a6b e5ff       |    |		Load	0x2,-0x1
0a6c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a6d 804b       | K  |		Call	0x0,0x4b
0a6e 0092 1c5d  |   ]|		Action	Push_String_Extended,0x1c5d					; "Has_Timed_Clause"
0a70 e5ff       |    |		Load	0x2,-0x1
0a71 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0a72 8236       | 6  |		Call	0x1,0x36
0a73 0092 1c5e  |   ^|		Action	Push_String_Extended,0x1c5e					; "Last_Choice"
0a75 8061       | a  |		Call	0x0,0x61
0a76 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a77 0000       |    |		.XXX[0x1]
0a78 ; --------------------------------------------------------------------------------------
0a78 ; SUBPROGRAM
0a78 ; --------------------------------------------------------------------------------------
0a78 0a7b       | {  |		.CONST	0x0a7b								; Address of begin
0a79 0004       |    |		.CONST	0x0004								; Address of exception handler
0a7a 0001       |    |		.CONST	0x0001								; Number of locals
0a7b			BODY_0a78:
0a7b			INIT_0a78:
0a7b 0092 1c5f  |   _|		Action	Push_String_Extended,0x1c5f					; "(Of_Kind => "
0a7d e5ff       |    |		Load	0x2,-0x1
0a7e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0a7f 820e       |    |		Call	0x1,0xe
0a80 01cc       |    |		Execute	Vector,Catenate
0a81 0092 1c60  |   `|		Action	Push_String_Extended,0x1c60					; ")"
0a83 01cc       |    |		Execute	Vector,Catenate
0a84 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a85 0000 0000  |    |		.XXX[0x3]
0a87 0000       |    |
0a88 ; --------------------------------------------------------------------------------------
0a88 ; SUBPROGRAM
0a88 ; --------------------------------------------------------------------------------------
0a88 0a8b       |    |		.CONST	0x0a8b								; Address of begin
0a89 0004       |    |		.CONST	0x0004								; Address of exception handler
0a8a 0001       |    |		.CONST	0x0001								; Number of locals
0a8b			BODY_0a88:
0a8b			INIT_0a88:
0a8b e5ff       |    |		Load	0x2,-0x1
0a8c 804a       | J  |		Call	0x0,0x4a
0a8d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a8e 0000 0000  |    |		.XXX[0x2]
0a90 ; --------------------------------------------------------------------------------------
0a90 ; SUBPROGRAM
0a90 ; --------------------------------------------------------------------------------------
0a90 0a93       |    |		.CONST	0x0a93								; Address of begin
0a91 0004       |    |		.CONST	0x0004								; Address of exception handler
0a92 0001       |    |		.CONST	0x0001								; Number of locals
0a93			BODY_0a90:
0a93			INIT_0a90:
0a93 e5ff       |    |		Load	0x2,-0x1
0a94 804a       | J  |		Call	0x0,0x4a
0a95 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0a96 0000 0000  |    |		.XXX[0x2]
0a98 ; --------------------------------------------------------------------------------------
0a98 ; SUBPROGRAM
0a98 ; --------------------------------------------------------------------------------------
0a98 0a9b       |    |		.CONST	0x0a9b								; Address of begin
0a99 0004       |    |		.CONST	0x0004								; Address of exception handler
0a9a 0001       |    |		.CONST	0x0001								; Number of locals
0a9b			BODY_0a98:
0a9b			INIT_0a98:
0a9b e5ff       |    |		Load	0x2,-0x1
0a9c 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0a9d 8253       | S  |		Call	0x1,0x53
0a9e 0092 1c2d  |   -|		Action	Push_String_Extended,0x1c2d					; "Val_Part"
0aa0 e5ff       |    |		Load	0x2,-0x1
0aa1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0aa2 820e       |    |		Call	0x1,0xe
0aa3 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0aa5 e5ff       |    |		Load	0x2,-0x1
0aa6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0aa7 8252       | R  |		Call	0x1,0x52
0aa8 0092 1c2e  |   .|		Action	Push_String_Extended,0x1c2e					; "Typ_Part"
0aaa 8052       | R  |		Call	0x0,0x52
0aab 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0aac 0000 0000  |    |		.BLANK	0000[0x4]
0ab0 ; --------------------------------------------------------------------------------------
0ab0 ; SUBPROGRAM
0ab0 ; --------------------------------------------------------------------------------------
0ab0 0ab3       |    |		.CONST	0x0ab3								; Address of begin
0ab1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ab2 0001       |    |		.CONST	0x0001								; Number of locals
0ab3			BODY_0ab0:
0ab3			INIT_0ab0:
0ab3 e5ff       |    |		Load	0x2,-0x1
0ab4 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0ab5 8210       |    |		Call	0x1,0x10
0ab6 0092 1c2d  |   -|		Action	Push_String_Extended,0x1c2d					; "Val_Part"
0ab8 e5ff       |    |		Load	0x2,-0x1
0ab9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0aba 820e       |    |		Call	0x1,0xe
0abb 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0abd e5ff       |    |		Load	0x2,-0x1
0abe 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0abf 8216       |    |		Call	0x1,0x16
0ac0 0092 1c2e  |   .|		Action	Push_String_Extended,0x1c2e					; "Typ_Part"
0ac2 8052       | R  |		Call	0x0,0x52
0ac3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ac4 0000 0000  |    |		.BLANK	0000[0x4]
0ac8 ; --------------------------------------------------------------------------------------
0ac8 ; SUBPROGRAM
0ac8 ; --------------------------------------------------------------------------------------
0ac8 0acb       |    |		.CONST	0x0acb								; Address of begin
0ac9 0004       |    |		.CONST	0x0004								; Address of exception handler
0aca 0001       |    |		.CONST	0x0001								; Number of locals
0acb			BODY_0ac8:
0acb			INIT_0ac8:
0acb e5ff       |    |		Load	0x2,-0x1
0acc 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0acd 8220       |    |		Call	0x1,0x20
0ace 0092 1c0e  |    |		Action	Push_String_Extended,0x1c0e					; "Control_Offset"
0ad0 e5ff       |    |		Load	0x2,-0x1
0ad1 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0ad2 804b       | K  |		Call	0x0,0x4b
0ad3 0092 1c41  |   A|		Action	Push_String_Extended,0x1c41					; "Auxiliary_Marked"
0ad5 e5ff       |    |		Load	0x2,-0x1
0ad6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0ad7 804c       | L  |		Call	0x0,0x4c
0ad8 0092 1c03  |    |		Action	Push_String_Extended,0x1c03					; "Stack"
0ada 8052       | R  |		Call	0x0,0x52
0adb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0adc 0000 0000  |    |		.BLANK	0000[0x4]
0ae0 ; --------------------------------------------------------------------------------------
0ae0 ; SUBPROGRAM
0ae0 ; --------------------------------------------------------------------------------------
0ae0 0ae3       |    |		.CONST	0x0ae3								; Address of begin
0ae1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ae2 0001       |    |		.CONST	0x0001								; Number of locals
0ae3			BODY_0ae0:
0ae3			INIT_0ae0:
0ae3 e5ff       |    |		Load	0x2,-0x1
0ae4 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0ae5 8220       |    |		Call	0x1,0x20
0ae6 0092 1c61  |   a|		Action	Push_String_Extended,0x1c61					; "Ctl_Offset"
0ae8 e5ff       |    |		Load	0x2,-0x1
0ae9 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0aea 804b       | K  |		Call	0x0,0x4b
0aeb 0092 1c62  |   b|		Action	Push_String_Extended,0x1c62					; "Is_Open"
0aed e5ff       |    |		Load	0x2,-0x1
0aee 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0aef 804b       | K  |		Call	0x0,0x4b
0af0 0092 1c63  |   c|		Action	Push_String_Extended,0x1c63					; "Is_Family"
0af2 e5ff       |    |		Load	0x2,-0x1
0af3 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0af4 804c       | L  |		Call	0x0,0x4c
0af5 0092 1c03  |    |		Action	Push_String_Extended,0x1c03					; "Stack"
0af7 804d       | M  |		Call	0x0,0x4d
0af8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0af9 0000 0000  |    |		.BLANK	0000[0x7]
0b00 ; --------------------------------------------------------------------------------------
0b00 ; SUBPROGRAM
0b00 ; --------------------------------------------------------------------------------------
0b00 0b03       |    |		.CONST	0x0b03								; Address of begin
0b01 0004       |    |		.CONST	0x0004								; Address of exception handler
0b02 0001       |    |		.CONST	0x0001								; Number of locals
0b03			BODY_0b00:
0b03			INIT_0b00:
0b03 e5ff       |    |		Load	0x2,-0x1
0b04 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0b05 821b       |    |		Call	0x1,0x1b
0b06 0092 1c64  |   d|		Action	Push_String_Extended,0x1c64					; "Frame_Lex_Level"
0b08 e5ff       |    |		Load	0x2,-0x1
0b09 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0b0a 821a       |    |		Call	0x1,0x1a
0b0b 0092 1c65  |   e|		Action	Push_String_Extended,0x1c65					; "Return_Address"
0b0d e5ff       |    |		Load	0x2,-0x1
0b0e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0b0f 820e       |    |		Call	0x1,0xe
0b10 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0b12 e5ff       |    |		Load	0x2,-0x1
0b13 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0b14 8256       | V  |		Call	0x1,0x56
0b15 0092 1c66  |   f|		Action	Push_String_Extended,0x1c66					; "Enclosing_Frame"
0b17 804d       | M  |		Call	0x0,0x4d
0b18 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0b19 0000 0000  |    |		.BLANK	0000[0x7]
0b20 ; --------------------------------------------------------------------------------------
0b20 ; SUBPROGRAM
0b20 ; --------------------------------------------------------------------------------------
0b20 0b23       | #  |		.CONST	0x0b23								; Address of begin
0b21 0004       |    |		.CONST	0x0004								; Address of exception handler
0b22 0001       |    |		.CONST	0x0001								; Number of locals
0b23			BODY_0b20:
0b23			INIT_0b20:
0b23 e5ff       |    |		Load	0x2,-0x1
0b24 8047       | G  |		Call	0x0,0x47
0b25 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0b26 0000 0000  |    |		.XXX[0x2]
0b28 ; --------------------------------------------------------------------------------------
0b28 ; SUBPROGRAM
0b28 ; --------------------------------------------------------------------------------------
0b28 0b2b       | +  |		.CONST	0x0b2b								; Address of begin
0b29 0004       |    |		.CONST	0x0004								; Address of exception handler
0b2a 0001       |    |		.CONST	0x0001								; Number of locals
0b2b			BODY_0b28:
0b2b			INIT_0b28:
0b2b e5ff       |    |		Load	0x2,-0x1
0b2c 340a       |4   |		Execute	Record,Field_Reference,Field_Number 0xa
0b2d 8214       |    |		Call	0x1,0x14
0b2e 0092 1c67  |   g|		Action	Push_String_Extended,0x1c67					; "Data_Frame"
0b30 e5ff       |    |		Load	0x2,-0x1
0b31 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0b32 821d       |    |		Call	0x1,0x1d
0b33 0092 1c68  |   h|		Action	Push_String_Extended,0x1c68					; "Block_Start"
0b35 e5ff       |    |		Load	0x2,-0x1
0b36 3408       |4   |		Execute	Record,Field_Reference,Field_Number 0x8
0b37 8220       |    |		Call	0x1,0x20
0b38 0092 1c69  |   i|		Action	Push_String_Extended,0x1c69					; "Dynamic_Link"
0b3a e5ff       |    |		Load	0x2,-0x1
0b3b 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0b3c 820e       |    |		Call	0x1,0xe
0b3d 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0b3f e5ff       |    |		Load	0x2,-0x1
0b40 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0b41 8211       |    |		Call	0x1,0x11
0b42 0092 1c6a  |   j|		Action	Push_String_Extended,0x1c6a					; "Type_Frame"
0b44 e5ff       |    |		Load	0x2,-0x1
0b45 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0b46 804b       | K  |		Call	0x0,0x4b
0b47 0092 1c6b  |   k|		Action	Push_String_Extended,0x1c6b					; "Has_Children"
0b49 e5ff       |    |		Load	0x2,-0x1
0b4a 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0b4b 804b       | K  |		Call	0x0,0x4b
0b4c 0092 1c6c  |   l|		Action	Push_String_Extended,0x1c6c					; "Has_Package"
0b4e e5ff       |    |		Load	0x2,-0x1
0b4f 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0b50 804b       | K  |		Call	0x0,0x4b
0b51 0092 1c6d  |   m|		Action	Push_String_Extended,0x1c6d					; "In_Utility"
0b53 e5ff       |    |		Load	0x2,-0x1
0b54 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b55 804b       | K  |		Call	0x0,0x4b
0b56 0092 1c6e  |   n|		Action	Push_String_Extended,0x1c6e					; "In_Rendezvous"
0b58 e5ff       |    |		Load	0x2,-0x1
0b59 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0b5a 804b       | K  |		Call	0x0,0x4b
0b5b 0092 1c6f  |   o|		Action	Push_String_Extended,0x1c6f					; "Exports_Legal"
0b5d e5ff       |    |		Load	0x2,-0x1
0b5e 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0b5f 804c       | L  |		Call	0x0,0x4c
0b60 0092 1c70  |   p|		Action	Push_String_Extended,0x1c70					; "Outer_Lex_Frame"
0b62 8064       | d  |		Call	0x0,0x64
0b63 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0b64 0000 0000  |    |		.BLANK	0000[0x4]
0b68 ; --------------------------------------------------------------------------------------
0b68 ; SUBPROGRAM
0b68 ; --------------------------------------------------------------------------------------
0b68 0b6b       | k  |		.CONST	0x0b6b								; Address of begin
0b69 0004       |    |		.CONST	0x0004								; Address of exception handler
0b6a 0001       |    |		.CONST	0x0001								; Number of locals
0b6b			BODY_0b68:
0b6b			INIT_0b68:
0b6b e5ff       |    |		Load	0x2,-0x1
0b6c 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0b6d 821b       |    |		Call	0x1,0x1b
0b6e 0092 1c12  |    |		Action	Push_String_Extended,0x1c12					; "Lex_Level"
0b70 e5ff       |    |		Load	0x2,-0x1
0b71 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0b72 8219       |    |		Call	0x1,0x19
0b73 0092 1c13  |    |		Action	Push_String_Extended,0x1c13					; "Subprog_Start"
0b75 e5ff       |    |		Load	0x2,-0x1
0b76 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0b77 821f       |    |		Call	0x1,0x1f
0b78 0092 1c22  |   "|		Action	Push_String_Extended,0x1c22					; "Entry_Name"
0b7a e5ff       |    |		Load	0x2,-0x1
0b7b 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0b7c 820e       |    |		Call	0x1,0xe
0b7d 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0b7f e5ff       |    |		Load	0x2,-0x1
0b80 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0b81 8257       | W  |		Call	0x1,0x57
0b82 0092 1c14  |    |		Action	Push_String_Extended,0x1c14					; "Declare_Frame"
0b84 8062       | b  |		Call	0x0,0x62
0b85 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0b86 0000 0000  |    |		.XXX[0x2]
0b88 ; --------------------------------------------------------------------------------------
0b88 ; SUBPROGRAM
0b88 ; --------------------------------------------------------------------------------------
0b88 0b8b       |    |		.CONST	0x0b8b								; Address of begin
0b89 0004       |    |		.CONST	0x0004								; Address of exception handler
0b8a 0001       |    |		.CONST	0x0001								; Number of locals
0b8b			BODY_0b88:
0b8b			INIT_0b88:
0b8b e5ff       |    |		Load	0x2,-0x1
0b8c 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0b8d 8065       | e  |		Call	0x0,0x65
0b8e 0092 1c71  |   q|		Action	Push_String_Extended,0x1c71					; "Partner_Charge_Vpid"
0b90 e5ff       |    |		Load	0x2,-0x1
0b91 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0b92 804c       | L  |		Call	0x0,0x4c
0b93 0092 1c72  |   r|		Action	Push_String_Extended,0x1c72					; "Partner_Name"
0b95 e5ff       |    |		Load	0x2,-0x1
0b96 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0b97 820e       |    |		Call	0x1,0xe
0b98 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0b9a e5ff       |    |		Load	0x2,-0x1
0b9b 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0b9c 8232       | 2  |		Call	0x1,0x32
0b9d 0092 1c73  |   s|		Action	Push_String_Extended,0x1c73					; "Total_Params"
0b9f e5ff       |    |		Load	0x2,-0x1
0ba0 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0ba1 804b       | K  |		Call	0x0,0x4b
0ba2 0092 1c74  |   t|		Action	Push_String_Extended,0x1c74					; "In_Select"
0ba4 e5ff       |    |		Load	0x2,-0x1
0ba5 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0ba6 822a       | *  |		Call	0x1,0x2a
0ba7 0092 1c75  |   u|		Action	Push_String_Extended,0x1c75					; "Return_Priority"
0ba9 e5ff       |    |		Load	0x2,-0x1
0baa 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0bab 8065       | e  |		Call	0x0,0x65
0bac 0092 1c76  |   v|		Action	Push_String_Extended,0x1c76					; "Return_Charge_Vpid"
0bae e5ff       |    |		Load	0x2,-0x1
0baf 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0bb0 822e       | .  |		Call	0x1,0x2e
0bb1 0092 1c77  |   w|		Action	Push_String_Extended,0x1c77					; "Select_Choice"
0bb3 8066       | f  |		Call	0x0,0x66
0bb4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0bb5 0000 0000  |    |		.XXX[0x3]
0bb7 0000       |    |
0bb8 ; --------------------------------------------------------------------------------------
0bb8 ; SUBPROGRAM
0bb8 ; --------------------------------------------------------------------------------------
0bb8 0bbb       |    |		.CONST	0x0bbb								; Address of begin
0bb9 0004       |    |		.CONST	0x0004								; Address of exception handler
0bba 0001       |    |		.CONST	0x0001								; Number of locals
0bbb			BODY_0bb8:
0bbb			INIT_0bb8:
0bbb e5ff       |    |		Load	0x2,-0x1
0bbc 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
0bbd 8214       |    |		Call	0x1,0x14
0bbe 0092 1c78  |   x|		Action	Push_String_Extended,0x1c78					; "Data_Stack_Mark"
0bc0 e5ff       |    |		Load	0x2,-0x1
0bc1 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0bc2 820e       |    |		Call	0x1,0xe
0bc3 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0bc5 e5ff       |    |		Load	0x2,-0x1
0bc6 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0bc7 8211       |    |		Call	0x1,0x11
0bc8 0092 1c79  |   y|		Action	Push_String_Extended,0x1c79					; "Type_Stack_Mark"
0bca e5ff       |    |		Load	0x2,-0x1
0bcb 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0bcc 804b       | K  |		Call	0x0,0x4b
0bcd 0092 1c7a  |   z|		Action	Push_String_Extended,0x1c7a					; "Appending_Fields"
0bcf e5ff       |    |		Load	0x2,-0x1
0bd0 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0bd1 804b       | K  |		Call	0x0,0x4b
0bd2 0092 1c7b  |   {|		Action	Push_String_Extended,0x1c7b					; "Data_Mark_Used"
0bd4 e5ff       |    |		Load	0x2,-0x1
0bd5 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0bd6 804b       | K  |		Call	0x0,0x4b
0bd7 0092 1c7c  |   ||		Action	Push_String_Extended,0x1c7c					; "Type_Mark_Used"
0bd9 e5ff       |    |		Load	0x2,-0x1
0bda 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0bdb 804b       | K  |		Call	0x0,0x4b
0bdc 0092 1c7d  |   }|		Action	Push_String_Extended,0x1c7d					; "Has_Prior_Mark"
0bde e5ff       |    |		Load	0x2,-0x1
0bdf 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0be0 804b       | K  |		Call	0x0,0x4b
0be1 0092 1c7e  |   ~|		Action	Push_String_Extended,0x1c7e					; "In_Export_Frame"
0be3 8066       | f  |		Call	0x0,0x66
0be4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0be5 0000 0000  |    |		.XXX[0x3]
0be7 0000       |    |
0be8 ; --------------------------------------------------------------------------------------
0be8 ; SUBPROGRAM
0be8 ; --------------------------------------------------------------------------------------
0be8 0bf4       |    |		.CONST	0x0bf4								; Address of begin
0be9 0004       |    |		.CONST	0x0004								; Address of exception handler
0bea 0002       |    |		.CONST	0x0002								; Number of locals
0beb			INIT_0be8:
0beb e2df       |    |		Load	0x1,0xdf
0bec 0322       | "  |		Declare_Variable	Record
0bed e5ff       |    |		Load	0x2,-0x1
0bee e2e0       |    |		Load	0x1,0xe0
0bef e2e1       |    |		Load	0x1,0xe1
0bf0 1de2       |    |		Execute_Immediate	Reference_Lex_1,0xe2
0bf1 8001       |    |		Call	0x0,0x1
0bf2 e402       |    |		Load	0x2,0x2
0bf3 017d       | }  |		Execute	Record,Structure_Write
0bf4			BODY_0be8:
0bf4 00d8       |    |		Load_Top	At_Offset_0
0bf5 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0bf6 804b       | K  |		Call	0x0,0x4b
0bf7 0092 1c7f  |    |		Action	Push_String_Extended,0x1c7f					; "Constrained"
0bf9 e402       |    |		Load	0x2,0x2
0bfa 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0bfb 804b       | K  |		Call	0x0,0x4b
0bfc 0092 1c80  |    |		Action	Push_String_Extended,0x1c80					; "Global_Only"
0bfe e402       |    |		Load	0x2,0x2
0bff 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0c00 8047       | G  |		Call	0x0,0x47
0c01 0092 1c81  |    |		Action	Push_String_Extended,0x1c81					; "Database_Index"
0c03 8052       | R  |		Call	0x0,0x52
0c04 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0c05 0000 0000  |    |		.XXX[0x3]
0c07 0000       |    |
0c08 ; --------------------------------------------------------------------------------------
0c08 ; SUBPROGRAM
0c08 ; --------------------------------------------------------------------------------------
0c08 0c1c       |    |		.CONST	0x0c1c								; Address of begin
0c09 0004       |    |		.CONST	0x0004								; Address of exception handler
0c0a 0004       |    |		.CONST	0x0004								; Number of locals
0c0b			INIT_0c08:
0c0b e2df       |    |		Load	0x1,0xdf
0c0c 0322       | "  |		Declare_Variable	Record
0c0d e5ff       |    |		Load	0x2,-0x1
0c0e e2e0       |    |		Load	0x1,0xe0
0c0f e2e1       |    |		Load	0x1,0xe1
0c10 1de2       |    |		Execute_Immediate	Reference_Lex_1,0xe2
0c11 8001       |    |		Call	0x0,0x1
0c12 e402       |    |		Load	0x2,0x2
0c13 017d       | }  |		Execute	Record,Structure_Write
0c14 483c       |H<  |		Short_Literal	0x3c
0c15 e058       | X  |		Load	0x0,0x58
0c16 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c17 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0c18 00d8       |    |		Load_Top	At_Offset_0
0c19 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0c1a 029f 10ab  |    |		Declare_Subprogram	INIT_10a8,For_Call
0c1c			BODY_0c08:
0c1c 0092 1c82  |    |		Action	Push_String_Extended,0x1c82					; "database index = "
0c1e e402       |    |		Load	0x2,0x2
0c1f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0c20 8047       | G  |		Call	0x0,0x47
0c21 01cc       |    |		Execute	Vector,Catenate
0c22 8404       |    |		Call	0x2,0x4
0c23 0092 1c83  |    |		Action	Push_String_Extended,0x1c83					; "; mode = "
0c25 8404       |    |		Call	0x2,0x4
0c26 e402       |    |		Load	0x2,0x2
0c27 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0c28 6804       |h   |		Jump_Zero	0xc2d
0c29 0092 1c84  |    |		Action	Push_String_Extended,0x1c84					; " GLOBAL"
0c2b 8404       |    |		Call	0x2,0x4
0c2c 7803       |x   |		Jump	0xc30
0c2d 0092 1c85  |    |		Action	Push_String_Extended,0x1c85					; " LOCAL"
0c2f 8404       |    |		Call	0x2,0x4
0c30 e402       |    |		Load	0x2,0x2
0c31 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0c32 6804       |h   |		Jump_Zero	0xc37
0c33 0092 1c86  |    |		Action	Push_String_Extended,0x1c86					; " CONSTRAINED"
0c35 8404       |    |		Call	0x2,0x4
0c36 7803       |x   |		Jump	0xc3a
0c37 0092 1c87  |    |		Action	Push_String_Extended,0x1c87					; " UNCONSTRAINED"
0c39 8404       |    |		Call	0x2,0x4
0c3a e403       |    |		Load	0x2,0x3
0c3b e058       | X  |		Load	0x0,0x58
0c3c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0c3d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0c3e 0000 0000  |    |		.XXX[0x2]
0c40 ; --------------------------------------------------------------------------------------
0c40 ; SUBPROGRAM
0c40 ; --------------------------------------------------------------------------------------
0c40 0c4b       | K  |		.CONST	0x0c4b								; Address of begin
0c41 0004       |    |		.CONST	0x0004								; Address of exception handler
0c42 0003       |    |		.CONST	0x0003								; Number of locals
0c43			INIT_0c40:
0c43 48b4       |H   |		Short_Literal	0xb4
0c44 e058       | X  |		Load	0x0,0x58
0c45 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0c46 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0c47 00d8       |    |		Load_Top	At_Offset_0
0c48 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0c49 029f 10b3  |    |		Declare_Subprogram	INIT_10b0,For_Call
0c4b			BODY_0c40:
0c4b 0092 1c88  |    |		Action	Push_String_Extended,0x1c88					; "In_Entry_Call "
0c4d e5ff       |    |		Load	0x2,-0x1
0c4e 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0c4f 8403       |    |		Call	0x2,0x3
0c50 e402       |    |		Load	0x2,0x2
0c51 0092 1c89  |    |		Action	Push_String_Extended,0x1c89					; "debugging state = ("
0c53 e5ff       |    |		Load	0x2,-0x1
0c54 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0c55 82e5       |    |		Call	0x1,0xe5
0c56 01cc       |    |		Execute	Vector,Catenate
0c57 0092 1c60  |   `|		Action	Push_String_Extended,0x1c60					; ")"
0c59 01cc       |    |		Execute	Vector,Catenate
0c5a e058       | X  |		Load	0x0,0x58
0c5b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0c5c 00d1       |    |		Pop_Control	Pop_Count_1
0c5d e5ff       |    |		Load	0x2,-0x1
0c5e 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0c5f 0c01       |    |		Execute_Immediate	Greater_Equal,0x1
0c60 6810       |h   |		Jump_Zero	0xc71
0c61 e402       |    |		Load	0x2,0x2
0c62 0092 1c8a  |    |		Action	Push_String_Extended,0x1c8a					; " In_Critical_Region "
0c64 e058       | X  |		Load	0x0,0x58
0c65 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0c66 00d1       |    |		Pop_Control	Pop_Count_1
0c67 e5ff       |    |		Load	0x2,-0x1
0c68 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0c69 680c       |h   |		Jump_Zero	0xc76
0c6a e402       |    |		Load	0x2,0x2
0c6b 0092 1c8b  |    |		Action	Push_String_Extended,0x1c8b					; "and Aborted"
0c6d e058       | X  |		Load	0x0,0x58
0c6e 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0c6f 00d1       |    |		Pop_Control	Pop_Count_1
0c70 7805       |x   |		Jump	0xc76
0c71 0092 1c8c  |    |		Action	Push_String_Extended,0x1c8c					; " Aborted_Critical_Region"
0c73 e5ff       |    |		Load	0x2,-0x1
0c74 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0c75 8403       |    |		Call	0x2,0x3
0c76 e402       |    |		Load	0x2,0x2
0c77 e058       | X  |		Load	0x0,0x58
0c78 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0c79 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0c7a 0000 0000  |    |		.BLANK	0000[0x6]
0c80 ; --------------------------------------------------------------------------------------
0c80 ; SUBPROGRAM
0c80 ; --------------------------------------------------------------------------------------
0c80 0c83       |    |		.CONST	0x0c83								; Address of begin
0c81 0004       |    |		.CONST	0x0004								; Address of exception handler
0c82 0001       |    |		.CONST	0x0001								; Number of locals
0c83			BODY_0c80:
0c83			INIT_0c80:
0c83 e5ff       |    |		Load	0x2,-0x1
0c84 8047       | G  |		Call	0x0,0x47
0c85 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0c86 0000 0000  |    |		.XXX[0x2]
0c88 ; --------------------------------------------------------------------------------------
0c88 ; SUBPROGRAM
0c88 ; --------------------------------------------------------------------------------------
0c88 0c8b       |    |		.CONST	0x0c8b								; Address of begin
0c89 0004       |    |		.CONST	0x0004								; Address of exception handler
0c8a 0001       |    |		.CONST	0x0001								; Number of locals
0c8b			BODY_0c88:
0c8b			INIT_0c88:
0c8b e5ff       |    |		Load	0x2,-0x1
0c8c 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0c8d 824d       | M  |		Call	0x1,0x4d
0c8e 0092 1c8d  |    |		Action	Push_String_Extended,0x1c8d					; "For_Module"
0c90 e5ff       |    |		Load	0x2,-0x1
0c91 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0c92 820e       |    |		Call	0x1,0xe
0c93 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0c95 e5ff       |    |		Load	0x2,-0x1
0c96 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0c97 82e7       |    |		Call	0x1,0xe7
0c98 0092 1c8e  |    |		Action	Push_String_Extended,0x1c8e					; "Permitted"
0c9a 8052       | R  |		Call	0x0,0x52
0c9b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0c9c 0000 0000  |    |		.BLANK	0000[0x4]
0ca0 ; --------------------------------------------------------------------------------------
0ca0 ; SUBPROGRAM
0ca0 ; --------------------------------------------------------------------------------------
0ca0 0ca3       |    |		.CONST	0x0ca3								; Address of begin
0ca1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ca2 0001       |    |		.CONST	0x0001								; Number of locals
0ca3			BODY_0ca0:
0ca3			INIT_0ca0:
0ca3 e5ff       |    |		Load	0x2,-0x1
0ca4 0092 1c8f  |    |		Action	Push_String_Extended,0x1c8f					; " @ "
0ca6 01cc       |    |		Execute	Vector,Catenate
0ca7 e5fe       |    |		Load	0x2,-0x2
0ca8 804c       | L  |		Call	0x0,0x4c
0ca9 01cc       |    |		Execute	Vector,Catenate
0caa 0092 1c40  |   @|		Action	Push_String_Extended,0x1c40					; ", "
0cac 01cc       |    |		Execute	Vector,Catenate
0cad e5fd       |    |		Load	0x2,-0x3
0cae 8211       |    |		Call	0x1,0x11
0caf 01cc       |    |		Execute	Vector,Catenate
0cb0 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0cb1 0000 0000  |    |		.BLANK	0000[0x7]
0cb8 ; --------------------------------------------------------------------------------------
0cb8 ; SUBPROGRAM
0cb8 ; --------------------------------------------------------------------------------------
0cb8 0cbb       |    |		.CONST	0x0cbb								; Address of begin
0cb9 0004       |    |		.CONST	0x0004								; Address of exception handler
0cba 0001       |    |		.CONST	0x0001								; Number of locals
0cbb			BODY_0cb8:
0cbb			INIT_0cb8:
0cbb e5ff       |    |		Load	0x2,-0x1
0cbc 0092 1c8f  |    |		Action	Push_String_Extended,0x1c8f					; " @ "
0cbe 01cc       |    |		Execute	Vector,Catenate
0cbf e5fe       |    |		Load	0x2,-0x2
0cc0 804c       | L  |		Call	0x0,0x4c
0cc1 01cc       |    |		Execute	Vector,Catenate
0cc2 0092 1c40  |   @|		Action	Push_String_Extended,0x1c40					; ", "
0cc4 01cc       |    |		Execute	Vector,Catenate
0cc5 e5fd       |    |		Load	0x2,-0x3
0cc6 8214       |    |		Call	0x1,0x14
0cc7 01cc       |    |		Execute	Vector,Catenate
0cc8 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0cc9 0000 0000  |    |		.BLANK	0000[0x7]
0cd0 ; --------------------------------------------------------------------------------------
0cd0 ; SUBPROGRAM
0cd0 ; --------------------------------------------------------------------------------------
0cd0 0cd3       |    |		.CONST	0x0cd3								; Address of begin
0cd1 0004       |    |		.CONST	0x0004								; Address of exception handler
0cd2 0001       |    |		.CONST	0x0001								; Number of locals
0cd3			BODY_0cd0:
0cd3			INIT_0cd0:
0cd3 e5ff       |    |		Load	0x2,-0x1
0cd4 e067       | g  |		Load	0x0,0x67
0cd5 011c       |    |		Execute	Any,Convert_Unchecked
0cd6 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0cd7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0cd8 ; --------------------------------------------------------------------------------------
0cd8 ; SUBPROGRAM
0cd8 ; --------------------------------------------------------------------------------------
0cd8 0cdb       |    |		.CONST	0x0cdb								; Address of begin
0cd9 0004       |    |		.CONST	0x0004								; Address of exception handler
0cda 0001       |    |		.CONST	0x0001								; Number of locals
0cdb			BODY_0cd8:
0cdb			INIT_0cd8:
0cdb e5ff       |    |		Load	0x2,-0x1
0cdc e068       | h  |		Load	0x0,0x68
0cdd 011c       |    |		Execute	Any,Convert_Unchecked
0cde 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0cdf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ce0 ; --------------------------------------------------------------------------------------
0ce0 ; SUBPROGRAM
0ce0 ; --------------------------------------------------------------------------------------
0ce0 0ce3       |    |		.CONST	0x0ce3								; Address of begin
0ce1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ce2 0001       |    |		.CONST	0x0001								; Number of locals
0ce3			BODY_0ce0:
0ce3			INIT_0ce0:
0ce3 e5ff       |    |		Load	0x2,-0x1
0ce4 e046       | F  |		Load	0x0,0x46
0ce5 1b41       | A  |		Execute	Package,Field_Read,Field_Number 0x41
0ce6 011c       |    |		Execute	Any,Convert_Unchecked
0ce7 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0ce8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ce9 0000 0000  |    |		.BLANK	0000[0x7]
0cf0 ; --------------------------------------------------------------------------------------
0cf0 ; SUBPROGRAM
0cf0 ; --------------------------------------------------------------------------------------
0cf0 0cf3       |    |		.CONST	0x0cf3								; Address of begin
0cf1 0004       |    |		.CONST	0x0004								; Address of exception handler
0cf2 0001       |    |		.CONST	0x0001								; Number of locals
0cf3			BODY_0cf0:
0cf3			INIT_0cf0:
0cf3 e5ff       |    |		Load	0x2,-0x1
0cf4 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0cf5 822a       | *  |		Call	0x1,0x2a
0cf6 0092 1c90  |    |		Action	Push_String_Extended,0x1c90					; "Base_Priority"
0cf8 e5ff       |    |		Load	0x2,-0x1
0cf9 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0cfa 804b       | K  |		Call	0x0,0x4b
0cfb 0092 1c91  |    |		Action	Push_String_Extended,0x1c91					; "Fixed_Priority"
0cfd e5ff       |    |		Load	0x2,-0x1
0cfe 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0cff 8047       | G  |		Call	0x0,0x47
0d00 0092 1c92  |    |		Action	Push_String_Extended,0x1c92					; "Last_Job_Priority"
0d02 e5ff       |    |		Load	0x2,-0x1
0d03 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0d04 804b       | K  |		Call	0x0,0x4b
0d05 0092 1c93  |    |		Action	Push_String_Extended,0x1c93					; "Aborted_In_Critical_Region"
0d07 e5ff       |    |		Load	0x2,-0x1
0d08 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0d09 8047       | G  |		Call	0x0,0x47
0d0a 0092 1c94  |    |		Action	Push_String_Extended,0x1c94					; "Critical_Region_Count"
0d0c e5ff       |    |		Load	0x2,-0x1
0d0d 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0d0e 82e4       |    |		Call	0x1,0xe4
0d0f 0092 1c95  |    |		Action	Push_String_Extended,0x1c95					; "Debugging_State"
0d11 e5ff       |    |		Load	0x2,-0x1
0d12 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0d13 804c       | L  |		Call	0x0,0x4c
0d14 0092 1c96  |    |		Action	Push_String_Extended,0x1c96					; "Associated_Heap"
0d16 e5ff       |    |		Load	0x2,-0x1
0d17 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0d18 820e       |    |		Call	0x1,0xe
0d19 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0d1b e5ff       |    |		Load	0x2,-0x1
0d1c 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0d1d 804b       | K  |		Call	0x0,0x4b
0d1e 0092 1c97  |    |		Action	Push_String_Extended,0x1c97					; "In_Entry_Call"
0d20 e5ff       |    |		Load	0x2,-0x1
0d21 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0d22 822d       | -  |		Call	0x1,0x2d
0d23 0092 1c98  |    |		Action	Push_String_Extended,0x1c98					; "Mode"
0d25 e5ff       |    |		Load	0x2,-0x1
0d26 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0d27 822b       | +  |		Call	0x1,0x2b
0d28 0092 1c99  |    |		Action	Push_String_Extended,0x1c99					; "Delay_Time"
0d2a 8064       | d  |		Call	0x0,0x64
0d2b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0d2c 0000 0000  |    |		.BLANK	0000[0x4]
0d30 ; --------------------------------------------------------------------------------------
0d30 ; SUBPROGRAM
0d30 ; --------------------------------------------------------------------------------------
0d30 0d3d       | =  |		.CONST	0x0d3d								; Address of begin
0d31 0004       |    |		.CONST	0x0004								; Address of exception handler
0d32 0004       |    |		.CONST	0x0004								; Number of locals
0d33			INIT_0d30:
0d33 6080       |`   |		Indirect_Literal	Discrete,0xdb4,{0x00000000, 0x00000400}
0d34 e058       | X  |		Load	0x0,0x58
0d35 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0d36 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0d37 00d8       |    |		Load_Top	At_Offset_0
0d38 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0d39 029f 10c3  |    |		Declare_Subprogram	INIT_10c0,For_Call
0d3b 029f 10d3  |    |		Declare_Subprogram	INIT_10d0,For_Call
0d3d			BODY_0d30:
0d3d e402       |    |		Load	0x2,0x2
0d3e 0092 1c9a  |    |		Action	Push_String_Extended,0x1c9a					; "(Current_Slice => "
0d40 e5ff       |    |		Load	0x2,-0x1
0d41 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0d42 8259       | Y  |		Call	0x1,0x59
0d43 01cc       |    |		Execute	Vector,Catenate
0d44 e058       | X  |		Load	0x0,0x58
0d45 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0d46 00d1       |    |		Pop_Control	Pop_Count_1
0d47 e5ff       |    |		Load	0x2,-0x1
0d48 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0d49 0092 1c9b  |    |		Action	Push_String_Extended,0x1c9b					; "Caller_Is_Waiting"
0d4b 8404       |    |		Call	0x2,0x4
0d4c e5ff       |    |		Load	0x2,-0x1
0d4d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0d4e 0092 1c9c  |    |		Action	Push_String_Extended,0x1c9c					; "Has_Been_Rousted"
0d50 8404       |    |		Call	0x2,0x4
0d51 e5ff       |    |		Load	0x2,-0x1
0d52 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0d53 0092 1c9d  |    |		Action	Push_String_Extended,0x1c9d					; "Held_By_Scheduler"
0d55 8404       |    |		Call	0x2,0x4
0d56 e5ff       |    |		Load	0x2,-0x1
0d57 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0d58 6806       |h   |		Jump_Zero	0xd5f
0d59 e5ff       |    |		Load	0x2,-0x1
0d5a 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0d5b 82eb       |    |		Call	0x1,0xeb
0d5c 0092 1c9e  |    |		Action	Push_String_Extended,0x1c9e					; "Memory_Condition"
0d5e 8403       |    |		Call	0x2,0x3
0d5f e5ff       |    |		Load	0x2,-0x1
0d60 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0d61 82ed       |    |		Call	0x1,0xed
0d62 0092 1c9f  |    |		Action	Push_String_Extended,0x1c9f					; "Block_Condition"
0d64 8403       |    |		Call	0x2,0x3
0d65 e5ff       |    |		Load	0x2,-0x1
0d66 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
0d67 82ec       |    |		Call	0x1,0xec
0d68 0092 1ca0  |    |		Action	Push_String_Extended,0x1ca0					; "Current_Mode"
0d6a 8403       |    |		Call	0x2,0x3
0d6b e5ff       |    |		Load	0x2,-0x1
0d6c 3c07       |<   |		Execute	Record,Field_Read,Field_Number 0x7
0d6d 822a       | *  |		Call	0x1,0x2a
0d6e 0092 1ca1  |    |		Action	Push_String_Extended,0x1ca1					; "Current_Priority"
0d70 8403       |    |		Call	0x2,0x3
0d71 e5ff       |    |		Load	0x2,-0x1
0d72 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0d73 0092 1ca2  |    |		Action	Push_String_Extended,0x1ca2					; "Caller_Must_Wait"
0d75 8404       |    |		Call	0x2,0x4
0d76 e5ff       |    |		Load	0x2,-0x1
0d77 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
0d78 0092 1ca3  |    |		Action	Push_String_Extended,0x1ca3					; "Module_Is_Task"
0d7a 8404       |    |		Call	0x2,0x4
0d7b e5ff       |    |		Load	0x2,-0x1
0d7c 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
0d7d 0092 1ca4  |    |		Action	Push_String_Extended,0x1ca4					; "Module_Aborted"
0d7f 8404       |    |		Call	0x2,0x4
0d80 e5ff       |    |		Load	0x2,-0x1
0d81 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
0d82 0092 1ca5  |    |		Action	Push_String_Extended,0x1ca5					; "Breakpoint_On"
0d84 8404       |    |		Call	0x2,0x4
0d85 e5ff       |    |		Load	0x2,-0x1
0d86 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
0d87 0092 1ca6  |    |		Action	Push_String_Extended,0x1ca6					; "Intrainstruction"
0d89 8404       |    |		Call	0x2,0x4
0d8a e5ff       |    |		Load	0x2,-0x1
0d8b 340d       |4   |		Execute	Record,Field_Reference,Field_Number 0xd
0d8c 8220       |    |		Call	0x1,0x20
0d8d 0092 1ca7  |    |		Action	Push_String_Extended,0x1ca7					; "Control_Tos"
0d8f 8403       |    |		Call	0x2,0x3
0d90 e5ff       |    |		Load	0x2,-0x1
0d91 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
0d92 820e       |    |		Call	0x1,0xe
0d93 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0d95 8403       |    |		Call	0x2,0x3
0d96 e5ff       |    |		Load	0x2,-0x1
0d97 3c0f       |<   |		Execute	Record,Field_Read,Field_Number 0xf
0d98 8065       | e  |		Call	0x0,0x65
0d99 0092 1ca8  |    |		Action	Push_String_Extended,0x1ca8					; "Job_For_Charging"
0d9b 8403       |    |		Call	0x2,0x3
0d9c e5ff       |    |		Load	0x2,-0x1
0d9d 3410       |4   |		Execute	Record,Field_Reference,Field_Number 0x10
0d9e 8219       |    |		Call	0x1,0x19
0d9f 0092 1ca9  |    |		Action	Push_String_Extended,0x1ca9					; "Program_Counter"
0da1 8403       |    |		Call	0x2,0x3
0da2 e5ff       |    |		Load	0x2,-0x1
0da3 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
0da4 821b       |    |		Call	0x1,0x1b
0da5 0092 1caa  |    |		Action	Push_String_Extended,0x1caa					; "Executing_Lex"
0da7 8403       |    |		Call	0x2,0x3
0da8 e402       |    |		Load	0x2,0x2
0da9 0092 1c60  |   `|		Action	Push_String_Extended,0x1c60					; ")"
0dab e058       | X  |		Load	0x0,0x58
0dac 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0dad 00d1       |    |		Pop_Control	Pop_Count_1
0dae e402       |    |		Load	0x2,0x2
0daf e058       | X  |		Load	0x0,0x58
0db0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0db1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0db2 0000 0000  |    |		.XXX[0x2]
0db4 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000400}
0db8 ; --------------------------------------------------------------------------------------
0db8 ; SUBPROGRAM
0db8 ; --------------------------------------------------------------------------------------
0db8 0dc5       |    |		.CONST	0x0dc5								; Address of begin
0db9 0004       |    |		.CONST	0x0004								; Address of exception handler
0dba 0004       |    |		.CONST	0x0004								; Number of locals
0dbb			INIT_0db8:
0dbb 4882       |H   |		Short_Literal	0x82
0dbc e058       | X  |		Load	0x0,0x58
0dbd 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0dbe 1c08       |    |		Execute_Immediate	Run_Utility,0x8
0dbf 00d8       |    |		Load_Top	At_Offset_0
0dc0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0dc1 029f 10e3  |    |		Declare_Subprogram	INIT_10e0,For_Call
0dc3 029f 10f3  |    |		Declare_Subprogram	INIT_10f0,For_Call
0dc5			BODY_0db8:
0dc5 e402       |    |		Load	0x2,0x2
0dc6 0092 1cab  |    |		Action	Push_String_Extended,0x1cab					; "(Queue_Successor => "
0dc8 e5ff       |    |		Load	0x2,-0x1
0dc9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0dca 804c       | L  |		Call	0x0,0x4c
0dcb 01cc       |    |		Execute	Vector,Catenate
0dcc e058       | X  |		Load	0x0,0x58
0dcd 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0dce 00d1       |    |		Pop_Control	Pop_Count_1
0dcf e5ff       |    |		Load	0x2,-0x1
0dd0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0dd1 0092 1cac  |    |		Action	Push_String_Extended,0x1cac					; "Has_Micro_Context"
0dd3 8404       |    |		Call	0x2,0x4
0dd4 e5ff       |    |		Load	0x2,-0x1
0dd5 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0dd6 8211       |    |		Call	0x1,0x11
0dd7 0092 1cad  |    |		Action	Push_String_Extended,0x1cad					; "Type_Tos"
0dd9 8403       |    |		Call	0x2,0x3
0dda e5ff       |    |		Load	0x2,-0x1
0ddb 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0ddc 820e       |    |		Call	0x1,0xe
0ddd 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0ddf 8403       |    |		Call	0x2,0x3
0de0 e5ff       |    |		Load	0x2,-0x1
0de1 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
0de2 8220       |    |		Call	0x1,0x20
0de3 0092 1cae  |    |		Action	Push_String_Extended,0x1cae					; "Current_Frame"
0de5 8403       |    |		Call	0x2,0x3
0de6 e5ff       |    |		Load	0x2,-0x1
0de7 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0de8 8214       |    |		Call	0x1,0x14
0de9 0092 1caf  |    |		Action	Push_String_Extended,0x1caf					; "Data_Tos"
0deb 8403       |    |		Call	0x2,0x3
0dec e402       |    |		Load	0x2,0x2
0ded 0092 1c60  |   `|		Action	Push_String_Extended,0x1c60					; ")"
0def e058       | X  |		Load	0x0,0x58
0df0 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0df1 00d1       |    |		Pop_Control	Pop_Count_1
0df2 e402       |    |		Load	0x2,0x2
0df3 e058       | X  |		Load	0x0,0x58
0df4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0df5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0df6 0000 0000  |    |		.XXX[0x2]
0df8 ; --------------------------------------------------------------------------------------
0df8 ; SUBPROGRAM
0df8 ; --------------------------------------------------------------------------------------
0df8 0dfb       |    |		.CONST	0x0dfb								; Address of begin
0df9 0004       |    |		.CONST	0x0004								; Address of exception handler
0dfa 0001       |    |		.CONST	0x0001								; Number of locals
0dfb			BODY_0df8:
0dfb			INIT_0df8:
0dfb e5ff       |    |		Load	0x2,-0x1
0dfc 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0dfd 8214       |    |		Call	0x1,0x14
0dfe 0092 1cb0  |    |		Action	Push_String_Extended,0x1cb0					; "Data_Extent"
0e00 e5ff       |    |		Load	0x2,-0x1
0e01 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0e02 8212       |    |		Call	0x1,0x12
0e03 0092 1cb1  |    |		Action	Push_String_Extended,0x1cb1					; "Queue_Extent"
0e05 e5ff       |    |		Load	0x2,-0x1
0e06 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0e07 822c       | ,  |		Call	0x1,0x2c
0e08 0092 1cb2  |    |		Action	Push_String_Extended,0x1cb2					; "Space_Mgr_Retries"
0e0a e5ff       |    |		Load	0x2,-0x1
0e0b 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0e0c 820e       |    |		Call	0x1,0xe
0e0d 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0e0f e5ff       |    |		Load	0x2,-0x1
0e10 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0e11 8211       |    |		Call	0x1,0x11
0e12 0092 1cb3  |    |		Action	Push_String_Extended,0x1cb3					; "Type_Extent"
0e14 e5ff       |    |		Load	0x2,-0x1
0e15 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0e16 804c       | L  |		Call	0x0,0x4c
0e17 0092 1cb4  |    |		Action	Push_String_Extended,0x1cb4					; "Breakpoint_Scope"
0e19 8059       | Y  |		Call	0x0,0x59
0e1a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0e1b 0000 0000  |    |		.BLANK	0000[0x5]
0e20 ; --------------------------------------------------------------------------------------
0e20 ; SUBPROGRAM
0e20 ; --------------------------------------------------------------------------------------
0e20 0e25       | %  |		.CONST	0x0e25								; Address of begin
0e21 0004       |    |		.CONST	0x0004								; Address of exception handler
0e22 0002       |    |		.CONST	0x0002								; Number of locals
0e23			INIT_0e20:
0e23 029f 1103  |    |		Declare_Subprogram	INIT_1100,For_Call
0e25			BODY_0e20:
0e25 e5ff       |    |		Load	0x2,-0x1
0e26 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0e27 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0e28 e5ff       |    |		Load	0x2,-0x1
0e29 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0e2a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0e2b 0092 1cb5  |    |		Action	Push_String_Extended,0x1cb5					; "value"
0e2d 82ea       |    |		Call	0x1,0xea
0e2e e5ff       |    |		Load	0x2,-0x1
0e2f 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0e30 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0e31 e5ff       |    |		Load	0x2,-0x1
0e32 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0e33 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0e34 0092 1cb6  |    |		Action	Push_String_Extended,0x1cb6					; "; type"
0e36 82e9       |    |		Call	0x1,0xe9
0e37 01cc       |    |		Execute	Vector,Catenate
0e38 8402       |    |		Call	0x2,0x2
0e39 01cc       |    |		Execute	Vector,Catenate
0e3a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0e3b 0000 0000  |    |		.BLANK	0000[0x5]
0e40 ; --------------------------------------------------------------------------------------
0e40 ; SUBPROGRAM
0e40 ; --------------------------------------------------------------------------------------
0e40 0e43       | C  |		.CONST	0x0e43								; Address of begin
0e41 0004       |    |		.CONST	0x0004								; Address of exception handler
0e42 0001       |    |		.CONST	0x0001								; Number of locals
0e43			BODY_0e40:
0e43			INIT_0e40:
0e43 e5ff       |    |		Load	0x2,-0x1
0e44 e5fe       |    |		Load	0x2,-0x2
0e45 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0e46 804c       | L  |		Call	0x0,0x4c
0e47 01cc       |    |		Execute	Vector,Catenate
0e48 0092 1c40  |   @|		Action	Push_String_Extended,0x1c40					; ", "
0e4a 01cc       |    |		Execute	Vector,Catenate
0e4b e5fe       |    |		Load	0x2,-0x2
0e4c 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0e4d 8220       |    |		Call	0x1,0x20
0e4e 01cc       |    |		Execute	Vector,Catenate
0e4f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0e50 ; --------------------------------------------------------------------------------------
0e50 ; SUBPROGRAM
0e50 ; --------------------------------------------------------------------------------------
0e50 0e53       | S  |		.CONST	0x0e53								; Address of begin
0e51 0004       |    |		.CONST	0x0004								; Address of exception handler
0e52 0001       |    |		.CONST	0x0001								; Number of locals
0e53			BODY_0e50:
0e53			INIT_0e50:
0e53 e5ff       |    |		Load	0x2,-0x1
0e54 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0e55 82ed       |    |		Call	0x1,0xed
0e56 0092 1c29  |   )|		Action	Push_String_Extended,0x1c29					; "; "
0e58 01cc       |    |		Execute	Vector,Catenate
0e59 e5ff       |    |		Load	0x2,-0x1
0e5a 3410       |4   |		Execute	Record,Field_Reference,Field_Number 0x10
0e5b 0092 1c28  |   (|		Action	Push_String_Extended,0x1c28					; "pc = "
0e5d 8224       | $  |		Call	0x1,0x24
0e5e 01cc       |    |		Execute	Vector,Catenate
0e5f 0092 1cb7  |    |		Action	Push_String_Extended,0x1cb7					; "; ctos = "
0e61 01cc       |    |		Execute	Vector,Catenate
0e62 e5ff       |    |		Load	0x2,-0x1
0e63 340d       |4   |		Execute	Record,Field_Reference,Field_Number 0xd
0e64 8220       |    |		Call	0x1,0x20
0e65 01cc       |    |		Execute	Vector,Catenate
0e66 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0e67 0000       |    |		.XXX[0x1]
0e68 ; --------------------------------------------------------------------------------------
0e68 ; SUBPROGRAM
0e68 ; --------------------------------------------------------------------------------------
0e68 0e6b       | k  |		.CONST	0x0e6b								; Address of begin
0e69 0004       |    |		.CONST	0x0004								; Address of exception handler
0e6a 0001       |    |		.CONST	0x0001								; Number of locals
0e6b			BODY_0e68:
0e6b			INIT_0e68:
0e6b 0092 1cb8  |    |		Action	Push_String_Extended,0x1cb8					; "type tos = "
0e6d e5ff       |    |		Load	0x2,-0x1
0e6e 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0e6f 8211       |    |		Call	0x1,0x11
0e70 01cc       |    |		Execute	Vector,Catenate
0e71 0092 1cb9  |    |		Action	Push_String_Extended,0x1cb9					; "; data tos = "
0e73 01cc       |    |		Execute	Vector,Catenate
0e74 e5ff       |    |		Load	0x2,-0x1
0e75 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0e76 8214       |    |		Call	0x1,0x14
0e77 01cc       |    |		Execute	Vector,Catenate
0e78 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0e79 0000 0000  |    |		.BLANK	0000[0x7]
0e80 ; --------------------------------------------------------------------------------------
0e80 ; SUBPROGRAM
0e80 ; --------------------------------------------------------------------------------------
0e80 0e83       |    |		.CONST	0x0e83								; Address of begin
0e81 0004       |    |		.CONST	0x0004								; Address of exception handler
0e82 0001       |    |		.CONST	0x0001								; Number of locals
0e83			BODY_0e80:
0e83			INIT_0e80:
0e83 0092 1cba  |    |		Action	Push_String_Extended,0x1cba					; "type extent = "
0e85 e5ff       |    |		Load	0x2,-0x1
0e86 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0e87 8211       |    |		Call	0x1,0x11
0e88 01cc       |    |		Execute	Vector,Catenate
0e89 0092 1cbb  |    |		Action	Push_String_Extended,0x1cbb					; "; queue extent = "
0e8b 01cc       |    |		Execute	Vector,Catenate
0e8c e5ff       |    |		Load	0x2,-0x1
0e8d 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
0e8e 8212       |    |		Call	0x1,0x12
0e8f 01cc       |    |		Execute	Vector,Catenate
0e90 0092 1cbc  |    |		Action	Push_String_Extended,0x1cbc					; "; data extent = "
0e92 01cc       |    |		Execute	Vector,Catenate
0e93 e5ff       |    |		Load	0x2,-0x1
0e94 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
0e95 8214       |    |		Call	0x1,0x14
0e96 01cc       |    |		Execute	Vector,Catenate
0e97 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0e98 ; --------------------------------------------------------------------------------------
0e98 ; SUBPROGRAM
0e98 ; --------------------------------------------------------------------------------------
0e98 0e9b       |    |		.CONST	0x0e9b								; Address of begin
0e99 0004       |    |		.CONST	0x0004								; Address of exception handler
0e9a 0001       |    |		.CONST	0x0001								; Number of locals
0e9b			BODY_0e98:
0e9b			INIT_0e98:
0e9b e5ff       |    |		Load	0x2,-0x1
0e9c 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
0e9d 0092 1cbd  |    |		Action	Push_String_Extended,0x1cbd					; "subr @ "
0e9f 82f3       |    |		Call	0x1,0xf3
0ea0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ea1 0000 0000  |    |		.BLANK	0000[0x7]
0ea8 ; --------------------------------------------------------------------------------------
0ea8 ; SUBPROGRAM
0ea8 ; --------------------------------------------------------------------------------------
0ea8 0eab       |    |		.CONST	0x0eab								; Address of begin
0ea9 0004       |    |		.CONST	0x0004								; Address of exception handler
0eaa 0001       |    |		.CONST	0x0001								; Number of locals
0eab			BODY_0ea8:
0eab			INIT_0ea8:
0eab e5ff       |    |		Load	0x2,-0x1
0eac 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
0ead 8215       |    |		Call	0x1,0x15
0eae 0092 1cbe  |    |		Action	Push_String_Extended,0x1cbe					; "Ref_Item"
0eb0 e5ff       |    |		Load	0x2,-0x1
0eb1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0eb2 820e       |    |		Call	0x1,0xe
0eb3 0092 1c10  |    |		Action	Push_String_Extended,0x1c10					; "Of_Kind"
0eb5 e5ff       |    |		Load	0x2,-0x1
0eb6 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0eb7 8216       |    |		Call	0x1,0x16
0eb8 0092 1c2e  |   .|		Action	Push_String_Extended,0x1c2e					; "Typ_Part"
0eba 8052       | R  |		Call	0x0,0x52
0ebb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0ebc 0000 0000  |    |		.BLANK	0000[0x4]
0ec0 ; --------------------------------------------------------------------------------------
0ec0 ; SUBPROGRAM
0ec0 ; --------------------------------------------------------------------------------------
0ec0 0f0b       |    |		.CONST	0x0f0b								; Address of begin
0ec1 0004       |    |		.CONST	0x0004								; Address of exception handler
0ec2 0021       | !  |		.CONST	0x0021								; Number of locals
0ec3			INIT_0ec0:
0ec3 029f 1113  |    |		Declare_Subprogram	INIT_1110,For_Call
0ec5 e5ff       |    |		Load	0x2,-0x1
0ec6 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0ec7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0ec8 0007       |    |		Action	Break_Optional
0ec9 00d8       |    |		Load_Top	At_Offset_0
0eca e046       | F  |		Load	0x0,0x46
0ecb 1b59       | Y  |		Execute	Package,Field_Read,Field_Number 0x59
0ecc 011c       |    |		Execute	Any,Convert_Unchecked
0ecd 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0ece 0092 1cbf  |    |		Action	Push_String_Extended,0x1cbf					; ": "
0ed0 01cc       |    |		Execute	Vector,Catenate
0ed1 029f 1183  |    |		Declare_Subprogram	INIT_1180,For_Call
0ed3 029f 11a3  |    |		Declare_Subprogram	INIT_11a0,For_Call
0ed5 029f 11bb  |    |		Declare_Subprogram	INIT_11b8,For_Call
0ed7 029f 11d3  |    |		Declare_Subprogram	INIT_11d0,For_Call
0ed9 029f 11eb  |    |		Declare_Subprogram	INIT_11e8,For_Call
0edb 029f 1203  |    |		Declare_Subprogram	INIT_1200,For_Call
0edd 029f 1223  |   #|		Declare_Subprogram	INIT_1220,For_Call
0edf 029f 123b  |   ;|		Declare_Subprogram	INIT_1238,For_Call
0ee1 029f 1253  |   S|		Declare_Subprogram	INIT_1250,For_Call
0ee3 029f 126b  |   k|		Declare_Subprogram	INIT_1268,For_Call
0ee5 029f 1283  |    |		Declare_Subprogram	INIT_1280,For_Call
0ee7 029f 129b  |    |		Declare_Subprogram	INIT_1298,For_Call
0ee9 029f 12b3  |    |		Declare_Subprogram	INIT_12b0,For_Call
0eeb 029f 12cb  |    |		Declare_Subprogram	INIT_12c8,For_Call
0eed 029f 12eb  |    |		Declare_Subprogram	INIT_12e8,For_Call
0eef 029f 130b  |    |		Declare_Subprogram	INIT_1308,For_Call
0ef1 029f 1323  |   #|		Declare_Subprogram	INIT_1320,For_Call
0ef3 029f 133b  |   ;|		Declare_Subprogram	INIT_1338,For_Call
0ef5 029f 1353  |   S|		Declare_Subprogram	INIT_1350,For_Call
0ef7 029f 136b  |   k|		Declare_Subprogram	INIT_1368,For_Call
0ef9 029f 1383  |    |		Declare_Subprogram	INIT_1380,For_Call
0efb 029f 139b  |    |		Declare_Subprogram	INIT_1398,For_Call
0efd 029f 13b3  |    |		Declare_Subprogram	INIT_13b0,For_Call
0eff 029f 13cb  |    |		Declare_Subprogram	INIT_13c8,For_Call
0f01 029f 13e3  |    |		Declare_Subprogram	INIT_13e0,For_Call
0f03 029f 13fb  |    |		Declare_Subprogram	INIT_13f8,For_Call
0f05 029f 1413  |    |		Declare_Subprogram	INIT_1410,For_Call
0f07 029f 142b  |   +|		Declare_Subprogram	INIT_1428,For_Call
0f09 029f 1463  |   c|		Declare_Subprogram	INIT_1460,For_Call
0f0b			BODY_0ec0:
0f0b e403       |    |		Load	0x2,0x3
0f0c 467f       |F   |		Jump_Case	0x80
0f0d 7881       |x   |		Jump	0xf8f								; case 0x0
0f0e 7884       |x   |		Jump	0xf93								; case 0x1
0f0f 7885       |x   |		Jump	0xf95								; case 0x2
0f10 78e9       |x   |		Jump	0xffa								; case 0x3
0f11 787f       |x   |		Jump	0xf91								; case 0x4
0f12 7884       |x   |		Jump	0xf97								; case 0x5
0f13 7885       |x   |		Jump	0xf99								; case 0x6
0f14 78e5       |x   |		Jump	0xffa								; case 0x7
0f15 7885       |x   |		Jump	0xf9b								; case 0x8
0f16 78e3       |x   |		Jump	0xffa								; case 0x9
0f17 7885       |x   |		Jump	0xf9d								; case 0xa
0f18 78e1       |x   |		Jump	0xffa								; case 0xb
0f19 7877       |xw  |		Jump	0xf91								; case 0xc
0f1a 78df       |x   |		Jump	0xffa								; case 0xd
0f1b 7883       |x   |		Jump	0xf9f								; case 0xe
0f1c 78dd       |x   |		Jump	0xffa								; case 0xf
0f1d 7883       |x   |		Jump	0xfa1								; case 0x10
0f1e 7884       |x   |		Jump	0xfa3								; case 0x11
0f1f 7875       |xu  |		Jump	0xf95								; case 0x12
0f20 78d9       |x   |		Jump	0xffa								; case 0x13
0f21 786f       |xo  |		Jump	0xf91								; case 0x14
0f22 7882       |x   |		Jump	0xfa5								; case 0x15
0f23 7875       |xu  |		Jump	0xf99								; case 0x16
0f24 78d5       |x   |		Jump	0xffa								; case 0x17
0f25 7881       |x   |		Jump	0xfa7								; case 0x18
0f26 7882       |x   |		Jump	0xfa9								; case 0x19
0f27 78d2       |x   |		Jump	0xffa								; case 0x1a
0f28 78d1       |x   |		Jump	0xffa								; case 0x1b
0f29 7867       |xg  |		Jump	0xf91								; case 0x1c
0f2a 78cf       |x   |		Jump	0xffa								; case 0x1d
0f2b 787f       |x   |		Jump	0xfab								; case 0x1e
0f2c 7889       |x   |		Jump	0xfb6								; case 0x1f
0f2d 78cc       |x   |		Jump	0xffa								; case 0x20
0f2e 7889       |x   |		Jump	0xfb8								; case 0x21
0f2f 7865       |xe  |		Jump	0xf95								; case 0x22
0f30 78c9       |x   |		Jump	0xffa								; case 0x23
0f31 785f       |x_  |		Jump	0xf91								; case 0x24
0f32 78c7       |x   |		Jump	0xffa								; case 0x25
0f33 7865       |xe  |		Jump	0xf99								; case 0x26
0f34 78c5       |x   |		Jump	0xffa								; case 0x27
0f35 78c4       |x   |		Jump	0xffa								; case 0x28
0f36 7881       |x   |		Jump	0xfb8								; case 0x29
0f37 78c2       |x   |		Jump	0xffa								; case 0x2a
0f38 78c1       |x   |		Jump	0xffa								; case 0x2b
0f39 7857       |xW  |		Jump	0xf91								; case 0x2c
0f3a 78bf       |x   |		Jump	0xffa								; case 0x2d
0f3b 7887       |x   |		Jump	0xfc3								; case 0x2e
0f3c 78bd       |x   |		Jump	0xffa								; case 0x2f
0f3d 78bc       |x   |		Jump	0xffa								; case 0x30
0f3e 78bb       |x   |		Jump	0xffa								; case 0x31
0f3f 7855       |xU  |		Jump	0xf95								; case 0x32
0f40 78b9       |x   |		Jump	0xffa								; case 0x33
0f41 78b8       |x   |		Jump	0xffa								; case 0x34
0f42 78b7       |x   |		Jump	0xffa								; case 0x35
0f43 7855       |xU  |		Jump	0xf99								; case 0x36
0f44 78b5       |x   |		Jump	0xffa								; case 0x37
0f45 787f       |x   |		Jump	0xfc5								; case 0x38
0f46 78b3       |x   |		Jump	0xffa								; case 0x39
0f47 78b2       |x   |		Jump	0xffa								; case 0x3a
0f48 78b1       |x   |		Jump	0xffa								; case 0x3b
0f49 7847       |xG  |		Jump	0xf91								; case 0x3c
0f4a 78af       |x   |		Jump	0xffa								; case 0x3d
0f4b 787b       |x{  |		Jump	0xfc7								; case 0x3e
0f4c 7885       |x   |		Jump	0xfd2								; case 0x3f
0f4d 78ac       |x   |		Jump	0xffa								; case 0x40
0f4e 7885       |x   |		Jump	0xfd4								; case 0x41
0f4f 7849       |xI  |		Jump	0xf99								; case 0x42
0f50 78a9       |x   |		Jump	0xffa								; case 0x43
0f51 783f       |x?  |		Jump	0xf91								; case 0x44
0f52 78a7       |x   |		Jump	0xffa								; case 0x45
0f53 7882       |x   |		Jump	0xfd6								; case 0x46
0f54 78a5       |x   |		Jump	0xffa								; case 0x47
0f55 78a4       |x   |		Jump	0xffa								; case 0x48
0f56 7881       |x   |		Jump	0xfd8								; case 0x49
0f57 78a2       |x   |		Jump	0xffa								; case 0x4a
0f58 78a1       |x   |		Jump	0xffa								; case 0x4b
0f59 7837       |x7  |		Jump	0xf91								; case 0x4c
0f5a 789f       |x   |		Jump	0xffa								; case 0x4d
0f5b 787e       |x~  |		Jump	0xfda								; case 0x4e
0f5c 789d       |x   |		Jump	0xffa								; case 0x4f
0f5d 789c       |x   |		Jump	0xffa								; case 0x50
0f5e 789b       |x   |		Jump	0xffa								; case 0x51
0f5f 7885       |x   |		Jump	0xfe5								; case 0x52
0f60 7899       |x   |		Jump	0xffa								; case 0x53
0f61 7898       |x   |		Jump	0xffa								; case 0x54
0f62 7897       |x   |		Jump	0xffa								; case 0x55
0f63 7883       |x   |		Jump	0xfe7								; case 0x56
0f64 7895       |x   |		Jump	0xffa								; case 0x57
0f65 7883       |x   |		Jump	0xfe9								; case 0x58
0f66 7893       |x   |		Jump	0xffa								; case 0x59
0f67 7892       |x   |		Jump	0xffa								; case 0x5a
0f68 7891       |x   |		Jump	0xffa								; case 0x5b
0f69 7890       |x   |		Jump	0xffa								; case 0x5c
0f6a 788f       |x   |		Jump	0xffa								; case 0x5d
0f6b 788e       |x   |		Jump	0xffa								; case 0x5e
0f6c 787e       |x~  |		Jump	0xfeb								; case 0x5f
0f6d 788c       |x   |		Jump	0xffa								; case 0x60
0f6e 788b       |x   |		Jump	0xffa								; case 0x61
0f6f 788a       |x   |		Jump	0xffa								; case 0x62
0f70 7889       |x   |		Jump	0xffa								; case 0x63
0f71 7888       |x   |		Jump	0xffa								; case 0x64
0f72 7887       |x   |		Jump	0xffa								; case 0x65
0f73 7886       |x   |		Jump	0xffa								; case 0x66
0f74 7885       |x   |		Jump	0xffa								; case 0x67
0f75 7884       |x   |		Jump	0xffa								; case 0x68
0f76 7883       |x   |		Jump	0xffa								; case 0x69
0f77 7882       |x   |		Jump	0xffa								; case 0x6a
0f78 7881       |x   |		Jump	0xffa								; case 0x6b
0f79 7817       |x   |		Jump	0xf91								; case 0x6c
0f7a 787f       |x   |		Jump	0xffa								; case 0x6d
0f7b 7871       |xq  |		Jump	0xfed								; case 0x6e
0f7c 787d       |x}  |		Jump	0xffa								; case 0x6f
0f7d 787c       |x|  |		Jump	0xffa								; case 0x70
0f7e 787b       |x{  |		Jump	0xffa								; case 0x71
0f7f 787a       |xz  |		Jump	0xffa								; case 0x72
0f80 7879       |xy  |		Jump	0xffa								; case 0x73
0f81 780f       |x   |		Jump	0xf91								; case 0x74
0f82 7877       |xw  |		Jump	0xffa								; case 0x75
0f83 7815       |x   |		Jump	0xf99								; case 0x76
0f84 7875       |xu  |		Jump	0xffa								; case 0x77
0f85 7874       |xt  |		Jump	0xffa								; case 0x78
0f86 7873       |xs  |		Jump	0xffa								; case 0x79
0f87 7872       |xr  |		Jump	0xffa								; case 0x7a
0f88 7871       |xq  |		Jump	0xffa								; case 0x7b
0f89 7807       |x   |		Jump	0xf91								; case 0x7c
0f8a 786f       |xo  |		Jump	0xffa								; case 0x7d
0f8b 786c       |xl  |		Jump	0xff8								; case 0x7e
0f8c 7800       |x   |		Jump	0xf8d								; case 0x7f
0f8d 8420       |    |		Call	0x2,0x20
0f8e 786c       |xl  |		Jump	0xffb
0f8f 8405       |    |		Call	0x2,0x5
0f90 786a       |xj  |		Jump	0xffb
0f91 8406       |    |		Call	0x2,0x6
0f92 7868       |xh  |		Jump	0xffb
0f93 8407       |    |		Call	0x2,0x7
0f94 7866       |xf  |		Jump	0xffb
0f95 8408       |    |		Call	0x2,0x8
0f96 7864       |xd  |		Jump	0xffb
0f97 8409       |    |		Call	0x2,0x9
0f98 7862       |xb  |		Jump	0xffb
0f99 840a       |    |		Call	0x2,0xa
0f9a 7860       |x`  |		Jump	0xffb
0f9b 840b       |    |		Call	0x2,0xb
0f9c 785e       |x^  |		Jump	0xffb
0f9d 840c       |    |		Call	0x2,0xc
0f9e 785c       |x\  |		Jump	0xffb
0f9f 840d       |    |		Call	0x2,0xd
0fa0 785a       |xZ  |		Jump	0xffb
0fa1 840e       |    |		Call	0x2,0xe
0fa2 7858       |xX  |		Jump	0xffb
0fa3 840f       |    |		Call	0x2,0xf
0fa4 7856       |xV  |		Jump	0xffb
0fa5 8410       |    |		Call	0x2,0x10
0fa6 7854       |xT  |		Jump	0xffb
0fa7 8411       |    |		Call	0x2,0x11
0fa8 7852       |xR  |		Jump	0xffb
0fa9 8412       |    |		Call	0x2,0x12
0faa 7850       |xP  |		Jump	0xffb
0fab e5fe       |    |		Load	0x2,-0x2
0fac 6807       |h   |		Jump_Zero	0xfb4
0fad e5ff       |    |		Load	0x2,-0x1
0fae e29e       |    |		Load	0x1,0x9e
0faf e29f       |    |		Load	0x1,0x9f
0fb0 1da0       |    |		Execute_Immediate	Reference_Lex_1,0xa0
0fb1 8001       |    |		Call	0x0,0x1
0fb2 8250       | P  |		Call	0x1,0x50
0fb3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0fb4 e404       |    |		Load	0x2,0x4
0fb5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0fb6 8413       |    |		Call	0x2,0x13
0fb7 7843       |xC  |		Jump	0xffb
0fb8 e5fe       |    |		Load	0x2,-0x2
0fb9 6807       |h   |		Jump_Zero	0xfc1
0fba e5ff       |    |		Load	0x2,-0x1
0fbb e2a6       |    |		Load	0x1,0xa6
0fbc e2a7       |    |		Load	0x1,0xa7
0fbd 1da8       |    |		Execute_Immediate	Reference_Lex_1,0xa8
0fbe 8001       |    |		Call	0x0,0x1
0fbf 8254       | T  |		Call	0x1,0x54
0fc0 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0fc1 8414       |    |		Call	0x2,0x14
0fc2 7838       |x8  |		Jump	0xffb
0fc3 8415       |    |		Call	0x2,0x15
0fc4 7836       |x6  |		Jump	0xffb
0fc5 8416       |    |		Call	0x2,0x16
0fc6 7834       |x4  |		Jump	0xffb
0fc7 e5fe       |    |		Load	0x2,-0x2
0fc8 6807       |h   |		Jump_Zero	0xfd0
0fc9 e5ff       |    |		Load	0x2,-0x1
0fca e2b2       |    |		Load	0x1,0xb2
0fcb e2b3       |    |		Load	0x1,0xb3
0fcc 1db4       |    |		Execute_Immediate	Reference_Lex_1,0xb4
0fcd 8001       |    |		Call	0x0,0x1
0fce 8251       | Q  |		Call	0x1,0x51
0fcf 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0fd0 e404       |    |		Load	0x2,0x4
0fd1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0fd2 8417       |    |		Call	0x2,0x17
0fd3 7827       |x'  |		Jump	0xffb
0fd4 8418       |    |		Call	0x2,0x18
0fd5 7825       |x%  |		Jump	0xffb
0fd6 8419       |    |		Call	0x2,0x19
0fd7 7823       |x#  |		Jump	0xffb
0fd8 841a       |    |		Call	0x2,0x1a
0fd9 7821       |x!  |		Jump	0xffb
0fda e5fe       |    |		Load	0x2,-0x2
0fdb 6807       |h   |		Jump_Zero	0xfe3
0fdc e5ff       |    |		Load	0x2,-0x1
0fdd e2c6       |    |		Load	0x1,0xc6
0fde e2c7       |    |		Load	0x1,0xc7
0fdf 1dc8       |    |		Execute_Immediate	Reference_Lex_1,0xc8
0fe0 8001       |    |		Call	0x0,0x1
0fe1 8230       | 0  |		Call	0x1,0x30
0fe2 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0fe3 e404       |    |		Load	0x2,0x4
0fe4 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0fe5 841b       |    |		Call	0x2,0x1b
0fe6 7814       |x   |		Jump	0xffb
0fe7 841c       |    |		Call	0x2,0x1c
0fe8 7812       |x   |		Jump	0xffb
0fe9 841d       |    |		Call	0x2,0x1d
0fea 7810       |x   |		Jump	0xffb
0feb 841e       |    |		Call	0x2,0x1e
0fec 780e       |x   |		Jump	0xffb
0fed e5fe       |    |		Load	0x2,-0x2
0fee 6807       |h   |		Jump_Zero	0xff6
0fef e5ff       |    |		Load	0x2,-0x1
0ff0 e2ce       |    |		Load	0x1,0xce
0ff1 e2cf       |    |		Load	0x1,0xcf
0ff2 1dd0       |    |		Execute_Immediate	Reference_Lex_1,0xd0
0ff3 8001       |    |		Call	0x0,0x1
0ff4 8235       | 5  |		Call	0x1,0x35
0ff5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0ff6 e404       |    |		Load	0x2,0x4
0ff7 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0ff8 841f       |    |		Call	0x2,0x1f
0ff9 7801       |x   |		Jump	0xffb
0ffa 8421       | !  |		Call	0x2,0x21
0ffb 0831       | 1  |		Execute_Immediate	Raise,0x31
0ffc 0000 0000  |    |		.BLANK	0000[0x4]
1000 ; --------------------------------------------------------------------------------------
1000 ; SUBPROGRAM
1000 ; --------------------------------------------------------------------------------------
1000 100a       |    |		.CONST	0x100a								; Address of begin
1001 0004       |    |		.CONST	0x0004								; Address of exception handler
1002 0003       |    |		.CONST	0x0003								; Number of locals
1003			INIT_1000:
1003 e5ff       |    |		Load	0x2,-0x1
1004 e272       | r  |		Load	0x1,0x72
1005 e273       | s  |		Load	0x1,0x73
1006 1d74       | t  |		Execute_Immediate	Reference_Lex_1,0x74
1007 8001       |    |		Call	0x0,0x1
1008 0092 1cc0  |    |		Action	Push_String_Extended,0x1cc0					; "AUXILIARY_STATE: "
100a			BODY_1000:
100a e5fe       |    |		Load	0x2,-0x2
100b 6803       |h   |		Jump_Zero	0x100f
100c e402       |    |		Load	0x2,0x2
100d 82f0       |    |		Call	0x1,0xf0
100e 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
100f 00d8       |    |		Load_Top	At_Offset_0
1010 e402       |    |		Load	0x2,0x2
1011 82f5       |    |		Call	0x1,0xf5
1012 01cc       |    |		Execute	Vector,Catenate
1013 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1014 0000 0000  |    |		.BLANK	0000[0x4]
1018 ; --------------------------------------------------------------------------------------
1018 ; SUBPROGRAM
1018 ; --------------------------------------------------------------------------------------
1018 1022       | "  |		.CONST	0x1022								; Address of begin
1019 0004       |    |		.CONST	0x0004								; Address of exception handler
101a 0003       |    |		.CONST	0x0003								; Number of locals
101b			INIT_1018:
101b e5ff       |    |		Load	0x2,-0x1
101c e276       | v  |		Load	0x1,0x76
101d e277       | w  |		Load	0x1,0x77
101e 1d78       | x  |		Execute_Immediate	Reference_Lex_1,0x78
101f 8001       |    |		Call	0x0,0x1
1020 0092 1cc1  |    |		Action	Push_String_Extended,0x1cc1					; "AUXILIARY_ALLOCATION: "
1022			BODY_1018:
1022 e5fe       |    |		Load	0x2,-0x2
1023 6803       |h   |		Jump_Zero	0x1027
1024 e402       |    |		Load	0x2,0x2
1025 82f1       |    |		Call	0x1,0xf1
1026 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1027 00d8       |    |		Load_Top	At_Offset_0
1028 e402       |    |		Load	0x2,0x2
1029 82f6       |    |		Call	0x1,0xf6
102a 01cc       |    |		Execute	Vector,Catenate
102b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
102c 0000 0000  |    |		.BLANK	0000[0x4]
1030 ; --------------------------------------------------------------------------------------
1030 ; SUBPROGRAM
1030 ; --------------------------------------------------------------------------------------
1030 1033       | 3  |		.CONST	0x1033								; Address of begin
1031 0004       |    |		.CONST	0x0004								; Address of exception handler
1032 0001       |    |		.CONST	0x0001								; Number of locals
1033			BODY_1030:
1033			INIT_1030:
1033 e7ff       |    |		Load	0x3,-0x1
1034 0f00       |    |		Execute_Immediate	Equal,0x0
1035 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1036 0000 0000  |    |		.XXX[0x2]
1038 ; --------------------------------------------------------------------------------------
1038 ; SUBPROGRAM
1038 ; --------------------------------------------------------------------------------------
1038 103b       | ;  |		.CONST	0x103b								; Address of begin
1039 0004       |    |		.CONST	0x0004								; Address of exception handler
103a 0001       |    |		.CONST	0x0001								; Number of locals
103b			BODY_1038:
103b			INIT_1038:
103b 4607       |F   |		Jump_Case	0x8
103c 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
103d 7807       |x   |		Jump	0x1045								; case 0x1
103e 780a       |x   |		Jump	0x1049								; case 0x2
103f 780e       |x   |		Jump	0x104e								; case 0x3
1040 7811       |x   |		Jump	0x1052								; case 0x4
1041 7812       |x   |		Jump	0x1054								; case 0x5
1042 7813       |x   |		Jump	0x1056								; case 0x6
1043 7817       |x   |		Jump	0x105b								; case 0x7
1044 4302       |C   |		.XXX[0x1]
1045 00da       |    |		Load_Top	At_Offset_2
1046 0091 1bf0  |    |		Action	Push_String_Extended_Indexed,0x1bf0				; "NO_BREAKPOINT"
1048 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
1049 00db       |    |		Load_Top	At_Offset_3
104a 00db       |    |		Load_Top	At_Offset_3
104b 00e0       |    |		Load_Encached	Standard_Cache
104c 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
104d 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
104e 00da       |    |		Load_Top	At_Offset_2
104f 00e0       |    |		Load_Encached	Standard_Cache
1050 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
1051 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
1052 00db       |    |		Load_Top	At_Offset_3
1053 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
1054 00db       |    |		Load_Top	At_Offset_3
1055 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
1056 e046       | F  |		Load	0x0,0x46
1057 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
1058 00dc       |    |		Load_Top	At_Offset_4
1059 0267       | g  |		Execute	Discrete,Predecessor
105a 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
105b e046       | F  |		Load	0x0,0x46
105c 1b1b       |    |		Execute	Package,Field_Read,Field_Number 0x1b
105d 00dc       |    |		Load_Top	At_Offset_4
105e 0268       | h  |		Execute	Discrete,Successor
105f 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
1060 ; --------------------------------------------------------------------------------------
1060 ; SUBPROGRAM
1060 ; --------------------------------------------------------------------------------------
1060 1063       | c  |		.CONST	0x1063								; Address of begin
1061 0004       |    |		.CONST	0x0004								; Address of exception handler
1062 0001       |    |		.CONST	0x0001								; Number of locals
1063			BODY_1060:
1063			INIT_1060:
1063 e7fd       |    |		Load	0x3,-0x3
1064 6806       |h   |		Jump_Zero	0x106b
1065 e402       |    |		Load	0x2,0x2
1066 0092 1c29  |   )|		Action	Push_String_Extended,0x1c29					; "; "
1068 e058       | X  |		Load	0x0,0x58
1069 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
106a 00d1       |    |		Pop_Control	Pop_Count_1
106b e402       |    |		Load	0x2,0x2
106c e7ff       |    |		Load	0x3,-0x1
106d 0092 1cc2  |    |		Action	Push_String_Extended,0x1cc2					; " = "
106f 01cc       |    |		Execute	Vector,Catenate
1070 e7fe       |    |		Load	0x3,-0x2
1071 01cc       |    |		Execute	Vector,Catenate
1072 e058       | X  |		Load	0x0,0x58
1073 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1074 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
1075 0000 0000  |    |		.XXX[0x3]
1077 0000       |    |
1078 ; --------------------------------------------------------------------------------------
1078 ; SUBPROGRAM
1078 ; --------------------------------------------------------------------------------------
1078 107b       | {  |		.CONST	0x107b								; Address of begin
1079 0004       |    |		.CONST	0x0004								; Address of exception handler
107a 0001       |    |		.CONST	0x0001								; Number of locals
107b			BODY_1078:
107b			INIT_1078:
107b e7ff       |    |		Load	0x3,-0x1
107c 0f01       |    |		Execute_Immediate	Equal,0x1
107d 6808       |h   |		Jump_Zero	0x1086
107e e402       |    |		Load	0x2,0x2
107f 0092 1c29  |   )|		Action	Push_String_Extended,0x1c29					; "; "
1081 e7fe       |    |		Load	0x3,-0x2
1082 01cc       |    |		Execute	Vector,Catenate
1083 e058       | X  |		Load	0x0,0x58
1084 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1085 00d1       |    |		Pop_Control	Pop_Count_1
1086 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
1087 0000       |    |		.XXX[0x1]
1088 ; --------------------------------------------------------------------------------------
1088 ; SUBPROGRAM
1088 ; --------------------------------------------------------------------------------------
1088 108b       |    |		.CONST	0x108b								; Address of begin
1089 0004       |    |		.CONST	0x0004								; Address of exception handler
108a 0001       |    |		.CONST	0x0001								; Number of locals
108b			BODY_1088:
108b			INIT_1088:
108b e7ff       |    |		Load	0x3,-0x1
108c 0f01       |    |		Execute_Immediate	Equal,0x1
108d 6805       |h   |		Jump_Zero	0x1093
108e e402       |    |		Load	0x2,0x2
108f e7fe       |    |		Load	0x3,-0x2
1090 e058       | X  |		Load	0x0,0x58
1091 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1092 00d1       |    |		Pop_Control	Pop_Count_1
1093 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
1094 0000 0000  |    |		.BLANK	0000[0x4]
1098 ; --------------------------------------------------------------------------------------
1098 ; SUBPROGRAM
1098 ; --------------------------------------------------------------------------------------
1098 109b       |    |		.CONST	0x109b								; Address of begin
1099 0004       |    |		.CONST	0x0004								; Address of exception handler
109a 0001       |    |		.CONST	0x0001								; Number of locals
109b			BODY_1098:
109b			INIT_1098:
109b e7ff       |    |		Load	0x3,-0x1
109c 0f01       |    |		Execute_Immediate	Equal,0x1
109d 6804       |h   |		Jump_Zero	0x10a2
109e 4820       |H   |		Short_Literal	0x20
109f e7fe       |    |		Load	0x3,-0x2
10a0 01ca       |    |		Execute	Vector,Prepend
10a1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
10a2 00ea       |    |		Load_Encached	Null_String_Cache
10a3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
10a4 0000 0000  |    |		.BLANK	0000[0x4]
10a8 ; --------------------------------------------------------------------------------------
10a8 ; SUBPROGRAM
10a8 ; --------------------------------------------------------------------------------------
10a8 10ab       |    |		.CONST	0x10ab								; Address of begin
10a9 0004       |    |		.CONST	0x0004								; Address of exception handler
10aa 0001       |    |		.CONST	0x0001								; Number of locals
10ab			BODY_10a8:
10ab			INIT_10a8:
10ab e403       |    |		Load	0x2,0x3
10ac e7ff       |    |		Load	0x3,-0x1
10ad e058       | X  |		Load	0x0,0x58
10ae 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
10af 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
10b0 ; --------------------------------------------------------------------------------------
10b0 ; SUBPROGRAM
10b0 ; --------------------------------------------------------------------------------------
10b0 10b3       |    |		.CONST	0x10b3								; Address of begin
10b1 0004       |    |		.CONST	0x0004								; Address of exception handler
10b2 0001       |    |		.CONST	0x0001								; Number of locals
10b3			BODY_10b0:
10b3			INIT_10b0:
10b3 e7ff       |    |		Load	0x3,-0x1
10b4 0f01       |    |		Execute_Immediate	Equal,0x1
10b5 6805       |h   |		Jump_Zero	0x10bb
10b6 e402       |    |		Load	0x2,0x2
10b7 e7fe       |    |		Load	0x3,-0x2
10b8 e058       | X  |		Load	0x0,0x58
10b9 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
10ba 00d1       |    |		Pop_Control	Pop_Count_1
10bb 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
10bc 0000 0000  |    |		.BLANK	0000[0x4]
10c0 ; --------------------------------------------------------------------------------------
10c0 ; SUBPROGRAM
10c0 ; --------------------------------------------------------------------------------------
10c0 10c3       |    |		.CONST	0x10c3								; Address of begin
10c1 0004       |    |		.CONST	0x0004								; Address of exception handler
10c2 0001       |    |		.CONST	0x0001								; Number of locals
10c3			BODY_10c0:
10c3			INIT_10c0:
10c3 e402       |    |		Load	0x2,0x2
10c4 0092 1c40  |   @|		Action	Push_String_Extended,0x1c40					; ", "
10c6 e7ff       |    |		Load	0x3,-0x1
10c7 01cc       |    |		Execute	Vector,Catenate
10c8 0092 1cc3  |    |		Action	Push_String_Extended,0x1cc3					; " => "
10ca 01cc       |    |		Execute	Vector,Catenate
10cb e7fe       |    |		Load	0x3,-0x2
10cc 01cc       |    |		Execute	Vector,Catenate
10cd e058       | X  |		Load	0x0,0x58
10ce 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
10cf 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
10d0 ; --------------------------------------------------------------------------------------
10d0 ; SUBPROGRAM
10d0 ; --------------------------------------------------------------------------------------
10d0 10d3       |    |		.CONST	0x10d3								; Address of begin
10d1 0004       |    |		.CONST	0x0004								; Address of exception handler
10d2 0001       |    |		.CONST	0x0001								; Number of locals
10d3			BODY_10d0:
10d3			INIT_10d0:
10d3 e7fe       |    |		Load	0x3,-0x2
10d4 0f01       |    |		Execute_Immediate	Equal,0x1
10d5 6804       |h   |		Jump_Zero	0x10da
10d6 e7fe       |    |		Load	0x3,-0x2
10d7 804b       | K  |		Call	0x0,0x4b
10d8 e7ff       |    |		Load	0x3,-0x1
10d9 8403       |    |		Call	0x2,0x3
10da 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
10db 0000 0000  |    |		.BLANK	0000[0x5]
10e0 ; --------------------------------------------------------------------------------------
10e0 ; SUBPROGRAM
10e0 ; --------------------------------------------------------------------------------------
10e0 10e3       |    |		.CONST	0x10e3								; Address of begin
10e1 0004       |    |		.CONST	0x0004								; Address of exception handler
10e2 0001       |    |		.CONST	0x0001								; Number of locals
10e3			BODY_10e0:
10e3			INIT_10e0:
10e3 e402       |    |		Load	0x2,0x2
10e4 0092 1c40  |   @|		Action	Push_String_Extended,0x1c40					; ", "
10e6 e7ff       |    |		Load	0x3,-0x1
10e7 01cc       |    |		Execute	Vector,Catenate
10e8 0092 1cc3  |    |		Action	Push_String_Extended,0x1cc3					; " => "
10ea 01cc       |    |		Execute	Vector,Catenate
10eb e7fe       |    |		Load	0x3,-0x2
10ec 01cc       |    |		Execute	Vector,Catenate
10ed e058       | X  |		Load	0x0,0x58
10ee 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
10ef 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
10f0 ; --------------------------------------------------------------------------------------
10f0 ; SUBPROGRAM
10f0 ; --------------------------------------------------------------------------------------
10f0 10f3       |    |		.CONST	0x10f3								; Address of begin
10f1 0004       |    |		.CONST	0x0004								; Address of exception handler
10f2 0001       |    |		.CONST	0x0001								; Number of locals
10f3			BODY_10f0:
10f3			INIT_10f0:
10f3 e7fe       |    |		Load	0x3,-0x2
10f4 0f01       |    |		Execute_Immediate	Equal,0x1
10f5 6804       |h   |		Jump_Zero	0x10fa
10f6 e7fe       |    |		Load	0x3,-0x2
10f7 804b       | K  |		Call	0x0,0x4b
10f8 e7ff       |    |		Load	0x3,-0x1
10f9 8403       |    |		Call	0x2,0x3
10fa 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
10fb 0000 0000  |    |		.BLANK	0000[0x5]
1100 ; --------------------------------------------------------------------------------------
1100 ; SUBPROGRAM
1100 ; --------------------------------------------------------------------------------------
1100 1103       |    |		.CONST	0x1103								; Address of begin
1101 0004       |    |		.CONST	0x0004								; Address of exception handler
1102 0001       |    |		.CONST	0x0001								; Number of locals
1103			BODY_1100:
1103			INIT_1100:
1103 e5ff       |    |		Load	0x2,-0x1
1104 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
1105 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
1106 6803       |h   |		Jump_Zero	0x110a
1107 0092 1cc4  |    |		Action	Push_String_Extended,0x1cc4					; "; BWO"
1109 00ca       |    |		Action	Exit_Nullary_Function
110a 00ea       |    |		Load_Encached	Null_String_Cache
110b 00ca       |    |		Action	Exit_Nullary_Function
110c 0000 0000  |    |		.BLANK	0000[0x4]
1110 ; --------------------------------------------------------------------------------------
1110 ; SUBPROGRAM
1110 ; --------------------------------------------------------------------------------------
1110 1124       | $  |		.CONST	0x1124								; Address of begin
1111 0004       |    |		.CONST	0x0004								; Address of exception handler
1112 0002       |    |		.CONST	0x0002								; Number of locals
1113			INIT_1110:
1113 4801       |H   |		Short_Literal	0x1
1114 4846       |HF  |		Short_Literal	0x46
1115 00e9       |    |		Load_Encached	String_Cache
1116 035b       | [  |		Declare_Type	Array,Constrained
1117 0337       | 7  |		Declare_Variable	Array
1118 00d8       |    |		Load_Top	At_Offset_0
1119 0335       | 5  |		Declare_Variable	Array,Duplicate
111a 00cd       |    |		Action	Spare6_Action
111b 4846       |HF  |		Short_Literal	0x46
111c 4801       |H   |		Short_Literal	0x1
111d 4820       |H   |		Short_Literal	0x20
111e e605       |    |		Load	0x3,0x5
111f e603       |    |		Load	0x3,0x3
1120 01d6       |    |		Execute	Vector,Field_Write
1121 3ffb       |?   |		Loop_Increasing	0x111d
1122 e602       |    |		Load	0x3,0x2
1123 01d4       |    |		Execute	Vector,Structure_Write
1124			BODY_1110:
1124 e7ff       |    |		Load	0x3,-0x1
1125 01db       |    |		Execute	Vector,Length
1126 0d47       | G  |		Execute_Immediate	Less,0x47
1127 680c       |h   |		Jump_Zero	0x1134
1128 e7ff       |    |		Load	0x3,-0x1
1129 4801       |H   |		Short_Literal	0x1
112a e7ff       |    |		Load	0x3,-0x1
112b 01db       |    |		Execute	Vector,Length
112c 00d8       |    |		Load_Top	At_Offset_0
112d 00e2       |    |		Load_Encached	Integer_Cache
112e 0260       | `  |		Execute	Discrete,In_Type
112f 7001       |p   |		Jump_Nonzero	0x1131
1130 0801       |    |		Execute_Immediate	Raise,0x1
1131 e602       |    |		Load	0x3,0x2
1132 01ce       |    |		Execute	Vector,Slice_Write
1133 780e       |x   |		Jump	0x1142
1134 e7ff       |    |		Load	0x3,-0x1
1135 01dd       |    |		Execute	Vector,First
1136 e7ff       |    |		Load	0x3,-0x1
1137 01dd       |    |		Execute	Vector,First
1138 0a45       | E  |		Execute_Immediate	Plus,0x45
1139 00d8       |    |		Load_Top	At_Offset_0
113a 00e2       |    |		Load_Encached	Integer_Cache
113b 0260       | `  |		Execute	Discrete,In_Type
113c 7001       |p   |		Jump_Nonzero	0x113e
113d 0801       |    |		Execute_Immediate	Raise,0x1
113e e7ff       |    |		Load	0x3,-0x1
113f 01cf       |    |		Execute	Vector,Slice_Read
1140 e602       |    |		Load	0x3,0x2
1141 01d4       |    |		Execute	Vector,Structure_Write
1142 00d8       |    |		Load_Top	At_Offset_0
1143 483e       |H>  |		Short_Literal	0x3e
1144 4846       |HF  |		Short_Literal	0x46
1145 e603       |    |		Load	0x3,0x3
1146 035b       | [  |		Declare_Type	Array,Constrained
1147 e603       |    |		Load	0x3,0x3
1148 01cd       |    |		Execute	Vector,Slice_Reference
1149 4801       |H   |		Short_Literal	0x1
114a 4809       |H   |		Short_Literal	0x9
114b 00e9       |    |		Load_Encached	String_Cache
114c 035b       | [  |		Declare_Type	Array,Constrained
114d 0337       | 7  |		Declare_Variable	Array
114e 483c       |H<  |		Short_Literal	0x3c
114f 4801       |H   |		Short_Literal	0x1
1150 e605       |    |		Load	0x3,0x5
1151 01d6       |    |		Execute	Vector,Field_Write
1152 483d       |H=  |		Short_Literal	0x3d
1153 4802       |H   |		Short_Literal	0x2
1154 e605       |    |		Load	0x3,0x5
1155 01d6       |    |		Execute	Vector,Field_Write
1156 483d       |H=  |		Short_Literal	0x3d
1157 4803       |H   |		Short_Literal	0x3
1158 e605       |    |		Load	0x3,0x5
1159 01d6       |    |		Execute	Vector,Field_Write
115a 4820       |H   |		Short_Literal	0x20
115b 4804       |H   |		Short_Literal	0x4
115c e605       |    |		Load	0x3,0x5
115d 01d6       |    |		Execute	Vector,Field_Write
115e 4866       |Hf  |		Short_Literal	0x66
115f 4805       |H   |		Short_Literal	0x5
1160 e605       |    |		Load	0x3,0x5
1161 01d6       |    |		Execute	Vector,Field_Write
1162 4872       |Hr  |		Short_Literal	0x72
1163 4806       |H   |		Short_Literal	0x6
1164 e605       |    |		Load	0x3,0x5
1165 01d6       |    |		Execute	Vector,Field_Write
1166 4861       |Ha  |		Short_Literal	0x61
1167 4807       |H   |		Short_Literal	0x7
1168 e605       |    |		Load	0x3,0x5
1169 01d6       |    |		Execute	Vector,Field_Write
116a 486d       |Hm  |		Short_Literal	0x6d
116b 4808       |H   |		Short_Literal	0x8
116c e605       |    |		Load	0x3,0x5
116d 01d6       |    |		Execute	Vector,Field_Write
116e 4865       |He  |		Short_Literal	0x65
116f 4809       |H   |		Short_Literal	0x9
1170 e605       |    |		Load	0x3,0x5
1171 01d6       |    |		Execute	Vector,Field_Write
1172 00cd       |    |		Action	Spare6_Action
1173 483e       |H>  |		Short_Literal	0x3e
1174 4846       |HF  |		Short_Literal	0x46
1175 e603       |    |		Load	0x3,0x3
1176 01ce       |    |		Execute	Vector,Slice_Write
1177 00d1       |    |		Pop_Control	Pop_Count_1
1178 00d8       |    |		Load_Top	At_Offset_0
1179 00e9       |    |		Load_Encached	String_Cache
117a 01c6       |    |		Execute	Vector,Convert_To_Formal
117b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
117c 0000 0000  |    |		.BLANK	0000[0x4]
1180 ; --------------------------------------------------------------------------------------
1180 ; SUBPROGRAM
1180 ; --------------------------------------------------------------------------------------
1180 118b       |    |		.CONST	0x118b								; Address of begin
1181 0004       |    |		.CONST	0x0004								; Address of exception handler
1182 0003       |    |		.CONST	0x0003								; Number of locals
1183			INIT_1180:
1183 e5ff       |    |		Load	0x2,-0x1
1184 e25e       | ^  |		Load	0x1,0x5e
1185 e25f       | _  |		Load	0x1,0x5f
1186 1d60       | `  |		Execute_Immediate	Reference_Lex_1,0x60
1187 8001       |    |		Call	0x0,0x1
1188 00d8       |    |		Load_Top	At_Offset_0
1189 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
118a 0007       |    |		Action	Break_Optional
118b			BODY_1180:
118b e5fe       |    |		Load	0x2,-0x2
118c 6804       |h   |		Jump_Zero	0x1191
118d e602       |    |		Load	0x3,0x2
118e 8255       | U  |		Call	0x1,0x55
118f 00cb       |    |		Action	Pop_Block_With_Result
1190 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1191 e404       |    |		Load	0x2,0x4
1192 e603       |    |		Load	0x3,0x3
1193 804a       | J  |		Call	0x0,0x4a
1194 01cc       |    |		Execute	Vector,Catenate
1195 0092 1cc2  |    |		Action	Push_String_Extended,0x1cc2					; " = "
1197 01cc       |    |		Execute	Vector,Catenate
1198 e603       |    |		Load	0x3,0x3
1199 8047       | G  |		Call	0x0,0x47
119a 01cc       |    |		Execute	Vector,Catenate
119b 00cb       |    |		Action	Pop_Block_With_Result
119c 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
119d 0000 0000  |    |		.XXX[0x3]
119f 0000       |    |
11a0 ; --------------------------------------------------------------------------------------
11a0 ; SUBPROGRAM
11a0 ; --------------------------------------------------------------------------------------
11a0 11a8       |    |		.CONST	0x11a8								; Address of begin
11a1 0004       |    |		.CONST	0x0004								; Address of exception handler
11a2 0002       |    |		.CONST	0x0002								; Number of locals
11a3			INIT_11a0:
11a3 e5ff       |    |		Load	0x2,-0x1
11a4 e262       | b  |		Load	0x1,0x62
11a5 e263       | c  |		Load	0x1,0x63
11a6 1d64       | d  |		Execute_Immediate	Reference_Lex_1,0x64
11a7 8001       |    |		Call	0x0,0x1
11a8			BODY_11a0:
11a8 e5fe       |    |		Load	0x2,-0x2
11a9 6804       |h   |		Jump_Zero	0x11ae
11aa 00d8       |    |		Load_Top	At_Offset_0
11ab 82f8       |    |		Call	0x1,0xf8
11ac 00cb       |    |		Action	Pop_Block_With_Result
11ad 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
11ae e404       |    |		Load	0x2,0x4
11af e602       |    |		Load	0x3,0x2
11b0 82f2       |    |		Call	0x1,0xf2
11b1 01cc       |    |		Execute	Vector,Catenate
11b2 00cb       |    |		Action	Pop_Block_With_Result
11b3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
11b4 0000 0000  |    |		.BLANK	0000[0x4]
11b8 ; --------------------------------------------------------------------------------------
11b8 ; SUBPROGRAM
11b8 ; --------------------------------------------------------------------------------------
11b8 11c0       |    |		.CONST	0x11c0								; Address of begin
11b9 0004       |    |		.CONST	0x0004								; Address of exception handler
11ba 0002       |    |		.CONST	0x0002								; Number of locals
11bb			INIT_11b8:
11bb e5ff       |    |		Load	0x2,-0x1
11bc e26e       | n  |		Load	0x1,0x6e
11bd e26f       | o  |		Load	0x1,0x6f
11be 1d70       | p  |		Execute_Immediate	Reference_Lex_1,0x70
11bf 8001       |    |		Call	0x0,0x1
11c0			BODY_11b8:
11c0 e5fe       |    |		Load	0x2,-0x2
11c1 6804       |h   |		Jump_Zero	0x11c6
11c2 00d8       |    |		Load_Top	At_Offset_0
11c3 82ef       |    |		Call	0x1,0xef
11c4 00cb       |    |		Action	Pop_Block_With_Result
11c5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
11c6 e404       |    |		Load	0x2,0x4
11c7 e602       |    |		Load	0x3,0x2
11c8 82f4       |    |		Call	0x1,0xf4
11c9 01cc       |    |		Execute	Vector,Catenate
11ca 00cb       |    |		Action	Pop_Block_With_Result
11cb 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
11cc 0000 0000  |    |		.BLANK	0000[0x4]
11d0 ; --------------------------------------------------------------------------------------
11d0 ; SUBPROGRAM
11d0 ; --------------------------------------------------------------------------------------
11d0 11d8       |    |		.CONST	0x11d8								; Address of begin
11d1 0004       |    |		.CONST	0x0004								; Address of exception handler
11d2 0002       |    |		.CONST	0x0002								; Number of locals
11d3			INIT_11d0:
11d3 e5ff       |    |		Load	0x2,-0x1
11d4 e266       | f  |		Load	0x1,0x66
11d5 e267       | g  |		Load	0x1,0x67
11d6 1d68       | h  |		Execute_Immediate	Reference_Lex_1,0x68
11d7 8001       |    |		Call	0x0,0x1
11d8			BODY_11d0:
11d8 e5fe       |    |		Load	0x2,-0x2
11d9 6804       |h   |		Jump_Zero	0x11de
11da 00d8       |    |		Load_Top	At_Offset_0
11db 8225       | %  |		Call	0x1,0x25
11dc 00cb       |    |		Action	Pop_Block_With_Result
11dd 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
11de e404       |    |		Load	0x2,0x4
11df e602       |    |		Load	0x3,0x2
11e0 82f7       |    |		Call	0x1,0xf7
11e1 01cc       |    |		Execute	Vector,Catenate
11e2 00cb       |    |		Action	Pop_Block_With_Result
11e3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
11e4 0000 0000  |    |		.BLANK	0000[0x4]
11e8 ; --------------------------------------------------------------------------------------
11e8 ; SUBPROGRAM
11e8 ; --------------------------------------------------------------------------------------
11e8 11f0       |    |		.CONST	0x11f0								; Address of begin
11e9 0004       |    |		.CONST	0x0004								; Address of exception handler
11ea 0002       |    |		.CONST	0x0002								; Number of locals
11eb			INIT_11e8:
11eb e5ff       |    |		Load	0x2,-0x1
11ec e26a       | j  |		Load	0x1,0x6a
11ed e26b       | k  |		Load	0x1,0x6b
11ee 1d6c       | l  |		Execute_Immediate	Reference_Lex_1,0x6c
11ef 8001       |    |		Call	0x0,0x1
11f0			BODY_11e8:
11f0 e5fe       |    |		Load	0x2,-0x2
11f1 6804       |h   |		Jump_Zero	0x11f6
11f2 00d8       |    |		Load_Top	At_Offset_0
11f3 82e8       |    |		Call	0x1,0xe8
11f4 00cb       |    |		Action	Pop_Block_With_Result
11f5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
11f6 e404       |    |		Load	0x2,0x4
11f7 e602       |    |		Load	0x3,0x2
11f8 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
11f9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
11fa 804c       | L  |		Call	0x0,0x4c
11fb 01cc       |    |		Execute	Vector,Catenate
11fc 00cb       |    |		Action	Pop_Block_With_Result
11fd 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
11fe 0000 0000  |    |		.XXX[0x2]
1200 ; --------------------------------------------------------------------------------------
1200 ; SUBPROGRAM
1200 ; --------------------------------------------------------------------------------------
1200 1208       |    |		.CONST	0x1208								; Address of begin
1201 0004       |    |		.CONST	0x0004								; Address of exception handler
1202 0002       |    |		.CONST	0x0002								; Number of locals
1203			INIT_1200:
1203 e5ff       |    |		Load	0x2,-0x1
1204 e27a       | z  |		Load	0x1,0x7a
1205 e27b       | {  |		Load	0x1,0x7b
1206 1d7c       | |  |		Execute_Immediate	Reference_Lex_1,0x7c
1207 8001       |    |		Call	0x0,0x1
1208			BODY_1200:
1208 e5fe       |    |		Load	0x2,-0x2
1209 6804       |h   |		Jump_Zero	0x120e
120a 00d8       |    |		Load_Top	At_Offset_0
120b 8226       | &  |		Call	0x1,0x26
120c 00cb       |    |		Action	Pop_Block_With_Result
120d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
120e e403       |    |		Load	0x2,0x3
120f 0f76       | v  |		Execute_Immediate	Equal,0x76
1210 6803       |h   |		Jump_Zero	0x1214
1211 e404       |    |		Load	0x2,0x4
1212 00cb       |    |		Action	Pop_Block_With_Result
1213 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1214 e404       |    |		Load	0x2,0x4
1215 e602       |    |		Load	0x3,0x2
1216 8227       | '  |		Call	0x1,0x27
1217 01cc       |    |		Execute	Vector,Catenate
1218 00cb       |    |		Action	Pop_Block_With_Result
1219 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
121a 0000 0000  |    |		.BLANK	0000[0x6]
1220 ; --------------------------------------------------------------------------------------
1220 ; SUBPROGRAM
1220 ; --------------------------------------------------------------------------------------
1220 1228       | (  |		.CONST	0x1228								; Address of begin
1221 0004       |    |		.CONST	0x0004								; Address of exception handler
1222 0002       |    |		.CONST	0x0002								; Number of locals
1223			INIT_1220:
1223 e5ff       |    |		Load	0x2,-0x1
1224 e27e       | ~  |		Load	0x1,0x7e
1225 e27f       |    |		Load	0x1,0x7f
1226 1d80       |    |		Execute_Immediate	Reference_Lex_1,0x80
1227 8001       |    |		Call	0x0,0x1
1228			BODY_1220:
1228 e5fe       |    |		Load	0x2,-0x2
1229 6804       |h   |		Jump_Zero	0x122e
122a 00d8       |    |		Load_Top	At_Offset_0
122b 823d       | =  |		Call	0x1,0x3d
122c 00cb       |    |		Action	Pop_Block_With_Result
122d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
122e e404       |    |		Load	0x2,0x4
122f e602       |    |		Load	0x3,0x2
1230 823c       | <  |		Call	0x1,0x3c
1231 01cc       |    |		Execute	Vector,Catenate
1232 00cb       |    |		Action	Pop_Block_With_Result
1233 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1234 0000 0000  |    |		.BLANK	0000[0x4]
1238 ; --------------------------------------------------------------------------------------
1238 ; SUBPROGRAM
1238 ; --------------------------------------------------------------------------------------
1238 1240       | @  |		.CONST	0x1240								; Address of begin
1239 0004       |    |		.CONST	0x0004								; Address of exception handler
123a 0002       |    |		.CONST	0x0002								; Number of locals
123b			INIT_1238:
123b e5ff       |    |		Load	0x2,-0x1
123c e282       |    |		Load	0x1,0x82
123d e283       |    |		Load	0x1,0x83
123e 1d84       |    |		Execute_Immediate	Reference_Lex_1,0x84
123f 8001       |    |		Call	0x0,0x1
1240			BODY_1238:
1240 e5fe       |    |		Load	0x2,-0x2
1241 6804       |h   |		Jump_Zero	0x1246
1242 00d8       |    |		Load_Top	At_Offset_0
1243 823e       | >  |		Call	0x1,0x3e
1244 00cb       |    |		Action	Pop_Block_With_Result
1245 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1246 00d8       |    |		Load_Top	At_Offset_0
1247 3404       |4   |		Execute	Record,Field_Reference,Field_Number 0x4
1248 e404       |    |		Load	0x2,0x4
1249 82f3       |    |		Call	0x1,0xf3
124a 00cb       |    |		Action	Pop_Block_With_Result
124b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
124c 0000 0000  |    |		.BLANK	0000[0x4]
1250 ; --------------------------------------------------------------------------------------
1250 ; SUBPROGRAM
1250 ; --------------------------------------------------------------------------------------
1250 1258       | X  |		.CONST	0x1258								; Address of begin
1251 0004       |    |		.CONST	0x0004								; Address of exception handler
1252 0002       |    |		.CONST	0x0002								; Number of locals
1253			INIT_1250:
1253 e5ff       |    |		Load	0x2,-0x1
1254 e286       |    |		Load	0x1,0x86
1255 e287       |    |		Load	0x1,0x87
1256 1d88       |    |		Execute_Immediate	Reference_Lex_1,0x88
1257 8001       |    |		Call	0x0,0x1
1258			BODY_1250:
1258 e5fe       |    |		Load	0x2,-0x2
1259 6804       |h   |		Jump_Zero	0x125e
125a 00d8       |    |		Load_Top	At_Offset_0
125b 823f       | ?  |		Call	0x1,0x3f
125c 00cb       |    |		Action	Pop_Block_With_Result
125d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
125e e404       |    |		Load	0x2,0x4
125f 00cb       |    |		Action	Pop_Block_With_Result
1260 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1261 0000 0000  |    |		.BLANK	0000[0x7]
1268 ; --------------------------------------------------------------------------------------
1268 ; SUBPROGRAM
1268 ; --------------------------------------------------------------------------------------
1268 1270       | p  |		.CONST	0x1270								; Address of begin
1269 0004       |    |		.CONST	0x0004								; Address of exception handler
126a 0002       |    |		.CONST	0x0002								; Number of locals
126b			INIT_1268:
126b e5ff       |    |		Load	0x2,-0x1
126c e28a       |    |		Load	0x1,0x8a
126d e28b       |    |		Load	0x1,0x8b
126e 1d8c       |    |		Execute_Immediate	Reference_Lex_1,0x8c
126f 8001       |    |		Call	0x0,0x1
1270			BODY_1268:
1270 e5fe       |    |		Load	0x2,-0x2
1271 6804       |h   |		Jump_Zero	0x1276
1272 00d8       |    |		Load_Top	At_Offset_0
1273 8241       | A  |		Call	0x1,0x41
1274 00cb       |    |		Action	Pop_Block_With_Result
1275 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1276 e404       |    |		Load	0x2,0x4
1277 0092 1cc5  |    |		Action	Push_String_Extended,0x1cc5					; "collection + "
1279 01cc       |    |		Execute	Vector,Catenate
127a e602       |    |		Load	0x3,0x2
127b 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
127c 8214       |    |		Call	0x1,0x14
127d 01cc       |    |		Execute	Vector,Catenate
127e 00cb       |    |		Action	Pop_Block_With_Result
127f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1280 ; --------------------------------------------------------------------------------------
1280 ; SUBPROGRAM
1280 ; --------------------------------------------------------------------------------------
1280 1288       |    |		.CONST	0x1288								; Address of begin
1281 0004       |    |		.CONST	0x0004								; Address of exception handler
1282 0002       |    |		.CONST	0x0002								; Number of locals
1283			INIT_1280:
1283 e5ff       |    |		Load	0x2,-0x1
1284 e28e       |    |		Load	0x1,0x8e
1285 e28f       |    |		Load	0x1,0x8f
1286 1d90       |    |		Execute_Immediate	Reference_Lex_1,0x90
1287 8001       |    |		Call	0x0,0x1
1288			BODY_1280:
1288 e5fe       |    |		Load	0x2,-0x2
1289 6804       |h   |		Jump_Zero	0x128e
128a 00d8       |    |		Load_Top	At_Offset_0
128b 8243       | C  |		Call	0x1,0x43
128c 00cb       |    |		Action	Pop_Block_With_Result
128d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
128e e404       |    |		Load	0x2,0x4
128f e602       |    |		Load	0x3,0x2
1290 8244       | D  |		Call	0x1,0x44
1291 01cc       |    |		Execute	Vector,Catenate
1292 00cb       |    |		Action	Pop_Block_With_Result
1293 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1294 0000 0000  |    |		.BLANK	0000[0x4]
1298 ; --------------------------------------------------------------------------------------
1298 ; SUBPROGRAM
1298 ; --------------------------------------------------------------------------------------
1298 12a0       |    |		.CONST	0x12a0								; Address of begin
1299 0004       |    |		.CONST	0x0004								; Address of exception handler
129a 0002       |    |		.CONST	0x0002								; Number of locals
129b			INIT_1298:
129b e5ff       |    |		Load	0x2,-0x1
129c e292       |    |		Load	0x1,0x92
129d e293       |    |		Load	0x1,0x93
129e 1d94       |    |		Execute_Immediate	Reference_Lex_1,0x94
129f 8001       |    |		Call	0x0,0x1
12a0			BODY_1298:
12a0 e5fe       |    |		Load	0x2,-0x2
12a1 6804       |h   |		Jump_Zero	0x12a6
12a2 00d8       |    |		Load_Top	At_Offset_0
12a3 824b       | K  |		Call	0x1,0x4b
12a4 00cb       |    |		Action	Pop_Block_With_Result
12a5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
12a6 e404       |    |		Load	0x2,0x4
12a7 e602       |    |		Load	0x3,0x2
12a8 824c       | L  |		Call	0x1,0x4c
12a9 01cc       |    |		Execute	Vector,Catenate
12aa 00cb       |    |		Action	Pop_Block_With_Result
12ab 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
12ac 0000 0000  |    |		.BLANK	0000[0x4]
12b0 ; --------------------------------------------------------------------------------------
12b0 ; SUBPROGRAM
12b0 ; --------------------------------------------------------------------------------------
12b0 12b8       |    |		.CONST	0x12b8								; Address of begin
12b1 0004       |    |		.CONST	0x0004								; Address of exception handler
12b2 0002       |    |		.CONST	0x0002								; Number of locals
12b3			INIT_12b0:
12b3 e5ff       |    |		Load	0x2,-0x1
12b4 e296       |    |		Load	0x1,0x96
12b5 e297       |    |		Load	0x1,0x97
12b6 1d98       |    |		Execute_Immediate	Reference_Lex_1,0x98
12b7 8001       |    |		Call	0x0,0x1
12b8			BODY_12b0:
12b8 e5fe       |    |		Load	0x2,-0x2
12b9 6804       |h   |		Jump_Zero	0x12be
12ba 00d8       |    |		Load_Top	At_Offset_0
12bb 824e       | N  |		Call	0x1,0x4e
12bc 00cb       |    |		Action	Pop_Block_With_Result
12bd 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
12be e404       |    |		Load	0x2,0x4
12bf e602       |    |		Load	0x3,0x2
12c0 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
12c1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
12c2 804c       | L  |		Call	0x0,0x4c
12c3 01cc       |    |		Execute	Vector,Catenate
12c4 00cb       |    |		Action	Pop_Block_With_Result
12c5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
12c6 0000 0000  |    |		.XXX[0x2]
12c8 ; --------------------------------------------------------------------------------------
12c8 ; SUBPROGRAM
12c8 ; --------------------------------------------------------------------------------------
12c8 12d0       |    |		.CONST	0x12d0								; Address of begin
12c9 0004       |    |		.CONST	0x0004								; Address of exception handler
12ca 0002       |    |		.CONST	0x0002								; Number of locals
12cb			INIT_12c8:
12cb e5ff       |    |		Load	0x2,-0x1
12cc e29a       |    |		Load	0x1,0x9a
12cd e29b       |    |		Load	0x1,0x9b
12ce 1d9c       |    |		Execute_Immediate	Reference_Lex_1,0x9c
12cf 8001       |    |		Call	0x0,0x1
12d0			BODY_12c8:
12d0 e5fe       |    |		Load	0x2,-0x2
12d1 6804       |h   |		Jump_Zero	0x12d6
12d2 00d8       |    |		Load_Top	At_Offset_0
12d3 824f       | O  |		Call	0x1,0x4f
12d4 00cb       |    |		Action	Pop_Block_With_Result
12d5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
12d6 e404       |    |		Load	0x2,0x4
12d7 e602       |    |		Load	0x3,0x2
12d8 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
12d9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
12da 804c       | L  |		Call	0x0,0x4c
12db 01cc       |    |		Execute	Vector,Catenate
12dc 0092 1c40  |   @|		Action	Push_String_Extended,0x1c40					; ", "
12de 01cc       |    |		Execute	Vector,Catenate
12df e602       |    |		Load	0x3,0x2
12e0 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
12e1 3405       |4   |		Execute	Record,Field_Reference,Field_Number 0x5
12e2 8211       |    |		Call	0x1,0x11
12e3 01cc       |    |		Execute	Vector,Catenate
12e4 00cb       |    |		Action	Pop_Block_With_Result
12e5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
12e6 0000 0000  |    |		.XXX[0x2]
12e8 ; --------------------------------------------------------------------------------------
12e8 ; SUBPROGRAM
12e8 ; --------------------------------------------------------------------------------------
12e8 12f0       |    |		.CONST	0x12f0								; Address of begin
12e9 0004       |    |		.CONST	0x0004								; Address of exception handler
12ea 0002       |    |		.CONST	0x0002								; Number of locals
12eb			INIT_12e8:
12eb e5ff       |    |		Load	0x2,-0x1
12ec e2a2       |    |		Load	0x1,0xa2
12ed e2a3       |    |		Load	0x1,0xa3
12ee 1da4       |    |		Execute_Immediate	Reference_Lex_1,0xa4
12ef 8001       |    |		Call	0x0,0x1
12f0			BODY_12e8:
12f0 e5fe       |    |		Load	0x2,-0x2
12f1 6804       |h   |		Jump_Zero	0x12f6
12f2 00d8       |    |		Load_Top	At_Offset_0
12f3 825d       | ]  |		Call	0x1,0x5d
12f4 00cb       |    |		Action	Pop_Block_With_Result
12f5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
12f6 e404       |    |		Load	0x2,0x4
12f7 0092 1cc6  |    |		Action	Push_String_Extended,0x1cc6					; " type mark "
12f9 01cc       |    |		Execute	Vector,Catenate
12fa e602       |    |		Load	0x3,0x2
12fb 3406       |4   |		Execute	Record,Field_Reference,Field_Number 0x6
12fc 8211       |    |		Call	0x1,0x11
12fd 01cc       |    |		Execute	Vector,Catenate
12fe 0092 1cc7  |    |		Action	Push_String_Extended,0x1cc7					; " data mark "
1300 01cc       |    |		Execute	Vector,Catenate
1301 e602       |    |		Load	0x3,0x2
1302 3409       |4   |		Execute	Record,Field_Reference,Field_Number 0x9
1303 8214       |    |		Call	0x1,0x14
1304 01cc       |    |		Execute	Vector,Catenate
1305 00cb       |    |		Action	Pop_Block_With_Result
1306 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1307 0000       |    |		.XXX[0x1]
1308 ; --------------------------------------------------------------------------------------
1308 ; SUBPROGRAM
1308 ; --------------------------------------------------------------------------------------
1308 1310       |    |		.CONST	0x1310								; Address of begin
1309 0004       |    |		.CONST	0x0004								; Address of exception handler
130a 0002       |    |		.CONST	0x0002								; Number of locals
130b			INIT_1308:
130b e5ff       |    |		Load	0x2,-0x1
130c e2db       |    |		Load	0x1,0xdb
130d e2dc       |    |		Load	0x1,0xdc
130e 1ddd       |    |		Execute_Immediate	Reference_Lex_1,0xdd
130f 8001       |    |		Call	0x0,0x1
1310			BODY_1308:
1310 e404       |    |		Load	0x2,0x4
1311 e602       |    |		Load	0x3,0x2
1312 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
1313 804a       | J  |		Call	0x0,0x4a
1314 01cc       |    |		Execute	Vector,Catenate
1315 0092 1c3a  |   :|		Action	Push_String_Extended,0x1c3a					; " "
1317 01cc       |    |		Execute	Vector,Catenate
1318 e602       |    |		Load	0x3,0x2
1319 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
131a 804a       | J  |		Call	0x0,0x4a
131b 01cc       |    |		Execute	Vector,Catenate
131c 00cb       |    |		Action	Pop_Block_With_Result
131d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
131e 0000 0000  |    |		.XXX[0x2]
1320 ; --------------------------------------------------------------------------------------
1320 ; SUBPROGRAM
1320 ; --------------------------------------------------------------------------------------
1320 1328       | (  |		.CONST	0x1328								; Address of begin
1321 0004       |    |		.CONST	0x0004								; Address of exception handler
1322 0002       |    |		.CONST	0x0002								; Number of locals
1323			INIT_1320:
1323 e5ff       |    |		Load	0x2,-0x1
1324 e2aa       |    |		Load	0x1,0xaa
1325 e2ab       |    |		Load	0x1,0xab
1326 1dac       |    |		Execute_Immediate	Reference_Lex_1,0xac
1327 8001       |    |		Call	0x0,0x1
1328			BODY_1320:
1328 e5fe       |    |		Load	0x2,-0x2
1329 6804       |h   |		Jump_Zero	0x132e
132a 00d8       |    |		Load_Top	At_Offset_0
132b 8240       | @  |		Call	0x1,0x40
132c 00cb       |    |		Action	Pop_Block_With_Result
132d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
132e e404       |    |		Load	0x2,0x4
132f 00cb       |    |		Action	Pop_Block_With_Result
1330 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1331 0000 0000  |    |		.BLANK	0000[0x7]
1338 ; --------------------------------------------------------------------------------------
1338 ; SUBPROGRAM
1338 ; --------------------------------------------------------------------------------------
1338 1340       | @  |		.CONST	0x1340								; Address of begin
1339 0004       |    |		.CONST	0x0004								; Address of exception handler
133a 0002       |    |		.CONST	0x0002								; Number of locals
133b			INIT_1338:
133b e5ff       |    |		Load	0x2,-0x1
133c e2ae       |    |		Load	0x1,0xae
133d e2af       |    |		Load	0x1,0xaf
133e 1db0       |    |		Execute_Immediate	Reference_Lex_1,0xb0
133f 8001       |    |		Call	0x0,0x1
1340			BODY_1338:
1340 e5fe       |    |		Load	0x2,-0x2
1341 6804       |h   |		Jump_Zero	0x1346
1342 00d8       |    |		Load_Top	At_Offset_0
1343 8242       | B  |		Call	0x1,0x42
1344 00cb       |    |		Action	Pop_Block_With_Result
1345 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1346 00d8       |    |		Load_Top	At_Offset_0
1347 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
1348 e404       |    |		Load	0x2,0x4
1349 8247       | G  |		Call	0x1,0x47
134a 00cb       |    |		Action	Pop_Block_With_Result
134b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
134c 0000 0000  |    |		.BLANK	0000[0x4]
1350 ; --------------------------------------------------------------------------------------
1350 ; SUBPROGRAM
1350 ; --------------------------------------------------------------------------------------
1350 1358       | X  |		.CONST	0x1358								; Address of begin
1351 0004       |    |		.CONST	0x0004								; Address of exception handler
1352 0002       |    |		.CONST	0x0002								; Number of locals
1353			INIT_1350:
1353 e5ff       |    |		Load	0x2,-0x1
1354 e2b6       |    |		Load	0x1,0xb6
1355 e2b7       |    |		Load	0x1,0xb7
1356 1db8       |    |		Execute_Immediate	Reference_Lex_1,0xb8
1357 8001       |    |		Call	0x0,0x1
1358			BODY_1350:
1358 e5fe       |    |		Load	0x2,-0x2
1359 6804       |h   |		Jump_Zero	0x135e
135a 00d8       |    |		Load_Top	At_Offset_0
135b 825a       | Z  |		Call	0x1,0x5a
135c 00cb       |    |		Action	Pop_Block_With_Result
135d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
135e e404       |    |		Load	0x2,0x4
135f e602       |    |		Load	0x3,0x2
1360 8245       | E  |		Call	0x1,0x45
1361 01cc       |    |		Execute	Vector,Catenate
1362 00cb       |    |		Action	Pop_Block_With_Result
1363 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1364 0000 0000  |    |		.BLANK	0000[0x4]
1368 ; --------------------------------------------------------------------------------------
1368 ; SUBPROGRAM
1368 ; --------------------------------------------------------------------------------------
1368 1370       | p  |		.CONST	0x1370								; Address of begin
1369 0004       |    |		.CONST	0x0004								; Address of exception handler
136a 0002       |    |		.CONST	0x0002								; Number of locals
136b			INIT_1368:
136b e5ff       |    |		Load	0x2,-0x1
136c e2ba       |    |		Load	0x1,0xba
136d e2bb       |    |		Load	0x1,0xbb
136e 1dbc       |    |		Execute_Immediate	Reference_Lex_1,0xbc
136f 8001       |    |		Call	0x0,0x1
1370			BODY_1368:
1370 e5fe       |    |		Load	0x2,-0x2
1371 6804       |h   |		Jump_Zero	0x1376
1372 00d8       |    |		Load_Top	At_Offset_0
1373 8249       | I  |		Call	0x1,0x49
1374 00cb       |    |		Action	Pop_Block_With_Result
1375 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1376 e404       |    |		Load	0x2,0x4
1377 e602       |    |		Load	0x3,0x2
1378 8229       | )  |		Call	0x1,0x29
1379 01cc       |    |		Execute	Vector,Catenate
137a 00cb       |    |		Action	Pop_Block_With_Result
137b 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
137c 0000 0000  |    |		.BLANK	0000[0x4]
1380 ; --------------------------------------------------------------------------------------
1380 ; SUBPROGRAM
1380 ; --------------------------------------------------------------------------------------
1380 1388       |    |		.CONST	0x1388								; Address of begin
1381 0004       |    |		.CONST	0x0004								; Address of exception handler
1382 0002       |    |		.CONST	0x0002								; Number of locals
1383			INIT_1380:
1383 e5ff       |    |		Load	0x2,-0x1
1384 e2be       |    |		Load	0x1,0xbe
1385 e2bf       |    |		Load	0x1,0xbf
1386 1dc0       |    |		Execute_Immediate	Reference_Lex_1,0xc0
1387 8001       |    |		Call	0x0,0x1
1388			BODY_1380:
1388 e5fe       |    |		Load	0x2,-0x2
1389 6804       |h   |		Jump_Zero	0x138e
138a 00d8       |    |		Load_Top	At_Offset_0
138b 825b       | [  |		Call	0x1,0x5b
138c 00cb       |    |		Action	Pop_Block_With_Result
138d 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
138e 00d8       |    |		Load_Top	At_Offset_0
138f 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
1390 e404       |    |		Load	0x2,0x4
1391 8224       | $  |		Call	0x1,0x24
1392 00cb       |    |		Action	Pop_Block_With_Result
1393 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1394 0000 0000  |    |		.BLANK	0000[0x4]
1398 ; --------------------------------------------------------------------------------------
1398 ; SUBPROGRAM
1398 ; --------------------------------------------------------------------------------------
1398 13a4       |    |		.CONST	0x13a4								; Address of begin
1399 0004       |    |		.CONST	0x0004								; Address of exception handler
139a 0002       |    |		.CONST	0x0002								; Number of locals
139b			INIT_1398:
139b e036       | 6  |		Load	0x0,0x36
139c 0322       | "  |		Declare_Variable	Record
139d e5ff       |    |		Load	0x2,-0x1
139e e2c2       |    |		Load	0x1,0xc2
139f e2c3       |    |		Load	0x1,0xc3
13a0 1dc4       |    |		Execute_Immediate	Reference_Lex_1,0xc4
13a1 8001       |    |		Call	0x0,0x1
13a2 e602       |    |		Load	0x3,0x2
13a3 017d       | }  |		Execute	Record,Structure_Write
13a4			BODY_1398:
13a4 e5fe       |    |		Load	0x2,-0x2
13a5 6804       |h   |		Jump_Zero	0x13aa
13a6 00d8       |    |		Load_Top	At_Offset_0
13a7 82ee       |    |		Call	0x1,0xee
13a8 00cb       |    |		Action	Pop_Block_With_Result
13a9 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
13aa e404       |    |		Load	0x2,0x4
13ab e602       |    |		Load	0x3,0x2
13ac 82e6       |    |		Call	0x1,0xe6
13ad 01cc       |    |		Execute	Vector,Catenate
13ae 00cb       |    |		Action	Pop_Block_With_Result
13af 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
13b0 ; --------------------------------------------------------------------------------------
13b0 ; SUBPROGRAM
13b0 ; --------------------------------------------------------------------------------------
13b0 13b8       |    |		.CONST	0x13b8								; Address of begin
13b1 0004       |    |		.CONST	0x0004								; Address of exception handler
13b2 0002       |    |		.CONST	0x0002								; Number of locals
13b3			INIT_13b0:
13b3 e5ff       |    |		Load	0x2,-0x1
13b4 e266       | f  |		Load	0x1,0x66
13b5 e267       | g  |		Load	0x1,0x67
13b6 1d68       | h  |		Execute_Immediate	Reference_Lex_1,0x68
13b7 8001       |    |		Call	0x0,0x1
13b8			BODY_13b0:
13b8 e5fe       |    |		Load	0x2,-0x2
13b9 6804       |h   |		Jump_Zero	0x13be
13ba 00d8       |    |		Load_Top	At_Offset_0
13bb 8225       | %  |		Call	0x1,0x25
13bc 00cb       |    |		Action	Pop_Block_With_Result
13bd 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
13be e404       |    |		Load	0x2,0x4
13bf e602       |    |		Load	0x3,0x2
13c0 82f7       |    |		Call	0x1,0xf7
13c1 01cc       |    |		Execute	Vector,Catenate
13c2 00cb       |    |		Action	Pop_Block_With_Result
13c3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
13c4 0000 0000  |    |		.BLANK	0000[0x4]
13c8 ; --------------------------------------------------------------------------------------
13c8 ; SUBPROGRAM
13c8 ; --------------------------------------------------------------------------------------
13c8 13d0       |    |		.CONST	0x13d0								; Address of begin
13c9 0004       |    |		.CONST	0x0004								; Address of exception handler
13ca 0002       |    |		.CONST	0x0002								; Number of locals
13cb			INIT_13c8:
13cb e5ff       |    |		Load	0x2,-0x1
13cc e27a       | z  |		Load	0x1,0x7a
13cd e27b       | {  |		Load	0x1,0x7b
13ce 1d7c       | |  |		Execute_Immediate	Reference_Lex_1,0x7c
13cf 8001       |    |		Call	0x0,0x1
13d0			BODY_13c8:
13d0 e5fe       |    |		Load	0x2,-0x2
13d1 6804       |h   |		Jump_Zero	0x13d6
13d2 00d8       |    |		Load_Top	At_Offset_0
13d3 8226       | &  |		Call	0x1,0x26
13d4 00cb       |    |		Action	Pop_Block_With_Result
13d5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
13d6 e404       |    |		Load	0x2,0x4
13d7 e602       |    |		Load	0x3,0x2
13d8 8227       | '  |		Call	0x1,0x27
13d9 01cc       |    |		Execute	Vector,Catenate
13da 00cb       |    |		Action	Pop_Block_With_Result
13db 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
13dc 0000 0000  |    |		.BLANK	0000[0x4]
13e0 ; --------------------------------------------------------------------------------------
13e0 ; SUBPROGRAM
13e0 ; --------------------------------------------------------------------------------------
13e0 13e8       |    |		.CONST	0x13e8								; Address of begin
13e1 0004       |    |		.CONST	0x0004								; Address of exception handler
13e2 0002       |    |		.CONST	0x0002								; Number of locals
13e3			INIT_13e0:
13e3 e5ff       |    |		Load	0x2,-0x1
13e4 e296       |    |		Load	0x1,0x96
13e5 e297       |    |		Load	0x1,0x97
13e6 1d98       |    |		Execute_Immediate	Reference_Lex_1,0x98
13e7 8001       |    |		Call	0x0,0x1
13e8			BODY_13e0:
13e8 e5fe       |    |		Load	0x2,-0x2
13e9 6804       |h   |		Jump_Zero	0x13ee
13ea 00d8       |    |		Load_Top	At_Offset_0
13eb 824e       | N  |		Call	0x1,0x4e
13ec 00cb       |    |		Action	Pop_Block_With_Result
13ed 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
13ee e404       |    |		Load	0x2,0x4
13ef e602       |    |		Load	0x3,0x2
13f0 3402       |4   |		Execute	Record,Field_Reference,Field_Number 0x2
13f1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
13f2 804c       | L  |		Call	0x0,0x4c
13f3 01cc       |    |		Execute	Vector,Catenate
13f4 00cb       |    |		Action	Pop_Block_With_Result
13f5 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
13f6 0000 0000  |    |		.XXX[0x2]
13f8 ; --------------------------------------------------------------------------------------
13f8 ; SUBPROGRAM
13f8 ; --------------------------------------------------------------------------------------
13f8 1400       |    |		.CONST	0x1400								; Address of begin
13f9 0004       |    |		.CONST	0x0004								; Address of exception handler
13fa 0002       |    |		.CONST	0x0002								; Number of locals
13fb			INIT_13f8:
13fb e5ff       |    |		Load	0x2,-0x1
13fc e2ca       |    |		Load	0x1,0xca
13fd e2cb       |    |		Load	0x1,0xcb
13fe 1dcc       |    |		Execute_Immediate	Reference_Lex_1,0xcc
13ff 8001       |    |		Call	0x0,0x1
1400			BODY_13f8:
1400 e5fe       |    |		Load	0x2,-0x2
1401 6804       |h   |		Jump_Zero	0x1406
1402 00d8       |    |		Load_Top	At_Offset_0
1403 825c       | \  |		Call	0x1,0x5c
1404 00cb       |    |		Action	Pop_Block_With_Result
1405 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1406 e404       |    |		Load	0x2,0x4
1407 0092 1cc8  |    |		Action	Push_String_Extended,0x1cc8					; "partner = "
1409 01cc       |    |		Execute	Vector,Catenate
140a e602       |    |		Load	0x3,0x2
140b 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
140c 804c       | L  |		Call	0x0,0x4c
140d 01cc       |    |		Execute	Vector,Catenate
140e 00cb       |    |		Action	Pop_Block_With_Result
140f 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1410 ; --------------------------------------------------------------------------------------
1410 ; SUBPROGRAM
1410 ; --------------------------------------------------------------------------------------
1410 141c       |    |		.CONST	0x141c								; Address of begin
1411 0004       |    |		.CONST	0x0004								; Address of exception handler
1412 0002       |    |		.CONST	0x0002								; Number of locals
1413			INIT_1410:
1413 e03e       | >  |		Load	0x0,0x3e
1414 0322       | "  |		Declare_Variable	Record
1415 e5ff       |    |		Load	0x2,-0x1
1416 e2d2       |    |		Load	0x1,0xd2
1417 e2d3       |    |		Load	0x1,0xd3
1418 1dd4       |    |		Execute_Immediate	Reference_Lex_1,0xd4
1419 8001       |    |		Call	0x0,0x1
141a e602       |    |		Load	0x3,0x2
141b 017d       | }  |		Execute	Record,Structure_Write
141c			BODY_1410:
141c e5fe       |    |		Load	0x2,-0x2
141d 6804       |h   |		Jump_Zero	0x1422
141e 00d8       |    |		Load_Top	At_Offset_0
141f 8237       | 7  |		Call	0x1,0x37
1420 00cb       |    |		Action	Pop_Block_With_Result
1421 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1422 e404       |    |		Load	0x2,0x4
1423 e602       |    |		Load	0x3,0x2
1424 8238       | 8  |		Call	0x1,0x38
1425 01cc       |    |		Execute	Vector,Catenate
1426 00cb       |    |		Action	Pop_Block_With_Result
1427 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1428 ; --------------------------------------------------------------------------------------
1428 ; SUBPROGRAM
1428 ; --------------------------------------------------------------------------------------
1428 1430       | 0  |		.CONST	0x1430								; Address of begin
1429 0004       |    |		.CONST	0x0004								; Address of exception handler
142a 0002       |    |		.CONST	0x0002								; Number of locals
142b			INIT_1428:
142b e5ff       |    |		Load	0x2,-0x1
142c e2d6       |    |		Load	0x1,0xd6
142d e2d7       |    |		Load	0x1,0xd7
142e 1dd8       |    |		Execute_Immediate	Reference_Lex_1,0xd8
142f 8001       |    |		Call	0x0,0x1
1430			BODY_1428:
1430 e5fe       |    |		Load	0x2,-0x2
1431 6804       |h   |		Jump_Zero	0x1436
1432 00d8       |    |		Load_Top	At_Offset_0
1433 8258       | X  |		Call	0x1,0x58
1434 00cb       |    |		Action	Pop_Block_With_Result
1435 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1436 480a       |H   |		Short_Literal	0xa
1437 e404       |    |		Load	0x2,0x4
1438 e602       |    |		Load	0x3,0x2
1439 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
143a 8246       | F  |		Call	0x1,0x46
143b 01cc       |    |		Execute	Vector,Catenate
143c 0092 1cc9  |    |		Action	Push_String_Extended,0x1cc9					; ";"
143e 01cc       |    |		Execute	Vector,Catenate
143f 01cb       |    |		Execute	Vector,Append
1440 0092 1cca  |    |		Action	Push_String_Extended,0x1cca					; "return pc = "
1442 e602       |    |		Load	0x3,0x2
1443 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
1444 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
1445 e602       |    |		Load	0x3,0x2
1446 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
1447 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
1448 e602       |    |		Load	0x3,0x2
1449 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
144a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
144b 8223       | #  |		Call	0x1,0x23
144c 01cc       |    |		Execute	Vector,Catenate
144d 0092 1c16  |    |		Action	Push_String_Extended,0x1c16					; "; lex = "
144f 01cc       |    |		Execute	Vector,Catenate
1450 e602       |    |		Load	0x3,0x2
1451 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
1452 821b       |    |		Call	0x1,0x1b
1453 01cc       |    |		Execute	Vector,Catenate
1454 8402       |    |		Call	0x2,0x2
1455 01cc       |    |		Execute	Vector,Catenate
1456 00e9       |    |		Load_Encached	String_Cache
1457 01c6       |    |		Execute	Vector,Convert_To_Formal
1458 00cb       |    |		Action	Pop_Block_With_Result
1459 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
145a 0000 0000  |    |		.BLANK	0000[0x6]
1460 ; --------------------------------------------------------------------------------------
1460 ; SUBPROGRAM
1460 ; --------------------------------------------------------------------------------------
1460 1468       | h  |		.CONST	0x1468								; Address of begin
1461 0004       |    |		.CONST	0x0004								; Address of exception handler
1462 0002       |    |		.CONST	0x0002								; Number of locals
1463			INIT_1460:
1463 e5ff       |    |		Load	0x2,-0x1
1464 e2db       |    |		Load	0x1,0xdb
1465 e2dc       |    |		Load	0x1,0xdc
1466 1ddd       |    |		Execute_Immediate	Reference_Lex_1,0xdd
1467 8001       |    |		Call	0x0,0x1
1468			BODY_1460:
1468 e404       |    |		Load	0x2,0x4
1469 e602       |    |		Load	0x3,0x2
146a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
146b 804a       | J  |		Call	0x0,0x4a
146c 01cc       |    |		Execute	Vector,Catenate
146d 0092 1c3a  |   :|		Action	Push_String_Extended,0x1c3a					; " "
146f 01cc       |    |		Execute	Vector,Catenate
1470 e602       |    |		Load	0x3,0x2
1471 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1472 804a       | J  |		Call	0x0,0x4a
1473 01cc       |    |		Execute	Vector,Catenate
1474 00cb       |    |		Action	Pop_Block_With_Result
1475 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1476 0000 0000  |    |		.XXX[0x2]
1478 ; --------------------------------------------------------------------------------------
1478 ; SUBPROGRAM
1478 ; --------------------------------------------------------------------------------------
1478 1489       |    |		.CONST	0x1489								; Address of begin
1479 0004       |    |		.CONST	0x0004								; Address of exception handler
147a 000d       |    |		.CONST	0x000d								; Number of locals
147b			INIT_1478:
147b 4800       |H   |		Short_Literal	0x0
147c 0093 1493  |    |		push_full_address	INIT_1490
147e 02a0       |    |		Declare_Subprogram	Null_Subprogram
147f 038f       |    |		Declare_Type	Package,Defined,Visible
1480 0386       |    |		Declare_Variable	Package,Visible
1481 00bf       |    |		Action	Accept_Activation
1482 a001       |    |		Store_Unchecked	0x0,0x1
1483 a002       |    |		Store_Unchecked	0x0,0x2
1484 4802       |H   |		Short_Literal	0x2
1485 e20d       |    |		Load	0x1,0xd
1486 020e       |    |		Execute	Module,Augment_Imports
1487 00d8       |    |		Load_Top	At_Offset_0
1488 020f       |    |		Execute	Module,Activate
1489			BODY_1478:
1489 00bc       |    |		Action	Signal_Activated
148a 00bb       |    |		Action	Signal_Completion
148b 0000 0000  |    |		.BLANK	0000[0x5]
1490 ; --------------------------------------------------------------------------------------
1490 ; SUBPROGRAM
1490 ; --------------------------------------------------------------------------------------
1490 14a0       |    |		.CONST	0x14a0								; Address of begin
1491 0004       |    |		.CONST	0x0004								; Address of exception handler
1492 000f       |    |		.CONST	0x000f								; Number of locals
1493			INIT_1490:
1493 029a 14ab  |    |		Declare_Subprogram	INIT_14a8,For_Outer_Call,Visible,Unelaborated
1495 029a 14b3  |    |		Declare_Subprogram	INIT_14b0,For_Outer_Call,Visible,Unelaborated
1497 029a 14bb  |    |		Declare_Subprogram	INIT_14b8,For_Outer_Call,Visible,Unelaborated
1499 00bf       |    |		Action	Accept_Activation
149a 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
149b 00c7       |    |		Action	Elaborate_Subprogram
149c 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
149d 00c7       |    |		Action	Elaborate_Subprogram
149e 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
149f 00c7       |    |		Action	Elaborate_Subprogram
14a0			BODY_1490:
14a0 00bc       |    |		Action	Signal_Activated
14a1 00bb       |    |		Action	Signal_Completion
14a2 0000 0000  |    |		.BLANK	0000[0x6]
14a8 ; --------------------------------------------------------------------------------------
14a8 ; SUBPROGRAM
14a8 ; --------------------------------------------------------------------------------------
14a8 14ab       |    |		.CONST	0x14ab								; Address of begin
14a9 0004       |    |		.CONST	0x0004								; Address of exception handler
14aa 0001       |    |		.CONST	0x0001								; Number of locals
14ab			BODY_14a8:
14ab			INIT_14a8:
14ab e5ff       |    |		Load	0x2,-0x1
14ac 8001       |    |		Call	0x0,0x1
14ad 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
14ae 0000 0000  |    |		.XXX[0x2]
14b0 ; --------------------------------------------------------------------------------------
14b0 ; SUBPROGRAM
14b0 ; --------------------------------------------------------------------------------------
14b0 14b3       |    |		.CONST	0x14b3								; Address of begin
14b1 0004       |    |		.CONST	0x0004								; Address of exception handler
14b2 0001       |    |		.CONST	0x0001								; Number of locals
14b3			BODY_14b0:
14b3			INIT_14b0:
14b3 e5ff       |    |		Load	0x2,-0x1
14b4 8001       |    |		Call	0x0,0x1
14b5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
14b6 0000 0000  |    |		.XXX[0x2]
14b8 ; --------------------------------------------------------------------------------------
14b8 ; SUBPROGRAM
14b8 ; --------------------------------------------------------------------------------------
14b8 14bb       |    |		.CONST	0x14bb								; Address of begin
14b9 0004       |    |		.CONST	0x0004								; Address of exception handler
14ba 0001       |    |		.CONST	0x0001								; Number of locals
14bb			BODY_14b8:
14bb			INIT_14b8:
14bb e5ff       |    |		Load	0x2,-0x1
14bc 8002       |    |		Call	0x0,0x2
14bd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
14be 0000 0000  |    |		.XXX[0x2]
14c0 ; --------------------------------------------------------------------------------------
14c0 ; SUBPROGRAM
14c0 ; --------------------------------------------------------------------------------------
14c0 152c       | ,  |		.CONST	0x152c								; Address of begin
14c1 0004       |    |		.CONST	0x0004								; Address of exception handler
14c2 002b       | +  |		.CONST	0x002b								; Number of locals
14c3			INIT_14c0:
14c3 029a 1533  |   3|		Declare_Subprogram	INIT_1530,For_Outer_Call,Visible,Unelaborated
14c5 029a 156b  |   k|		Declare_Subprogram	INIT_1568,For_Outer_Call,Visible,Unelaborated
14c7 029a 15ab  |    |		Declare_Subprogram	INIT_15a8,For_Outer_Call,Visible,Unelaborated
14c9 029a 15f3  |    |		Declare_Subprogram	INIT_15f0,For_Outer_Call,Visible,Unelaborated
14cb 029a 1643  |   C|		Declare_Subprogram	INIT_1640,For_Outer_Call,Visible,Unelaborated
14cd 029a 16ab  |    |		Declare_Subprogram	INIT_16a8,For_Outer_Call,Visible,Unelaborated
14cf 029a 171b  |    |		Declare_Subprogram	INIT_1718,For_Outer_Call,Visible,Unelaborated
14d1 029a 1793  |    |		Declare_Subprogram	INIT_1790,For_Outer_Call,Visible,Unelaborated
14d3 029a 1823  |   #|		Declare_Subprogram	INIT_1820,For_Outer_Call,Visible,Unelaborated
14d5 029a 18bb  |    |		Declare_Subprogram	INIT_18b8,For_Outer_Call,Visible,Unelaborated
14d7 029a 18f3  |    |		Declare_Subprogram	INIT_18f0,For_Outer_Call,Visible,Unelaborated
14d9 029a 1903  |    |		Declare_Subprogram	INIT_1900,For_Outer_Call,Visible,Unelaborated
14db 029a 190b  |    |		Declare_Subprogram	INIT_1908,For_Outer_Call,Visible,Unelaborated
14dd 029a 1913  |    |		Declare_Subprogram	INIT_1910,For_Outer_Call,Visible,Unelaborated
14df 00bf       |    |		Action	Accept_Activation
14e0 0092 1ccb  |    |		Action	Push_String_Extended,0x1ccb					; "("
14e2 0092 1c60  |   `|		Action	Push_String_Extended,0x1c60					; ")"
14e4 0092 1c40  |   @|		Action	Push_String_Extended,0x1c40					; ", "
14e6 4801       |H   |		Short_Literal	0x1
14e7 4802       |H   |		Short_Literal	0x2
14e8 00e9       |    |		Load_Encached	String_Cache
14e9 035b       | [  |		Declare_Type	Array,Constrained
14ea 0337       | 7  |		Declare_Variable	Array
14eb 4809       |H   |		Short_Literal	0x9
14ec 4801       |H   |		Short_Literal	0x1
14ed e21e       |    |		Load	0x1,0x1e
14ee 01d6       |    |		Execute	Vector,Field_Write
14ef 4800       |H   |		Short_Literal	0x0
14f0 4802       |H   |		Short_Literal	0x2
14f1 e21e       |    |		Load	0x1,0x1e
14f2 01d6       |    |		Execute	Vector,Field_Write
14f3 0092 1cc3  |    |		Action	Push_String_Extended,0x1cc3					; " => "
14f5 029d 1933  |   3|		Declare_Subprogram	INIT_1930,For_Outer_Call
14f7 029d 194b  |   K|		Declare_Subprogram	INIT_1948,For_Outer_Call
14f9 029d 196b  |   k|		Declare_Subprogram	INIT_1968,For_Outer_Call
14fb 029d 1993  |    |		Declare_Subprogram	INIT_1990,For_Outer_Call
14fd 029d 19b3  |    |		Declare_Subprogram	INIT_19b0,For_Outer_Call
14ff 029d 19db  |    |		Declare_Subprogram	INIT_19d8,For_Outer_Call
1501 029d 1a03  |    |		Declare_Subprogram	INIT_1a00,For_Outer_Call
1503 029d 1a2b  |   +|		Declare_Subprogram	INIT_1a28,For_Outer_Call
1505 029d 1a5b  |   [|		Declare_Subprogram	INIT_1a58,For_Outer_Call
1507 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
1508 00c7       |    |		Action	Elaborate_Subprogram
1509 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
150a 00c7       |    |		Action	Elaborate_Subprogram
150b 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
150c 00c7       |    |		Action	Elaborate_Subprogram
150d 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
150e 00c7       |    |		Action	Elaborate_Subprogram
150f 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
1510 00c7       |    |		Action	Elaborate_Subprogram
1511 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
1512 00c7       |    |		Action	Elaborate_Subprogram
1513 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
1514 00c7       |    |		Action	Elaborate_Subprogram
1515 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
1516 00c7       |    |		Action	Elaborate_Subprogram
1517 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
1518 00c7       |    |		Action	Elaborate_Subprogram
1519 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
151a 00c7       |    |		Action	Elaborate_Subprogram
151b 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
151c 00c7       |    |		Action	Elaborate_Subprogram
151d 029d 1a73  |   s|		Declare_Subprogram	INIT_1a70,For_Outer_Call
151f 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
1520 00c7       |    |		Action	Elaborate_Subprogram
1521 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
1522 00c7       |    |		Action	Elaborate_Subprogram
1523 0093 0000  |    |		push_full_address	0x0
1525 603e       |`>  |		Indirect_Literal	Discrete,0x1564,{0x80000000, 0x00010000}
1526 0273       | s  |		Execute	Discrete,Plus
1527 0007       |    |		Action	Break_Optional
1528 029d 1a7b  |   {|		Declare_Subprogram	INIT_1a78,For_Outer_Call
152a 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a
152b 00c7       |    |		Action	Elaborate_Subprogram
152c			BODY_14c0:
152c 00bc       |    |		Action	Signal_Activated
152d 00bb       |    |		Action	Signal_Completion
152e 0000 0000  |    |		.XXX[0x2]
1530 ; --------------------------------------------------------------------------------------
1530 ; SUBPROGRAM
1530 ; --------------------------------------------------------------------------------------
1530 154a       | J  |		.CONST	0x154a								; Address of begin
1531 0004       |    |		.CONST	0x0004								; Address of exception handler
1532 0004       |    |		.CONST	0x0004								; Number of locals
1533			INIT_1530:
1533 4802       |H   |		Short_Literal	0x2
1534 8228       | (  |		Call	0x1,0x28
1535 e5ff       |    |		Load	0x2,-0x1
1536 01db       |    |		Execute	Vector,Length
1537 0273       | s  |		Execute	Discrete,Plus
1538 e5fe       |    |		Load	0x2,-0x2
1539 01db       |    |		Execute	Vector,Length
153a 0273       | s  |		Execute	Discrete,Plus
153b e5fd       |    |		Load	0x2,-0x3
153c 01db       |    |		Execute	Vector,Length
153d 0273       | s  |		Execute	Discrete,Plus
153e e5fc       |    |		Load	0x2,-0x4
153f 01db       |    |		Execute	Vector,Length
1540 0273       | s  |		Execute	Discrete,Plus
1541 00e2       |    |		Load_Encached	Integer_Cache
1542 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
1543 00e2       |    |		Load_Encached	Integer_Cache
1544 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
1545 4801       |H   |		Short_Literal	0x1
1546 e402       |    |		Load	0x2,0x2
1547 00e9       |    |		Load_Encached	String_Cache
1548 035b       | [  |		Declare_Type	Array,Constrained
1549 0337       | 7  |		Declare_Variable	Array
154a			BODY_1530:
154a e403       |    |		Load	0x2,0x3
154b e404       |    |		Load	0x2,0x4
154c e5fe       |    |		Load	0x2,-0x2
154d e5ff       |    |		Load	0x2,-0x1
154e 8221       | !  |		Call	0x1,0x21
154f 00d1       |    |		Pop_Control	Pop_Count_1
1550 c403       |    |		Store	0x2,0x3
1551 e403       |    |		Load	0x2,0x3
1552 e404       |    |		Load	0x2,0x4
1553 e5fc       |    |		Load	0x2,-0x4
1554 e5fd       |    |		Load	0x2,-0x3
1555 8222       | "  |		Call	0x1,0x22
1556 00d1       |    |		Pop_Control	Pop_Count_1
1557 c403       |    |		Store	0x2,0x3
1558 e403       |    |		Load	0x2,0x3
1559 e404       |    |		Load	0x2,0x4
155a 01dc       |    |		Execute	Vector,Last
155b 0a01       |    |		Execute_Immediate	Plus,0x1
155c 027f       |    |		Execute	Discrete,Equal
155d 7001       |p   |		Jump_Nonzero	0x155f
155e 0887       |    |		Execute_Immediate	Raise,0x87
155f 00d8       |    |		Load_Top	At_Offset_0
1560 00e9       |    |		Load_Encached	String_Cache
1561 01c6       |    |		Execute	Vector,Convert_To_Formal
1562 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
1563 0000       |    |		.XXX[0x1]
1564 8000 0000  |    |		.LITERAL	{0x80000000, 0x00010000}
1568 ; --------------------------------------------------------------------------------------
1568 ; SUBPROGRAM
1568 ; --------------------------------------------------------------------------------------
1568 1588       |    |		.CONST	0x1588								; Address of begin
1569 0004       |    |		.CONST	0x0004								; Address of exception handler
156a 0004       |    |		.CONST	0x0004								; Number of locals
156b			INIT_1568:
156b 4803       |H   |		Short_Literal	0x3
156c 8228       | (  |		Call	0x1,0x28
156d e5ff       |    |		Load	0x2,-0x1
156e 01db       |    |		Execute	Vector,Length
156f 0273       | s  |		Execute	Discrete,Plus
1570 e5fe       |    |		Load	0x2,-0x2
1571 01db       |    |		Execute	Vector,Length
1572 0273       | s  |		Execute	Discrete,Plus
1573 e5fd       |    |		Load	0x2,-0x3
1574 01db       |    |		Execute	Vector,Length
1575 0273       | s  |		Execute	Discrete,Plus
1576 e5fc       |    |		Load	0x2,-0x4
1577 01db       |    |		Execute	Vector,Length
1578 0273       | s  |		Execute	Discrete,Plus
1579 e5fb       |    |		Load	0x2,-0x5
157a 01db       |    |		Execute	Vector,Length
157b 0273       | s  |		Execute	Discrete,Plus
157c e5fa       |    |		Load	0x2,-0x6
157d 01db       |    |		Execute	Vector,Length
157e 0273       | s  |		Execute	Discrete,Plus
157f 00e2       |    |		Load_Encached	Integer_Cache
1580 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
1581 00e2       |    |		Load_Encached	Integer_Cache
1582 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
1583 4801       |H   |		Short_Literal	0x1
1584 e402       |    |		Load	0x2,0x2
1585 00e9       |    |		Load_Encached	String_Cache
1586 035b       | [  |		Declare_Type	Array,Constrained
1587 0337       | 7  |		Declare_Variable	Array
1588			BODY_1568:
1588 e403       |    |		Load	0x2,0x3
1589 e404       |    |		Load	0x2,0x4
158a e5fe       |    |		Load	0x2,-0x2
158b e5ff       |    |		Load	0x2,-0x1
158c 8221       | !  |		Call	0x1,0x21
158d 00d1       |    |		Pop_Control	Pop_Count_1
158e c403       |    |		Store	0x2,0x3
158f e403       |    |		Load	0x2,0x3
1590 e404       |    |		Load	0x2,0x4
1591 e5fc       |    |		Load	0x2,-0x4
1592 e5fd       |    |		Load	0x2,-0x3
1593 8223       | #  |		Call	0x1,0x23
1594 00d1       |    |		Pop_Control	Pop_Count_1
1595 c403       |    |		Store	0x2,0x3
1596 e403       |    |		Load	0x2,0x3
1597 e404       |    |		Load	0x2,0x4
1598 e5fa       |    |		Load	0x2,-0x6
1599 e5fb       |    |		Load	0x2,-0x5
159a 8222       | "  |		Call	0x1,0x22
159b 00d1       |    |		Pop_Control	Pop_Count_1
159c c403       |    |		Store	0x2,0x3
159d e403       |    |		Load	0x2,0x3
159e e404       |    |		Load	0x2,0x4
159f 01dc       |    |		Execute	Vector,Last
15a0 0a01       |    |		Execute_Immediate	Plus,0x1
15a1 027f       |    |		Execute	Discrete,Equal
15a2 7001       |p   |		Jump_Nonzero	0x15a4
15a3 0887       |    |		Execute_Immediate	Raise,0x87
15a4 00d8       |    |		Load_Top	At_Offset_0
15a5 00e9       |    |		Load_Encached	String_Cache
15a6 01c6       |    |		Execute	Vector,Convert_To_Formal
15a7 4406       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x6
15a8 ; --------------------------------------------------------------------------------------
15a8 ; SUBPROGRAM
15a8 ; --------------------------------------------------------------------------------------
15a8 15ce       |    |		.CONST	0x15ce								; Address of begin
15a9 0004       |    |		.CONST	0x0004								; Address of exception handler
15aa 0004       |    |		.CONST	0x0004								; Number of locals
15ab			INIT_15a8:
15ab 4804       |H   |		Short_Literal	0x4
15ac 8228       | (  |		Call	0x1,0x28
15ad e5ff       |    |		Load	0x2,-0x1
15ae 01db       |    |		Execute	Vector,Length
15af 0273       | s  |		Execute	Discrete,Plus
15b0 e5fe       |    |		Load	0x2,-0x2
15b1 01db       |    |		Execute	Vector,Length
15b2 0273       | s  |		Execute	Discrete,Plus
15b3 e5fd       |    |		Load	0x2,-0x3
15b4 01db       |    |		Execute	Vector,Length
15b5 0273       | s  |		Execute	Discrete,Plus
15b6 e5fc       |    |		Load	0x2,-0x4
15b7 01db       |    |		Execute	Vector,Length
15b8 0273       | s  |		Execute	Discrete,Plus
15b9 e5fb       |    |		Load	0x2,-0x5
15ba 01db       |    |		Execute	Vector,Length
15bb 0273       | s  |		Execute	Discrete,Plus
15bc e5fa       |    |		Load	0x2,-0x6
15bd 01db       |    |		Execute	Vector,Length
15be 0273       | s  |		Execute	Discrete,Plus
15bf e5f9       |    |		Load	0x2,-0x7
15c0 01db       |    |		Execute	Vector,Length
15c1 0273       | s  |		Execute	Discrete,Plus
15c2 e5f8       |    |		Load	0x2,-0x8
15c3 01db       |    |		Execute	Vector,Length
15c4 0273       | s  |		Execute	Discrete,Plus
15c5 00e2       |    |		Load_Encached	Integer_Cache
15c6 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
15c7 00e2       |    |		Load_Encached	Integer_Cache
15c8 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
15c9 4801       |H   |		Short_Literal	0x1
15ca e402       |    |		Load	0x2,0x2
15cb 00e9       |    |		Load_Encached	String_Cache
15cc 035b       | [  |		Declare_Type	Array,Constrained
15cd 0337       | 7  |		Declare_Variable	Array
15ce			BODY_15a8:
15ce e403       |    |		Load	0x2,0x3
15cf e404       |    |		Load	0x2,0x4
15d0 e5fe       |    |		Load	0x2,-0x2
15d1 e5ff       |    |		Load	0x2,-0x1
15d2 8221       | !  |		Call	0x1,0x21
15d3 00d1       |    |		Pop_Control	Pop_Count_1
15d4 c403       |    |		Store	0x2,0x3
15d5 e403       |    |		Load	0x2,0x3
15d6 e404       |    |		Load	0x2,0x4
15d7 e5fa       |    |		Load	0x2,-0x6
15d8 e5fb       |    |		Load	0x2,-0x5
15d9 e5fc       |    |		Load	0x2,-0x4
15da e5fd       |    |		Load	0x2,-0x3
15db 8224       | $  |		Call	0x1,0x24
15dc 00d1       |    |		Pop_Control	Pop_Count_1
15dd c403       |    |		Store	0x2,0x3
15de e403       |    |		Load	0x2,0x3
15df e404       |    |		Load	0x2,0x4
15e0 e5f8       |    |		Load	0x2,-0x8
15e1 e5f9       |    |		Load	0x2,-0x7
15e2 8222       | "  |		Call	0x1,0x22
15e3 00d1       |    |		Pop_Control	Pop_Count_1
15e4 c403       |    |		Store	0x2,0x3
15e5 e403       |    |		Load	0x2,0x3
15e6 e404       |    |		Load	0x2,0x4
15e7 01dc       |    |		Execute	Vector,Last
15e8 0a01       |    |		Execute_Immediate	Plus,0x1
15e9 027f       |    |		Execute	Discrete,Equal
15ea 7001       |p   |		Jump_Nonzero	0x15ec
15eb 0887       |    |		Execute_Immediate	Raise,0x87
15ec 00d8       |    |		Load_Top	At_Offset_0
15ed 00e9       |    |		Load_Encached	String_Cache
15ee 01c6       |    |		Execute	Vector,Convert_To_Formal
15ef 4408       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x8
15f0 ; --------------------------------------------------------------------------------------
15f0 ; SUBPROGRAM
15f0 ; --------------------------------------------------------------------------------------
15f0 161c       |    |		.CONST	0x161c								; Address of begin
15f1 0004       |    |		.CONST	0x0004								; Address of exception handler
15f2 0004       |    |		.CONST	0x0004								; Number of locals
15f3			INIT_15f0:
15f3 4805       |H   |		Short_Literal	0x5
15f4 8228       | (  |		Call	0x1,0x28
15f5 e5ff       |    |		Load	0x2,-0x1
15f6 01db       |    |		Execute	Vector,Length
15f7 0273       | s  |		Execute	Discrete,Plus
15f8 e5fe       |    |		Load	0x2,-0x2
15f9 01db       |    |		Execute	Vector,Length
15fa 0273       | s  |		Execute	Discrete,Plus
15fb e5fd       |    |		Load	0x2,-0x3
15fc 01db       |    |		Execute	Vector,Length
15fd 0273       | s  |		Execute	Discrete,Plus
15fe e5fc       |    |		Load	0x2,-0x4
15ff 01db       |    |		Execute	Vector,Length
1600 0273       | s  |		Execute	Discrete,Plus
1601 e5fb       |    |		Load	0x2,-0x5
1602 01db       |    |		Execute	Vector,Length
1603 0273       | s  |		Execute	Discrete,Plus
1604 e5fa       |    |		Load	0x2,-0x6
1605 01db       |    |		Execute	Vector,Length
1606 0273       | s  |		Execute	Discrete,Plus
1607 e5f9       |    |		Load	0x2,-0x7
1608 01db       |    |		Execute	Vector,Length
1609 0273       | s  |		Execute	Discrete,Plus
160a e5f8       |    |		Load	0x2,-0x8
160b 01db       |    |		Execute	Vector,Length
160c 0273       | s  |		Execute	Discrete,Plus
160d e5f7       |    |		Load	0x2,-0x9
160e 01db       |    |		Execute	Vector,Length
160f 0273       | s  |		Execute	Discrete,Plus
1610 e5f6       |    |		Load	0x2,-0xa
1611 01db       |    |		Execute	Vector,Length
1612 0273       | s  |		Execute	Discrete,Plus
1613 00e2       |    |		Load_Encached	Integer_Cache
1614 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
1615 00e2       |    |		Load_Encached	Integer_Cache
1616 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
1617 4801       |H   |		Short_Literal	0x1
1618 e402       |    |		Load	0x2,0x2
1619 00e9       |    |		Load_Encached	String_Cache
161a 035b       | [  |		Declare_Type	Array,Constrained
161b 0337       | 7  |		Declare_Variable	Array
161c			BODY_15f0:
161c e403       |    |		Load	0x2,0x3
161d e404       |    |		Load	0x2,0x4
161e e5fe       |    |		Load	0x2,-0x2
161f e5ff       |    |		Load	0x2,-0x1
1620 8221       | !  |		Call	0x1,0x21
1621 00d1       |    |		Pop_Control	Pop_Count_1
1622 c403       |    |		Store	0x2,0x3
1623 e403       |    |		Load	0x2,0x3
1624 e404       |    |		Load	0x2,0x4
1625 e5f8       |    |		Load	0x2,-0x8
1626 e5f9       |    |		Load	0x2,-0x7
1627 e5fa       |    |		Load	0x2,-0x6
1628 e5fb       |    |		Load	0x2,-0x5
1629 e5fc       |    |		Load	0x2,-0x4
162a e5fd       |    |		Load	0x2,-0x3
162b 8225       | %  |		Call	0x1,0x25
162c 00d1       |    |		Pop_Control	Pop_Count_1
162d c403       |    |		Store	0x2,0x3
162e e403       |    |		Load	0x2,0x3
162f e404       |    |		Load	0x2,0x4
1630 e5f6       |    |		Load	0x2,-0xa
1631 e5f7       |    |		Load	0x2,-0x9
1632 8222       | "  |		Call	0x1,0x22
1633 00d1       |    |		Pop_Control	Pop_Count_1
1634 c403       |    |		Store	0x2,0x3
1635 e403       |    |		Load	0x2,0x3
1636 e404       |    |		Load	0x2,0x4
1637 01dc       |    |		Execute	Vector,Last
1638 0a01       |    |		Execute_Immediate	Plus,0x1
1639 027f       |    |		Execute	Discrete,Equal
163a 7001       |p   |		Jump_Nonzero	0x163c
163b 0887       |    |		Execute_Immediate	Raise,0x87
163c 00d8       |    |		Load_Top	At_Offset_0
163d 00e9       |    |		Load_Encached	String_Cache
163e 01c6       |    |		Execute	Vector,Convert_To_Formal
163f 440a       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0xa
1640 ; --------------------------------------------------------------------------------------
1640 ; SUBPROGRAM
1640 ; --------------------------------------------------------------------------------------
1640 167b       | {  |		.CONST	0x167b								; Address of begin
1641 0004       |    |		.CONST	0x0004								; Address of exception handler
1642 0007       |    |		.CONST	0x0007								; Number of locals
1643			INIT_1640:
1643 4806       |H   |		Short_Literal	0x6
1644 8228       | (  |		Call	0x1,0x28
1645 e5ff       |    |		Load	0x2,-0x1
1646 01db       |    |		Execute	Vector,Length
1647 0273       | s  |		Execute	Discrete,Plus
1648 e5fe       |    |		Load	0x2,-0x2
1649 01db       |    |		Execute	Vector,Length
164a 0273       | s  |		Execute	Discrete,Plus
164b e5fd       |    |		Load	0x2,-0x3
164c 01db       |    |		Execute	Vector,Length
164d 0273       | s  |		Execute	Discrete,Plus
164e e5fc       |    |		Load	0x2,-0x4
164f 01db       |    |		Execute	Vector,Length
1650 0273       | s  |		Execute	Discrete,Plus
1651 e5fb       |    |		Load	0x2,-0x5
1652 01db       |    |		Execute	Vector,Length
1653 0273       | s  |		Execute	Discrete,Plus
1654 00e2       |    |		Load_Encached	Integer_Cache
1655 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
1656 e5fa       |    |		Load	0x2,-0x6
1657 01db       |    |		Execute	Vector,Length
1658 e5f9       |    |		Load	0x2,-0x7
1659 01db       |    |		Execute	Vector,Length
165a 0273       | s  |		Execute	Discrete,Plus
165b e5f8       |    |		Load	0x2,-0x8
165c 01db       |    |		Execute	Vector,Length
165d 0273       | s  |		Execute	Discrete,Plus
165e e5f7       |    |		Load	0x2,-0x9
165f 01db       |    |		Execute	Vector,Length
1660 0273       | s  |		Execute	Discrete,Plus
1661 e5f6       |    |		Load	0x2,-0xa
1662 01db       |    |		Execute	Vector,Length
1663 0273       | s  |		Execute	Discrete,Plus
1664 00e2       |    |		Load_Encached	Integer_Cache
1665 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
1666 e5f5       |    |		Load	0x2,-0xb
1667 01db       |    |		Execute	Vector,Length
1668 e5f4       |    |		Load	0x2,-0xc
1669 01db       |    |		Execute	Vector,Length
166a 0273       | s  |		Execute	Discrete,Plus
166b 00e2       |    |		Load_Encached	Integer_Cache
166c 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
166d e402       |    |		Load	0x2,0x2
166e e403       |    |		Load	0x2,0x3
166f 0273       | s  |		Execute	Discrete,Plus
1670 e404       |    |		Load	0x2,0x4
1671 0273       | s  |		Execute	Discrete,Plus
1672 00e2       |    |		Load_Encached	Integer_Cache
1673 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
1674 00e2       |    |		Load_Encached	Integer_Cache
1675 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
1676 4801       |H   |		Short_Literal	0x1
1677 e405       |    |		Load	0x2,0x5
1678 00e9       |    |		Load_Encached	String_Cache
1679 035b       | [  |		Declare_Type	Array,Constrained
167a 0337       | 7  |		Declare_Variable	Array
167b			BODY_1640:
167b e406       |    |		Load	0x2,0x6
167c e407       |    |		Load	0x2,0x7
167d e5fe       |    |		Load	0x2,-0x2
167e e5ff       |    |		Load	0x2,-0x1
167f 8221       | !  |		Call	0x1,0x21
1680 00d1       |    |		Pop_Control	Pop_Count_1
1681 c406       |    |		Store	0x2,0x6
1682 e406       |    |		Load	0x2,0x6
1683 e407       |    |		Load	0x2,0x7
1684 e5f6       |    |		Load	0x2,-0xa
1685 e5f7       |    |		Load	0x2,-0x9
1686 e5f8       |    |		Load	0x2,-0x8
1687 e5f9       |    |		Load	0x2,-0x7
1688 e5fa       |    |		Load	0x2,-0x6
1689 e5fb       |    |		Load	0x2,-0x5
168a e5fc       |    |		Load	0x2,-0x4
168b e5fd       |    |		Load	0x2,-0x3
168c 8226       | &  |		Call	0x1,0x26
168d 00d1       |    |		Pop_Control	Pop_Count_1
168e c406       |    |		Store	0x2,0x6
168f e406       |    |		Load	0x2,0x6
1690 e407       |    |		Load	0x2,0x7
1691 e5f4       |    |		Load	0x2,-0xc
1692 e5f5       |    |		Load	0x2,-0xb
1693 8222       | "  |		Call	0x1,0x22
1694 00d1       |    |		Pop_Control	Pop_Count_1
1695 c406       |    |		Store	0x2,0x6
1696 e406       |    |		Load	0x2,0x6
1697 e407       |    |		Load	0x2,0x7
1698 01dc       |    |		Execute	Vector,Last
1699 0a01       |    |		Execute_Immediate	Plus,0x1
169a 027f       |    |		Execute	Discrete,Equal
169b 7001       |p   |		Jump_Nonzero	0x169d
169c 0887       |    |		Execute_Immediate	Raise,0x87
169d 00d8       |    |		Load_Top	At_Offset_0
169e 00e9       |    |		Load_Encached	String_Cache
169f 01c6       |    |		Execute	Vector,Convert_To_Formal
16a0 440c       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0xc
16a1 0000 0000  |    |		.BLANK	0000[0x7]
16a8 ; --------------------------------------------------------------------------------------
16a8 ; SUBPROGRAM
16a8 ; --------------------------------------------------------------------------------------
16a8 16e9       |    |		.CONST	0x16e9								; Address of begin
16a9 0004       |    |		.CONST	0x0004								; Address of exception handler
16aa 0007       |    |		.CONST	0x0007								; Number of locals
16ab			INIT_16a8:
16ab 4807       |H   |		Short_Literal	0x7
16ac 8228       | (  |		Call	0x1,0x28
16ad e5ff       |    |		Load	0x2,-0x1
16ae 01db       |    |		Execute	Vector,Length
16af 0273       | s  |		Execute	Discrete,Plus
16b0 e5fe       |    |		Load	0x2,-0x2
16b1 01db       |    |		Execute	Vector,Length
16b2 0273       | s  |		Execute	Discrete,Plus
16b3 e5fd       |    |		Load	0x2,-0x3
16b4 01db       |    |		Execute	Vector,Length
16b5 0273       | s  |		Execute	Discrete,Plus
16b6 e5fc       |    |		Load	0x2,-0x4
16b7 01db       |    |		Execute	Vector,Length
16b8 0273       | s  |		Execute	Discrete,Plus
16b9 e5fb       |    |		Load	0x2,-0x5
16ba 01db       |    |		Execute	Vector,Length
16bb 0273       | s  |		Execute	Discrete,Plus
16bc 00e2       |    |		Load_Encached	Integer_Cache
16bd 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
16be e5fa       |    |		Load	0x2,-0x6
16bf 01db       |    |		Execute	Vector,Length
16c0 e5f9       |    |		Load	0x2,-0x7
16c1 01db       |    |		Execute	Vector,Length
16c2 0273       | s  |		Execute	Discrete,Plus
16c3 e5f8       |    |		Load	0x2,-0x8
16c4 01db       |    |		Execute	Vector,Length
16c5 0273       | s  |		Execute	Discrete,Plus
16c6 e5f7       |    |		Load	0x2,-0x9
16c7 01db       |    |		Execute	Vector,Length
16c8 0273       | s  |		Execute	Discrete,Plus
16c9 e5f6       |    |		Load	0x2,-0xa
16ca 01db       |    |		Execute	Vector,Length
16cb 0273       | s  |		Execute	Discrete,Plus
16cc e5f5       |    |		Load	0x2,-0xb
16cd 01db       |    |		Execute	Vector,Length
16ce 0273       | s  |		Execute	Discrete,Plus
16cf 00e2       |    |		Load_Encached	Integer_Cache
16d0 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
16d1 e5f4       |    |		Load	0x2,-0xc
16d2 01db       |    |		Execute	Vector,Length
16d3 e5f3       |    |		Load	0x2,-0xd
16d4 01db       |    |		Execute	Vector,Length
16d5 0273       | s  |		Execute	Discrete,Plus
16d6 e5f2       |    |		Load	0x2,-0xe
16d7 01db       |    |		Execute	Vector,Length
16d8 0273       | s  |		Execute	Discrete,Plus
16d9 00e2       |    |		Load_Encached	Integer_Cache
16da 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
16db e402       |    |		Load	0x2,0x2
16dc e403       |    |		Load	0x2,0x3
16dd 0273       | s  |		Execute	Discrete,Plus
16de e404       |    |		Load	0x2,0x4
16df 0273       | s  |		Execute	Discrete,Plus
16e0 00e2       |    |		Load_Encached	Integer_Cache
16e1 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
16e2 00e2       |    |		Load_Encached	Integer_Cache
16e3 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
16e4 4801       |H   |		Short_Literal	0x1
16e5 e405       |    |		Load	0x2,0x5
16e6 00e9       |    |		Load_Encached	String_Cache
16e7 035b       | [  |		Declare_Type	Array,Constrained
16e8 0337       | 7  |		Declare_Variable	Array
16e9			BODY_16a8:
16e9 e406       |    |		Load	0x2,0x6
16ea e407       |    |		Load	0x2,0x7
16eb e5fe       |    |		Load	0x2,-0x2
16ec e5ff       |    |		Load	0x2,-0x1
16ed 8221       | !  |		Call	0x1,0x21
16ee 00d1       |    |		Pop_Control	Pop_Count_1
16ef c406       |    |		Store	0x2,0x6
16f0 e406       |    |		Load	0x2,0x6
16f1 e407       |    |		Load	0x2,0x7
16f2 e5f4       |    |		Load	0x2,-0xc
16f3 e5f5       |    |		Load	0x2,-0xb
16f4 e5f6       |    |		Load	0x2,-0xa
16f5 e5f7       |    |		Load	0x2,-0x9
16f6 e5f8       |    |		Load	0x2,-0x8
16f7 e5f9       |    |		Load	0x2,-0x7
16f8 e5fa       |    |		Load	0x2,-0x6
16f9 e5fb       |    |		Load	0x2,-0x5
16fa e5fc       |    |		Load	0x2,-0x4
16fb e5fd       |    |		Load	0x2,-0x3
16fc 8227       | '  |		Call	0x1,0x27
16fd 00d1       |    |		Pop_Control	Pop_Count_1
16fe c406       |    |		Store	0x2,0x6
16ff e406       |    |		Load	0x2,0x6
1700 e407       |    |		Load	0x2,0x7
1701 e5f2       |    |		Load	0x2,-0xe
1702 e5f3       |    |		Load	0x2,-0xd
1703 8222       | "  |		Call	0x1,0x22
1704 00d1       |    |		Pop_Control	Pop_Count_1
1705 c406       |    |		Store	0x2,0x6
1706 e406       |    |		Load	0x2,0x6
1707 e407       |    |		Load	0x2,0x7
1708 01dc       |    |		Execute	Vector,Last
1709 0a01       |    |		Execute_Immediate	Plus,0x1
170a 027f       |    |		Execute	Discrete,Equal
170b 7001       |p   |		Jump_Nonzero	0x170d
170c 0887       |    |		Execute_Immediate	Raise,0x87
170d 00d8       |    |		Load_Top	At_Offset_0
170e 00e9       |    |		Load_Encached	String_Cache
170f 01c6       |    |		Execute	Vector,Convert_To_Formal
1710 440e       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0xe
1711 0000 0000  |    |		.BLANK	0000[0x7]
1718 ; --------------------------------------------------------------------------------------
1718 ; SUBPROGRAM
1718 ; --------------------------------------------------------------------------------------
1718 175f       | _  |		.CONST	0x175f								; Address of begin
1719 0004       |    |		.CONST	0x0004								; Address of exception handler
171a 0007       |    |		.CONST	0x0007								; Number of locals
171b			INIT_1718:
171b 4808       |H   |		Short_Literal	0x8
171c 8228       | (  |		Call	0x1,0x28
171d e5ff       |    |		Load	0x2,-0x1
171e 01db       |    |		Execute	Vector,Length
171f 0273       | s  |		Execute	Discrete,Plus
1720 e5fe       |    |		Load	0x2,-0x2
1721 01db       |    |		Execute	Vector,Length
1722 0273       | s  |		Execute	Discrete,Plus
1723 e5fd       |    |		Load	0x2,-0x3
1724 01db       |    |		Execute	Vector,Length
1725 0273       | s  |		Execute	Discrete,Plus
1726 e5fc       |    |		Load	0x2,-0x4
1727 01db       |    |		Execute	Vector,Length
1728 0273       | s  |		Execute	Discrete,Plus
1729 e5fb       |    |		Load	0x2,-0x5
172a 01db       |    |		Execute	Vector,Length
172b 0273       | s  |		Execute	Discrete,Plus
172c 00e2       |    |		Load_Encached	Integer_Cache
172d 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
172e e5fa       |    |		Load	0x2,-0x6
172f 01db       |    |		Execute	Vector,Length
1730 e5f9       |    |		Load	0x2,-0x7
1731 01db       |    |		Execute	Vector,Length
1732 0273       | s  |		Execute	Discrete,Plus
1733 e5f8       |    |		Load	0x2,-0x8
1734 01db       |    |		Execute	Vector,Length
1735 0273       | s  |		Execute	Discrete,Plus
1736 e5f7       |    |		Load	0x2,-0x9
1737 01db       |    |		Execute	Vector,Length
1738 0273       | s  |		Execute	Discrete,Plus
1739 e5f6       |    |		Load	0x2,-0xa
173a 01db       |    |		Execute	Vector,Length
173b 0273       | s  |		Execute	Discrete,Plus
173c e5f5       |    |		Load	0x2,-0xb
173d 01db       |    |		Execute	Vector,Length
173e 0273       | s  |		Execute	Discrete,Plus
173f 00e2       |    |		Load_Encached	Integer_Cache
1740 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
1741 e5f4       |    |		Load	0x2,-0xc
1742 01db       |    |		Execute	Vector,Length
1743 e5f3       |    |		Load	0x2,-0xd
1744 01db       |    |		Execute	Vector,Length
1745 0273       | s  |		Execute	Discrete,Plus
1746 e5f2       |    |		Load	0x2,-0xe
1747 01db       |    |		Execute	Vector,Length
1748 0273       | s  |		Execute	Discrete,Plus
1749 e5f1       |    |		Load	0x2,-0xf
174a 01db       |    |		Execute	Vector,Length
174b 0273       | s  |		Execute	Discrete,Plus
174c e5f0       |    |		Load	0x2,-0x10
174d 01db       |    |		Execute	Vector,Length
174e 0273       | s  |		Execute	Discrete,Plus
174f 00e2       |    |		Load_Encached	Integer_Cache
1750 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
1751 e402       |    |		Load	0x2,0x2
1752 e403       |    |		Load	0x2,0x3
1753 0273       | s  |		Execute	Discrete,Plus
1754 e404       |    |		Load	0x2,0x4
1755 0273       | s  |		Execute	Discrete,Plus
1756 00e2       |    |		Load_Encached	Integer_Cache
1757 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
1758 00e2       |    |		Load_Encached	Integer_Cache
1759 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
175a 4801       |H   |		Short_Literal	0x1
175b e405       |    |		Load	0x2,0x5
175c 00e9       |    |		Load_Encached	String_Cache
175d 035b       | [  |		Declare_Type	Array,Constrained
175e 0337       | 7  |		Declare_Variable	Array
175f			BODY_1718:
175f e406       |    |		Load	0x2,0x6
1760 e407       |    |		Load	0x2,0x7
1761 e5fe       |    |		Load	0x2,-0x2
1762 e5ff       |    |		Load	0x2,-0x1
1763 8221       | !  |		Call	0x1,0x21
1764 00d1       |    |		Pop_Control	Pop_Count_1
1765 c406       |    |		Store	0x2,0x6
1766 e406       |    |		Load	0x2,0x6
1767 e407       |    |		Load	0x2,0x7
1768 e5f4       |    |		Load	0x2,-0xc
1769 e5f5       |    |		Load	0x2,-0xb
176a e5f6       |    |		Load	0x2,-0xa
176b e5f7       |    |		Load	0x2,-0x9
176c e5f8       |    |		Load	0x2,-0x8
176d e5f9       |    |		Load	0x2,-0x7
176e e5fa       |    |		Load	0x2,-0x6
176f e5fb       |    |		Load	0x2,-0x5
1770 e5fc       |    |		Load	0x2,-0x4
1771 e5fd       |    |		Load	0x2,-0x3
1772 8227       | '  |		Call	0x1,0x27
1773 00d1       |    |		Pop_Control	Pop_Count_1
1774 c406       |    |		Store	0x2,0x6
1775 e406       |    |		Load	0x2,0x6
1776 e407       |    |		Load	0x2,0x7
1777 e5f2       |    |		Load	0x2,-0xe
1778 e5f3       |    |		Load	0x2,-0xd
1779 8223       | #  |		Call	0x1,0x23
177a 00d1       |    |		Pop_Control	Pop_Count_1
177b c406       |    |		Store	0x2,0x6
177c e406       |    |		Load	0x2,0x6
177d e407       |    |		Load	0x2,0x7
177e e5f0       |    |		Load	0x2,-0x10
177f e5f1       |    |		Load	0x2,-0xf
1780 8222       | "  |		Call	0x1,0x22
1781 00d1       |    |		Pop_Control	Pop_Count_1
1782 c406       |    |		Store	0x2,0x6
1783 e406       |    |		Load	0x2,0x6
1784 e407       |    |		Load	0x2,0x7
1785 01dc       |    |		Execute	Vector,Last
1786 0a01       |    |		Execute_Immediate	Plus,0x1
1787 027f       |    |		Execute	Discrete,Equal
1788 7001       |p   |		Jump_Nonzero	0x178a
1789 0887       |    |		Execute_Immediate	Raise,0x87
178a 00d8       |    |		Load_Top	At_Offset_0
178b 00e9       |    |		Load_Encached	String_Cache
178c 01c6       |    |		Execute	Vector,Convert_To_Formal
178d 4410       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x10
178e 0000 0000  |    |		.XXX[0x2]
1790 ; --------------------------------------------------------------------------------------
1790 ; SUBPROGRAM
1790 ; --------------------------------------------------------------------------------------
1790 17e6       |    |		.CONST	0x17e6								; Address of begin
1791 0004       |    |		.CONST	0x0004								; Address of exception handler
1792 0008       |    |		.CONST	0x0008								; Number of locals
1793			INIT_1790:
1793 480a       |H   |		Short_Literal	0xa
1794 8228       | (  |		Call	0x1,0x28
1795 e5ff       |    |		Load	0x2,-0x1
1796 01db       |    |		Execute	Vector,Length
1797 0273       | s  |		Execute	Discrete,Plus
1798 e5fe       |    |		Load	0x2,-0x2
1799 01db       |    |		Execute	Vector,Length
179a 0273       | s  |		Execute	Discrete,Plus
179b e5fd       |    |		Load	0x2,-0x3
179c 01db       |    |		Execute	Vector,Length
179d 0273       | s  |		Execute	Discrete,Plus
179e e5fc       |    |		Load	0x2,-0x4
179f 01db       |    |		Execute	Vector,Length
17a0 0273       | s  |		Execute	Discrete,Plus
17a1 e5fb       |    |		Load	0x2,-0x5
17a2 01db       |    |		Execute	Vector,Length
17a3 0273       | s  |		Execute	Discrete,Plus
17a4 00e2       |    |		Load_Encached	Integer_Cache
17a5 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
17a6 e5fa       |    |		Load	0x2,-0x6
17a7 01db       |    |		Execute	Vector,Length
17a8 e5f9       |    |		Load	0x2,-0x7
17a9 01db       |    |		Execute	Vector,Length
17aa 0273       | s  |		Execute	Discrete,Plus
17ab e5f8       |    |		Load	0x2,-0x8
17ac 01db       |    |		Execute	Vector,Length
17ad 0273       | s  |		Execute	Discrete,Plus
17ae e5f7       |    |		Load	0x2,-0x9
17af 01db       |    |		Execute	Vector,Length
17b0 0273       | s  |		Execute	Discrete,Plus
17b1 e5f6       |    |		Load	0x2,-0xa
17b2 01db       |    |		Execute	Vector,Length
17b3 0273       | s  |		Execute	Discrete,Plus
17b4 e5f5       |    |		Load	0x2,-0xb
17b5 01db       |    |		Execute	Vector,Length
17b6 0273       | s  |		Execute	Discrete,Plus
17b7 00e2       |    |		Load_Encached	Integer_Cache
17b8 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
17b9 e5f4       |    |		Load	0x2,-0xc
17ba 01db       |    |		Execute	Vector,Length
17bb e5f3       |    |		Load	0x2,-0xd
17bc 01db       |    |		Execute	Vector,Length
17bd 0273       | s  |		Execute	Discrete,Plus
17be e5f2       |    |		Load	0x2,-0xe
17bf 01db       |    |		Execute	Vector,Length
17c0 0273       | s  |		Execute	Discrete,Plus
17c1 e5f1       |    |		Load	0x2,-0xf
17c2 01db       |    |		Execute	Vector,Length
17c3 0273       | s  |		Execute	Discrete,Plus
17c4 e5f0       |    |		Load	0x2,-0x10
17c5 01db       |    |		Execute	Vector,Length
17c6 0273       | s  |		Execute	Discrete,Plus
17c7 e5ef       |    |		Load	0x2,-0x11
17c8 01db       |    |		Execute	Vector,Length
17c9 0273       | s  |		Execute	Discrete,Plus
17ca 00e2       |    |		Load_Encached	Integer_Cache
17cb 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
17cc e5ee       |    |		Load	0x2,-0x12
17cd 01db       |    |		Execute	Vector,Length
17ce e5ed       |    |		Load	0x2,-0x13
17cf 01db       |    |		Execute	Vector,Length
17d0 0273       | s  |		Execute	Discrete,Plus
17d1 e5ec       |    |		Load	0x2,-0x14
17d2 01db       |    |		Execute	Vector,Length
17d3 0273       | s  |		Execute	Discrete,Plus
17d4 00e2       |    |		Load_Encached	Integer_Cache
17d5 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
17d6 e402       |    |		Load	0x2,0x2
17d7 e403       |    |		Load	0x2,0x3
17d8 0273       | s  |		Execute	Discrete,Plus
17d9 e404       |    |		Load	0x2,0x4
17da 0273       | s  |		Execute	Discrete,Plus
17db e405       |    |		Load	0x2,0x5
17dc 0273       | s  |		Execute	Discrete,Plus
17dd 00e2       |    |		Load_Encached	Integer_Cache
17de 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
17df 00e2       |    |		Load_Encached	Integer_Cache
17e0 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
17e1 4801       |H   |		Short_Literal	0x1
17e2 e406       |    |		Load	0x2,0x6
17e3 00e9       |    |		Load_Encached	String_Cache
17e4 035b       | [  |		Declare_Type	Array,Constrained
17e5 0337       | 7  |		Declare_Variable	Array
17e6			BODY_1790:
17e6 e407       |    |		Load	0x2,0x7
17e7 e408       |    |		Load	0x2,0x8
17e8 e5fe       |    |		Load	0x2,-0x2
17e9 e5ff       |    |		Load	0x2,-0x1
17ea 8221       | !  |		Call	0x1,0x21
17eb 00d1       |    |		Pop_Control	Pop_Count_1
17ec c407       |    |		Store	0x2,0x7
17ed e407       |    |		Load	0x2,0x7
17ee e408       |    |		Load	0x2,0x8
17ef e5f4       |    |		Load	0x2,-0xc
17f0 e5f5       |    |		Load	0x2,-0xb
17f1 e5f6       |    |		Load	0x2,-0xa
17f2 e5f7       |    |		Load	0x2,-0x9
17f3 e5f8       |    |		Load	0x2,-0x8
17f4 e5f9       |    |		Load	0x2,-0x7
17f5 e5fa       |    |		Load	0x2,-0x6
17f6 e5fb       |    |		Load	0x2,-0x5
17f7 e5fc       |    |		Load	0x2,-0x4
17f8 e5fd       |    |		Load	0x2,-0x3
17f9 8227       | '  |		Call	0x1,0x27
17fa 00d1       |    |		Pop_Control	Pop_Count_1
17fb c407       |    |		Store	0x2,0x7
17fc e407       |    |		Load	0x2,0x7
17fd e408       |    |		Load	0x2,0x8
17fe e5ee       |    |		Load	0x2,-0x12
17ff e5ef       |    |		Load	0x2,-0x11
1800 e5f0       |    |		Load	0x2,-0x10
1801 e5f1       |    |		Load	0x2,-0xf
1802 e5f2       |    |		Load	0x2,-0xe
1803 e5f3       |    |		Load	0x2,-0xd
1804 8225       | %  |		Call	0x1,0x25
1805 00d1       |    |		Pop_Control	Pop_Count_1
1806 c407       |    |		Store	0x2,0x7
1807 e407       |    |		Load	0x2,0x7
1808 e408       |    |		Load	0x2,0x8
1809 e5ec       |    |		Load	0x2,-0x14
180a e5ed       |    |		Load	0x2,-0x13
180b 8222       | "  |		Call	0x1,0x22
180c 00d1       |    |		Pop_Control	Pop_Count_1
180d c407       |    |		Store	0x2,0x7
180e e407       |    |		Load	0x2,0x7
180f e408       |    |		Load	0x2,0x8
1810 01dc       |    |		Execute	Vector,Last
1811 0a01       |    |		Execute_Immediate	Plus,0x1
1812 027f       |    |		Execute	Discrete,Equal
1813 7001       |p   |		Jump_Nonzero	0x1815
1814 0887       |    |		Execute_Immediate	Raise,0x87
1815 00d8       |    |		Load_Top	At_Offset_0
1816 00e9       |    |		Load_Encached	String_Cache
1817 01c6       |    |		Execute	Vector,Convert_To_Formal
1818 4414       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x14
1819 0000 0000  |    |		.BLANK	0000[0x7]
1820 ; --------------------------------------------------------------------------------------
1820 ; SUBPROGRAM
1820 ; --------------------------------------------------------------------------------------
1820 187c       | |  |		.CONST	0x187c								; Address of begin
1821 0004       |    |		.CONST	0x0004								; Address of exception handler
1822 0008       |    |		.CONST	0x0008								; Number of locals
1823			INIT_1820:
1823 480b       |H   |		Short_Literal	0xb
1824 8228       | (  |		Call	0x1,0x28
1825 e5ff       |    |		Load	0x2,-0x1
1826 01db       |    |		Execute	Vector,Length
1827 0273       | s  |		Execute	Discrete,Plus
1828 e5fe       |    |		Load	0x2,-0x2
1829 01db       |    |		Execute	Vector,Length
182a 0273       | s  |		Execute	Discrete,Plus
182b e5fd       |    |		Load	0x2,-0x3
182c 01db       |    |		Execute	Vector,Length
182d 0273       | s  |		Execute	Discrete,Plus
182e e5fc       |    |		Load	0x2,-0x4
182f 01db       |    |		Execute	Vector,Length
1830 0273       | s  |		Execute	Discrete,Plus
1831 e5fb       |    |		Load	0x2,-0x5
1832 01db       |    |		Execute	Vector,Length
1833 0273       | s  |		Execute	Discrete,Plus
1834 00e2       |    |		Load_Encached	Integer_Cache
1835 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
1836 e5fa       |    |		Load	0x2,-0x6
1837 01db       |    |		Execute	Vector,Length
1838 e5f9       |    |		Load	0x2,-0x7
1839 01db       |    |		Execute	Vector,Length
183a 0273       | s  |		Execute	Discrete,Plus
183b e5f8       |    |		Load	0x2,-0x8
183c 01db       |    |		Execute	Vector,Length
183d 0273       | s  |		Execute	Discrete,Plus
183e e5f7       |    |		Load	0x2,-0x9
183f 01db       |    |		Execute	Vector,Length
1840 0273       | s  |		Execute	Discrete,Plus
1841 e5f6       |    |		Load	0x2,-0xa
1842 01db       |    |		Execute	Vector,Length
1843 0273       | s  |		Execute	Discrete,Plus
1844 e5f5       |    |		Load	0x2,-0xb
1845 01db       |    |		Execute	Vector,Length
1846 0273       | s  |		Execute	Discrete,Plus
1847 00e2       |    |		Load_Encached	Integer_Cache
1848 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
1849 e5f4       |    |		Load	0x2,-0xc
184a 01db       |    |		Execute	Vector,Length
184b e5f3       |    |		Load	0x2,-0xd
184c 01db       |    |		Execute	Vector,Length
184d 0273       | s  |		Execute	Discrete,Plus
184e e5f2       |    |		Load	0x2,-0xe
184f 01db       |    |		Execute	Vector,Length
1850 0273       | s  |		Execute	Discrete,Plus
1851 e5f1       |    |		Load	0x2,-0xf
1852 01db       |    |		Execute	Vector,Length
1853 0273       | s  |		Execute	Discrete,Plus
1854 e5f0       |    |		Load	0x2,-0x10
1855 01db       |    |		Execute	Vector,Length
1856 0273       | s  |		Execute	Discrete,Plus
1857 e5ef       |    |		Load	0x2,-0x11
1858 01db       |    |		Execute	Vector,Length
1859 0273       | s  |		Execute	Discrete,Plus
185a 00e2       |    |		Load_Encached	Integer_Cache
185b 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
185c e5ee       |    |		Load	0x2,-0x12
185d 01db       |    |		Execute	Vector,Length
185e e5ed       |    |		Load	0x2,-0x13
185f 01db       |    |		Execute	Vector,Length
1860 0273       | s  |		Execute	Discrete,Plus
1861 e5ec       |    |		Load	0x2,-0x14
1862 01db       |    |		Execute	Vector,Length
1863 0273       | s  |		Execute	Discrete,Plus
1864 e5eb       |    |		Load	0x2,-0x15
1865 01db       |    |		Execute	Vector,Length
1866 0273       | s  |		Execute	Discrete,Plus
1867 e5ea       |    |		Load	0x2,-0x16
1868 01db       |    |		Execute	Vector,Length
1869 0273       | s  |		Execute	Discrete,Plus
186a 00e2       |    |		Load_Encached	Integer_Cache
186b 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
186c e402       |    |		Load	0x2,0x2
186d e403       |    |		Load	0x2,0x3
186e 0273       | s  |		Execute	Discrete,Plus
186f e404       |    |		Load	0x2,0x4
1870 0273       | s  |		Execute	Discrete,Plus
1871 e405       |    |		Load	0x2,0x5
1872 0273       | s  |		Execute	Discrete,Plus
1873 00e2       |    |		Load_Encached	Integer_Cache
1874 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
1875 00e2       |    |		Load_Encached	Integer_Cache
1876 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
1877 4801       |H   |		Short_Literal	0x1
1878 e406       |    |		Load	0x2,0x6
1879 00e9       |    |		Load_Encached	String_Cache
187a 035b       | [  |		Declare_Type	Array,Constrained
187b 0337       | 7  |		Declare_Variable	Array
187c			BODY_1820:
187c e407       |    |		Load	0x2,0x7
187d e408       |    |		Load	0x2,0x8
187e e5fe       |    |		Load	0x2,-0x2
187f e5ff       |    |		Load	0x2,-0x1
1880 8221       | !  |		Call	0x1,0x21
1881 00d1       |    |		Pop_Control	Pop_Count_1
1882 c407       |    |		Store	0x2,0x7
1883 e407       |    |		Load	0x2,0x7
1884 e408       |    |		Load	0x2,0x8
1885 e5f4       |    |		Load	0x2,-0xc
1886 e5f5       |    |		Load	0x2,-0xb
1887 e5f6       |    |		Load	0x2,-0xa
1888 e5f7       |    |		Load	0x2,-0x9
1889 e5f8       |    |		Load	0x2,-0x8
188a e5f9       |    |		Load	0x2,-0x7
188b e5fa       |    |		Load	0x2,-0x6
188c e5fb       |    |		Load	0x2,-0x5
188d e5fc       |    |		Load	0x2,-0x4
188e e5fd       |    |		Load	0x2,-0x3
188f 8227       | '  |		Call	0x1,0x27
1890 00d1       |    |		Pop_Control	Pop_Count_1
1891 c407       |    |		Store	0x2,0x7
1892 e407       |    |		Load	0x2,0x7
1893 e408       |    |		Load	0x2,0x8
1894 e5ec       |    |		Load	0x2,-0x14
1895 e5ed       |    |		Load	0x2,-0x13
1896 e5ee       |    |		Load	0x2,-0x12
1897 e5ef       |    |		Load	0x2,-0x11
1898 e5f0       |    |		Load	0x2,-0x10
1899 e5f1       |    |		Load	0x2,-0xf
189a e5f2       |    |		Load	0x2,-0xe
189b e5f3       |    |		Load	0x2,-0xd
189c 8226       | &  |		Call	0x1,0x26
189d 00d1       |    |		Pop_Control	Pop_Count_1
189e c407       |    |		Store	0x2,0x7
189f e407       |    |		Load	0x2,0x7
18a0 e408       |    |		Load	0x2,0x8
18a1 e5ea       |    |		Load	0x2,-0x16
18a2 e5eb       |    |		Load	0x2,-0x15
18a3 8222       | "  |		Call	0x1,0x22
18a4 00d1       |    |		Pop_Control	Pop_Count_1
18a5 c407       |    |		Store	0x2,0x7
18a6 e407       |    |		Load	0x2,0x7
18a7 e408       |    |		Load	0x2,0x8
18a8 01dc       |    |		Execute	Vector,Last
18a9 0a01       |    |		Execute_Immediate	Plus,0x1
18aa 027f       |    |		Execute	Discrete,Equal
18ab 7001       |p   |		Jump_Nonzero	0x18ad
18ac 0887       |    |		Execute_Immediate	Raise,0x87
18ad 00d8       |    |		Load_Top	At_Offset_0
18ae 00e9       |    |		Load_Encached	String_Cache
18af 01c6       |    |		Execute	Vector,Convert_To_Formal
18b0 4416       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x16
18b1 0000 0000  |    |		.BLANK	0000[0x7]
18b8 ; --------------------------------------------------------------------------------------
18b8 ; SUBPROGRAM
18b8 ; --------------------------------------------------------------------------------------
18b8 18e3       |    |		.CONST	0x18e3								; Address of begin
18b9 0004       |    |		.CONST	0x0004								; Address of exception handler
18ba 000b       |    |		.CONST	0x000b								; Number of locals
18bb			INIT_18b8:
18bb 00e5       |    |		Load_Encached	Long_Integer_Cache
18bc 02a0       |    |		Declare_Subprogram	Null_Subprogram
18bd 4801       |H   |		Short_Literal	0x1
18be 032d       | -  |		Declare_Type	Record,Defined
18bf 00d8       |    |		Load_Top	At_Offset_0
18c0 0322       | "  |		Declare_Variable	Record
18c1 e5ff       |    |		Load	0x2,-0x1
18c2 e403       |    |		Load	0x2,0x3
18c3 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
18c4 e001       |    |		Load	0x0,0x1
18c5 00d8       |    |		Load_Top	At_Offset_0
18c6 02a0       |    |		Declare_Subprogram	Null_Subprogram
18c7 4802       |H   |		Short_Literal	0x2
18c8 032d       | -  |		Declare_Type	Record,Defined
18c9 a002       |    |		Store_Unchecked	0x0,0x2
18ca 00c6       |    |		Action	Check_Subprogram_Elaborated
18cb 00d8       |    |		Load_Top	At_Offset_0
18cc 0093 0000  |    |		push_full_address	0x0
18ce 6019       |`   |		Indirect_Literal	Discrete,0x18e8,{0x80000000, 0x00240000}
18cf 0273       | s  |		Execute	Discrete,Plus
18d0 e003       |    |		Load	0x0,0x3
18d1 0273       | s  |		Execute	Discrete,Plus
18d2 e004       |    |		Load	0x0,0x4
18d3 0273       | s  |		Execute	Discrete,Plus
18d4 4807       |H   |		Short_Literal	0x7
18d5 0007       |    |		Action	Break_Optional
18d6 e403       |    |		Load	0x2,0x3
18d7 012d       | -  |		Execute	Any,Address
18d8 e405       |    |		Load	0x2,0x5
18d9 4806       |H   |		Short_Literal	0x6
18da 4802       |H   |		Short_Literal	0x2
18db 0099       |    |		Action	Reference_Dynamic
18dc 8002       |    |		Call	0x0,0x2
18dd 029f 1a93  |    |		Declare_Subprogram	INIT_1a90,For_Call
18df 029f 1aa3  |    |		Declare_Subprogram	INIT_1aa0,For_Call
18e1 029f 1ab3  |    |		Declare_Subprogram	INIT_1ab0,For_Call
18e3			BODY_18b8:
18e3 840b       |    |		Call	0x2,0xb
18e4 e005       |    |		Load	0x0,0x5
18e5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
18e6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
18e7 0000       |    |		.XXX[0x1]
18e8 8000 0000  |    |		.LITERAL	{0x80000000, 0x00240000}
18ec 0000 0000  |    |		.BLANK	0000[0x4]
18f0 ; --------------------------------------------------------------------------------------
18f0 ; SUBPROGRAM
18f0 ; --------------------------------------------------------------------------------------
18f0 18f3       |    |		.CONST	0x18f3								; Address of begin
18f1 0004       |    |		.CONST	0x0004								; Address of exception handler
18f2 0001       |    |		.CONST	0x0001								; Number of locals
18f3			BODY_18f0:
18f3			INIT_18f0:
18f3 e5ff       |    |		Load	0x2,-0x1
18f4 6803       |h   |		Jump_Zero	0x18f8
18f5 0092 1ccc  |    |		Action	Push_String_Extended,0x1ccc					; "T"
18f7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
18f8 0092 1ccd  |    |		Action	Push_String_Extended,0x1ccd					; "F"
18fa 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
18fb 0000 0000  |    |		.BLANK	0000[0x5]
1900 ; --------------------------------------------------------------------------------------
1900 ; SUBPROGRAM
1900 ; --------------------------------------------------------------------------------------
1900 1903       |    |		.CONST	0x1903								; Address of begin
1901 0004       |    |		.CONST	0x0004								; Address of exception handler
1902 0001       |    |		.CONST	0x0001								; Number of locals
1903			BODY_1900:
1903			INIT_1900:
1903 e5ff       |    |		Load	0x2,-0x1
1904 00e0       |    |		Load_Encached	Standard_Cache
1905 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1906 8229       | )  |		Call	0x1,0x29
1907 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1908 ; --------------------------------------------------------------------------------------
1908 ; SUBPROGRAM
1908 ; --------------------------------------------------------------------------------------
1908 190b       |    |		.CONST	0x190b								; Address of begin
1909 0004       |    |		.CONST	0x0004								; Address of exception handler
190a 0001       |    |		.CONST	0x0001								; Number of locals
190b			BODY_1908:
190b			INIT_1908:
190b e5ff       |    |		Load	0x2,-0x1
190c 00e0       |    |		Load_Encached	Standard_Cache
190d 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
190e 8229       | )  |		Call	0x1,0x29
190f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1910 ; --------------------------------------------------------------------------------------
1910 ; SUBPROGRAM
1910 ; --------------------------------------------------------------------------------------
1910 191c       |    |		.CONST	0x191c								; Address of begin
1911 0004       |    |		.CONST	0x0004								; Address of exception handler
1912 0005       |    |		.CONST	0x0005								; Number of locals
1913			INIT_1910:
1913 029f 1acb  |    |		Declare_Subprogram	INIT_1ac8,For_Call
1915 029f 1ae3  |    |		Declare_Subprogram	INIT_1ae0,For_Call
1917 4900       |I   |		Short_Literal	0x100
1918 00e3       |    |		Load_Encached	Natural_Cache
1919 03f1       |    |		Declare_Variable	Discrete,With_Value
191a 029f 1b5b  |   [|		Declare_Subprogram	INIT_1b58,For_Call
191c			BODY_1910:
191c e5f9       |    |		Load	0x2,-0x7
191d 01db       |    |		Execute	Vector,Length
191e 7003       |p   |		Jump_Nonzero	0x1922
191f 0092 1cce  |    |		Action	Push_String_Extended,0x1cce					; "{}"
1921 4407       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x7
1922 00cf       |    |		Action	Mark_Auxiliary
1923 480c       |H   |		Short_Literal	0xc
1924 4801       |H   |		Short_Literal	0x1
1925 0007       |    |		Action	Break_Optional
1926 8405       |    |		Call	0x2,0x5
1927 00c8       |    |		Action	Pop_Auxiliary_Range
1928 3ffd       |?   |		Loop_Increasing	0x1926
1929 00ce       |    |		Action	Pop_Auxiliary
192a 0092 1ccf  |    |		Action	Push_String_Extended,0x1ccf					; "***too_big_to_print"
192c 4407       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x7
192d 0000 0000  |    |		.XXX[0x3]
192f 0000       |    |
1930 ; --------------------------------------------------------------------------------------
1930 ; SUBPROGRAM
1930 ; --------------------------------------------------------------------------------------
1930 193a       | :  |		.CONST	0x193a								; Address of begin
1931 0004       |    |		.CONST	0x0004								; Address of exception handler
1932 0002       |    |		.CONST	0x0002								; Number of locals
1933			INIT_1930:
1933 e5fd       |    |		Load	0x2,-0x3
1934 e5ff       |    |		Load	0x2,-0x1
1935 01db       |    |		Execute	Vector,Length
1936 0273       | s  |		Execute	Discrete,Plus
1937 0aff       |    |		Execute_Immediate	Plus,-0x1
1938 00e2       |    |		Load_Encached	Integer_Cache
1939 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
193a			BODY_1930:
193a e5ff       |    |		Load	0x2,-0x1
193b e5fd       |    |		Load	0x2,-0x3
193c e402       |    |		Load	0x2,0x2
193d e5fe       |    |		Load	0x2,-0x2
193e 01ce       |    |		Execute	Vector,Slice_Write
193f 00d8       |    |		Load_Top	At_Offset_0
1940 0a01       |    |		Execute_Immediate	Plus,0x1
1941 c5fd       |    |		Store	0x2,-0x3
1942 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1943 0000 0000  |    |		.BLANK	0000[0x5]
1948 ; --------------------------------------------------------------------------------------
1948 ; SUBPROGRAM
1948 ; --------------------------------------------------------------------------------------
1948 194b       | K  |		.CONST	0x194b								; Address of begin
1949 0004       |    |		.CONST	0x0004								; Address of exception handler
194a 0001       |    |		.CONST	0x0001								; Number of locals
194b			BODY_1948:
194b			INIT_1948:
194b e5fc       |    |		Load	0x2,-0x4
194c e5fd       |    |		Load	0x2,-0x3
194d e21b       |    |		Load	0x1,0x1b
194e 8220       |    |		Call	0x1,0x20
194f 00d1       |    |		Pop_Control	Pop_Count_1
1950 c5fc       |    |		Store	0x2,-0x4
1951 e5fc       |    |		Load	0x2,-0x4
1952 e5fd       |    |		Load	0x2,-0x3
1953 e5ff       |    |		Load	0x2,-0x1
1954 8220       |    |		Call	0x1,0x20
1955 00d1       |    |		Pop_Control	Pop_Count_1
1956 c5fc       |    |		Store	0x2,-0x4
1957 e5fc       |    |		Load	0x2,-0x4
1958 e5fd       |    |		Load	0x2,-0x3
1959 e21f       |    |		Load	0x1,0x1f
195a 8220       |    |		Call	0x1,0x20
195b 00d1       |    |		Pop_Control	Pop_Count_1
195c c5fc       |    |		Store	0x2,-0x4
195d e5fc       |    |		Load	0x2,-0x4
195e e5fd       |    |		Load	0x2,-0x3
195f e5fe       |    |		Load	0x2,-0x2
1960 8220       |    |		Call	0x1,0x20
1961 00d1       |    |		Pop_Control	Pop_Count_1
1962 c5fc       |    |		Store	0x2,-0x4
1963 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
1964 0000 0000  |    |		.BLANK	0000[0x4]
1968 ; --------------------------------------------------------------------------------------
1968 ; SUBPROGRAM
1968 ; --------------------------------------------------------------------------------------
1968 196b       | k  |		.CONST	0x196b								; Address of begin
1969 0004       |    |		.CONST	0x0004								; Address of exception handler
196a 0001       |    |		.CONST	0x0001								; Number of locals
196b			BODY_1968:
196b			INIT_1968:
196b e5fc       |    |		Load	0x2,-0x4
196c e5fd       |    |		Load	0x2,-0x3
196d e21d       |    |		Load	0x1,0x1d
196e 8220       |    |		Call	0x1,0x20
196f 00d1       |    |		Pop_Control	Pop_Count_1
1970 c5fc       |    |		Store	0x2,-0x4
1971 e5fc       |    |		Load	0x2,-0x4
1972 e5fd       |    |		Load	0x2,-0x3
1973 e5ff       |    |		Load	0x2,-0x1
1974 8220       |    |		Call	0x1,0x20
1975 00d1       |    |		Pop_Control	Pop_Count_1
1976 c5fc       |    |		Store	0x2,-0x4
1977 e5fc       |    |		Load	0x2,-0x4
1978 e5fd       |    |		Load	0x2,-0x3
1979 e21f       |    |		Load	0x1,0x1f
197a 8220       |    |		Call	0x1,0x20
197b 00d1       |    |		Pop_Control	Pop_Count_1
197c c5fc       |    |		Store	0x2,-0x4
197d e5fc       |    |		Load	0x2,-0x4
197e e5fd       |    |		Load	0x2,-0x3
197f e5fe       |    |		Load	0x2,-0x2
1980 8220       |    |		Call	0x1,0x20
1981 00d1       |    |		Pop_Control	Pop_Count_1
1982 c5fc       |    |		Store	0x2,-0x4
1983 e5fc       |    |		Load	0x2,-0x4
1984 e5fd       |    |		Load	0x2,-0x3
1985 e21c       |    |		Load	0x1,0x1c
1986 8220       |    |		Call	0x1,0x20
1987 00d1       |    |		Pop_Control	Pop_Count_1
1988 c5fc       |    |		Store	0x2,-0x4
1989 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
198a 0000 0000  |    |		.BLANK	0000[0x6]
1990 ; --------------------------------------------------------------------------------------
1990 ; SUBPROGRAM
1990 ; --------------------------------------------------------------------------------------
1990 1993       |    |		.CONST	0x1993								; Address of begin
1991 0004       |    |		.CONST	0x0004								; Address of exception handler
1992 0001       |    |		.CONST	0x0001								; Number of locals
1993			BODY_1990:
1993			INIT_1990:
1993 e5fc       |    |		Load	0x2,-0x4
1994 e5fd       |    |		Load	0x2,-0x3
1995 e21d       |    |		Load	0x1,0x1d
1996 8220       |    |		Call	0x1,0x20
1997 00d1       |    |		Pop_Control	Pop_Count_1
1998 c5fc       |    |		Store	0x2,-0x4
1999 e5fc       |    |		Load	0x2,-0x4
199a e5fd       |    |		Load	0x2,-0x3
199b e5ff       |    |		Load	0x2,-0x1
199c 8220       |    |		Call	0x1,0x20
199d 00d1       |    |		Pop_Control	Pop_Count_1
199e c5fc       |    |		Store	0x2,-0x4
199f e5fc       |    |		Load	0x2,-0x4
19a0 e5fd       |    |		Load	0x2,-0x3
19a1 e21f       |    |		Load	0x1,0x1f
19a2 8220       |    |		Call	0x1,0x20
19a3 00d1       |    |		Pop_Control	Pop_Count_1
19a4 c5fc       |    |		Store	0x2,-0x4
19a5 e5fc       |    |		Load	0x2,-0x4
19a6 e5fd       |    |		Load	0x2,-0x3
19a7 e5fe       |    |		Load	0x2,-0x2
19a8 8220       |    |		Call	0x1,0x20
19a9 00d1       |    |		Pop_Control	Pop_Count_1
19aa c5fc       |    |		Store	0x2,-0x4
19ab 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
19ac 0000 0000  |    |		.BLANK	0000[0x4]
19b0 ; --------------------------------------------------------------------------------------
19b0 ; SUBPROGRAM
19b0 ; --------------------------------------------------------------------------------------
19b0 19b3       |    |		.CONST	0x19b3								; Address of begin
19b1 0004       |    |		.CONST	0x0004								; Address of exception handler
19b2 0001       |    |		.CONST	0x0001								; Number of locals
19b3			BODY_19b0:
19b3			INIT_19b0:
19b3 e5fa       |    |		Load	0x2,-0x6
19b4 e5fb       |    |		Load	0x2,-0x5
19b5 e5fe       |    |		Load	0x2,-0x2
19b6 e5ff       |    |		Load	0x2,-0x1
19b7 8223       | #  |		Call	0x1,0x23
19b8 00d1       |    |		Pop_Control	Pop_Count_1
19b9 c5fa       |    |		Store	0x2,-0x6
19ba e5fa       |    |		Load	0x2,-0x6
19bb e5fb       |    |		Load	0x2,-0x5
19bc e21d       |    |		Load	0x1,0x1d
19bd 8220       |    |		Call	0x1,0x20
19be 00d1       |    |		Pop_Control	Pop_Count_1
19bf c5fa       |    |		Store	0x2,-0x6
19c0 e5fa       |    |		Load	0x2,-0x6
19c1 e5fb       |    |		Load	0x2,-0x5
19c2 e5fd       |    |		Load	0x2,-0x3
19c3 8220       |    |		Call	0x1,0x20
19c4 00d1       |    |		Pop_Control	Pop_Count_1
19c5 c5fa       |    |		Store	0x2,-0x6
19c6 e5fa       |    |		Load	0x2,-0x6
19c7 e5fb       |    |		Load	0x2,-0x5
19c8 e21f       |    |		Load	0x1,0x1f
19c9 8220       |    |		Call	0x1,0x20
19ca 00d1       |    |		Pop_Control	Pop_Count_1
19cb c5fa       |    |		Store	0x2,-0x6
19cc e5fa       |    |		Load	0x2,-0x6
19cd e5fb       |    |		Load	0x2,-0x5
19ce e5fc       |    |		Load	0x2,-0x4
19cf 8220       |    |		Call	0x1,0x20
19d0 00d1       |    |		Pop_Control	Pop_Count_1
19d1 c5fa       |    |		Store	0x2,-0x6
19d2 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
19d3 0000 0000  |    |		.BLANK	0000[0x5]
19d8 ; --------------------------------------------------------------------------------------
19d8 ; SUBPROGRAM
19d8 ; --------------------------------------------------------------------------------------
19d8 19db       |    |		.CONST	0x19db								; Address of begin
19d9 0004       |    |		.CONST	0x0004								; Address of exception handler
19da 0001       |    |		.CONST	0x0001								; Number of locals
19db			BODY_19d8:
19db			INIT_19d8:
19db e5f8       |    |		Load	0x2,-0x8
19dc e5f9       |    |		Load	0x2,-0x7
19dd e5fc       |    |		Load	0x2,-0x4
19de e5fd       |    |		Load	0x2,-0x3
19df e5fe       |    |		Load	0x2,-0x2
19e0 e5ff       |    |		Load	0x2,-0x1
19e1 8224       | $  |		Call	0x1,0x24
19e2 00d1       |    |		Pop_Control	Pop_Count_1
19e3 c5f8       |    |		Store	0x2,-0x8
19e4 e5f8       |    |		Load	0x2,-0x8
19e5 e5f9       |    |		Load	0x2,-0x7
19e6 e21d       |    |		Load	0x1,0x1d
19e7 8220       |    |		Call	0x1,0x20
19e8 00d1       |    |		Pop_Control	Pop_Count_1
19e9 c5f8       |    |		Store	0x2,-0x8
19ea e5f8       |    |		Load	0x2,-0x8
19eb e5f9       |    |		Load	0x2,-0x7
19ec e5fb       |    |		Load	0x2,-0x5
19ed 8220       |    |		Call	0x1,0x20
19ee 00d1       |    |		Pop_Control	Pop_Count_1
19ef c5f8       |    |		Store	0x2,-0x8
19f0 e5f8       |    |		Load	0x2,-0x8
19f1 e5f9       |    |		Load	0x2,-0x7
19f2 e21f       |    |		Load	0x1,0x1f
19f3 8220       |    |		Call	0x1,0x20
19f4 00d1       |    |		Pop_Control	Pop_Count_1
19f5 c5f8       |    |		Store	0x2,-0x8
19f6 e5f8       |    |		Load	0x2,-0x8
19f7 e5f9       |    |		Load	0x2,-0x7
19f8 e5fa       |    |		Load	0x2,-0x6
19f9 8220       |    |		Call	0x1,0x20
19fa 00d1       |    |		Pop_Control	Pop_Count_1
19fb c5f8       |    |		Store	0x2,-0x8
19fc 4507       |E   |		Exit_Suprogram	New_Top_Offset 0x7
19fd 0000 0000  |    |		.XXX[0x3]
19ff 0000       |    |
1a00 ; --------------------------------------------------------------------------------------
1a00 ; SUBPROGRAM
1a00 ; --------------------------------------------------------------------------------------
1a00 1a03       |    |		.CONST	0x1a03								; Address of begin
1a01 0004       |    |		.CONST	0x0004								; Address of exception handler
1a02 0001       |    |		.CONST	0x0001								; Number of locals
1a03			BODY_1a00:
1a03			INIT_1a00:
1a03 e5f6       |    |		Load	0x2,-0xa
1a04 e5f7       |    |		Load	0x2,-0x9
1a05 e5fa       |    |		Load	0x2,-0x6
1a06 e5fb       |    |		Load	0x2,-0x5
1a07 e5fc       |    |		Load	0x2,-0x4
1a08 e5fd       |    |		Load	0x2,-0x3
1a09 e5fe       |    |		Load	0x2,-0x2
1a0a e5ff       |    |		Load	0x2,-0x1
1a0b 8225       | %  |		Call	0x1,0x25
1a0c 00d1       |    |		Pop_Control	Pop_Count_1
1a0d c5f6       |    |		Store	0x2,-0xa
1a0e e5f6       |    |		Load	0x2,-0xa
1a0f e5f7       |    |		Load	0x2,-0x9
1a10 e21d       |    |		Load	0x1,0x1d
1a11 8220       |    |		Call	0x1,0x20
1a12 00d1       |    |		Pop_Control	Pop_Count_1
1a13 c5f6       |    |		Store	0x2,-0xa
1a14 e5f6       |    |		Load	0x2,-0xa
1a15 e5f7       |    |		Load	0x2,-0x9
1a16 e5f9       |    |		Load	0x2,-0x7
1a17 8220       |    |		Call	0x1,0x20
1a18 00d1       |    |		Pop_Control	Pop_Count_1
1a19 c5f6       |    |		Store	0x2,-0xa
1a1a e5f6       |    |		Load	0x2,-0xa
1a1b e5f7       |    |		Load	0x2,-0x9
1a1c e21f       |    |		Load	0x1,0x1f
1a1d 8220       |    |		Call	0x1,0x20
1a1e 00d1       |    |		Pop_Control	Pop_Count_1
1a1f c5f6       |    |		Store	0x2,-0xa
1a20 e5f6       |    |		Load	0x2,-0xa
1a21 e5f7       |    |		Load	0x2,-0x9
1a22 e5f8       |    |		Load	0x2,-0x8
1a23 8220       |    |		Call	0x1,0x20
1a24 00d1       |    |		Pop_Control	Pop_Count_1
1a25 c5f6       |    |		Store	0x2,-0xa
1a26 4509       |E   |		Exit_Suprogram	New_Top_Offset 0x9
1a27 0000       |    |		.XXX[0x1]
1a28 ; --------------------------------------------------------------------------------------
1a28 ; SUBPROGRAM
1a28 ; --------------------------------------------------------------------------------------
1a28 1a2b       | +  |		.CONST	0x1a2b								; Address of begin
1a29 0004       |    |		.CONST	0x0004								; Address of exception handler
1a2a 0001       |    |		.CONST	0x0001								; Number of locals
1a2b			BODY_1a28:
1a2b			INIT_1a28:
1a2b e5f4       |    |		Load	0x2,-0xc
1a2c e5f5       |    |		Load	0x2,-0xb
1a2d e5f8       |    |		Load	0x2,-0x8
1a2e e5f9       |    |		Load	0x2,-0x7
1a2f e5fa       |    |		Load	0x2,-0x6
1a30 e5fb       |    |		Load	0x2,-0x5
1a31 e5fc       |    |		Load	0x2,-0x4
1a32 e5fd       |    |		Load	0x2,-0x3
1a33 e5fe       |    |		Load	0x2,-0x2
1a34 e5ff       |    |		Load	0x2,-0x1
1a35 8226       | &  |		Call	0x1,0x26
1a36 00d1       |    |		Pop_Control	Pop_Count_1
1a37 c5f4       |    |		Store	0x2,-0xc
1a38 e5f4       |    |		Load	0x2,-0xc
1a39 e5f5       |    |		Load	0x2,-0xb
1a3a e21d       |    |		Load	0x1,0x1d
1a3b 8220       |    |		Call	0x1,0x20
1a3c 00d1       |    |		Pop_Control	Pop_Count_1
1a3d c5f4       |    |		Store	0x2,-0xc
1a3e e5f4       |    |		Load	0x2,-0xc
1a3f e5f5       |    |		Load	0x2,-0xb
1a40 e5f7       |    |		Load	0x2,-0x9
1a41 8220       |    |		Call	0x1,0x20
1a42 00d1       |    |		Pop_Control	Pop_Count_1
1a43 c5f4       |    |		Store	0x2,-0xc
1a44 e5f4       |    |		Load	0x2,-0xc
1a45 e5f5       |    |		Load	0x2,-0xb
1a46 e21f       |    |		Load	0x1,0x1f
1a47 8220       |    |		Call	0x1,0x20
1a48 00d1       |    |		Pop_Control	Pop_Count_1
1a49 c5f4       |    |		Store	0x2,-0xc
1a4a e5f4       |    |		Load	0x2,-0xc
1a4b e5f5       |    |		Load	0x2,-0xb
1a4c e5f6       |    |		Load	0x2,-0xa
1a4d 8220       |    |		Call	0x1,0x20
1a4e 00d1       |    |		Pop_Control	Pop_Count_1
1a4f c5f4       |    |		Store	0x2,-0xc
1a50 450b       |E   |		Exit_Suprogram	New_Top_Offset 0xb
1a51 0000 0000  |    |		.BLANK	0000[0x7]
1a58 ; --------------------------------------------------------------------------------------
1a58 ; SUBPROGRAM
1a58 ; --------------------------------------------------------------------------------------
1a58 1a5b       | [  |		.CONST	0x1a5b								; Address of begin
1a59 0004       |    |		.CONST	0x0004								; Address of exception handler
1a5a 0001       |    |		.CONST	0x0001								; Number of locals
1a5b			BODY_1a58:
1a5b			INIT_1a58:
1a5b e5ff       |    |		Load	0x2,-0x1
1a5c 0902       |    |		Execute_Immediate	Binary_Scale,0x2
1a5d 0a01       |    |		Execute_Immediate	Plus,0x1
1a5e e5ff       |    |		Load	0x2,-0x1
1a5f 0aff       |    |		Execute_Immediate	Plus,-0x1
1a60 0901       |    |		Execute_Immediate	Binary_Scale,0x1
1a61 0273       | s  |		Execute	Discrete,Plus
1a62 0a01       |    |		Execute_Immediate	Plus,0x1
1a63 00d8       |    |		Load_Top	At_Offset_0
1a64 00e2       |    |		Load_Encached	Integer_Cache
1a65 0260       | `  |		Execute	Discrete,In_Type
1a66 7001       |p   |		Jump_Nonzero	0x1a68
1a67 0801       |    |		Execute_Immediate	Raise,0x1
1a68 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1a69 0000 0000  |    |		.BLANK	0000[0x7]
1a70 ; --------------------------------------------------------------------------------------
1a70 ; SUBPROGRAM
1a70 ; --------------------------------------------------------------------------------------
1a70 1a73       | s  |		.CONST	0x1a73								; Address of begin
1a71 0004       |    |		.CONST	0x0004								; Address of exception handler
1a72 0001       |    |		.CONST	0x0001								; Number of locals
1a73			BODY_1a70:
1a73			INIT_1a70:
1a73 4820       |H   |		Short_Literal	0x20
1a74 e5ff       |    |		Load	0x2,-0x1
1a75 e005       |    |		Load	0x0,0x5
1a76 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
1a77 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1a78 ; --------------------------------------------------------------------------------------
1a78 ; SUBPROGRAM
1a78 ; --------------------------------------------------------------------------------------
1a78 1a7b       | {  |		.CONST	0x1a7b								; Address of begin
1a79 0004       |    |		.CONST	0x0004								; Address of exception handler
1a7a 0001       |    |		.CONST	0x0001								; Number of locals
1a7b			BODY_1a78:
1a7b			INIT_1a78:
1a7b e5fe       |    |		Load	0x2,-0x2
1a7c e006       |    |		Load	0x0,0x6
1a7d 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
1a7e e5ff       |    |		Load	0x2,-0x1
1a7f 01db       |    |		Execute	Vector,Length
1a80 0273       | s  |		Execute	Discrete,Plus
1a81 e5fe       |    |		Load	0x2,-0x2
1a82 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
1a83 027d       | }  |		Execute	Discrete,Greater
1a84 6802       |h   |		Jump_Zero	0x1a87
1a85 e22a       | *  |		Load	0x1,0x2a
1a86 0257       | W  |		Execute	Discrete,Raise
1a87 e5fe       |    |		Load	0x2,-0x2
1a88 e5ff       |    |		Load	0x2,-0x1
1a89 e006       |    |		Load	0x0,0x6
1a8a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
1a8b 00d1       |    |		Pop_Control	Pop_Count_1
1a8c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
1a8d 0000 0000  |    |		.XXX[0x3]
1a8f 0000       |    |
1a90 ; --------------------------------------------------------------------------------------
1a90 ; SUBPROGRAM
1a90 ; --------------------------------------------------------------------------------------
1a90 1a93       |    |		.CONST	0x1a93								; Address of begin
1a91 0004       |    |		.CONST	0x0004								; Address of exception handler
1a92 0001       |    |		.CONST	0x0001								; Number of locals
1a93			BODY_1a90:
1a93			INIT_1a90:
1a93 4820       |H   |		Short_Literal	0x20
1a94 4800       |H   |		Short_Literal	0x0
1a95 4810       |H   |		Short_Literal	0x10
1a96 e7ff       |    |		Load	0x3,-0x1
1a97 e005       |    |		Load	0x0,0x5
1a98 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
1a99 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1a9a 0000 0000  |    |		.BLANK	0000[0x6]
1aa0 ; --------------------------------------------------------------------------------------
1aa0 ; SUBPROGRAM
1aa0 ; --------------------------------------------------------------------------------------
1aa0 1aa3       |    |		.CONST	0x1aa3								; Address of begin
1aa1 0004       |    |		.CONST	0x0004								; Address of exception handler
1aa2 0001       |    |		.CONST	0x0001								; Number of locals
1aa3			BODY_1aa0:
1aa3			INIT_1aa0:
1aa3 4830       |H0  |		Short_Literal	0x30
1aa4 4808       |H   |		Short_Literal	0x8
1aa5 4810       |H   |		Short_Literal	0x10
1aa6 e7ff       |    |		Load	0x3,-0x1
1aa7 e005       |    |		Load	0x0,0x5
1aa8 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
1aa9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1aaa 0000 0000  |    |		.BLANK	0000[0x6]
1ab0 ; --------------------------------------------------------------------------------------
1ab0 ; SUBPROGRAM
1ab0 ; --------------------------------------------------------------------------------------
1ab0 1ab3       |    |		.CONST	0x1ab3								; Address of begin
1ab1 0004       |    |		.CONST	0x0004								; Address of exception handler
1ab2 0001       |    |		.CONST	0x0001								; Number of locals
1ab3			BODY_1ab0:
1ab3			INIT_1ab0:
1ab3 e408       |    |		Load	0x2,0x8
1ab4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
1ab5 7007       |p   |		Jump_Nonzero	0x1abd
1ab6 0092 1cd0  |    |		Action	Push_String_Extended,0x1cd0					; "#"
1ab8 e408       |    |		Load	0x2,0x8
1ab9 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1aba 8409       |    |		Call	0x2,0x9
1abb 01cc       |    |		Execute	Vector,Catenate
1abc 00ca       |    |		Action	Exit_Nullary_Function
1abd 0092 1cd0  |    |		Action	Push_String_Extended,0x1cd0					; "#"
1abf e408       |    |		Load	0x2,0x8
1ac0 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
1ac1 8409       |    |		Call	0x2,0x9
1ac2 01cc       |    |		Execute	Vector,Catenate
1ac3 e408       |    |		Load	0x2,0x8
1ac4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
1ac5 840a       |    |		Call	0x2,0xa
1ac6 01cc       |    |		Execute	Vector,Catenate
1ac7 00ca       |    |		Action	Exit_Nullary_Function
1ac8 ; --------------------------------------------------------------------------------------
1ac8 ; SUBPROGRAM
1ac8 ; --------------------------------------------------------------------------------------
1ac8 1acb       |    |		.CONST	0x1acb								; Address of begin
1ac9 0004       |    |		.CONST	0x0004								; Address of exception handler
1aca 0001       |    |		.CONST	0x0001								; Number of locals
1acb			BODY_1ac8:
1acb			INIT_1ac8:
1acb e7ff       |    |		Load	0x3,-0x1
1acc e7fe       |    |		Load	0x3,-0x2
1acd 027f       |    |		Execute	Discrete,Equal
1ace 6804       |h   |		Jump_Zero	0x1ad3
1acf e7ff       |    |		Load	0x3,-0x1
1ad0 85fe       |    |		Call	0x2,-0x2
1ad1 8229       | )  |		Call	0x1,0x29
1ad2 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1ad3 e7ff       |    |		Load	0x3,-0x1
1ad4 85fe       |    |		Call	0x2,-0x2
1ad5 8229       | )  |		Call	0x1,0x29
1ad6 0092 1cd1  |    |		Action	Push_String_Extended,0x1cd1					; ".."
1ad8 01cc       |    |		Execute	Vector,Catenate
1ad9 e7fe       |    |		Load	0x3,-0x2
1ada 85fe       |    |		Call	0x2,-0x2
1adb 8229       | )  |		Call	0x1,0x29
1adc 01cc       |    |		Execute	Vector,Catenate
1add 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
1ade 0000 0000  |    |		.XXX[0x2]
1ae0 ; --------------------------------------------------------------------------------------
1ae0 ; SUBPROGRAM
1ae0 ; --------------------------------------------------------------------------------------
1ae0 1aeb       |    |		.CONST	0x1aeb								; Address of begin
1ae1 0004       |    |		.CONST	0x0004								; Address of exception handler
1ae2 0004       |    |		.CONST	0x0004								; Number of locals
1ae3			INIT_1ae0:
1ae3 00e1       |    |		Load_Encached	Boolean_Cache
1ae4 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
1ae5 e5f9       |    |		Load	0x2,-0x7
1ae6 01dd       |    |		Execute	Vector,First
1ae7 e5fa       |    |		Load	0x2,-0x6
1ae8 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
1ae9 e5fa       |    |		Load	0x2,-0x6
1aea 0007       |    |		Action	Break_Optional
1aeb			BODY_1ae0:
1aeb e7ff       |    |		Load	0x3,-0x1
1aec 0092 1cd2  |    |		Action	Push_String_Extended,0x1cd2					; "{"
1aee 822b       | +  |		Call	0x1,0x2b
1aef 00d1       |    |		Pop_Control	Pop_Count_1
1af0 00cf       |    |		Action	Mark_Auxiliary
1af1 00cf       |    |		Action	Mark_Auxiliary
1af2 e603       |    |		Load	0x3,0x3
1af3 e5fa       |    |		Load	0x2,-0x6
1af4 1c04       |    |		Execute_Immediate	Run_Utility,0x4
1af5 e5f9       |    |		Load	0x2,-0x7
1af6 01d7       |    |		Execute	Vector,Field_Read
1af7 85fd       |    |		Call	0x2,-0x3
1af8 680e       |h   |		Jump_Zero	0x1b07
1af9 e603       |    |		Load	0x3,0x3
1afa e5f9       |    |		Load	0x2,-0x7
1afb 01dc       |    |		Execute	Vector,Last
1afc 027b       | {  |		Execute	Discrete,Greater_Equal
1afd 6802       |h   |		Jump_Zero	0x1b00
1afe 00ce       |    |		Action	Pop_Auxiliary
1aff 7852       |xR  |		Jump	0x1b52
1b00 e603       |    |		Load	0x3,0x3
1b01 e5fa       |    |		Load	0x2,-0x6
1b02 0122       | "  |		Execute	Any,Make_Root_Type
1b03 1c07       |    |		Execute_Immediate	Run_Utility,0x7
1b04 c603       |    |		Store	0x3,0x3
1b05 00c9       |    |		Action	Pop_Auxiliary_Loop
1b06 7feb       |    |		Jump	0x1af2
1b07 00ce       |    |		Action	Pop_Auxiliary
1b08 e603       |    |		Load	0x3,0x3
1b09 c604       |    |		Store	0x3,0x4
1b0a 00cf       |    |		Action	Mark_Auxiliary
1b0b e604       |    |		Load	0x3,0x4
1b0c e5f9       |    |		Load	0x2,-0x7
1b0d 01dc       |    |		Execute	Vector,Last
1b0e 027f       |    |		Execute	Discrete,Equal
1b0f 7011       |p   |		Jump_Nonzero	0x1b21
1b10 e604       |    |		Load	0x3,0x4
1b11 e5fa       |    |		Load	0x2,-0x6
1b12 0122       | "  |		Execute	Any,Make_Root_Type
1b13 1c07       |    |		Execute_Immediate	Run_Utility,0x7
1b14 e5fa       |    |		Load	0x2,-0x6
1b15 1c04       |    |		Execute_Immediate	Run_Utility,0x4
1b16 e5f9       |    |		Load	0x2,-0x7
1b17 01d7       |    |		Execute	Vector,Field_Read
1b18 85fd       |    |		Call	0x2,-0x3
1b19 7007       |p   |		Jump_Nonzero	0x1b21
1b1a e604       |    |		Load	0x3,0x4
1b1b e5fa       |    |		Load	0x2,-0x6
1b1c 0122       | "  |		Execute	Any,Make_Root_Type
1b1d 1c07       |    |		Execute_Immediate	Run_Utility,0x7
1b1e c604       |    |		Store	0x3,0x4
1b1f 00c9       |    |		Action	Pop_Auxiliary_Loop
1b20 7fea       |    |		Jump	0x1b0b
1b21 00ce       |    |		Action	Pop_Auxiliary
1b22 e604       |    |		Load	0x3,0x4
1b23 e5f9       |    |		Load	0x2,-0x7
1b24 01dc       |    |		Execute	Vector,Last
1b25 027f       |    |		Execute	Discrete,Equal
1b26 e604       |    |		Load	0x3,0x4
1b27 e5fa       |    |		Load	0x2,-0x6
1b28 1c04       |    |		Execute_Immediate	Run_Utility,0x4
1b29 e5f9       |    |		Load	0x2,-0x7
1b2a 01d7       |    |		Execute	Vector,Field_Read
1b2b 85fd       |    |		Call	0x2,-0x3
1b2c 0279       | y  |		Execute	Discrete,And
1b2d 7024       |p$  |		Jump_Nonzero	0x1b52
1b2e e602       |    |		Load	0x3,0x2
1b2f 7004       |p   |		Jump_Nonzero	0x1b34
1b30 e7ff       |    |		Load	0x3,-0x1
1b31 e21e       |    |		Load	0x1,0x1e
1b32 822b       | +  |		Call	0x1,0x2b
1b33 00d1       |    |		Pop_Control	Pop_Count_1
1b34 4800       |H   |		Short_Literal	0x0
1b35 a602       |    |		Store_Unchecked	0x3,0x2
1b36 e7ff       |    |		Load	0x3,-0x1
1b37 e604       |    |		Load	0x3,0x4
1b38 00d8       |    |		Load_Top	At_Offset_0
1b39 e5fa       |    |		Load	0x2,-0x6
1b3a 0260       | `  |		Execute	Discrete,In_Type
1b3b 7001       |p   |		Jump_Nonzero	0x1b3d
1b3c 0801       |    |		Execute_Immediate	Raise,0x1
1b3d e603       |    |		Load	0x3,0x3
1b3e 00d8       |    |		Load_Top	At_Offset_0
1b3f e5fa       |    |		Load	0x2,-0x6
1b40 0260       | `  |		Execute	Discrete,In_Type
1b41 7001       |p   |		Jump_Nonzero	0x1b43
1b42 0801       |    |		Execute_Immediate	Raise,0x1
1b43 8402       |    |		Call	0x2,0x2
1b44 822b       | +  |		Call	0x1,0x2b
1b45 00d1       |    |		Pop_Control	Pop_Count_1
1b46 e604       |    |		Load	0x3,0x4
1b47 e5f9       |    |		Load	0x2,-0x7
1b48 01dc       |    |		Execute	Vector,Last
1b49 027f       |    |		Execute	Discrete,Equal
1b4a 7007       |p   |		Jump_Nonzero	0x1b52
1b4b e604       |    |		Load	0x3,0x4
1b4c e5fa       |    |		Load	0x2,-0x6
1b4d 0122       | "  |		Execute	Any,Make_Root_Type
1b4e 1c07       |    |		Execute_Immediate	Run_Utility,0x7
1b4f c603       |    |		Store	0x3,0x3
1b50 00c9       |    |		Action	Pop_Auxiliary_Loop
1b51 7f9f       |    |		Jump	0x1af1
1b52 00ce       |    |		Action	Pop_Auxiliary
1b53 e7ff       |    |		Load	0x3,-0x1
1b54 0092 1cd3  |    |		Action	Push_String_Extended,0x1cd3					; "}"
1b56 822b       | +  |		Call	0x1,0x2b
1b57 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1b58 ; --------------------------------------------------------------------------------------
1b58 ; SUBPROGRAM
1b58 ; --------------------------------------------------------------------------------------
1b58 1b61       | a  |		.CONST	0x1b61								; Address of begin
1b59 1b69       | i  |		.CONST	0x1b69								; Address of exception handler
1b5a 0002       |    |		.CONST	0x0002								; Number of locals
1b5b			INIT_1b58:
1b5b e404       |    |		Load	0x2,0x4
1b5c e006       |    |		Load	0x0,0x6
1b5d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
1b5e 1c08       |    |		Execute_Immediate	Run_Utility,0x8
1b5f 00d8       |    |		Load_Top	At_Offset_0
1b60 1c00       |    |		Execute_Immediate	Run_Utility,0x0
1b61			BODY_1b58:
1b61 00d8       |    |		Load_Top	At_Offset_0
1b62 8403       |    |		Call	0x2,0x3
1b63 00d1       |    |		Pop_Control	Pop_Count_1
1b64 00d8       |    |		Load_Top	At_Offset_0
1b65 e006       |    |		Load	0x0,0x6
1b66 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
1b67 00cb       |    |		Action	Pop_Block_With_Result
1b68 4407       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x7
1b69			TRAP_1b58:
1b69 e22a       | *  |		Load	0x1,0x2a
1b6a 010f       |    |		Execute	Exception,Equal
1b6b 6804       |h   |		Jump_Zero	0x1b70
1b6c e404       |    |		Load	0x2,0x4
1b6d 0901       |    |		Execute_Immediate	Binary_Scale,0x1
1b6e c404       |    |		Store	0x2,0x4
1b6f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
1b70 0100       |    |		Execute	Exception,Raise
1b71 0000 0000  |    |		.BLANK	0000[0x7]
1b78 ; --------------------------------------------------------------------------------------
1b78 ; SUBPROGRAM
1b78 ; --------------------------------------------------------------------------------------
1b78 1b88       |    |		.CONST	0x1b88								; Address of begin
1b79 0004       |    |		.CONST	0x0004								; Address of exception handler
1b7a 0010       |    |		.CONST	0x0010								; Number of locals
1b7b			INIT_1b78:
1b7b 029a 1b93  |    |		Declare_Subprogram	INIT_1b90,For_Outer_Call,Visible,Unelaborated
1b7d 029a 1b9b  |    |		Declare_Subprogram	INIT_1b98,For_Outer_Call,Visible,Unelaborated
1b7f 00bf       |    |		Action	Accept_Activation
1b80 029d 1ba3  |    |		Declare_Subprogram	INIT_1ba0,For_Outer_Call
1b82 029d 1bb3  |    |		Declare_Subprogram	INIT_1bb0,For_Outer_Call
1b84 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
1b85 00c7       |    |		Action	Elaborate_Subprogram
1b86 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
1b87 00c7       |    |		Action	Elaborate_Subprogram
1b88			BODY_1b78:
1b88 00bc       |    |		Action	Signal_Activated
1b89 00bb       |    |		Action	Signal_Completion
1b8a 0000 0000  |    |		.BLANK	0000[0x6]
1b90 ; --------------------------------------------------------------------------------------
1b90 ; SUBPROGRAM
1b90 ; --------------------------------------------------------------------------------------
1b90 1b93       |    |		.CONST	0x1b93								; Address of begin
1b91 0004       |    |		.CONST	0x0004								; Address of exception handler
1b92 0001       |    |		.CONST	0x0001								; Number of locals
1b93			BODY_1b90:
1b93			INIT_1b90:
1b93 e5ff       |    |		Load	0x2,-0x1
1b94 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1b95 0000 0000  |    |		.XXX[0x3]
1b97 0000       |    |
1b98 ; --------------------------------------------------------------------------------------
1b98 ; SUBPROGRAM
1b98 ; --------------------------------------------------------------------------------------
1b98 1b9b       |    |		.CONST	0x1b9b								; Address of begin
1b99 0004       |    |		.CONST	0x0004								; Address of exception handler
1b9a 0001       |    |		.CONST	0x0001								; Number of locals
1b9b			BODY_1b98:
1b9b			INIT_1b98:
1b9b e5ff       |    |		Load	0x2,-0x1
1b9c 8210       |    |		Call	0x1,0x10
1b9d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1b9e 0000 0000  |    |		.XXX[0x2]
1ba0 ; --------------------------------------------------------------------------------------
1ba0 ; SUBPROGRAM
1ba0 ; --------------------------------------------------------------------------------------
1ba0 1ba3       |    |		.CONST	0x1ba3								; Address of begin
1ba1 0004       |    |		.CONST	0x0004								; Address of exception handler
1ba2 0001       |    |		.CONST	0x0001								; Number of locals
1ba3			BODY_1ba0:
1ba3			INIT_1ba0:
1ba3 e5ff       |    |		Load	0x2,-0x1
1ba4 014b       | K  |		Execute	Float,Less_Zero
1ba5 6803       |h   |		Jump_Zero	0x1ba9
1ba6 0092 1cd4  |    |		Action	Push_String_Extended,0x1cd4					; "-"
1ba8 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1ba9 00ea       |    |		Load_Encached	Null_String_Cache
1baa 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1bab 0000 0000  |    |		.BLANK	0000[0x5]
1bb0 ; --------------------------------------------------------------------------------------
1bb0 ; SUBPROGRAM
1bb0 ; --------------------------------------------------------------------------------------
1bb0 1bd0       |    |		.CONST	0x1bd0								; Address of begin
1bb1 1be3       |    |		.CONST	0x1be3								; Address of exception handler
1bb2 0006       |    |		.CONST	0x0006								; Number of locals
1bb3			INIT_1bb0:
1bb3 e5ff       |    |		Load	0x2,-0x1
1bb4 023e       | >  |		Execute	Float,Absolute_Value
1bb5 00e6       |    |		Load_Encached	Float_Cache
1bb6 03df       |    |		Declare_Variable	Float,With_Value
1bb7 00d8       |    |		Load_Top	At_Offset_0
1bb8 5833       |X3  |		Indirect_Literal	Float,0x1bec,0.5
1bb9 023c       | <  |		Execute	Float,Minus
1bba 0235       | 5  |		Execute	Float,Round_To_Discrete
1bbb 00e3       |    |		Load_Encached	Natural_Cache
1bbc 025e       | ^  |		Execute	Discrete,Convert
1bbd 00e3       |    |		Load_Encached	Natural_Cache
1bbe 03f1       |    |		Declare_Variable	Discrete,With_Value
1bbf e402       |    |		Load	0x2,0x2
1bc0 e403       |    |		Load	0x2,0x3
1bc1 0237       | 7  |		Execute	Float,Convert_From_Discrete
1bc2 023c       | <  |		Execute	Float,Minus
1bc3 00e6       |    |		Load_Encached	Float_Cache
1bc4 03df       |    |		Declare_Variable	Float,With_Value
1bc5 00d8       |    |		Load_Top	At_Offset_0
1bc6 5821       |X!  |		Indirect_Literal	Float,0x1be8,10.0
1bc7 023b       | ;  |		Execute	Float,Times
1bc8 00e6       |    |		Load_Encached	Float_Cache
1bc9 03df       |    |		Declare_Variable	Float,With_Value
1bca 00d8       |    |		Load_Top	At_Offset_0
1bcb 0235       | 5  |		Execute	Float,Round_To_Discrete
1bcc 00e3       |    |		Load_Encached	Natural_Cache
1bcd 025e       | ^  |		Execute	Discrete,Convert
1bce 00e3       |    |		Load_Encached	Natural_Cache
1bcf 03f1       |    |		Declare_Variable	Discrete,With_Value
1bd0			BODY_1bb0:
1bd0 482e       |H.  |		Short_Literal	0x2e
1bd1 e5ff       |    |		Load	0x2,-0x1
1bd2 820f       |    |		Call	0x1,0xf
1bd3 4820       |H   |		Short_Literal	0x20
1bd4 4800       |H   |		Short_Literal	0x0
1bd5 480a       |H   |		Short_Literal	0xa
1bd6 e403       |    |		Load	0x2,0x3
1bd7 e001       |    |		Load	0x0,0x1
1bd8 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
1bd9 01cc       |    |		Execute	Vector,Catenate
1bda 01cb       |    |		Execute	Vector,Append
1bdb 4820       |H   |		Short_Literal	0x20
1bdc 4800       |H   |		Short_Literal	0x0
1bdd 480a       |H   |		Short_Literal	0xa
1bde e406       |    |		Load	0x2,0x6
1bdf e001       |    |		Load	0x0,0x1
1be0 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
1be1 01cc       |    |		Execute	Vector,Catenate
1be2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1be3			TRAP_1bb0:
1be3 0007       |    |		Action	Break_Optional
1be4 0092 1cd5  |    |		Action	Push_String_Extended,0x1cd5					; "0.0"
1be6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
1be7 0000       |    |		.XXX[0x1]
1be8 4024 0000  |@$  |		.DBL	10.0
1bea 0000 0000  |    |
1bec 3fe0 0000  |?   |		.DBL	0.5
1bee 0000 0000  |    |
1bf0 ; --------------------------------------------------------------------------------------
1bf0 ; STRING TABLE
1bf0 ; --------------------------------------------------------------------------------------
1bf0 01ce       |    |		.STRTAB	0x01ce->0x1cd7							; "NO_BREAKPOINT"
1bf1 01d9       |    |		.STRTAB	0x01d9->0x1cdd							; "ON_DECLARE"
1bf2 01e1       |    |		.STRTAB	0x01e1->0x1ce2							; "ON_STORE"
1bf3 01e7       |    |		.STRTAB	0x01e7->0x1ce6							; "ON_CALL"
1bf4 01ec       |    |		.STRTAB	0x01ec->0x1cea							; "ON_JUMP"
1bf5 01f1       |    |		.STRTAB	0x01f1->0x1ced							; "ON_RENDEZVOUS"
1bf6 01fc       |    |		.STRTAB	0x01fc->0x1cf4							; "ON_ACTION"
1bf7 0203       |    |		.STRTAB	0x0203->0x1cf8							; "ON_OPTION"
1bf8 020a       |    |		.STRTAB	0x020a->0x1cfd							; "ON_OTHER"
1bf9 0210       |    |		.STRTAB	0x0210->0x1d01							; "ON_EXIT"
1bfa 0215       |    |		.STRTAB	0x0215->0x1d04							; "SPARE1"
1bfb 0219       |    |		.STRTAB	0x0219->0x1d07							; "SPARE2"
1bfc 021d       |    |		.STRTAB	0x021d->0x1d0a							; "SPARE3"
1bfd 0221       | !  |		.STRTAB	0x0221->0x1d0d							; "ON_IMPLICIT_EXCEPTION"
1bfe 0234       | 4  |		.STRTAB	0x0234->0x1d18							; "ON_EXPLICIT_EXCEPTION"
1bff 0247       | G  |		.STRTAB	0x0247->0x1d22							; "ON_CREATION"
1c00 0250       | P  |		.STRTAB	0x0250->0x1d28							; "Type_Offset"
1c01 0259       | Y  |		.STRTAB	0x0259->0x1d2d							; "To_Be_Aborted"
1c02 0264       | d  |		.STRTAB	0x0264->0x1d34							; "Abort_Protected"
1c03 0271       | q  |		.STRTAB	0x0271->0x1d3b							; "Stack"
1c04 0274       | t  |		.STRTAB	0x0274->0x1d3e							; "Data_Offset"
1c05 027d       | }  |		.STRTAB	0x027d->0x1d43							; "Bounds_With_Object"
1c06 028d       |    |		.STRTAB	0x028d->0x1d4c							; "Derives_Privacy"
1c07 029a       |    |		.STRTAB	0x029a->0x1d54							; "Is_Private"
1c08 02a2       |    |		.STRTAB	0x02a2->0x1d59							; "Is_Constant"
1c09 02ab       |    |		.STRTAB	0x02ab->0x1d5e							; "Is_Visible"
1c0a 02b3       |    |		.STRTAB	0x02b3->0x1d63							; "Path_Stack"
1c0b 02bb       |    |		.STRTAB	0x02bb->0x1d68							; "Offset"
1c0c 02bf       |    |		.STRTAB	0x02bf->0x1d6b							; "Segment"
1c0d 02c4       |    |		.STRTAB	0x02c4->0x1d6f							; "Children_Start"
1c0e 02d0       |    |		.STRTAB	0x02d0->0x1d76							; "Control_Offset"
1c0f 02dc       |    |		.STRTAB	0x02dc->0x1d7d							; "Subprog_Site"
1c10 02e6       |    |		.STRTAB	0x02e6->0x1d83							; "Of_Kind"
1c11 02eb       |    |		.STRTAB	0x02eb->0x1d86							; "Scope_For_Site"
1c12 02f7       |    |		.STRTAB	0x02f7->0x1d8d							; "Lex_Level"
1c13 02fe       |    |		.STRTAB	0x02fe->0x1d92							; "Subprog_Start"
1c14 0309       |    |		.STRTAB	0x0309->0x1d98							; "Declare_Frame"
1c15 0314       |    |		.STRTAB	0x0314->0x1d9f							; "start pc = "
1c16 031d       |    |		.STRTAB	0x031d->0x1da4							; "; lex = "
1c17 0323       | #  |		.STRTAB	0x0323->0x1da8							; "distributor"
1c18 032c       | ,  |		.STRTAB	0x032c->0x1dae							; "control extent"
1c19 0338       | 8  |		.STRTAB	0x0338->0x1db5							; "break mask"
1c1a 0340       | @  |		.STRTAB	0x0340->0x1dba							; "Is_Catalogued "
1c1b 034c       | L  |		.STRTAB	0x034c->0x1dc1							; "Is_Wired "
1c1c 0353       | S  |		.STRTAB	0x0353->0x1dc5							; "Delay_Duration"
1c1d 035f       | _  |		.STRTAB	0x035f->0x1dcc							; "Timed_Choice"
1c1e 0369       | i  |		.STRTAB	0x0369->0x1dd2							; "Member_Index"
1c1f 0373       | s  |		.STRTAB	0x0373->0x1dd8							; "First_Member"
1c20 037d       | }  |		.STRTAB	0x037d->0x1dde							; "Member_Site"
1c21 0386       |    |		.STRTAB	0x0386->0x1de4							; "Entry_Params"
1c22 0390       |    |		.STRTAB	0x0390->0x1dea							; "Entry_Name"
1c23 0398       |    |		.STRTAB	0x0398->0x1def							; "Raise_Index"
1c24 03a1       |    |		.STRTAB	0x03a1->0x1df4							; "Raise_Offset"
1c25 03ab       |    |		.STRTAB	0x03ab->0x1dfa							; "Reraising"
1c26 03b2       |    |		.STRTAB	0x03b2->0x1dff							; "Exception_Name"
1c27 03be       |    |		.STRTAB	0x03be->0x1e06							; "Raise_Segment"
1c28 03c9       |    |		.STRTAB	0x03c9->0x1e0c							; "pc = "
1c29 03cc       |    |		.STRTAB	0x03cc->0x1e0f							; "; "
1c2a 03cc       |    |		.STRTAB	0x03cc->0x1e10							; "Mantissa"
1c2b 03d2       |    |		.STRTAB	0x03d2->0x1e14							; "Exponent"
1c2c 03d8       |    |		.STRTAB	0x03d8->0x1e18							; "Is_Negative"
1c2d 03e1       |    |		.STRTAB	0x03e1->0x1e1d							; "Val_Part"
1c2e 03e7       |    |		.STRTAB	0x03e7->0x1e21							; "Typ_Part"
1c2f 03ed       |    |		.STRTAB	0x03ed->0x1e25							; "Var_Site"
1c30 03f3       |    |		.STRTAB	0x03f3->0x1e29							; "Last_Bias"
1c31 03fa       |    |		.STRTAB	0x03fa->0x1e2e							; "Family_Site"
1c32 0403       |    |		.STRTAB	0x0403->0x1e33							; "Pointer"
1c33 0408       |    |		.STRTAB	0x0408->0x1e37							; "Declarer_Name"
1c34 0413       |    |		.STRTAB	0x0413->0x1e3d							; "Module_Imports"
1c35 041f       |    |		.STRTAB	0x041f->0x1e44							; "Module_Type"
1c36 0428       | (  |		.STRTAB	0x0428->0x1e4a							; "import space = "
1c37 0435       | 5  |		.STRTAB	0x0435->0x1e51							; "; declared by "
1c38 0441       | A  |		.STRTAB	0x0441->0x1e58							; "type frame = "
1c39 044c       | L  |		.STRTAB	0x044c->0x1e5f							; "data frame = "
1c3a 0457       | W  |		.STRTAB	0x0457->0x1e65							; " "
1c3b 0456       | V  |		.STRTAB	0x0456->0x1e66							; "In_Rendezvous "
1c3c 0462       | b  |		.STRTAB	0x0462->0x1e6d							; "In_Utility "
1c3d 046b       | k  |		.STRTAB	0x046b->0x1e72							; "Has_Package "
1c3e 0475       | u  |		.STRTAB	0x0475->0x1e78							; "Has_Children "
1c3f 0480       |    |		.STRTAB	0x0480->0x1e7f							; "enclosing frame = "
1c40 0490       |    |		.STRTAB	0x0490->0x1e88							; ", "
1c41 0490       |    |		.STRTAB	0x0490->0x1e89							; "Auxiliary_Marked"
1c42 049e       |    |		.STRTAB	0x049e->0x1e91							; "Forcing_Instruction"
1c43 04af       |    |		.STRTAB	0x04af->0x1e9a							; "Breakpoint_Mask"
1c44 04bc       |    |		.STRTAB	0x04bc->0x1ea2							; "Control_Extent"
1c45 04c8       |    |		.STRTAB	0x04c8->0x1ea9							; "Force_Breakpoint"
1c46 04d6       |    |		.STRTAB	0x04d6->0x1eb1							; "Is_Wired"
1c47 04dc       |    |		.STRTAB	0x04dc->0x1eb5							; "Is_Catalogued"
1c48 04e7       |    |		.STRTAB	0x04e7->0x1ebb							; "Queue_Not_Empty"
1c49 04f4       |    |		.STRTAB	0x04f4->0x1ec3							; "Queue_Allocated"
1c4a 0501       |    |		.STRTAB	0x0501->0x1eca							; "Distributor"
1c4b 050a       |    |		.STRTAB	0x050a->0x1ed0							; "Break_Cause"
1c4c 0513       |    |		.STRTAB	0x0513->0x1ed5							; "Break_Address"
1c4d 051e       |    |		.STRTAB	0x051e->0x1edc							; "Restore_Enable"
1c4e 052a       | *  |		.STRTAB	0x052a->0x1ee3							; "Debugging_Scope"
1c4f 0537       | 7  |		.STRTAB	0x0537->0x1eea							; "debugging scope = "
1c50 0547       | G  |		.STRTAB	0x0547->0x1ef3							; "; restore enable = "
1c51 0558       | X  |		.STRTAB	0x0558->0x1efd							; "; break address = "
1c52 0568       | h  |		.STRTAB	0x0568->0x1f06							; "; cause = "
1c53 0570       | p  |		.STRTAB	0x0570->0x1f0b							; "Node"
1c54 0572       | r  |		.STRTAB	0x0572->0x1f0d							; "Name"
1c55 0574       | t  |		.STRTAB	0x0574->0x1f0f							; "Dependence_Site"
1c56 0581       |    |		.STRTAB	0x0581->0x1f16							; "Select_Site"
1c57 058a       |    |		.STRTAB	0x058a->0x1f1c							; "Field_Count"
1c58 0593       |    |		.STRTAB	0x0593->0x1f21							; "Select_Ref"
1c59 059b       |    |		.STRTAB	0x059b->0x1f26							; "Some_Choice_Open"
1c5a 05a9       |    |		.STRTAB	0x05a9->0x1f2e							; "Terminate_Is_Open"
1c5b 05b8       |    |		.STRTAB	0x05b8->0x1f37							; "Has_Terminate"
1c5c 05c3       |    |		.STRTAB	0x05c3->0x1f3d							; "Timed_Is_Open"
1c5d 05ce       |    |		.STRTAB	0x05ce->0x1f44							; "Has_Timed_Clause"
1c5e 05dc       |    |		.STRTAB	0x05dc->0x1f4c							; "Last_Choice"
1c5f 05e5       |    |		.STRTAB	0x05e5->0x1f51							; "(Of_Kind => "
1c60 05ef       |    |		.STRTAB	0x05ef->0x1f57							; ")"
1c61 05ee       |    |		.STRTAB	0x05ee->0x1f58							; "Ctl_Offset"
1c62 05f6       |    |		.STRTAB	0x05f6->0x1f5d							; "Is_Open"
1c63 05fb       |    |		.STRTAB	0x05fb->0x1f60							; "Is_Family"
1c64 0602       |    |		.STRTAB	0x0602->0x1f65							; "Frame_Lex_Level"
1c65 060f       |    |		.STRTAB	0x060f->0x1f6c							; "Return_Address"
1c66 061b       |    |		.STRTAB	0x061b->0x1f73							; "Enclosing_Frame"
1c67 0628       | (  |		.STRTAB	0x0628->0x1f7b							; "Data_Frame"
1c68 0630       | 0  |		.STRTAB	0x0630->0x1f80							; "Block_Start"
1c69 0639       | 9  |		.STRTAB	0x0639->0x1f85							; "Dynamic_Link"
1c6a 0643       | C  |		.STRTAB	0x0643->0x1f8b							; "Type_Frame"
1c6b 064b       | K  |		.STRTAB	0x064b->0x1f90							; "Has_Children"
1c6c 0655       | U  |		.STRTAB	0x0655->0x1f96							; "Has_Package"
1c6d 065e       | ^  |		.STRTAB	0x065e->0x1f9c							; "In_Utility"
1c6e 0666       | f  |		.STRTAB	0x0666->0x1fa1							; "In_Rendezvous"
1c6f 0671       | q  |		.STRTAB	0x0671->0x1fa7							; "Exports_Legal"
1c70 067c       | |  |		.STRTAB	0x067c->0x1fae							; "Outer_Lex_Frame"
1c71 0689       |    |		.STRTAB	0x0689->0x1fb5							; "Partner_Charge_Vpid"
1c72 069a       |    |		.STRTAB	0x069a->0x1fbf							; "Partner_Name"
1c73 06a4       |    |		.STRTAB	0x06a4->0x1fc5							; "Total_Params"
1c74 06ae       |    |		.STRTAB	0x06ae->0x1fcb							; "In_Select"
1c75 06b5       |    |		.STRTAB	0x06b5->0x1fcf							; "Return_Priority"
1c76 06c2       |    |		.STRTAB	0x06c2->0x1fd7							; "Return_Charge_Vpid"
1c77 06d2       |    |		.STRTAB	0x06d2->0x1fe0							; "Select_Choice"
1c78 06dd       |    |		.STRTAB	0x06dd->0x1fe6							; "Data_Stack_Mark"
1c79 06ea       |    |		.STRTAB	0x06ea->0x1fee							; "Type_Stack_Mark"
1c7a 06f7       |    |		.STRTAB	0x06f7->0x1ff5							; "Appending_Fields"
1c7b 0705       |    |		.STRTAB	0x0705->0x1ffd							; "Data_Mark_Used"
1c7c 0711       |    |		.STRTAB	0x0711->0x2004							; "Type_Mark_Used"
1c7d 071d       |    |		.STRTAB	0x071d->0x200b							; "Has_Prior_Mark"
1c7e 0729       | )  |		.STRTAB	0x0729->0x2012							; "In_Export_Frame"
1c7f 0736       | 6  |		.STRTAB	0x0736->0x201a							; "Constrained"
1c80 073f       | ?  |		.STRTAB	0x073f->0x201f							; "Global_Only"
1c81 0748       | H  |		.STRTAB	0x0748->0x2025							; "Database_Index"
1c82 0754       | T  |		.STRTAB	0x0754->0x202c							; "database index = "
1c83 0763       | c  |		.STRTAB	0x0763->0x2034							; "; mode = "
1c84 076a       | j  |		.STRTAB	0x076a->0x2039							; " GLOBAL"
1c85 076f       | o  |		.STRTAB	0x076f->0x203c							; " LOCAL"
1c86 0773       | s  |		.STRTAB	0x0773->0x203f							; " CONSTRAINED"
1c87 077d       | }  |		.STRTAB	0x077d->0x2045							; " UNCONSTRAINED"
1c88 0789       |    |		.STRTAB	0x0789->0x204c							; "In_Entry_Call "
1c89 0795       |    |		.STRTAB	0x0795->0x2053							; "debugging state = ("
1c8a 07a6       |    |		.STRTAB	0x07a6->0x205d							; " In_Critical_Region "
1c8b 07b8       |    |		.STRTAB	0x07b8->0x2067							; "and Aborted"
1c8c 07c1       |    |		.STRTAB	0x07c1->0x206c							; " Aborted_Critical_Region"
1c8d 07d7       |    |		.STRTAB	0x07d7->0x2078							; "For_Module"
1c8e 07df       |    |		.STRTAB	0x07df->0x207d							; "Permitted"
1c8f 07e6       |    |		.STRTAB	0x07e6->0x2082							; " @ "
1c90 07e7       |    |		.STRTAB	0x07e7->0x2083							; "Base_Priority"
1c91 07f2       |    |		.STRTAB	0x07f2->0x208a							; "Fixed_Priority"
1c92 07fe       |    |		.STRTAB	0x07fe->0x2091							; "Last_Job_Priority"
1c93 080d       |    |		.STRTAB	0x080d->0x2099							; "Aborted_In_Critical_Region"
1c94 0825       | %  |		.STRTAB	0x0825->0x20a6							; "Critical_Region_Count"
1c95 0838       | 8  |		.STRTAB	0x0838->0x20b1							; "Debugging_State"
1c96 0845       | E  |		.STRTAB	0x0845->0x20b8							; "Associated_Heap"
1c97 0852       | R  |		.STRTAB	0x0852->0x20c0							; "In_Entry_Call"
1c98 085d       | ]  |		.STRTAB	0x085d->0x20c6							; "Mode"
1c99 085f       | _  |		.STRTAB	0x085f->0x20c8							; "Delay_Time"
1c9a 0867       | g  |		.STRTAB	0x0867->0x20cd							; "(Current_Slice => "
1c9b 0877       | w  |		.STRTAB	0x0877->0x20d6							; "Caller_Is_Waiting"
1c9c 0886       |    |		.STRTAB	0x0886->0x20df							; "Has_Been_Rousted"
1c9d 0894       |    |		.STRTAB	0x0894->0x20e7							; "Held_By_Scheduler"
1c9e 08a3       |    |		.STRTAB	0x08a3->0x20ef							; "Memory_Condition"
1c9f 08b1       |    |		.STRTAB	0x08b1->0x20f7							; "Block_Condition"
1ca0 08be       |    |		.STRTAB	0x08be->0x20ff							; "Current_Mode"
1ca1 08c8       |    |		.STRTAB	0x08c8->0x2105							; "Current_Priority"
1ca2 08d6       |    |		.STRTAB	0x08d6->0x210d							; "Caller_Must_Wait"
1ca3 08e4       |    |		.STRTAB	0x08e4->0x2115							; "Module_Is_Task"
1ca4 08f0       |    |		.STRTAB	0x08f0->0x211c							; "Module_Aborted"
1ca5 08fc       |    |		.STRTAB	0x08fc->0x2123							; "Breakpoint_On"
1ca6 0907       |    |		.STRTAB	0x0907->0x2129							; "Intrainstruction"
1ca7 0915       |    |		.STRTAB	0x0915->0x2131							; "Control_Tos"
1ca8 091e       |    |		.STRTAB	0x091e->0x2137							; "Job_For_Charging"
1ca9 092c       | ,  |		.STRTAB	0x092c->0x213f							; "Program_Counter"
1caa 0939       | 9  |		.STRTAB	0x0939->0x2146							; "Executing_Lex"
1cab 0944       | D  |		.STRTAB	0x0944->0x214d							; "(Queue_Successor => "
1cac 0956       | V  |		.STRTAB	0x0956->0x2157							; "Has_Micro_Context"
1cad 0965       | e  |		.STRTAB	0x0965->0x215f							; "Type_Tos"
1cae 096b       | k  |		.STRTAB	0x096b->0x2163							; "Current_Frame"
1caf 0976       | v  |		.STRTAB	0x0976->0x216a							; "Data_Tos"
1cb0 097c       | |  |		.STRTAB	0x097c->0x216e							; "Data_Extent"
1cb1 0985       |    |		.STRTAB	0x0985->0x2173							; "Queue_Extent"
1cb2 098f       |    |		.STRTAB	0x098f->0x2179							; "Space_Mgr_Retries"
1cb3 099e       |    |		.STRTAB	0x099e->0x2182							; "Type_Extent"
1cb4 09a7       |    |		.STRTAB	0x09a7->0x2187							; "Breakpoint_Scope"
1cb5 09b5       |    |		.STRTAB	0x09b5->0x218f							; "value"
1cb6 09b8       |    |		.STRTAB	0x09b8->0x2192							; "; type"
1cb7 09bc       |    |		.STRTAB	0x09bc->0x2195							; "; ctos = "
1cb8 09c3       |    |		.STRTAB	0x09c3->0x2199							; "type tos = "
1cb9 09cc       |    |		.STRTAB	0x09cc->0x219f							; "; data tos = "
1cba 09d7       |    |		.STRTAB	0x09d7->0x21a5							; "type extent = "
1cbb 09e3       |    |		.STRTAB	0x09e3->0x21ac							; "; queue extent = "
1cbc 09f2       |    |		.STRTAB	0x09f2->0x21b5							; "; data extent = "
1cbd 0a00       |    |		.STRTAB	0x0a00->0x21bd							; "subr @ "
1cbe 0a05       |    |		.STRTAB	0x0a05->0x21c0							; "Ref_Item"
1cbf 0a0b       |    |		.STRTAB	0x0a0b->0x21c4							; ": "
1cc0 0a0b       |    |		.STRTAB	0x0a0b->0x21c5							; "AUXILIARY_STATE: "
1cc1 0a1a       |    |		.STRTAB	0x0a1a->0x21ce							; "AUXILIARY_ALLOCATION: "
1cc2 0a2e       | .  |		.STRTAB	0x0a2e->0x21d9							; " = "
1cc3 0a2f       | /  |		.STRTAB	0x0a2f->0x21da							; " => "
1cc4 0a31       | 1  |		.STRTAB	0x0a31->0x21dc							; "; BWO"
1cc5 0a34       | 4  |		.STRTAB	0x0a34->0x21df							; "collection + "
1cc6 0a3f       | ?  |		.STRTAB	0x0a3f->0x21e5							; " type mark "
1cc7 0a48       | H  |		.STRTAB	0x0a48->0x21eb							; " data mark "
1cc8 0a51       | Q  |		.STRTAB	0x0a51->0x21f0							; "partner = "
1cc9 0a59       | Y  |		.STRTAB	0x0a59->0x21f5							; ";"
1cca 0a58       | X  |		.STRTAB	0x0a58->0x21f6							; "return pc = "
1ccb 0a62       | b  |		.STRTAB	0x0a62->0x21fc							; "("
1ccc 0a61       | a  |		.STRTAB	0x0a61->0x21fc							; "T"
1ccd 0a60       | `  |		.STRTAB	0x0a60->0x21fd							; "F"
1cce 0a5f       | _  |		.STRTAB	0x0a5f->0x21fd							; "{}"
1ccf 0a5f       | _  |		.STRTAB	0x0a5f->0x21fe							; "***too_big_to_print"
1cd0 0a70       | p  |		.STRTAB	0x0a70->0x2208							; "#"
1cd1 0a6f       | o  |		.STRTAB	0x0a6f->0x2208							; ".."
1cd2 0a6f       | o  |		.STRTAB	0x0a6f->0x2209							; "{"
1cd3 0a6e       | n  |		.STRTAB	0x0a6e->0x220a							; "}"
1cd4 0a6d       | m  |		.STRTAB	0x0a6d->0x220a							; "-"
1cd5 0a6c       | l  |		.STRTAB	0x0a6c->0x220b							; "0.0"
1cd6 0a6d       | m  |		.STREND 0x0a6d->0x220c
1cd7 4e4f 5f42  |NO_B|		.STRTAB_STRINGS
220d 0000 0000  |    |		.XXX[0x3]
220f 0000       |    |
2210 ; --------------------------------------------------------------------------------------
2210 ; Debug Table
2210 ; --------------------------------------------------------------------------------------
2210 0004 0011  |    |		.DEBUG4	0x0004,0x0011,0x9770,0x0000,0x0001,0x0000
2216 0000 0000  |    |		.BLANK	0000[0x1ea]