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

⟦2df652b1f⟧

    Length: 9216 (0x2400)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0bb0       |    |		.CONST	0x0bb0								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0008       |    |		.CONST	0x0008								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0014       |    |		.CONST	0x0014								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0019       |    |		.CONST	0x0019								; Number of locals
000b			INIT_0008:
000b 029a 001b  |    |		Declare_Subprogram	INIT_0018,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x0d0a,0x4000,0x0000,0x0057,0x3ff5,0x0000,0x03d0
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 0033  |   3|		Declare_Subprogram	INIT_0030,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 00bf       |    |		Action	Accept_Activation
0010 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1 = .DEBUG	0x0010,0x0d10,0x4000,0x0000,0x0058,0xc8e5,0x0000,0x000c
													; Debug Table 0x1.0x0 = 0x10,0xffff
0011 00c7       |    |		Action	Elaborate_Subprogram
0012 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x1 = 0x12,0xfffe
0013 00c7       |    |		Action	Elaborate_Subprogram
0014			BODY_0008:
0014 00bc       |    |		Action	Signal_Activated
0015 00bb       |    |		Action	Signal_Completion
0016 0000 0000  |    |		.XXX[0x2]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 001b       |    |		.CONST	0x001b								; Address of begin
0019 0004       |    |		.CONST	0x0004								; Address of exception handler
001a 0001       |    |		.CONST	0x0001								; Number of locals
001b			BODY_0018:
001b			INIT_0018:
001b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2 = .DEBUG	0x001b,0x0d16,0x1001,0x0000,0x0057,0x3ff5,0x0000,0x0427
													; Debug Table 0x2.0x0 = 0x1b,0x1
001c 0120       |    |		Execute	Any,Is_Value
001d 6803       |h   |		Jump_Zero	0x21
001e e001       |    |		Load	0x0,0x1
001f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0020 7801       |x   |		Jump	0x22
0021 00db       |    |		Load_Top	At_Offset_3
0022 00e1       |    |		Load_Encached	Boolean_Cache
0023 e002       |    |		Load	0x0,0x2
0024 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0025 8219       |    |		Call	0x1,0x19
0026 c5ff       |    |		Store	0x2,-0x1
0027 c5fe       |    |		Store	0x2,-0x2
0028 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0029 0000 0000  |    |		.BLANK	0000[0x7]
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 00be       |    |		.CONST	0x00be								; Address of begin
0031 0004       |    |		.CONST	0x0004								; Address of exception handler
0032 0029       | )  |		.CONST	0x0029								; Number of locals
0033			INIT_0030:
0033 029e 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Call,Unelaborated			; Debug Table 0x3 = .DEBUG	0x0033,0x0d1a,0x1001,0x0000,0x0057,0x3ff5,0x0000,0x0435
													; Debug Table 0x3.0x0 = 0x33,0xffff
0035 630e       |c   |		Indirect_Literal	Discrete,0x344,{0x00000000, 0x0058c985}		; Debug Table 0x3.0x1 = 0x35,0xfffe
0036 4831       |H1  |		Short_Literal	0x31
0037 4865       |He  |		Short_Literal	0x65
0038 e003       |    |		Load	0x0,0x3
0039 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
003a 00e4       |    |		Load_Encached	Positive_Cache
003b 4802       |H   |		Short_Literal	0x2
003c 4802       |H   |		Short_Literal	0x2
003d 0099       |    |		Action	Reference_Dynamic
003e e004       |    |		Load	0x0,0x4
003f 0387       |    |		Declare_Variable	Package
0040 00d8       |    |		Load_Top	At_Offset_0
0041 020f       |    |		Execute	Module,Activate
0042 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x2 = 0x42,0xfffd
0043 029e 00db  |    |		Declare_Subprogram	INIT_00d8,For_Call,Unelaborated			; Debug Table 0x3.0x3 = 0x43,0xfffc
0045 62fe       |b   |		Indirect_Literal	Discrete,0x344,{0x00000000, 0x0058c985}		; Debug Table 0x3.0x4 = 0x45,0xfffb
0046 4851       |HQ  |		Short_Literal	0x51
0047 4865       |He  |		Short_Literal	0x65
0048 00e4       |    |		Load_Encached	Positive_Cache
0049 e003       |    |		Load	0x0,0x3
004a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
004b 4804       |H   |		Short_Literal	0x4
004c 4802       |H   |		Short_Literal	0x2
004d 0099       |    |		Action	Reference_Dynamic
004e e004       |    |		Load	0x0,0x4
004f 0387       |    |		Declare_Variable	Package
0050 00d8       |    |		Load_Top	At_Offset_0
0051 020f       |    |		Execute	Module,Activate
0052 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x5 = 0x52,0xfffa
0053 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x6 = 0x53,0xfff9
0054 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0055 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x7 = 0x55,0xfff8
0056 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0057 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x3.0x8 = 0x57,0xfff7
0058 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0059 e005       |    |		Load	0x0,0x5								; Debug Table 0x3.0x9 = 0x59,0xfff6
005a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
005b 02c7       |    |		Declare_Variable	Any
005c e005       |    |		Load	0x0,0x5
005d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
005e c409       |    |		Store	0x2,0x9
005f 62e4       |b   |		Indirect_Literal	Discrete,0x344,{0x00000000, 0x0058c985}		; Debug Table 0x3.0xa = 0x5f,0xfff5
0060 4886       |H   |		Short_Literal	0x86
0061 e006       |    |		Load	0x0,0x6
0062 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0063 e007       |    |		Load	0x0,0x7
0064 0387       |    |		Declare_Variable	Package
0065 00d8       |    |		Load_Top	At_Offset_0
0066 020f       |    |		Execute	Module,Activate
0067 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0xb = 0x67,0xfff4
0068 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0069 4802       |H   |		Short_Literal	0x2							; Debug Table 0x3.0xc = 0x69,0xfff3
006a 4802       |H   |		Short_Literal	0x2
006b 0099       |    |		Action	Reference_Dynamic
006c 00c7       |    |		Action	Elaborate_Subprogram
006d 4804       |H   |		Short_Literal	0x4							; Debug Table 0x3.0xd = 0x6d,0xfff2
006e 4802       |H   |		Short_Literal	0x2
006f 0099       |    |		Action	Reference_Dynamic
0070 00c7       |    |		Action	Elaborate_Subprogram
0071 029f 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Call				; Debug Table 0x3.0xe = 0x71,0xfff1
0073 029f 0163  |   c|		Declare_Subprogram	INIT_0160,For_Call				; Debug Table 0x3.0xf = 0x73,0xfff0
0075 029f 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Call				; Debug Table 0x3.0x10 = 0x75,0xffef
0077 029f 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Call				; Debug Table 0x3.0x11 = 0x77,0xffee
0079 029f 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Call				; Debug Table 0x3.0x12 = 0x79,0xffed
007b 029f 020b  |    |		Declare_Subprogram	INIT_0208,For_Call				; Debug Table 0x3.0x13 = 0x7b,0xffec
007d 029f 021b  |    |		Declare_Subprogram	INIT_0218,For_Call				; Debug Table 0x3.0x14 = 0x7d,0xffeb
007f 029f 0233  |   3|		Declare_Subprogram	INIT_0230,For_Call				; Debug Table 0x3.0x15 = 0x7f,0xffea
0081 029f 028b  |    |		Declare_Subprogram	INIT_0288,For_Call				; Debug Table 0x3.0x16 = 0x81,0xffe9
0083 029f 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Call				; Debug Table 0x3.0x17 = 0x83,0xffe8
0085 029f 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Call				; Debug Table 0x3.0x18 = 0x85,0xffe7
0087 029e 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Call,Unelaborated			; Debug Table 0x3.0x19 = 0x87,0xffe6
0089 029f 034b  |   K|		Declare_Subprogram	INIT_0348,For_Call				; Debug Table 0x3.0x1a = 0x89,0xffe5
008b 029f 0363  |   c|		Declare_Subprogram	INIT_0360,For_Call				; Debug Table 0x3.0x1b = 0x8b,0xffe4
008d 029f 0373  |   s|		Declare_Subprogram	INIT_0370,For_Call				; Debug Table 0x3.0x1c = 0x8d,0xffe3
008f 62b4       |b   |		Indirect_Literal	Discrete,0x344,{0x00000000, 0x0058c985}		; Debug Table 0x3.0x1d = 0x8f,0xffe2
0090 62af       |b   |		Indirect_Literal	Discrete,0x340,{0x00000000, 0x000004f3}
0091 4865       |He  |		Short_Literal	0x65
0092 e006       |    |		Load	0x0,0x6
0093 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0094 e008       |    |		Load	0x0,0x8
0095 481a       |H   |		Short_Literal	0x1a
0096 4802       |H   |		Short_Literal	0x2
0097 0099       |    |		Action	Reference_Dynamic
0098 e004       |    |		Load	0x0,0x4
0099 0387       |    |		Declare_Variable	Package
009a 00d8       |    |		Load_Top	At_Offset_0
009b 020f       |    |		Execute	Module,Activate
009c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x1e = 0x9c,0xffe1
009d 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
009e 0007       |    |		Action	Break_Optional							; Debug Table 0x3.0x1f = 0x9e,0xffe0
009f 029f 0383  |    |		Declare_Subprogram	INIT_0380,For_Call				; Debug Table 0x3.0x20 = 0x9f,0xffdf
00a1 481d       |H   |		Short_Literal	0x1d							; Debug Table 0x3.0x21 = 0xa1,0xffde
00a2 4802       |H   |		Short_Literal	0x2
00a3 0099       |    |		Action	Reference_Dynamic
00a4 029f 0433  |   3|		Declare_Subprogram	INIT_0430,For_Call				; Debug Table 0x3.0x22 = 0xa4,0xffdd
00a6 029f 0473  |   s|		Declare_Subprogram	INIT_0470,For_Call				; Debug Table 0x3.0x23 = 0xa6,0xffdc
00a8 029f 04db  |    |		Declare_Subprogram	INIT_04d8,For_Call				; Debug Table 0x3.0x24 = 0xa8,0xffdb
00aa 029f 04f3  |    |		Declare_Subprogram	INIT_04f0,For_Call				; Debug Table 0x3.0x25 = 0xaa,0xffda
00ac 029f 05a3  |    |		Declare_Subprogram	INIT_05a0,For_Call				; Debug Table 0x3.0x26 = 0xac,0xffd9
00ae 029f 068b  |    |		Declare_Subprogram	INIT_0688,For_Call				; Debug Table 0x3.0x27 = 0xae,0xffd8
00b0 029f 069b  |    |		Declare_Subprogram	INIT_0698,For_Call				; Debug Table 0x3.0x28 = 0xb0,0xffd7
00b2 029f 06bb  |    |		Declare_Subprogram	INIT_06b8,For_Call				; Debug Table 0x3.0x29 = 0xb2,0xffd6
00b4 4817       |H   |		Short_Literal	0x17							; Debug Table 0x3.0x2a = 0xb4,0xffd5
00b5 4802       |H   |		Short_Literal	0x2
00b6 0099       |    |		Action	Reference_Dynamic
00b7 00c7       |    |		Action	Elaborate_Subprogram
00b8 029f 06d3  |    |		Declare_Subprogram	INIT_06d0,For_Call				; Debug Table 0x3.0x2b = 0xb8,0xffd4
00ba 029f 06fb  |    |		Declare_Subprogram	INIT_06f8,For_Call				; Debug Table 0x3.0x2c = 0xba,0xffd3
00bc 029f 072b  |   +|		Declare_Subprogram	INIT_0728,For_Call				; Debug Table 0x3.0x2d = 0xbc,0xffd2
00be			BODY_0030:
00be e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x3.0x2e = 0xbe,0x1
00bf 8429       | )  |		Call	0x2,0x29
00c0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00c1 0000 0000  |    |		.BLANK	0000[0x7]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb       |    |		.CONST	0x00cb								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0001       |    |		.CONST	0x0001								; Number of locals
00cb			BODY_00c8:
00cb			INIT_00c8:
00cb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4 = .DEBUG	0x00cb,0x0d7a,0x1002,0x0000,0x0058,0xc985,0x0000,0x0026
													; Debug Table 0x4.0x0 = 0xcb,0x1
00cc e009       |    |		Load	0x0,0x9
00cd 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
00ce 626d       |bm  |		Indirect_Literal	Discrete,0x33c,{0x00000000, 0x7fffffff}
00cf 0a01       |    |		Execute_Immediate	Plus,0x1
00d0 026e       | n  |		Execute	Discrete,Modulo
00d1 0248       | H  |		Execute	Discrete,Check_In_Integer
00d2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d3 0000 0000  |    |		.BLANK	0000[0x5]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db       |    |		.CONST	0x00db								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0001       |    |		.CONST	0x0001								; Number of locals
00db			BODY_00d8:
00db			INIT_00d8:
00db 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x00db,0x0d7e,0x1002,0x0000,0x0058,0xc985,0x0000,0x0048
													; Debug Table 0x5.0x0 = 0xdb,0x1
00dc 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00dd 0000 0000  |    |		.XXX[0x3]
00df 0000       |    |
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00f5       |    |		.CONST	0x00f5								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0004       |    |		.CONST	0x0004								; Number of locals
00e3			INIT_00e0:
00e3 e005       |    |		Load	0x0,0x5								; Debug Table 0x6 = .DEBUG	0x00e3,0x0d82,0x1001,0x0000,0x0058,0xc985,0x0000,0x00ce
													; Debug Table 0x6.0x0 = 0xe3,0xffff
00e4 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
00e5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00e6 02c7       |    |		Declare_Variable	Any
00e7 00d8       |    |		Load_Top	At_Offset_0
00e8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00e9 e005       |    |		Load	0x0,0x5								; Debug Table 0x6.0x1 = 0xe9,0xfffe
00ea 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00eb e005       |    |		Load	0x0,0x5								; Debug Table 0x6.0x2 = 0xeb,0xfffd
00ec 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00ed 02c7       |    |		Declare_Variable	Any
00ee e7ff       |    |		Load	0x3,-0x1
00ef 0217       |    |		Execute	Heap_Access,All_Reference
00f0 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00f1 e005       |    |		Load	0x0,0x5
00f2 1b40       | @  |		Execute	Package,Field_Read,Field_Number 0x40
00f3 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00f4 c604       |    |		Store	0x3,0x4
00f5			BODY_00e0:
00f5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x3 = 0xf5,0x1
00f6 e005       |    |		Load	0x0,0x5
00f7 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00f8 682a       |h*  |		Jump_Zero	0x123
00f9 e005       |    |		Load	0x0,0x5								; Debug Table 0x6.0x4 = 0xf9,0x2
00fa 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00fb 00d9       |    |		Load_Top	At_Offset_1
00fc 0120       |    |		Execute	Any,Is_Value
00fd 6803       |h   |		Jump_Zero	0x101
00fe e005       |    |		Load	0x0,0x5
00ff 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0100 7801       |x   |		Jump	0x102
0101 00d9       |    |		Load_Top	At_Offset_1
0102 6235       |b5  |		Indirect_Literal	Discrete,0x338,{0x00000000, 0x00004000}
0103 e002       |    |		Load	0x0,0x2
0104 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0105 e7ff       |    |		Load	0x3,-0x1
0106 e009       |    |		Load	0x0,0x9
0107 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0108 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0109 e005       |    |		Load	0x0,0x5
010a 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
010b 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
010c c604       |    |		Store	0x3,0x4
010d 005a       | Z  |		Store_Top	Discrete,At_Offset_2
010e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x5 = 0x10e,0x3
010f 680d       |h   |		Jump_Zero	0x11d
0110 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x6.0x6 = 0x110,0x4
0111 0092 0a18  |    |		Action	Push_String_Extended,0xa18					; "Bad status "
0113 00db       |    |		Load_Top	At_Offset_3
0114 e005       |    |		Load	0x0,0x5
0115 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0116 025e       | ^  |		Execute	Discrete,Convert
0117 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0118 01cc       |    |		Execute	Vector,Catenate
0119 0092 0a19  |    |		Action	Push_String_Extended,0xa19					; " getting directory object for archive of unit"
011b 01cc       |    |		Execute	Vector,Catenate
011c 800a       |    |		Call	0x0,0xa
011d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x7 = 0x11d,0x5
011e e005       |    |		Load	0x0,0x5
011f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0120 6802       |h   |		Jump_Zero	0x123
0121 4887       |H   |		Short_Literal	0x87
0122 0257       | W  |		Execute	Discrete,Raise
0123 e005       |    |		Load	0x0,0x5								; Debug Table 0x6.0x8 = 0x123,0x6
0124 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0125 00db       |    |		Load_Top	At_Offset_3
0126 0120       |    |		Execute	Any,Is_Value
0127 6804       |h   |		Jump_Zero	0x12c
0128 e005       |    |		Load	0x0,0x5
0129 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
012a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
012b 7801       |x   |		Jump	0x12d
012c 00db       |    |		Load_Top	At_Offset_3
012d 00da       |    |		Load_Top	At_Offset_2
012e e005       |    |		Load	0x0,0x5
012f 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0130 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0131 c602       |    |		Store	0x3,0x2
0132 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0133 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x9 = 0x133,0x7
0134 680d       |h   |		Jump_Zero	0x142
0135 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x6.0xa = 0x135,0x8
0136 0092 0a18  |    |		Action	Push_String_Extended,0xa18					; "Bad status "
0138 00db       |    |		Load_Top	At_Offset_3
0139 e005       |    |		Load	0x0,0x5
013a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
013b 025e       | ^  |		Execute	Discrete,Convert
013c 1c01       |    |		Execute_Immediate	Run_Utility,0x1
013d 01cc       |    |		Execute	Vector,Catenate
013e 0092 0a1a  |    |		Action	Push_String_Extended,0xa1a					; " getting enclosing world for unit"
0140 01cc       |    |		Execute	Vector,Catenate
0141 800a       |    |		Call	0x0,0xa
0142 e409       |    |		Load	0x2,0x9								; Debug Table 0x6.0xb = 0x142,0x9
0143 e005       |    |		Load	0x0,0x5
0144 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0145 680c       |h   |		Jump_Zero	0x152
0146 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0xc = 0x146,0xa
0147 e005       |    |		Load	0x0,0x5
0148 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0149 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
014a c409       |    |		Store	0x2,0x9
014b e409       |    |		Load	0x2,0x9								; Debug Table 0x6.0xd = 0x14b,0xb
014c e005       |    |		Load	0x0,0x5
014d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
014e 6802       |h   |		Jump_Zero	0x151
014f 4887       |H   |		Short_Literal	0x87
0150 0257       | W  |		Execute	Discrete,Raise
0151 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0152 e409       |    |		Load	0x2,0x9								; Debug Table 0x6.0xe = 0x152,0xc
0153 00db       |    |		Load_Top	At_Offset_3
0154 e005       |    |		Load	0x0,0x5
0155 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0156 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0157 012e       | .  |		Execute	Any,Not_Equal
0158 6803       |h   |		Jump_Zero	0x15c
0159 0092 0a1b  |    |		Action	Push_String_Extended,0xa1b					; "Units being saved are not all in one world"
													; Debug Table 0x6.0xf = 0x159,0xd
015b 800b       |    |		Call	0x0,0xb
015c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
015d 0000 0000  |    |		.XXX[0x3]
015f 0000       |    |
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0169       | i  |		.CONST	0x0169								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0003       |    |		.CONST	0x0003								; Number of locals
0163			INIT_0160:
0163 e003       |    |		Load	0x0,0x3								; Debug Table 0x7 = .DEBUG	0x0163,0x0da4,0x1001,0x0000,0x0058,0xc985,0x0000,0x01a1
													; Debug Table 0x7.0x0 = 0x163,0xffff
0164 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0165 00db       |    |		Load_Top	At_Offset_3
0166 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0167 e009       |    |		Load	0x0,0x9								; Debug Table 0x7.0x1 = 0x167,0xfffe
0168 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0169			BODY_0160:
0169 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x7.0x2 = 0x169,0x1
016a 0217       |    |		Execute	Heap_Access,All_Reference
016b 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
016c e00c       |    |		Load	0x0,0xc
016d 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
016e 6803       |h   |		Jump_Zero	0x172
016f e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x7.0x3 = 0x16f,0x2
0170 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0171 7815       |x   |		Jump	0x187
0172 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x7.0x4 = 0x172,0x3
0173 0217       |    |		Execute	Heap_Access,All_Reference
0174 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0175 800d       |    |		Call	0x0,0xd
0176 e009       |    |		Load	0x0,0x9
0177 1848       | H  |		Execute	Package,Field_Execute,Field_Number 0x48
0178 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0179 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x5 = 0x179,0x4
017a e7ff       |    |		Load	0x3,-0x1
017b 021e       |    |		Execute	Heap_Access,Maximum
017c 680a       |h   |		Jump_Zero	0x187
017d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x6 = 0x17d,0x5
017e e009       |    |		Load	0x0,0x9
017f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0180 021f       |    |		Execute	Heap_Access,Equal
0181 7003       |p   |		Jump_Nonzero	0x185
0182 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x7 = 0x182,0x6
0183 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0184 7802       |x   |		Jump	0x187
0185 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x7.0x8 = 0x185,0x7
0186 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0187 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x9 = 0x187,0x8
0188 00da       |    |		Load_Top	At_Offset_2
0189 021f       |    |		Execute	Heap_Access,Equal
018a 7002       |p   |		Jump_Nonzero	0x18d
018b 4887       |H   |		Short_Literal	0x87
018c 0257       | W  |		Execute	Discrete,Raise
018d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0xa = 0x18d,0x9
018e e009       |    |		Load	0x0,0x9
018f 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0190 7008       |p   |		Jump_Nonzero	0x199
0191 00d8       |    |		Load_Top	At_Offset_0
0192 e009       |    |		Load	0x0,0x9
0193 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0194 7004       |p   |		Jump_Nonzero	0x199
0195 00d8       |    |		Load_Top	At_Offset_0
0196 e009       |    |		Load	0x0,0x9
0197 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0198 6804       |h   |		Jump_Zero	0x19d
0199 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0xb = 0x199,0xa
019a 0092 0a1c  |    |		Action	Push_String_Extended,0xa1c					; "Unit to be saved is a body, subunit, or command unit"
019c 800e       |    |		Call	0x0,0xe
019d e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x7.0xc = 0x19d,0xb
019e 6802       |h   |		Jump_Zero	0x1a1
019f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x7.0xd = 0x19f,0xc
01a0 840c       |    |		Call	0x2,0xc
01a1 e408       |    |		Load	0x2,0x8								; Debug Table 0x7.0xe = 0x1a1,0xd
01a2 0a01       |    |		Execute_Immediate	Plus,0x1
01a3 c408       |    |		Store	0x2,0x8
01a4 e406       |    |		Load	0x2,0x6								; Debug Table 0x7.0xf = 0x1a4,0xe
01a5 4801       |H   |		Short_Literal	0x1
01a6 e408       |    |		Load	0x2,0x8
01a7 00e4       |    |		Load_Encached	Positive_Cache
01a8 025b       | [  |		Execute	Discrete,Check_In_Type
01a9 e602       |    |		Load	0x3,0x2
01aa e403       |    |		Load	0x2,0x3
01ab 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01ac c406       |    |		Store	0x2,0x6
01ad e407       |    |		Load	0x2,0x7								; Debug Table 0x7.0x10 = 0x1ad,0xf
01ae 4801       |H   |		Short_Literal	0x1
01af 00db       |    |		Load_Top	At_Offset_3
01b0 e408       |    |		Load	0x2,0x8
01b1 00e4       |    |		Load_Encached	Positive_Cache
01b2 025b       | [  |		Execute	Discrete,Check_In_Type
01b3 e405       |    |		Load	0x2,0x5
01b4 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01b5 c407       |    |		Store	0x2,0x7
01b6 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01b7 0000       |    |		.XXX[0x1]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb       |    |		.CONST	0x01bb								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0001       |    |		.CONST	0x0001								; Number of locals
01bb			BODY_01b8:
01bb			INIT_01b8:
01bb e217       |    |		Load	0x1,0x17							; Debug Table 0x8 = .DEBUG	0x01bb,0x0dc8,0x1001,0x0000,0x0058,0xc985,0x0000,0x0249
													; Debug Table 0x8.0x0 = 0x1bb,0x1
01bc 4801       |H   |		Short_Literal	0x1
01bd e00f       |    |		Load	0x0,0xf
01be 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
01bf e010       |    |		Load	0x0,0x10
01c0 025b       | [  |		Execute	Discrete,Check_In_Type
01c1 8011       |    |		Call	0x0,0x11
01c2 e009       |    |		Load	0x0,0x9
01c3 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
01c4 0261       | a  |		Execute	Discrete,Not_In_Range
01c5 680a       |h   |		Jump_Zero	0x1d0
01c6 0092 0a1d  |    |		Action	Push_String_Extended,0xa1d					; "Version"
													; Debug Table 0x8.0x1 = 0x1c6,0x2
01c8 e217       |    |		Load	0x1,0x17
01c9 00e0       |    |		Load_Encached	Standard_Cache
01ca 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01cb 01cc       |    |		Execute	Vector,Catenate
01cc 0092 0a1e  |    |		Action	Push_String_Extended,0xa1e					; " is not supported"
01ce 01cc       |    |		Execute	Vector,Catenate
01cf 800b       |    |		Call	0x0,0xb
01d0 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8.0x2 = 0x1d0,0x3
01d1 8012       |    |		Call	0x0,0x12
01d2 e405       |    |		Load	0x2,0x5								; Debug Table 0x8.0x3 = 0x1d2,0x4
01d3 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
01d4 4865       |He  |		Short_Literal	0x65
01d5 e405       |    |		Load	0x2,0x5
01d6 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
01d7 c407       |    |		Store	0x2,0x7
01d8 e403       |    |		Load	0x2,0x3								; Debug Table 0x8.0x4 = 0x1d8,0x5
01d9 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
01da 4865       |He  |		Short_Literal	0x65
01db e403       |    |		Load	0x2,0x3
01dc 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
01dd c406       |    |		Store	0x2,0x6
01de e40a       |    |		Load	0x2,0xa								; Debug Table 0x8.0x5 = 0x1de,0x6
01df 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
01e0 e40a       |    |		Load	0x2,0xa
01e1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01e2 c40b       |    |		Store	0x2,0xb
01e3 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01e4 0000 0000  |    |		.BLANK	0000[0x4]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb       |    |		.CONST	0x01eb								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0001       |    |		.CONST	0x0001								; Number of locals
01eb			BODY_01e8:
01eb			INIT_01e8:
01eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9 = .DEBUG	0x01eb,0x0dd6,0x1001,0x0000,0x0058,0xc985,0x0000,0x028d
													; Debug Table 0x9.0x0 = 0x1eb,0x1
01ec e006       |    |		Load	0x0,0x6
01ed 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01ee 025b       | [  |		Execute	Discrete,Check_In_Type
01ef 8210       |    |		Call	0x1,0x10
01f0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01f1 0000 0000  |    |		.BLANK	0000[0x7]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb       |    |		.CONST	0x01fb								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0001       |    |		.CONST	0x0001								; Number of locals
01fb			BODY_01f8:
01fb			INIT_01f8:
01fb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa = .DEBUG	0x01fb,0x0dda,0x1001,0x0000,0x0058,0xc985,0x0000,0x02aa
													; Debug Table 0xa.0x0 = 0x1fb,0x1
01fc e006       |    |		Load	0x0,0x6
01fd 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01fe 025b       | [  |		Execute	Discrete,Check_In_Type
01ff 8210       |    |		Call	0x1,0x10
0200 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0201 0000 0000  |    |		.BLANK	0000[0x7]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b       |    |		.CONST	0x020b								; Address of begin
0209 0004       |    |		.CONST	0x0004								; Address of exception handler
020a 0001       |    |		.CONST	0x0001								; Number of locals
020b			BODY_0208:
020b			INIT_0208:
020b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x020b,0x0dde,0x1001,0x0000,0x0058,0xc985,0x0000,0x02c7
													; Debug Table 0xb.0x0 = 0x20b,0x1
020c 6808       |h   |		Jump_Zero	0x215
020d 4801       |H   |		Short_Literal	0x1							; Debug Table 0xb.0x1 = 0x20d,0x2
020e 820f       |    |		Call	0x1,0xf
020f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x2 = 0x20f,0x3
0210 0217       |    |		Execute	Heap_Access,All_Reference
0211 e013       |    |		Load	0x0,0x13
0212 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0213 8214       |    |		Call	0x1,0x14
0214 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0215 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x3 = 0x215,0x4
0216 820f       |    |		Call	0x1,0xf
0217 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0220       |    |		.CONST	0x0220								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0002       |    |		.CONST	0x0002								; Number of locals
021b			INIT_0218:
021b 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc = .DEBUG	0x021b,0x0de8,0x1001,0x0000,0x0058,0xc985,0x0000,0x02f3
													; Debug Table 0xc.0x0 = 0x21b,0xffff
021c 00db       |    |		Load_Top	At_Offset_3
021d 8014       |    |		Call	0x0,0x14
021e 00e2       |    |		Load_Encached	Integer_Cache
021f 03f1       |    |		Declare_Variable	Discrete,With_Value
0220			BODY_0218:
0220 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x1 = 0x220,0x1
0221 0e09       |    |		Execute_Immediate	Not_Equal,0x9
0222 6809       |h   |		Jump_Zero	0x22c
0223 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0x2 = 0x223,0x2
0224 0c0a       |    |		Execute_Immediate	Greater_Equal,0xa
0225 7002       |p   |		Jump_Nonzero	0x228
0226 4887       |H   |		Short_Literal	0x87
0227 0257       | W  |		Execute	Discrete,Raise
0228 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xc.0x3 = 0x228,0x3
0229 0092 0a1f  |    |		Action	Push_String_Extended,0xa1f					; "Unit to be saved (or unit referenced by a saved unit) was not coded with a Delta1-compatible code generator"
022b 800e       |    |		Call	0x0,0xe
022c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
022d 0000 0000  |    |		.XXX[0x3]
022f 0000       |    |
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0237       | 7  |		.CONST	0x0237								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 0003       |    |		.CONST	0x0003								; Number of locals
0233			INIT_0230:
0233 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xd = .DEBUG	0x0233,0x0df2,0x1001,0x0000,0x0058,0xc985,0x0000,0x0324
													; Debug Table 0xd.0x0 = 0x233,0xffff
0234 6107       |a   |		Indirect_Literal	Discrete,0x33c,{0x00000000, 0x7fffffff}		; Debug Table 0xd.0x1 = 0x234,0xfffe
0235 00e3       |    |		Load_Encached	Natural_Cache
0236 03f1       |    |		Declare_Variable	Discrete,With_Value
0237			BODY_0230:
0237 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xd.0x2 = 0x237,0x1
0238 00d9       |    |		Load_Top	At_Offset_1
0239 e403       |    |		Load	0x2,0x3
023a 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
023b 025e       | ^  |		Execute	Discrete,Convert
023c e7ff       |    |		Load	0x3,-0x1
023d e406       |    |		Load	0x2,0x6
023e e403       |    |		Load	0x2,0x3
023f 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0240 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0241 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0242 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x3 = 0x242,0x2
0243 7002       |p   |		Jump_Nonzero	0x246
0244 e7ff       |    |		Load	0x3,-0x1
0245 7009       |p   |		Jump_Nonzero	0x24f
0246 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0xd.0x4 = 0x246,0x3
0247 7002       |p   |		Jump_Nonzero	0x24a
0248 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x5 = 0x248,0x4
0249 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
024a 4801       |H   |		Short_Literal	0x1							; Debug Table 0xd.0x6 = 0x24a,0x5
024b 820f       |    |		Call	0x1,0xf
024c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x7 = 0x24c,0x6
024d 8211       |    |		Call	0x1,0x11
024e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
024f e7ff       |    |		Load	0x3,-0x1							; Debug Table 0xd.0x8 = 0x24f,0x7
0250 0217       |    |		Execute	Heap_Access,All_Reference
0251 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0252 7010       |p   |		Jump_Nonzero	0x263
0253 4800       |H   |		Short_Literal	0x0
0254 e7ff       |    |		Load	0x3,-0x1
0255 8015       |    |		Call	0x0,0x15
0256 700c       |p   |		Jump_Nonzero	0x263
0257 4801       |H   |		Short_Literal	0x1
0258 e7ff       |    |		Load	0x3,-0x1
0259 8016       |    |		Call	0x0,0x16
025a 0217       |    |		Execute	Heap_Access,All_Reference
025b 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
025c 6806       |h   |		Jump_Zero	0x263
025d 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0x9 = 0x25d,0x8
025e e7ff       |    |		Load	0x3,-0x1
025f 840d       |    |		Call	0x2,0xd
0260 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0xd.0xa = 0x260,0x9
0261 8413       |    |		Call	0x2,0x13
0262 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0xd.0xb = 0x262,0xa
0263 4800       |H   |		Short_Literal	0x0							; Debug Table 0xd.0xc = 0x263,0xb
0264 820f       |    |		Call	0x1,0xf
0265 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0xd.0xd = 0x265,0xc
0266 0217       |    |		Execute	Heap_Access,All_Reference
0267 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0268 e00c       |    |		Load	0x0,0xc
0269 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
026a 700b       |p   |		Jump_Nonzero	0x276
026b e7ff       |    |		Load	0x3,-0x1							; Debug Table 0xd.0xe = 0x26b,0xd
026c 0217       |    |		Execute	Heap_Access,All_Reference
026d 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
026e e005       |    |		Load	0x0,0x5
026f 1b40       | @  |		Execute	Package,Field_Read,Field_Number 0x40
0270 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0271 e005       |    |		Load	0x0,0x5
0272 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0273 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0274 8215       |    |		Call	0x1,0x15
0275 7805       |x   |		Jump	0x27b
0276 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0xd.0xf = 0x276,0xe
0277 0217       |    |		Execute	Heap_Access,All_Reference
0278 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0279 0217       |    |		Execute	Heap_Access,All_Reference
027a 8215       |    |		Call	0x1,0x15
027b e7ff       |    |		Load	0x3,-0x1							; Debug Table 0xd.0x10 = 0x27b,0xf
027c 0217       |    |		Execute	Heap_Access,All_Reference
027d 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
027e 8411       |    |		Call	0x2,0x11
027f e7ff       |    |		Load	0x3,-0x1							; Debug Table 0xd.0x11 = 0x27f,0x10
0280 8412       |    |		Call	0x2,0x12
0281 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0282 0000 0000  |    |		.BLANK	0000[0x6]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028e       |    |		.CONST	0x028e								; Address of begin
0289 0004       |    |		.CONST	0x0004								; Address of exception handler
028a 0002       |    |		.CONST	0x0002								; Number of locals
028b			INIT_0288:
028b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe = .DEBUG	0x028b,0x0e18,0x1001,0x0000,0x0058,0xc985,0x0000,0x03cc
													; Debug Table 0xe.0x0 = 0x28b,0xffff
028c 0217       |    |		Execute	Heap_Access,All_Reference
028d 0007       |    |		Action	Break_Optional
028e			BODY_0288:
028e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x1 = 0x28e,0x1
028f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0290 8410       |    |		Call	0x2,0x10
0291 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x2 = 0x291,0x2
0292 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0293 8413       |    |		Call	0x2,0x13
0294 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xe.0x3 = 0x294,0x3
0295 0217       |    |		Execute	Heap_Access,All_Reference
0296 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0297 8212       |    |		Call	0x1,0x12
0298 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0299 0000 0000  |    |		.BLANK	0000[0x7]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3       |    |		.CONST	0x02a3								; Address of begin
02a1 0004       |    |		.CONST	0x0004								; Address of exception handler
02a2 0001       |    |		.CONST	0x0001								; Number of locals
02a3			BODY_02a0:
02a3			INIT_02a0:
02a3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xf = .DEBUG	0x02a3,0x0e22,0x1001,0x0000,0x0058,0xc985,0x0000,0x03f4
													; Debug Table 0xf.0x0 = 0x2a3,0x1
02a4 680b       |h   |		Jump_Zero	0x2b0
02a5 4801       |H   |		Short_Literal	0x1							; Debug Table 0xf.0x1 = 0x2a5,0x2
02a6 00db       |    |		Load_Top	At_Offset_3
02a7 0217       |    |		Execute	Heap_Access,All_Reference
02a8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02a9 8415       |    |		Call	0x2,0x15
02aa 4801       |H   |		Short_Literal	0x1							; Debug Table 0xf.0x2 = 0x2aa,0x3
02ab 820f       |    |		Call	0x1,0xf
02ac 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xf.0x3 = 0x2ac,0x4
02ad 0217       |    |		Execute	Heap_Access,All_Reference
02ae 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02af 8414       |    |		Call	0x2,0x14
02b0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xf.0x4 = 0x2b0,0x5
02b1 7002       |p   |		Jump_Nonzero	0x2b4
02b2 4800       |H   |		Short_Literal	0x0							; Debug Table 0xf.0x5 = 0x2b2,0x6
02b3 820f       |    |		Call	0x1,0xf
02b4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02b5 0000 0000  |    |		.XXX[0x3]
02b7 0000       |    |
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb       |    |		.CONST	0x02bb								; Address of begin
02b9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ba 0001       |    |		.CONST	0x0001								; Number of locals
02bb			BODY_02b8:
02bb			INIT_02b8:
02bb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10 = .DEBUG	0x02bb,0x0e30,0x1001,0x0000,0x0058,0xc985,0x0000,0x042f
													; Debug Table 0x10.0x0 = 0x2bb,0x1
02bc 680b       |h   |		Jump_Zero	0x2c8
02bd 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x1 = 0x2bd,0x2
02be 00db       |    |		Load_Top	At_Offset_3
02bf 0217       |    |		Execute	Heap_Access,All_Reference
02c0 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02c1 8416       |    |		Call	0x2,0x16
02c2 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x2 = 0x2c2,0x3
02c3 820f       |    |		Call	0x1,0xf
02c4 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10.0x3 = 0x2c4,0x4
02c5 0217       |    |		Execute	Heap_Access,All_Reference
02c6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02c7 8413       |    |		Call	0x2,0x13
02c8 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x10.0x4 = 0x2c8,0x5
02c9 7002       |p   |		Jump_Nonzero	0x2cc
02ca 4800       |H   |		Short_Literal	0x0							; Debug Table 0x10.0x5 = 0x2ca,0x6
02cb 820f       |    |		Call	0x1,0xf
02cc 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02cd 0000 0000  |    |		.XXX[0x3]
02cf 0000       |    |
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d8       |    |		.CONST	0x02d8								; Address of begin
02d1 0004       |    |		.CONST	0x0004								; Address of exception handler
02d2 0002       |    |		.CONST	0x0002								; Number of locals
02d3			INIT_02d0:
02d3 e017       |    |		Load	0x0,0x17							; Debug Table 0x11 = .DEBUG	0x02d3,0x0e3e,0x1001,0x0000,0x0058,0xc985,0x0000,0x046a
													; Debug Table 0x11.0x0 = 0x2d3,0xffff
02d4 4801       |H   |		Short_Literal	0x1
02d5 e7ff       |    |		Load	0x3,-0x1
02d6 8016       |    |		Call	0x0,0x16
02d7 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
02d8			BODY_02d0:
02d8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x1 = 0x2d8,0x1
02d9 0217       |    |		Execute	Heap_Access,All_Reference
02da 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
02db 0217       |    |		Execute	Heap_Access,All_Reference
02dc 8213       |    |		Call	0x1,0x13
02dd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x2 = 0x2dd,0x2
02de 0217       |    |		Execute	Heap_Access,All_Reference
02df 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
02e0 840f       |    |		Call	0x2,0xf
02e1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x3 = 0x2e1,0x3
02e2 0217       |    |		Execute	Heap_Access,All_Reference
02e3 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
02e4 840f       |    |		Call	0x2,0xf
02e5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x4 = 0x2e5,0x4
02e6 0217       |    |		Execute	Heap_Access,All_Reference
02e7 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
02e8 840f       |    |		Call	0x2,0xf
02e9 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x5 = 0x2e9,0x5
02ea e41c       |    |		Load	0x2,0x1c
02eb 4800       |H   |		Short_Literal	0x0
02ec 00db       |    |		Load_Top	At_Offset_3
02ed 0217       |    |		Execute	Heap_Access,All_Reference
02ee 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
02ef 841e       |    |		Call	0x2,0x1e
02f0 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x6 = 0x2f0,0x6
02f1 00d9       |    |		Load_Top	At_Offset_1
02f2 0217       |    |		Execute	Heap_Access,All_Reference
02f3 3c09       |<   |		Execute	Record,Field_Read,Field_Number 0x9
02f4 8416       |    |		Call	0x2,0x16
02f5 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x7 = 0x2f5,0x7
02f6 00d9       |    |		Load_Top	At_Offset_1
02f7 0217       |    |		Execute	Heap_Access,All_Reference
02f8 3c0a       |<   |		Execute	Record,Field_Read,Field_Number 0xa
02f9 8416       |    |		Call	0x2,0x16
02fa 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x8 = 0x2fa,0x8
02fb 00d9       |    |		Load_Top	At_Offset_1
02fc 0217       |    |		Execute	Heap_Access,All_Reference
02fd 3c0b       |<   |		Execute	Record,Field_Read,Field_Number 0xb
02fe 8415       |    |		Call	0x2,0x15
02ff 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x9 = 0x2ff,0x9
0300 0217       |    |		Execute	Heap_Access,All_Reference
0301 3c0c       |<   |		Execute	Record,Field_Read,Field_Number 0xc
0302 820f       |    |		Call	0x1,0xf
0303 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0xa = 0x303,0xa
0304 0217       |    |		Execute	Heap_Access,All_Reference
0305 3c0d       |<   |		Execute	Record,Field_Read,Field_Number 0xd
0306 820f       |    |		Call	0x1,0xf
0307 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0xb = 0x307,0xb
0308 0217       |    |		Execute	Heap_Access,All_Reference
0309 3c0e       |<   |		Execute	Record,Field_Read,Field_Number 0xe
030a 8211       |    |		Call	0x1,0x11
030b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0xc = 0x30b,0xc
030c 0217       |    |		Execute	Heap_Access,All_Reference
030d 3c0f       |<   |		Execute	Record,Field_Read,Field_Number 0xf
030e 8211       |    |		Call	0x1,0x11
030f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0xd = 0x30f,0xd
0310 0217       |    |		Execute	Heap_Access,All_Reference
0311 3c10       |<   |		Execute	Record,Field_Read,Field_Number 0x10
0312 820f       |    |		Call	0x1,0xf
0313 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0xe = 0x313,0xe
0314 0217       |    |		Execute	Heap_Access,All_Reference
0315 3c10       |<   |		Execute	Record,Field_Read,Field_Number 0x10
0316 6807       |h   |		Jump_Zero	0x31e
0317 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0xf = 0x317,0xf
0318 e7ff       |    |		Load	0x3,-0x1
0319 8423       | #  |		Call	0x2,0x23
031a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x10 = 0x31a,0x10
031b 0217       |    |		Execute	Heap_Access,All_Reference
031c 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
031d 8426       | &  |		Call	0x2,0x26
031e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x11 = 0x31e,0x11
031f 0217       |    |		Execute	Heap_Access,All_Reference
0320 3c11       |<   |		Execute	Record,Field_Read,Field_Number 0x11
0321 820f       |    |		Call	0x1,0xf
0322 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x12 = 0x322,0x12
0323 0217       |    |		Execute	Heap_Access,All_Reference
0324 3c14       |<   |		Execute	Record,Field_Read,Field_Number 0x14
0325 8211       |    |		Call	0x1,0x11
0326 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x13 = 0x326,0x13
0327 0217       |    |		Execute	Heap_Access,All_Reference
0328 3c15       |<   |		Execute	Record,Field_Read,Field_Number 0x15
0329 8211       |    |		Call	0x1,0x11
032a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x14 = 0x32a,0x14
032b 0217       |    |		Execute	Heap_Access,All_Reference
032c 3c16       |<   |		Execute	Record,Field_Read,Field_Number 0x16
032d 8211       |    |		Call	0x1,0x11
032e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x15 = 0x32e,0x15
032f 0217       |    |		Execute	Heap_Access,All_Reference
0330 3c17       |<   |		Execute	Record,Field_Read,Field_Number 0x17
0331 8211       |    |		Call	0x1,0x11
0332 4800       |H   |		Short_Literal	0x0							; Debug Table 0x11.0x16 = 0x332,0x16
0333 00d9       |    |		Load_Top	At_Offset_1
0334 0217       |    |		Execute	Heap_Access,All_Reference
0335 3c08       |<   |		Execute	Record,Field_Read,Field_Number 0x8
0336 8418       |    |		Call	0x2,0x18
0337 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0338 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
033c 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
0340 0000 0000  |    |		.LITERAL	{0x00000000, 0x000004f3}
0344 0000 0000  |    |		.LITERAL	{0x00000000, 0x0058c985}
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 034b       | K  |		.CONST	0x034b								; Address of begin
0349 0004       |    |		.CONST	0x0004								; Address of exception handler
034a 0001       |    |		.CONST	0x0001								; Number of locals
034b			BODY_0348:
034b			INIT_0348:
034b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12 = .DEBUG	0x034b,0x0e6e,0x1001,0x0000,0x0058,0xc985,0x0000,0x0474
													; Debug Table 0x12.0x0 = 0x34b,0x1
034c 680b       |h   |		Jump_Zero	0x358
034d 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12.0x1 = 0x34d,0x2
034e 00db       |    |		Load_Top	At_Offset_3
034f 0217       |    |		Execute	Heap_Access,All_Reference
0350 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0351 8418       |    |		Call	0x2,0x18
0352 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12.0x2 = 0x352,0x3
0353 820f       |    |		Call	0x1,0xf
0354 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x12.0x3 = 0x354,0x4
0355 0217       |    |		Execute	Heap_Access,All_Reference
0356 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0357 8417       |    |		Call	0x2,0x17
0358 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x4 = 0x358,0x5
0359 7002       |p   |		Jump_Nonzero	0x35c
035a 4800       |H   |		Short_Literal	0x0							; Debug Table 0x12.0x5 = 0x35a,0x6
035b 820f       |    |		Call	0x1,0xf
035c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
035d 0000 0000  |    |		.XXX[0x3]
035f 0000       |    |
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0363       | c  |		.CONST	0x0363								; Address of begin
0361 0004       |    |		.CONST	0x0004								; Address of exception handler
0362 0001       |    |		.CONST	0x0001								; Number of locals
0363			BODY_0360:
0363			INIT_0360:
0363 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x13 = .DEBUG	0x0363,0x0e7c,0x1002,0x0000,0x0058,0xc985,0x0000,0x04af
													; Debug Table 0x13.0x0 = 0x363,0x1
0364 6806       |h   |		Jump_Zero	0x36b
0365 00da       |    |		Load_Top	At_Offset_2
0366 e40b       |    |		Load	0x2,0xb
0367 e40a       |    |		Load	0x2,0xa
0368 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0369 0f00       |    |		Execute_Immediate	Equal,0x0
036a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
036b 4800       |H   |		Short_Literal	0x0
036c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
036d 0000 0000  |    |		.XXX[0x3]
036f 0000       |    |
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 0373       | s  |		.CONST	0x0373								; Address of begin
0371 0004       |    |		.CONST	0x0004								; Address of exception handler
0372 0001       |    |		.CONST	0x0001								; Number of locals
0373			BODY_0370:
0373			INIT_0370:
0373 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14 = .DEBUG	0x0373,0x0e80,0x1002,0x0000,0x0058,0xc985,0x0000,0x04d3
													; Debug Table 0x14.0x0 = 0x373,0x1
0374 4802       |H   |		Short_Literal	0x2
0375 481f       |H   |		Short_Literal	0x1f
0376 026d       | m  |		Execute	Discrete,Exponentiate
0377 026e       | n  |		Execute	Discrete,Modulo
0378 0248       | H  |		Execute	Discrete,Check_In_Integer
0379 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
037a 0000 0000  |    |		.BLANK	0000[0x6]
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 03a2       |    |		.CONST	0x03a2								; Address of begin
0381 0004       |    |		.CONST	0x0004								; Address of exception handler
0382 000d       |    |		.CONST	0x000d								; Number of locals
0383			INIT_0380:
0383 0007       |    |		Action	Break_Optional							; Debug Table 0x15 = .DEBUG	0x0383,0x0e84,0x1001,0x0000,0x0058,0xc985,0x0000,0x0510
													; Debug Table 0x15.0x0 = 0x383,0xffff
0384 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15.0x1 = 0x384,0xfffe
0385 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0386 e006       |    |		Load	0x0,0x6
0387 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0388 03f1       |    |		Declare_Variable	Discrete,With_Value
0389 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x15.0x2 = 0x389,0xfffd
038a 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
038b 02fd       |    |		Declare_Variable	Variant_Record,Duplicate
038c 00d0       |    |		Action	Swap_Control
038d 00d1       |    |		Pop_Control	Pop_Count_1
038e e018       |    |		Load	0x0,0x18							; Debug Table 0x15.0x3 = 0x38e,0xfffc
038f 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0390 02c7       |    |		Declare_Variable	Any
0391 00d8       |    |		Load_Top	At_Offset_0
0392 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0393 e018       |    |		Load	0x0,0x18							; Debug Table 0x15.0x4 = 0x393,0xfffb
0394 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0395 e019       |    |		Load	0x0,0x19							; Debug Table 0x15.0x5 = 0x395,0xfffa
0396 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0397 00e5       |    |		Load_Encached	Long_Integer_Cache					; Debug Table 0x15.0x6 = 0x397,0xfff9
0398 e018       |    |		Load	0x0,0x18							; Debug Table 0x15.0x7 = 0x398,0xfff8
0399 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
039a 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x15.0x8 = 0x39a,0xfff7
039b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x15.0x9 = 0x39b,0xfff6
039c 029f 0773  |   s|		Declare_Subprogram	INIT_0770,For_Call				; Debug Table 0x15.0xa = 0x39c,0xfff5
039e 029f 078b  |    |		Declare_Subprogram	INIT_0788,For_Call				; Debug Table 0x15.0xb = 0x39e,0xfff4
03a0 029f 07a3  |    |		Declare_Subprogram	INIT_07a0,For_Call				; Debug Table 0x15.0xc = 0x3a0,0xfff3
03a2			BODY_0380:
03a2 00be       |    |		Action	Activate_Tasks
03a3 e602       |    |		Load	0x3,0x2								; Debug Table 0x15.0xd = 0x3a3,0x1
03a4 8419       |    |		Call	0x2,0x19
03a5 7005       |p   |		Jump_Nonzero	0x3ab
03a6 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x15.0xe = 0x3a6,0x2
03a7 7002       |p   |		Jump_Nonzero	0x3aa
03a8 e602       |    |		Load	0x3,0x2								; Debug Table 0x15.0xf = 0x3a8,0x3
03a9 8212       |    |		Call	0x1,0x12
03aa 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0x15.0x10 = 0x3aa,0x4
03ab e019       |    |		Load	0x0,0x19							; Debug Table 0x15.0x11 = 0x3ab,0x5
03ac 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03ad e604       |    |		Load	0x3,0x4
03ae 0120       |    |		Execute	Any,Is_Value
03af 6803       |h   |		Jump_Zero	0x3b3
03b0 e018       |    |		Load	0x0,0x18
03b1 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
03b2 7801       |x   |		Jump	0x3b4
03b3 e604       |    |		Load	0x3,0x4
03b4 e01a       |    |		Load	0x0,0x1a
03b5 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03b6 e01a       |    |		Load	0x0,0x1a
03b7 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
03b8 4800       |H   |		Short_Literal	0x0
03b9 e018       |    |		Load	0x0,0x18
03ba 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
03bb e01b       |    |		Load	0x0,0x1b
03bc 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
03bd 4801       |H   |		Short_Literal	0x1
03be e603       |    |		Load	0x3,0x3
03bf e018       |    |		Load	0x0,0x18
03c0 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
03c1 c604       |    |		Store	0x3,0x4
03c2 c606       |    |		Store	0x3,0x6
03c3 0092 0a20  |    |		Action	Push_String_Extended,0xa20					; "opening code segment to read"
													; Debug Table 0x15.0x12 = 0x3c3,0x6
03c5 860b       |    |		Call	0x3,0xb
03c6 e018       |    |		Load	0x0,0x18							; Debug Table 0x15.0x13 = 0x3c6,0x7
03c7 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
03c8 4806       |H   |		Short_Literal	0x6
03c9 860c       |    |		Call	0x3,0xc
03ca c605       |    |		Store	0x3,0x5
03cb e605       |    |		Load	0x3,0x5								; Debug Table 0x15.0x14 = 0x3cb,0x8
03cc 6802       |h   |		Jump_Zero	0x3cf
03cd e605       |    |		Load	0x3,0x5								; Debug Table 0x15.0x15 = 0x3cd,0x9
03ce 860d       |    |		Call	0x3,0xd
03cf e602       |    |		Load	0x3,0x2								; Debug Table 0x15.0x16 = 0x3cf,0xa
03d0 8212       |    |		Call	0x1,0x12
03d1 e40b       |    |		Load	0x2,0xb								; Debug Table 0x15.0x17 = 0x3d1,0xb
03d2 e602       |    |		Load	0x3,0x2
03d3 e40a       |    |		Load	0x2,0xa
03d4 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
03d5 c40b       |    |		Store	0x2,0xb
03d6 e018       |    |		Load	0x0,0x18							; Debug Table 0x15.0x18 = 0x3d6,0xc
03d7 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
03d8 4803       |H   |		Short_Literal	0x3
03d9 860c       |    |		Call	0x3,0xc
03da c605       |    |		Store	0x3,0x5
03db e605       |    |		Load	0x3,0x5								; Debug Table 0x15.0x19 = 0x3db,0xd
03dc 0e00       |    |		Execute_Immediate	Not_Equal,0x0
03dd a609       |    |		Store_Unchecked	0x3,0x9
03de e609       |    |		Load	0x3,0x9								; Debug Table 0x15.0x1a = 0x3de,0xe
03df 6805       |h   |		Jump_Zero	0x3e5
03e0 4828       |H(  |		Short_Literal	0x28
03e1 e01c       |    |		Load	0x0,0x1c
03e2 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
03e3 0f00       |    |		Execute_Immediate	Equal,0x0
03e4 7801       |x   |		Jump	0x3e6
03e5 4800       |H   |		Short_Literal	0x0
03e6 a60a       |    |		Store_Unchecked	0x3,0xa
03e7 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x15.0x1b = 0x3e7,0xf
03e8 7017       |p   |		Jump_Nonzero	0x400
03e9 e604       |    |		Load	0x3,0x4								; Debug Table 0x15.0x1c = 0x3e9,0x10
03ea e018       |    |		Load	0x0,0x18
03eb 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
03ec a607       |    |		Store_Unchecked	0x3,0x7
03ed e607       |    |		Load	0x3,0x7								; Debug Table 0x15.0x1d = 0x3ed,0x11
03ee e018       |    |		Load	0x0,0x18
03ef 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
03f0 012c       | ,  |		Execute	Any,Size
03f1 026e       | n  |		Execute	Discrete,Modulo
03f2 6802       |h   |		Jump_Zero	0x3f5
03f3 4887       |H   |		Short_Literal	0x87
03f4 0257       | W  |		Execute	Discrete,Raise
03f5 e607       |    |		Load	0x3,0x7								; Debug Table 0x15.0x1e = 0x3f5,0x12
03f6 e018       |    |		Load	0x0,0x18
03f7 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
03f8 012c       | ,  |		Execute	Any,Size
03f9 0270       | p  |		Execute	Discrete,Divide
03fa 0aff       |    |		Execute_Immediate	Plus,-0x1
03fb e01d       |    |		Load	0x0,0x1d
03fc 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
03fd 025b       | [  |		Execute	Discrete,Check_In_Type
03fe a608       |    |		Store_Unchecked	0x3,0x8
03ff 7806       |x   |		Jump	0x406
0400 e605       |    |		Load	0x3,0x5								; Debug Table 0x15.0x1f = 0x400,0x13
0401 0a05       |    |		Execute_Immediate	Plus,0x5
0402 e01d       |    |		Load	0x0,0x1d
0403 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0404 025b       | [  |		Execute	Discrete,Check_In_Type
0405 a608       |    |		Store_Unchecked	0x3,0x8
0406 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x15.0x20 = 0x406,0x14
0407 4800       |H   |		Short_Literal	0x0							; Debug Table 0x15.0x21 = 0x407,0xfbff
0408 e608       |    |		Load	0x3,0x8
0409 0901       |    |		Execute_Immediate	Binary_Scale,0x1
040a 0a01       |    |		Execute_Immediate	Plus,0x1
040b 0248       | H  |		Execute	Discrete,Check_In_Integer
040c e006       |    |		Load	0x0,0x6
040d 1b12       |    |		Execute	Package,Field_Read,Field_Number 0x12
040e 0334       | 4  |		Declare_Variable	Array,With_Constraint
040f 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x15.0x22 = 0x40f,0xfbfe
0410 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0411 029f 0863  |   c|		Declare_Subprogram	INIT_0860,For_Call				; Debug Table 0x15.0x23 = 0x411,0xfbfd
0413 00cf       |    |		Action	Mark_Auxiliary
0414 e608       |    |		Load	0x3,0x8								; Debug Table 0x15.0x24 = 0x414,0x401
0415 4800       |H   |		Short_Literal	0x0
0416 0263       | c  |		Execute	Discrete,Above_Bound
0417 7008       |p   |		Jump_Nonzero	0x420
0418 e018       |    |		Load	0x0,0x18							; Debug Table 0x15.0x25 = 0x418,0x402
0419 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
041a 00d9       |    |		Load_Top	At_Offset_1
041b 860c       |    |		Call	0x3,0xc
041c c605       |    |		Store	0x3,0x5
041d 8611       |    |		Call	0x3,0x11							; Debug Table 0x15.0x26 = 0x41d,0x403
041e 00c8       |    |		Action	Pop_Auxiliary_Range
041f 3ff8       |?   |		Loop_Increasing	0x418
0420 00ce       |    |		Action	Pop_Auxiliary
0421 e60a       |    |		Load	0x3,0xa								; Debug Table 0x15.0x27 = 0x421,0x404
0422 6806       |h   |		Jump_Zero	0x429
0423 4800       |H   |		Short_Literal	0x0							; Debug Table 0x15.0x28 = 0x423,0x405
0424 a605       |    |		Store_Unchecked	0x3,0x5
0425 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x15.0x29 = 0x425,0x406
0426 0afe       |    |		Execute_Immediate	Plus,-0x2
0427 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0428 8611       |    |		Call	0x3,0x11							; Debug Table 0x15.0x2a = 0x428,0x407
0429 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15.0x2b = 0x429,0x408
042a 8214       |    |		Call	0x1,0x14
042b 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
042c 0000 0000  |    |		.BLANK	0000[0x4]
0430 ; --------------------------------------------------------------------------------------
0430 ; SUBPROGRAM
0430 ; --------------------------------------------------------------------------------------
0430 0442       | B  |		.CONST	0x0442								; Address of begin
0431 0004       |    |		.CONST	0x0004								; Address of exception handler
0432 0004       |    |		.CONST	0x0004								; Number of locals
0433			INIT_0430:
0433 e008       |    |		Load	0x0,0x8								; Debug Table 0x16 = .DEBUG	0x0433,0x0ede,0x1001,0x0000,0x0058,0xc985,0x0000,0x0542
													; Debug Table 0x16.0x0 = 0x433,0xffff
0434 0322       | "  |		Declare_Variable	Record
0435 00d8       |    |		Load_Top	At_Offset_0
0436 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0437 4801       |H   |		Short_Literal	0x1
0438 e7ff       |    |		Load	0x3,-0x1
0439 8016       |    |		Call	0x0,0x16
043a 0217       |    |		Execute	Heap_Access,All_Reference
043b 3407       |4   |		Execute	Record,Field_Reference,Field_Number 0x7
043c 00d9       |    |		Load_Top	At_Offset_1
043d 017d       | }  |		Execute	Record,Structure_Write
043e e003       |    |		Load	0x0,0x3								; Debug Table 0x16.0x1 = 0x43e,0xfffe
043f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0440 e003       |    |		Load	0x0,0x3								; Debug Table 0x16.0x2 = 0x440,0xfffd
0441 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0442			BODY_0430:
0442 4800       |H   |		Short_Literal	0x0							; Debug Table 0x16.0x3 = 0x442,0x1
0443 e41c       |    |		Load	0x2,0x1c
0444 4801       |H   |		Short_Literal	0x1
0445 e602       |    |		Load	0x3,0x2
0446 841e       |    |		Call	0x2,0x1e
0447 e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x16.0x4 = 0x447,0x2
0448 700d       |p   |		Jump_Nonzero	0x456
0449 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x16.0x5 = 0x449,0x3
044a e009       |    |		Load	0x0,0x9
044b 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
044c 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
044d e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x16.0x6 = 0x44d,0x4
044e 00da       |    |		Load_Top	At_Offset_2
044f 021f       |    |		Execute	Heap_Access,Equal
0450 7005       |p   |		Jump_Nonzero	0x456
0451 00d9       |    |		Load_Top	At_Offset_1
0452 6803       |h   |		Jump_Zero	0x456
0453 4800       |H   |		Short_Literal	0x0							; Debug Table 0x16.0x7 = 0x453,0x5
0454 00da       |    |		Load_Top	At_Offset_2
0455 841f       |    |		Call	0x2,0x1f
0456 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x16.0x8 = 0x456,0x6
0457 e009       |    |		Load	0x0,0x9
0458 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0459 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
045a 00cf       |    |		Action	Mark_Auxiliary
045b 780a       |x   |		Jump	0x466
045c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x16.0x9 = 0x45c,0x8
045d 00da       |    |		Load_Top	At_Offset_2
045e 0217       |    |		Execute	Heap_Access,All_Reference
045f 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0460 841f       |    |		Call	0x2,0x1f
0461 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0xa = 0x461,0x9
0462 0217       |    |		Execute	Heap_Access,All_Reference
0463 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0464 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0465 00c9       |    |		Action	Pop_Auxiliary_Loop
0466 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0xb = 0x466,0x7
0467 77f4       |w   |		Jump_Nonzero	0x45c
0468 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0469 0000 0000  |    |		.BLANK	0000[0x7]
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0498       |    |		.CONST	0x0498								; Address of begin
0471 0004       |    |		.CONST	0x0004								; Address of exception handler
0472 0007       |    |		.CONST	0x0007								; Number of locals
0473			INIT_0470:
0473 0007       |    |		Action	Break_Optional							; Debug Table 0x17 = .DEBUG	0x0473,0x0ef8,0x1001,0x0000,0x0058,0xc985,0x0000,0x05c9
													; Debug Table 0x17.0x0 = 0x473,0xffff
0474 e00f       |    |		Load	0x0,0xf								; Debug Table 0x17.0x1 = 0x474,0xfffe
0475 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0476 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0477 801e       |    |		Call	0x0,0x1e
0478 e7ff       |    |		Load	0x3,-0x1
0479 e009       |    |		Load	0x0,0x9
047a 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
047b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
047c 801f       |    |		Call	0x0,0x1f
047d 0217       |    |		Execute	Heap_Access,All_Reference
047e 3c06       |<   |		Execute	Record,Field_Read,Field_Number 0x6
047f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0480 e00f       |    |		Load	0x0,0xf								; Debug Table 0x17.0x2 = 0x480,0xfffd
0481 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0482 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
0483 e008       |    |		Load	0x0,0x8								; Debug Table 0x17.0x3 = 0x483,0xfffc
0484 0322       | "  |		Declare_Variable	Record
0485 00d8       |    |		Load_Top	At_Offset_0
0486 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0487 e41b       |    |		Load	0x2,0x1b							; Debug Table 0x17.0x4 = 0x487,0xfffb
0488 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0489 e008       |    |		Load	0x0,0x8								; Debug Table 0x17.0x5 = 0x489,0xfffa
048a 0322       | "  |		Declare_Variable	Record
048b 00d8       |    |		Load_Top	At_Offset_0
048c 1c01       |    |		Execute_Immediate	Run_Utility,0x1
048d e7ff       |    |		Load	0x3,-0x1
048e 0217       |    |		Execute	Heap_Access,All_Reference
048f 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0490 0217       |    |		Execute	Heap_Access,All_Reference
0491 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
0492 0217       |    |		Execute	Heap_Access,All_Reference
0493 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0494 00d9       |    |		Load_Top	At_Offset_1
0495 017d       | }  |		Execute	Record,Structure_Write
0496 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x17.0x6 = 0x496,0xfff9
0497 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0498			BODY_0470:
0498 e00f       |    |		Load	0x0,0xf								; Debug Table 0x17.0x7 = 0x498,0x1
0499 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
049a 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
049b e01a       |    |		Load	0x0,0x1a
049c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
049d e01a       |    |		Load	0x0,0x1a
049e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
049f e602       |    |		Load	0x3,0x2
04a0 e00f       |    |		Load	0x0,0xf
04a1 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
04a2 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
04a3 c603       |    |		Store	0x3,0x3
04a4 e41b       |    |		Load	0x2,0x1b							; Debug Table 0x17.0x8 = 0x4a4,0x2
04a5 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
04a6 4865       |He  |		Short_Literal	0x65
04a7 e41b       |    |		Load	0x2,0x1b
04a8 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
04a9 003b       | ;  |		Store_Top	Access,At_Offset_3
04aa 00cf       |    |		Action	Mark_Auxiliary
04ab 781a       |x   |		Jump	0x4c6
04ac e603       |    |		Load	0x3,0x3								; Debug Table 0x17.0x9 = 0x4ac,0x4
04ad e00f       |    |		Load	0x0,0xf
04ae 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
04af 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
04b0 e604       |    |		Load	0x3,0x4
04b1 017d       | }  |		Execute	Record,Structure_Write
04b2 e603       |    |		Load	0x3,0x3								; Debug Table 0x17.0xa = 0x4b2,0x5
04b3 e00f       |    |		Load	0x0,0xf
04b4 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
04b5 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
04b6 c603       |    |		Store	0x3,0x3
04b7 e604       |    |		Load	0x3,0x4								; Debug Table 0x17.0xb = 0x4b7,0x6
04b8 00db       |    |		Load_Top	At_Offset_3
04b9 017f       |    |		Execute	Record,Equal
04ba 6802       |h   |		Jump_Zero	0x4bd
04bb 4801       |H   |		Short_Literal	0x1							; Debug Table 0x17.0xc = 0x4bb,0x7
04bc 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
04bd 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x17.0xd = 0x4bd,0x8
04be 4801       |H   |		Short_Literal	0x1
04bf e604       |    |		Load	0x3,0x4
04c0 e604       |    |		Load	0x3,0x4
04c1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
04c2 e41b       |    |		Load	0x2,0x1b
04c3 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
04c4 c605       |    |		Store	0x3,0x5
04c5 00c9       |    |		Action	Pop_Auxiliary_Loop
04c6 e603       |    |		Load	0x3,0x3								; Debug Table 0x17.0xe = 0x4c6,0x3
04c7 e00f       |    |		Load	0x0,0xf
04c8 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
04c9 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
04ca 6fe1       |o   |		Jump_Zero	0x4ac
04cb 00ce       |    |		Action	Pop_Auxiliary
04cc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x17.0xf = 0x4cc,0x9
04cd 7002       |p   |		Jump_Nonzero	0x4d0
04ce 4887       |H   |		Short_Literal	0x87
04cf 0257       | W  |		Execute	Discrete,Raise
04d0 4800       |H   |		Short_Literal	0x0							; Debug Table 0x17.0x10 = 0x4d0,0xa
04d1 00db       |    |		Load_Top	At_Offset_3
04d2 4801       |H   |		Short_Literal	0x1
04d3 e606       |    |		Load	0x3,0x6
04d4 841e       |    |		Call	0x2,0x1e
04d5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04d6 0000 0000  |    |		.XXX[0x2]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04e2       |    |		.CONST	0x04e2								; Address of begin
04d9 0004       |    |		.CONST	0x0004								; Address of exception handler
04da 0003       |    |		.CONST	0x0003								; Number of locals
04db			INIT_04d8:
04db e020       |    |		Load	0x0,0x20							; Debug Table 0x18 = .DEBUG	0x04db,0x0f1c,0x1001,0x0000,0x0058,0xc985,0x0000,0x066c
													; Debug Table 0x18.0x0 = 0x4db,0xffff
04dc 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
04dd 02c7       |    |		Declare_Variable	Any
04de 00d8       |    |		Load_Top	At_Offset_0
04df 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04e0 029f 0883  |    |		Declare_Subprogram	INIT_0880,For_Call
04e2			BODY_04d8:
04e2 8603       |    |		Call	0x3,0x3								; Debug Table 0x18.0x1 = 0x4e2,0x1
04e3 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x18.0x2 = 0x4e3,0x2
04e4 029f 0913  |    |		Declare_Subprogram	INIT_0910,For_Call				; Debug Table 0x18.0x3 = 0x4e4,0xfbff
04e6 029f 094b  |   K|		Declare_Subprogram	INIT_0948,For_Call				; Debug Table 0x18.0x4 = 0x4e6,0xfbfe
04e8 029f 0983  |    |		Declare_Subprogram	INIT_0980,For_Call				; Debug Table 0x18.0x5 = 0x4e8,0xfbfd
04ea 4800       |H   |		Short_Literal	0x0							; Debug Table 0x18.0x6 = 0x4ea,0x401
04eb 4800       |H   |		Short_Literal	0x0
04ec e602       |    |		Load	0x3,0x2
04ed 8607       |    |		Call	0x3,0x7
04ee 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
04ef 0000       |    |		.XXX[0x1]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 050b       |    |		.CONST	0x050b								; Address of begin
04f1 0004       |    |		.CONST	0x0004								; Address of exception handler
04f2 0006       |    |		.CONST	0x0006								; Number of locals
04f3			INIT_04f0:
04f3 e005       |    |		Load	0x0,0x5								; Debug Table 0x19 = .DEBUG	0x04f3,0x0f2c,0x1002,0x0000,0x0058,0xc985,0x0000,0x08f7
													; Debug Table 0x19.0x0 = 0x4f3,0xffff
04f4 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
04f5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
04f6 02c7       |    |		Declare_Variable	Any
04f7 00d8       |    |		Load_Top	At_Offset_0
04f8 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04f9 e005       |    |		Load	0x0,0x5								; Debug Table 0x19.0x1 = 0x4f9,0xfffe
04fa 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
04fb 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
04fc 02c7       |    |		Declare_Variable	Any
04fd 00d8       |    |		Load_Top	At_Offset_0
04fe 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04ff e005       |    |		Load	0x0,0x5								; Debug Table 0x19.0x2 = 0x4ff,0xfffd
0500 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0501 02c7       |    |		Declare_Variable	Any
0502 00d8       |    |		Load_Top	At_Offset_0
0503 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0504 e005       |    |		Load	0x0,0x5								; Debug Table 0x19.0x3 = 0x504,0xfffc
0505 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0506 02ff       |    |		Declare_Variable	Variant_Record
0507 00d8       |    |		Load_Top	At_Offset_0
0508 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0509 e005       |    |		Load	0x0,0x5								; Debug Table 0x19.0x4 = 0x509,0xfffb
050a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
050b			BODY_04f0:
050b e005       |    |		Load	0x0,0x5								; Debug Table 0x19.0x5 = 0x50b,0x1
050c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
050d e602       |    |		Load	0x3,0x2
050e 0120       |    |		Execute	Any,Is_Value
050f 6804       |h   |		Jump_Zero	0x514
0510 e005       |    |		Load	0x0,0x5
0511 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0512 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0513 7801       |x   |		Jump	0x515
0514 e602       |    |		Load	0x3,0x2
0515 e7ff       |    |		Load	0x3,-0x1
0516 e005       |    |		Load	0x0,0x5
0517 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0518 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0519 c602       |    |		Store	0x3,0x2
051a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
051b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x6 = 0x51b,0x2
051c 6811       |h   |		Jump_Zero	0x52e
051d 0092 0a18  |    |		Action	Push_String_Extended,0xa18					; "Bad status "
													; Debug Table 0x19.0x7 = 0x51d,0x3
051f 00d9       |    |		Load_Top	At_Offset_1
0520 e005       |    |		Load	0x0,0x5
0521 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0522 025e       | ^  |		Execute	Discrete,Convert
0523 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0524 01cc       |    |		Execute	Vector,Catenate
0525 0092 0a21  |   !|		Action	Push_String_Extended,0xa21					; " getting directory object for ada unit "
0527 01cc       |    |		Execute	Vector,Catenate
0528 e7ff       |    |		Load	0x3,-0x1
0529 e005       |    |		Load	0x0,0x5
052a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
052b 183d       | =  |		Execute	Package,Field_Execute,Field_Number 0x3d
052c 01cc       |    |		Execute	Vector,Catenate
052d 8021       | !  |		Call	0x0,0x21
052e e005       |    |		Load	0x0,0x5								; Debug Table 0x19.0x8 = 0x52e,0x4
052f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0530 e603       |    |		Load	0x3,0x3
0531 0120       |    |		Execute	Any,Is_Value
0532 6804       |h   |		Jump_Zero	0x537
0533 e005       |    |		Load	0x0,0x5
0534 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0535 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0536 7801       |x   |		Jump	0x538
0537 e603       |    |		Load	0x3,0x3
0538 e602       |    |		Load	0x3,0x2
0539 e005       |    |		Load	0x0,0x5
053a 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
053b 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
053c e005       |    |		Load	0x0,0x5
053d 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
053e 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
053f c603       |    |		Store	0x3,0x3
0540 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0541 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x9 = 0x541,0x5
0542 6814       |h   |		Jump_Zero	0x557
0543 0092 0a18  |    |		Action	Push_String_Extended,0xa18					; "Bad status "
													; Debug Table 0x19.0xa = 0x543,0x6
0545 00d9       |    |		Load_Top	At_Offset_1
0546 e005       |    |		Load	0x0,0x5
0547 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0548 025e       | ^  |		Execute	Discrete,Convert
0549 1c01       |    |		Execute_Immediate	Run_Utility,0x1
054a 01cc       |    |		Execute	Vector,Catenate
054b 0092 0a22  |   "|		Action	Push_String_Extended,0xa22					; " getting enclosing world for ada unit "
054d 01cc       |    |		Execute	Vector,Catenate
054e e602       |    |		Load	0x3,0x2
054f e005       |    |		Load	0x0,0x5
0550 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0551 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0552 e005       |    |		Load	0x0,0x5
0553 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0554 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0555 01cc       |    |		Execute	Vector,Catenate
0556 8021       | !  |		Call	0x0,0x21
0557 e005       |    |		Load	0x0,0x5								; Debug Table 0x19.0xb = 0x557,0x7
0558 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0559 00db       |    |		Load_Top	At_Offset_3
055a 0120       |    |		Execute	Any,Is_Value
055b 6803       |h   |		Jump_Zero	0x55f
055c e005       |    |		Load	0x0,0x5
055d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
055e 7801       |x   |		Jump	0x560
055f 00db       |    |		Load_Top	At_Offset_3
0560 0092 0a23  |   #|		Action	Push_String_Extended,0xa23					; "*PROGRAM_LIBRARY"
0562 e603       |    |		Load	0x3,0x3
0563 e005       |    |		Load	0x0,0x5
0564 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0565 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0566 c604       |    |		Store	0x3,0x4
0567 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0568 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0xc = 0x568,0x8
0569 6814       |h   |		Jump_Zero	0x57e
056a 0092 0a18  |    |		Action	Push_String_Extended,0xa18					; "Bad status "
													; Debug Table 0x19.0xd = 0x56a,0x9
056c 00d9       |    |		Load_Top	At_Offset_1
056d e005       |    |		Load	0x0,0x5
056e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
056f 025e       | ^  |		Execute	Discrete,Convert
0570 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0571 01cc       |    |		Execute	Vector,Catenate
0572 0092 0a24  |   $|		Action	Push_String_Extended,0xa24					; " getting program library for world "
0574 01cc       |    |		Execute	Vector,Catenate
0575 e603       |    |		Load	0x3,0x3
0576 e005       |    |		Load	0x0,0x5
0577 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0578 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0579 e005       |    |		Load	0x0,0x5
057a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
057b 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
057c 01cc       |    |		Execute	Vector,Catenate
057d 8021       | !  |		Call	0x0,0x21
057e e005       |    |		Load	0x0,0x5								; Debug Table 0x19.0xe = 0x57e,0xa
057f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0580 00da       |    |		Load_Top	At_Offset_2
0581 65b6       |e   |		Indirect_Literal	Discrete,0x338,{0x00000000, 0x00004000}
0582 e002       |    |		Load	0x0,0x2
0583 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0584 4800       |H   |		Short_Literal	0x0
0585 e604       |    |		Load	0x3,0x4
0586 e005       |    |		Load	0x0,0x5
0587 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0588 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0589 00d1       |    |		Pop_Control	Pop_Count_1
058a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
058b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0xf = 0x58b,0xb
058c 6811       |h   |		Jump_Zero	0x59e
058d 0092 0a18  |    |		Action	Push_String_Extended,0xa18					; "Bad status "
													; Debug Table 0x19.0x10 = 0x58d,0xc
058f 00d9       |    |		Load_Top	At_Offset_1
0590 e005       |    |		Load	0x0,0x5
0591 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0592 025e       | ^  |		Execute	Discrete,Convert
0593 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0594 01cc       |    |		Execute	Vector,Catenate
0595 0092 0a25  |   %|		Action	Push_String_Extended,0xa25					; " getting version of program_library "
0597 01cc       |    |		Execute	Vector,Catenate
0598 00db       |    |		Load_Top	At_Offset_3
0599 e005       |    |		Load	0x0,0x5
059a 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
059b 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
059c 01cc       |    |		Execute	Vector,Catenate
059d 8021       | !  |		Call	0x0,0x21
059e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x19.0x11 = 0x59e,0xd
059f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
05a0 ; --------------------------------------------------------------------------------------
05a0 ; SUBPROGRAM
05a0 ; --------------------------------------------------------------------------------------
05a0 05c6       |    |		.CONST	0x05c6								; Address of begin
05a1 0004       |    |		.CONST	0x0004								; Address of exception handler
05a2 000f       |    |		.CONST	0x000f								; Number of locals
05a3			INIT_05a0:
05a3 e017       |    |		Load	0x0,0x17							; Debug Table 0x1a = .DEBUG	0x05a3,0x0f52,0x1001,0x0000,0x0058,0xc985,0x0000,0x0a20
													; Debug Table 0x1a.0x0 = 0x5a3,0xffff
05a4 00db       |    |		Load_Top	At_Offset_3
05a5 0217       |    |		Execute	Heap_Access,All_Reference
05a6 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
05a7 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
05a8 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1a.0x1 = 0x5a8,0xfffe
05a9 e022       | "  |		Load	0x0,0x22							; Debug Table 0x1a.0x2 = 0x5a9,0xfffd
05aa 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05ab 02c7       |    |		Declare_Variable	Any
05ac 00d8       |    |		Load_Top	At_Offset_0
05ad 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05ae 00ed       |    |		Load_Encached	Diana_Symbol_Rep_Cache					; Debug Table 0x1a.0x3 = 0x5ae,0xfffc
05af 02c7       |    |		Declare_Variable	Any
05b0 00d8       |    |		Load_Top	At_Offset_0
05b1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05b2 00eb       |    |		Load_Encached	Diana_Cache						; Debug Table 0x1a.0x4 = 0x5b2,0xfffb
05b3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
05b4 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x1a.0x5 = 0x5b4,0xfffa
05b5 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x1a.0x6 = 0x5b5,0xfff9
05b6 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1a.0x7 = 0x5b6,0xfff8
05b7 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1a.0x8 = 0x5b7,0xfff7
05b8 e005       |    |		Load	0x0,0x5								; Debug Table 0x1a.0x9 = 0x5b8,0xfff6
05b9 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
05ba 02ff       |    |		Declare_Variable	Variant_Record
05bb 00d8       |    |		Load_Top	At_Offset_0
05bc 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05bd e022       | "  |		Load	0x0,0x22							; Debug Table 0x1a.0xa = 0x5bd,0xfff5
05be 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
05bf e009       |    |		Load	0x0,0x9								; Debug Table 0x1a.0xb = 0x5bf,0xfff4
05c0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05c1 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1a.0xc = 0x5c1,0xfff3
05c2 e008       |    |		Load	0x0,0x8								; Debug Table 0x1a.0xd = 0x5c2,0xfff2
05c3 0322       | "  |		Declare_Variable	Record
05c4 00d8       |    |		Load_Top	At_Offset_0
05c5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05c6			BODY_05a0:
05c6 e602       |    |		Load	0x3,0x2								; Debug Table 0x1a.0xe = 0x5c6,0x1
05c7 0217       |    |		Execute	Heap_Access,All_Reference
05c8 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
05c9 0217       |    |		Execute	Heap_Access,All_Reference
05ca 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
05cb 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
05cc 8419       |    |		Call	0x2,0x19
05cd 68ac       |h   |		Jump_Zero	0x67a
05ce e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1a.0xf = 0x5ce,0x2
05cf 0217       |    |		Execute	Heap_Access,All_Reference
05d0 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
05d1 e00c       |    |		Load	0x0,0xc
05d2 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
05d3 6803       |h   |		Jump_Zero	0x5d7
05d4 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1a.0x10 = 0x5d4,0x3
05d5 8420       |    |		Call	0x2,0x20
05d6 7898       |x   |		Jump	0x66f
05d7 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1a.0x11 = 0x5d7,0x4
05d8 0217       |    |		Execute	Heap_Access,All_Reference
05d9 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
05da 800d       |    |		Call	0x0,0xd
05db a603       |    |		Store_Unchecked	0x3,0x3
05dc e603       |    |		Load	0x3,0x3								; Debug Table 0x1a.0x12 = 0x5dc,0x5
05dd e023       | #  |		Load	0x0,0x23
05de 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
05df 7002       |p   |		Jump_Nonzero	0x5e2
05e0 4887       |H   |		Short_Literal	0x87
05e1 0257       | W  |		Execute	Discrete,Raise
05e2 e603       |    |		Load	0x3,0x3								; Debug Table 0x1a.0x13 = 0x5e2,0x6
05e3 e023       | #  |		Load	0x0,0x23
05e4 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
05e5 c604       |    |		Store	0x3,0x4
05e6 e603       |    |		Load	0x3,0x3								; Debug Table 0x1a.0x14 = 0x5e6,0x7
05e7 e023       | #  |		Load	0x0,0x23
05e8 1868       | h  |		Execute	Package,Field_Execute,Field_Number 0x68
05e9 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
05ea 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1a.0x15 = 0x5ea,0x8
05eb 6821       |h!  |		Jump_Zero	0x60d
05ec 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x1a.0x16 = 0x5ec,0x9
05ed e603       |    |		Load	0x3,0x3								; Debug Table 0x1a.0x17 = 0x5ed,0xfbff
05ee e023       | #  |		Load	0x0,0x23
05ef 1867       | g  |		Execute	Package,Field_Execute,Field_Number 0x67
05f0 00cf       |    |		Action	Mark_Auxiliary
05f1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1a.0x18 = 0x5f1,0x401
05f2 01dc       |    |		Execute	Vector,Last
05f3 00da       |    |		Load_Top	At_Offset_2
05f4 01dd       |    |		Execute	Vector,First
05f5 0263       | c  |		Execute	Discrete,Above_Bound
05f6 7013       |p   |		Jump_Nonzero	0x60a
05f7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0x19 = 0x5f7,0x402
05f8 e611       |    |		Load	0x3,0x11
05f9 01d5       |    |		Execute	Vector,Field_Reference
05fa 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
05fb e60f       |    |		Load	0x3,0xf
05fc 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
05fd 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1a.0x1a = 0x5fd,0x403
05fe e611       |    |		Load	0x3,0x11
05ff 01d5       |    |		Execute	Vector,Field_Reference
0600 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0601 e60f       |    |		Load	0x3,0xf
0602 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0603 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1a.0x1b = 0x603,0x404
0604 e41c       |    |		Load	0x2,0x1c
0605 4801       |H   |		Short_Literal	0x1
0606 e60f       |    |		Load	0x3,0xf
0607 841e       |    |		Call	0x2,0x1e
0608 00c8       |    |		Action	Pop_Auxiliary_Range
0609 3fed       |?   |		Loop_Increasing	0x5f7
060a 00ce       |    |		Action	Pop_Auxiliary
060b 00d1       |    |		Pop_Control	Pop_Count_1
060c 00ce       |    |		Action	Pop_Auxiliary
060d 00cf       |    |		Action	Mark_Auxiliary
060e e604       |    |		Load	0x3,0x4								; Debug Table 0x1a.0x1c = 0x60e,0xa
060f e022       | "  |		Load	0x0,0x22
0610 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0611 4801       |H   |		Short_Literal	0x1
0612 0263       | c  |		Execute	Discrete,Above_Bound
0613 705a       |pZ  |		Jump_Nonzero	0x66e
0614 e022       | "  |		Load	0x0,0x22							; Debug Table 0x1a.0x1d = 0x614,0xb
0615 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0616 e60b       |    |		Load	0x3,0xb
0617 00e1       |    |		Load_Encached	Boolean_Cache
0618 00e1       |    |		Load_Encached	Boolean_Cache
0619 00e3       |    |		Load_Encached	Natural_Cache
061a 00ec       |    |		Load_Encached	Diana_Tree_Cache
061b 00eb       |    |		Load_Encached	Diana_Cache
061c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
061d e605       |    |		Load	0x3,0x5
061e 0120       |    |		Execute	Any,Is_Value
061f 6802       |h   |		Jump_Zero	0x622
0620 00ed       |    |		Load_Encached	Diana_Symbol_Rep_Cache
0621 7801       |x   |		Jump	0x623
0622 e605       |    |		Load	0x3,0x5
0623 e612       |    |		Load	0x3,0x12
0624 e604       |    |		Load	0x3,0x4
0625 e022       | "  |		Load	0x0,0x22
0626 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0627 c605       |    |		Store	0x3,0x5
0628 c606       |    |		Store	0x3,0x6
0629 c607       |    |		Store	0x3,0x7
062a c608       |    |		Store	0x3,0x8
062b c609       |    |		Store	0x3,0x9
062c c60a       |    |		Store	0x3,0xa
062d 00d1       |    |		Pop_Control	Pop_Count_1
062e c60c       |    |		Store	0x3,0xc
062f e60e       |    |		Load	0x3,0xe								; Debug Table 0x1a.0x1e = 0x62f,0xc
0630 6802       |h   |		Jump_Zero	0x633
0631 e609       |    |		Load	0x3,0x9
0632 6806       |h   |		Jump_Zero	0x639
0633 e60a       |    |		Load	0x3,0xa								; Debug Table 0x1a.0x1f = 0x633,0xd
0634 7004       |p   |		Jump_Nonzero	0x639
0635 e607       |    |		Load	0x3,0x7								; Debug Table 0x1a.0x20 = 0x635,0xe
0636 e009       |    |		Load	0x0,0x9
0637 1848       | H  |		Execute	Package,Field_Execute,Field_Number 0x48
0638 a60d       |    |		Store_Unchecked	0x3,0xd
0639 e60a       |    |		Load	0x3,0xa								; Debug Table 0x1a.0x21 = 0x639,0xf
063a 6809       |h   |		Jump_Zero	0x644
063b e60b       |    |		Load	0x3,0xb								; Debug Table 0x1a.0x22 = 0x63b,0x10
063c e605       |    |		Load	0x3,0x5
063d 00eb       |    |		Load_Encached	Diana_Cache
063e 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
063f e005       |    |		Load	0x0,0x5
0640 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0641 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
0642 8421       | !  |		Call	0x2,0x21
0643 7828       |x(  |		Jump	0x66c
0644 e607       |    |		Load	0x3,0x7								; Debug Table 0x1a.0x23 = 0x644,0x11
0645 e024       | $  |		Load	0x0,0x24
0646 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
0647 680a       |h   |		Jump_Zero	0x652
0648 e607       |    |		Load	0x3,0x7								; Debug Table 0x1a.0x24 = 0x648,0x12
0649 8422       | "  |		Call	0x2,0x22
064a e605       |    |		Load	0x3,0x5
064b 00eb       |    |		Load_Encached	Diana_Cache
064c 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
064d e005       |    |		Load	0x0,0x5
064e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
064f 1833       | 3  |		Execute	Package,Field_Execute,Field_Number 0x33
0650 8421       | !  |		Call	0x2,0x21
0651 781a       |x   |		Jump	0x66c
0652 e60e       |    |		Load	0x3,0xe								; Debug Table 0x1a.0x25 = 0x652,0x13
0653 7003       |p   |		Jump_Nonzero	0x657
0654 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1a.0x26 = 0x654,0x14
0655 e60d       |    |		Load	0x3,0xd
0656 841f       |    |		Call	0x2,0x1f
0657 e609       |    |		Load	0x3,0x9								; Debug Table 0x1a.0x27 = 0x657,0x15
0658 6813       |h   |		Jump_Zero	0x66c
0659 e60d       |    |		Load	0x3,0xd
065a e7ff       |    |		Load	0x3,-0x1
065b e009       |    |		Load	0x0,0x9
065c 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
065d 021e       |    |		Execute	Heap_Access,Maximum
065e 680d       |h   |		Jump_Zero	0x66c
065f e60d       |    |		Load	0x3,0xd								; Debug Table 0x1a.0x28 = 0x65f,0x16
0660 e009       |    |		Load	0x0,0x9
0661 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
0662 6804       |h   |		Jump_Zero	0x667
0663 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1a.0x29 = 0x663,0x17
0664 e60d       |    |		Load	0x3,0xd
0665 8423       | #  |		Call	0x2,0x23
0666 7805       |x   |		Jump	0x66c
0667 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1a.0x2a = 0x667,0x18
0668 e60d       |    |		Load	0x3,0xd
0669 e009       |    |		Load	0x0,0x9
066a 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
066b 8423       | #  |		Call	0x2,0x23
066c 00c8       |    |		Action	Pop_Auxiliary_Range
066d 3fa6       |?   |		Loop_Increasing	0x614
066e 00ce       |    |		Action	Pop_Auxiliary
066f e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1a.0x2b = 0x66f,0x19
0670 6809       |h   |		Jump_Zero	0x67a
0671 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1a.0x2c = 0x671,0x1a
0672 e41c       |    |		Load	0x2,0x1c
0673 4801       |H   |		Short_Literal	0x1
0674 e602       |    |		Load	0x3,0x2
0675 0217       |    |		Execute	Heap_Access,All_Reference
0676 3c13       |<   |		Execute	Record,Field_Read,Field_Number 0x13
0677 0217       |    |		Execute	Heap_Access,All_Reference
0678 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0679 841e       |    |		Call	0x2,0x1e
067a e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x1a.0x2d = 0x67a,0x1b
067b 7005       |p   |		Jump_Nonzero	0x681
067c 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1a.0x2e = 0x67c,0x1c
067d e41c       |    |		Load	0x2,0x1c
067e 4800       |H   |		Short_Literal	0x0
067f e025       | %  |		Load	0x0,0x25
0680 841e       |    |		Call	0x2,0x1e
0681 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0682 0000 0000  |    |		.BLANK	0000[0x6]
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 068b       |    |		.CONST	0x068b								; Address of begin
0689 0004       |    |		.CONST	0x0004								; Address of exception handler
068a 0001       |    |		.CONST	0x0001								; Number of locals
068b			BODY_0688:
068b			INIT_0688:
068b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1b = .DEBUG	0x068b,0x0fb2,0x1001,0x0000,0x0058,0xc985,0x0000,0x0bee
													; Debug Table 0x1b.0x0 = 0x68b,0x1
068c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
068d 8212       |    |		Call	0x1,0x12
068e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1b.0x1 = 0x68e,0x2
068f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0690 8211       |    |		Call	0x1,0x11
0691 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1b.0x2 = 0x691,0x3
0692 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0693 8211       |    |		Call	0x1,0x11
0694 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0695 0000 0000  |    |		.XXX[0x3]
0697 0000       |    |
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 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1c = .DEBUG	0x069b,0x0fba,0x1001,0x0000,0x0058,0xc985,0x0000,0x0c17
													; Debug Table 0x1c.0x0 = 0x69b,0x1
069c 021d       |    |		Execute	Heap_Access,Is_Null
069d 0f00       |    |		Execute_Immediate	Equal,0x0
069e 820f       |    |		Call	0x1,0xf
069f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1c.0x1 = 0x69f,0x2
06a0 6816       |h   |		Jump_Zero	0x6b7
06a1 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x1c.0x2 = 0x6a1,0x3
06a2 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1c.0x3 = 0x6a2,0xfbff
06a3 0217       |    |		Execute	Heap_Access,All_Reference
06a4 0007       |    |		Action	Break_Optional
06a5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1c.0x4 = 0x6a5,0x401
06a6 01db       |    |		Execute	Vector,Length
06a7 0248       | H  |		Execute	Discrete,Check_In_Integer
06a8 8211       |    |		Call	0x1,0x11
06a9 00cf       |    |		Action	Mark_Auxiliary
06aa 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1c.0x5 = 0x6aa,0x402
06ab 01d9       |    |		Execute	Vector,Reverse_Bounds
06ac 0263       | c  |		Execute	Discrete,Above_Bound
06ad 7006       |p   |		Jump_Nonzero	0x6b4
06ae 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1c.0x6 = 0x6ae,0x403
06af e603       |    |		Load	0x3,0x3
06b0 01d5       |    |		Execute	Vector,Field_Reference
06b1 8424       | $  |		Call	0x2,0x24
06b2 00c8       |    |		Action	Pop_Auxiliary_Range
06b3 3ffa       |?   |		Loop_Increasing	0x6ae
06b4 00ce       |    |		Action	Pop_Auxiliary
06b5 00d1       |    |		Pop_Control	Pop_Count_1
06b6 00ce       |    |		Action	Pop_Auxiliary
06b7 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06b8 ; --------------------------------------------------------------------------------------
06b8 ; SUBPROGRAM
06b8 ; --------------------------------------------------------------------------------------
06b8 06be       |    |		.CONST	0x06be								; Address of begin
06b9 0004       |    |		.CONST	0x0004								; Address of exception handler
06ba 0002       |    |		.CONST	0x0002								; Number of locals
06bb			INIT_06b8:
06bb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1d = .DEBUG	0x06bb,0x0fca,0x1001,0x0000,0x0058,0xc985,0x0000,0x0c56
													; Debug Table 0x1d.0x0 = 0x6bb,0xffff
06bc 0217       |    |		Execute	Heap_Access,All_Reference
06bd 0007       |    |		Action	Break_Optional
06be			BODY_06b8:
06be 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1d.0x1 = 0x6be,0x1
06bf 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
06c0 8425       | %  |		Call	0x2,0x25
06c1 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1d.0x2 = 0x6c1,0x2
06c2 e41c       |    |		Load	0x2,0x1c
06c3 4800       |H   |		Short_Literal	0x0
06c4 00db       |    |		Load_Top	At_Offset_3
06c5 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
06c6 841e       |    |		Call	0x2,0x1e
06c7 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1d.0x3 = 0x6c7,0x3
06c8 00d9       |    |		Load_Top	At_Offset_1
06c9 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
06ca 8415       |    |		Call	0x2,0x15
06cb 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06cc 0000 0000  |    |		.BLANK	0000[0x4]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06d5       |    |		.CONST	0x06d5								; Address of begin
06d1 0004       |    |		.CONST	0x0004								; Address of exception handler
06d2 0002       |    |		.CONST	0x0002								; Number of locals
06d3			INIT_06d0:
06d3 e003       |    |		Load	0x0,0x3								; Debug Table 0x1e = .DEBUG	0x06d3,0x0fd4,0x1001,0x0000,0x0058,0xc985,0x0000,0x0d1c
													; Debug Table 0x1e.0x0 = 0x6d3,0xffff
06d4 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
06d5			BODY_06d0:
06d5 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1e.0x1 = 0x6d5,0x1
06d6 e7ff       |    |		Load	0x3,-0x1
06d7 841f       |    |		Call	0x2,0x1f
06d8 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1e.0x2 = 0x6d8,0x2
06d9 e41c       |    |		Load	0x2,0x1c
06da 4800       |H   |		Short_Literal	0x0
06db e025       | %  |		Load	0x0,0x25
06dc 841e       |    |		Call	0x2,0x1e
06dd 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1e.0x3 = 0x6dd,0x3
06de 0217       |    |		Execute	Heap_Access,All_Reference
06df 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
06e0 8411       |    |		Call	0x2,0x11
06e1 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1e.0x4 = 0x6e1,0x4
06e2 8412       |    |		Call	0x2,0x12
06e3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1e.0x5 = 0x6e3,0x5
06e4 8417       |    |		Call	0x2,0x17
06e5 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1e.0x6 = 0x6e5,0x6
06e6 e009       |    |		Load	0x0,0x9
06e7 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
06e8 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
06e9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0x7 = 0x6e9,0x7
06ea 6804       |h   |		Jump_Zero	0x6ef
06eb 00d8       |    |		Load_Top	At_Offset_0
06ec e7ff       |    |		Load	0x3,-0x1
06ed 021f       |    |		Execute	Heap_Access,Equal
06ee 6803       |h   |		Jump_Zero	0x6f2
06ef 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1e.0x8 = 0x6ef,0x8
06f0 820f       |    |		Call	0x1,0xf
06f1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06f2 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1e.0x9 = 0x6f2,0x9
06f3 820f       |    |		Call	0x1,0xf
06f4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0xa = 0x6f4,0xa
06f5 8417       |    |		Call	0x2,0x17
06f6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
06f7 0000       |    |		.XXX[0x1]
06f8 ; --------------------------------------------------------------------------------------
06f8 ; SUBPROGRAM
06f8 ; --------------------------------------------------------------------------------------
06f8 06fd       |    |		.CONST	0x06fd								; Address of begin
06f9 0004       |    |		.CONST	0x0004								; Address of exception handler
06fa 0002       |    |		.CONST	0x0002								; Number of locals
06fb			INIT_06f8:
06fb 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0x1f = .DEBUG	0x06fb,0x0fec,0x1001,0x0000,0x0058,0xc985,0x0000,0x0d74
													; Debug Table 0x1f.0x0 = 0x6fb,0xffff
06fc 0601       |    |		Execute_Immediate	Set_Value_Unchecked,0x1
06fd			BODY_06f8:
06fd e217       |    |		Load	0x1,0x17							; Debug Table 0x1f.0x1 = 0x6fd,0x1
06fe 8211       |    |		Call	0x1,0x11
06ff e217       |    |		Load	0x1,0x17							; Debug Table 0x1f.0x2 = 0x6ff,0x2
0700 4802       |H   |		Short_Literal	0x2
0701 e00f       |    |		Load	0x0,0xf
0702 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0703 e010       |    |		Load	0x0,0x10
0704 025b       | [  |		Execute	Discrete,Check_In_Type
0705 8011       |    |		Call	0x0,0x11
0706 027b       | {  |		Execute	Discrete,Greater_Equal
0707 6804       |h   |		Jump_Zero	0x70c
0708 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1f.0x3 = 0x708,0x3
0709 e409       |    |		Load	0x2,0x9
070a 8026       | &  |		Call	0x0,0x26
070b 8212       |    |		Call	0x1,0x12
070c e027       | '  |		Load	0x0,0x27							; Debug Table 0x1f.0x4 = 0x70c,0x4
070d 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
070e 8212       |    |		Call	0x1,0x12
070f 00cf       |    |		Action	Mark_Auxiliary
0710 780b       |x   |		Jump	0x71c
0711 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1f.0x5 = 0x711,0x6
0712 820f       |    |		Call	0x1,0xf
0713 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1f.0x6 = 0x713,0x7
0714 e407       |    |		Load	0x2,0x7
0715 e405       |    |		Load	0x2,0x5
0716 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0717 8427       | '  |		Call	0x2,0x27
0718 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1f.0x7 = 0x718,0x8
0719 0a01       |    |		Execute_Immediate	Plus,0x1
071a 005a       | Z  |		Store_Top	Discrete,At_Offset_2
071b 00c9       |    |		Action	Pop_Auxiliary_Loop
071c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1f.0x8 = 0x71c,0x5
071d e408       |    |		Load	0x2,0x8
071e 027a       | z  |		Execute	Discrete,Less_Equal
071f 77f1       |w   |		Jump_Nonzero	0x711
0720 00ce       |    |		Action	Pop_Auxiliary
0721 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1f.0x9 = 0x721,0x9
0722 820f       |    |		Call	0x1,0xf
0723 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0724 0000 0000  |    |		.BLANK	0000[0x4]
0728 ; --------------------------------------------------------------------------------------
0728 ; SUBPROGRAM
0728 ; --------------------------------------------------------------------------------------
0728 0738       | 8  |		.CONST	0x0738								; Address of begin
0729 075f       | _  |		.CONST	0x075f								; Address of exception handler
072a 0004       |    |		.CONST	0x0004								; Number of locals
072b			INIT_0728:
072b e003       |    |		Load	0x0,0x3								; Debug Table 0x20 = .DEBUG	0x072b,0x1002,0x1001,0x0000,0x0058,0xc985,0x0000,0x0dce
													; Debug Table 0x20.0x0 = 0x72b,0xffff
072c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
072d e002       |    |		Load	0x0,0x2								; Debug Table 0x20.0x1 = 0x72d,0xfffe
072e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
072f 02c7       |    |		Declare_Variable	Any
0730 e027       | '  |		Load	0x0,0x27
0731 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0732 e7ff       |    |		Load	0x3,-0x1
0733 e002       |    |		Load	0x0,0x2
0734 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0735 c603       |    |		Store	0x3,0x3
0736 029f 09d3  |    |		Declare_Subprogram	INIT_09d0,For_Call				; Debug Table 0x20.0x2 = 0x736,0xfffd
0738			BODY_0728:
0738 4801       |H   |		Short_Literal	0x1							; Debug Table 0x20.0x3 = 0x738,0x1
0739 a5fe       |    |		Store_Unchecked	0x2,-0x2
073a e001       |    |		Load	0x0,0x1								; Debug Table 0x20.0x4 = 0x73a,0x2
073b 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
073c c5fd       |    |		Store	0x2,-0x3
073d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x20.0x5 = 0x73d,0x3
073e 840e       |    |		Call	0x2,0xe
073f 00cf       |    |		Action	Mark_Auxiliary
0740 0007       |    |		Action	Break_Optional							; Debug Table 0x20.0x6 = 0x740,0x4
0741 e009       |    |		Load	0x0,0x9								; Debug Table 0x20.0x7 = 0x741,0x5
0742 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0743 8216       |    |		Call	0x1,0x16
0744 e003       |    |		Load	0x0,0x3
0745 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0746 0216       |    |		Execute	Heap_Access,Convert
0747 c602       |    |		Store	0x3,0x2
0748 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x20.0x8 = 0x748,0x6
0749 6805       |h   |		Jump_Zero	0x74f
074a 4801       |H   |		Short_Literal	0x1							; Debug Table 0x20.0x9 = 0x74a,0x7
074b e602       |    |		Load	0x3,0x2
074c 840d       |    |		Call	0x2,0xd
074d 00c9       |    |		Action	Pop_Auxiliary_Loop
074e 7ff2       |    |		Jump	0x741
074f 00ce       |    |		Action	Pop_Auxiliary
0750 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x20.0xa = 0x750,0x8
0751 8428       | (  |		Call	0x2,0x28
0752 e028       | (  |		Load	0x0,0x28							; Debug Table 0x20.0xb = 0x752,0x9
0753 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0754 6802       |h   |		Jump_Zero	0x757
0755 8604       |    |		Call	0x3,0x4								; Debug Table 0x20.0xc = 0x755,0xa
0756 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0757 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x20.0xd = 0x757,0xb
0758 4801       |H   |		Short_Literal	0x1
0759 4800       |H   |		Short_Literal	0x0
075a e7ff       |    |		Load	0x3,-0x1
075b e002       |    |		Load	0x0,0x2
075c 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
075d c603       |    |		Store	0x3,0x3
075e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
075f			TRAP_0728:
075f 62b4       |b   |		Indirect_Literal	Discrete,0xa14,{0x00000000, 0x57338501}
0760 010f       |    |		Execute	Exception,Equal
0761 6802       |h   |		Jump_Zero	0x764
0762 8604       |    |		Call	0x3,0x4								; Debug Table 0x20.0xe = 0x762,0xc
0763 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0764 0092 0a26  |   &|		Action	Push_String_Extended,0xa26					; "in Save"
													; Debug Table 0x20.0xf = 0x764,0xd
0766 e028       | (  |		Load	0x0,0x28
0767 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0768 8604       |    |		Call	0x3,0x4								; Debug Table 0x20.0x10 = 0x768,0xe
0769 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
076a 0000 0000  |    |		.BLANK	0000[0x6]
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 e606       |    |		Load	0x3,0x6								; Debug Table 0x21 = .DEBUG	0x0773,0x1026,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x006a
													; Debug Table 0x21.0x0 = 0x773,0x1
0774 680e       |h   |		Jump_Zero	0x783
0775 0092 0a18  |    |		Action	Push_String_Extended,0xa18					; "Bad status "
													; Debug Table 0x21.0x1 = 0x775,0x2
0777 00db       |    |		Load_Top	At_Offset_3
0778 01cc       |    |		Execute	Vector,Catenate
0779 0092 0a27  |   '|		Action	Push_String_Extended,0xa27					; ": "
077b 01cc       |    |		Execute	Vector,Catenate
077c e606       |    |		Load	0x3,0x6
077d e019       |    |		Load	0x0,0x19
077e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
077f 025e       | ^  |		Execute	Discrete,Convert
0780 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0781 01cc       |    |		Execute	Vector,Catenate
0782 8021       | !  |		Call	0x0,0x21
0783 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0784 0000 0000  |    |		.BLANK	0000[0x4]
0788 ; --------------------------------------------------------------------------------------
0788 ; SUBPROGRAM
0788 ; --------------------------------------------------------------------------------------
0788 078b       |    |		.CONST	0x078b								; Address of begin
0789 0004       |    |		.CONST	0x0004								; Address of exception handler
078a 0001       |    |		.CONST	0x0001								; Number of locals
078b			BODY_0788:
078b			INIT_0788:
078b e019       |    |		Load	0x0,0x19							; Debug Table 0x22 = .DEBUG	0x078b,0x102c,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x0098
													; Debug Table 0x22.0x0 = 0x78b,0x1
078c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
078d e018       |    |		Load	0x0,0x18
078e 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
078f e604       |    |		Load	0x3,0x4
0790 e9ff       |    |		Load	0x4,-0x1
0791 e018       |    |		Load	0x0,0x18
0792 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0793 c604       |    |		Store	0x3,0x4
0794 c9fe       |    |		Store	0x4,-0x2
0795 c606       |    |		Store	0x3,0x6
0796 0092 0a28  |   (|		Action	Push_String_Extended,0xa28					; "reading instruction from code segment"
													; Debug Table 0x22.0x1 = 0x796,0x2
0798 860b       |    |		Call	0x3,0xb
0799 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
079a 0000 0000  |    |		.BLANK	0000[0x6]
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07b3       |    |		.CONST	0x07b3								; Address of begin
07a1 0004       |    |		.CONST	0x0004								; Address of exception handler
07a2 0008       |    |		.CONST	0x0008								; Number of locals
07a3			INIT_07a0:
07a3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x23 = .DEBUG	0x07a3,0x1032,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x00b9
													; Debug Table 0x23.0x0 = 0x7a3,0xffff
07a4 e018       |    |		Load	0x0,0x18
07a5 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
07a6 03f1       |    |		Declare_Variable	Discrete,With_Value
07a7 e018       |    |		Load	0x0,0x18							; Debug Table 0x23.0x1 = 0x7a7,0xfffe
07a8 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
07a9 e018       |    |		Load	0x0,0x18							; Debug Table 0x23.0x2 = 0x7a9,0xfffd
07aa 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
07ab e018       |    |		Load	0x0,0x18							; Debug Table 0x23.0x3 = 0x7ab,0xfffc
07ac 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
07ad e018       |    |		Load	0x0,0x18							; Debug Table 0x23.0x4 = 0x7ad,0xfffb
07ae 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
07af e018       |    |		Load	0x0,0x18							; Debug Table 0x23.0x5 = 0x7af,0xfffa
07b0 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
07b1 e006       |    |		Load	0x0,0x6								; Debug Table 0x23.0x6 = 0x7b1,0xfff9
07b2 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
07b3			BODY_07a0:
07b3 00cf       |    |		Action	Mark_Auxiliary
07b4 0007       |    |		Action	Break_Optional							; Debug Table 0x23.0x7 = 0x7b4,0x1
07b5 e018       |    |		Load	0x0,0x18							; Debug Table 0x23.0x8 = 0x7b5,0x2
07b6 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
07b7 e802       |    |		Load	0x4,0x2
07b8 860c       |    |		Call	0x3,0xc
07b9 e01d       |    |		Load	0x0,0x1d
07ba 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
07bb 025e       | ^  |		Execute	Discrete,Convert
07bc c803       |    |		Store	0x4,0x3
07bd e803       |    |		Load	0x4,0x3								; Debug Table 0x23.0x9 = 0x7bd,0x3
07be 689a       |h   |		Jump_Zero	0x859
07bf e802       |    |		Load	0x4,0x2								; Debug Table 0x23.0xa = 0x7bf,0x4
07c0 0a01       |    |		Execute_Immediate	Plus,0x1
07c1 c802       |    |		Store	0x4,0x2
07c2 e018       |    |		Load	0x0,0x18							; Debug Table 0x23.0xb = 0x7c2,0x5
07c3 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
07c4 e803       |    |		Load	0x4,0x3
07c5 860c       |    |		Call	0x3,0xc
07c6 c804       |    |		Store	0x4,0x4
07c7 e804       |    |		Load	0x4,0x4								; Debug Table 0x23.0xc = 0x7c7,0x6
07c8 0ba2       |    |		Execute_Immediate	Case_Compare,0xa2
07c9 700d       |p   |		Jump_Nonzero	0x7d7
07ca 00d8       |    |		Load_Top	At_Offset_0
07cb 6244       |bD  |		Indirect_Literal	Discrete,0xa10,{0x00000000, 0x00006000}
07cc 623f       |b?  |		Indirect_Literal	Discrete,0xa0c,{0x00000000, 0x000067ff}
07cd 0262       | b  |		Execute	Discrete,In_Range
07ce 7015       |p   |		Jump_Nonzero	0x7e4
07cf 0092 0a29  |   )|		Action	Push_String_Extended,0xa29					; "Unexpected literal instruction in elab code segment:"
													; Debug Table 0x23.0xd = 0x7cf,0x9
07d1 e804       |    |		Load	0x4,0x4
07d2 00e0       |    |		Load_Encached	Standard_Cache
07d3 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
07d4 01cc       |    |		Execute	Vector,Catenate
07d5 8021       | !  |		Call	0x0,0x21
07d6 7819       |x   |		Jump	0x7f0
07d7 e018       |    |		Load	0x0,0x18							; Debug Table 0x23.0xe = 0x7d7,0x7
07d8 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
07d9 e803       |    |		Load	0x4,0x3
07da 0a01       |    |		Execute_Immediate	Plus,0x1
07db e01d       |    |		Load	0x0,0x1d
07dc 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
07dd 025b       | [  |		Execute	Discrete,Check_In_Type
07de 860c       |    |		Call	0x3,0xc
07df e01d       |    |		Load	0x0,0x1d
07e0 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
07e1 025e       | ^  |		Execute	Discrete,Convert
07e2 c805       |    |		Store	0x4,0x5
07e3 780c       |x   |		Jump	0x7f0
07e4 e803       |    |		Load	0x4,0x3								; Debug Table 0x23.0xf = 0x7e4,0x8
07e5 0a01       |    |		Execute_Immediate	Plus,0x1
07e6 0248       | H  |		Execute	Discrete,Check_In_Integer
07e7 e804       |    |		Load	0x4,0x4
07e8 621f       |b   |		Indirect_Literal	Discrete,0xa08,{0xffffffff, 0xffffa000}
07e9 0273       | s  |		Execute	Discrete,Plus
07ea 0248       | H  |		Execute	Discrete,Check_In_Integer
07eb e01d       |    |		Load	0x0,0x1d
07ec 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
07ed 025b       | [  |		Execute	Discrete,Check_In_Type
07ee 0273       | s  |		Execute	Discrete,Plus
07ef c805       |    |		Store	0x4,0x5
07f0 00d1       |    |		Pop_Control	Pop_Count_1
07f1 e018       |    |		Load	0x0,0x18							; Debug Table 0x23.0x10 = 0x7f1,0xa
07f2 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
07f3 e805       |    |		Load	0x4,0x5
07f4 860c       |    |		Call	0x3,0xc
07f5 c806       |    |		Store	0x4,0x6
07f6 e018       |    |		Load	0x0,0x18							; Debug Table 0x23.0x11 = 0x7f6,0xb
07f7 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
07f8 e805       |    |		Load	0x4,0x5
07f9 0a01       |    |		Execute_Immediate	Plus,0x1
07fa e01d       |    |		Load	0x0,0x1d
07fb 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
07fc 025b       | [  |		Execute	Discrete,Check_In_Type
07fd 860c       |    |		Call	0x3,0xc
07fe 005b       | [  |		Store_Top	Discrete,At_Offset_3
07ff 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x23.0x12 = 0x7ff,0xc
0800 0910       |    |		Execute_Immediate	Binary_Scale,0x10
0801 0248       | H  |		Execute	Discrete,Check_In_Integer
0802 00db       |    |		Load_Top	At_Offset_3
0803 0273       | s  |		Execute	Discrete,Plus
0804 e006       |    |		Load	0x0,0x6
0805 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0806 025b       | [  |		Execute	Discrete,Check_In_Type
0807 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0808 e018       |    |		Load	0x0,0x18							; Debug Table 0x23.0x13 = 0x808,0xd
0809 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
080a e805       |    |		Load	0x4,0x5
080b 0a02       |    |		Execute_Immediate	Plus,0x2
080c e01d       |    |		Load	0x0,0x1d
080d 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
080e 025b       | [  |		Execute	Discrete,Check_In_Type
080f 860c       |    |		Call	0x3,0xc
0810 c806       |    |		Store	0x4,0x6
0811 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x23.0x14 = 0x811,0xe
0812 6802       |h   |		Jump_Zero	0x815
0813 4887       |H   |		Short_Literal	0x87
0814 0257       | W  |		Execute	Discrete,Raise
0815 e018       |    |		Load	0x0,0x18							; Debug Table 0x23.0x15 = 0x815,0xf
0816 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0817 e805       |    |		Load	0x4,0x5
0818 0a03       |    |		Execute_Immediate	Plus,0x3
0819 e01d       |    |		Load	0x0,0x1d
081a 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
081b 025b       | [  |		Execute	Discrete,Check_In_Type
081c 860c       |    |		Call	0x3,0xc
081d 005b       | [  |		Store_Top	Discrete,At_Offset_3
081e 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x23.0x16 = 0x81e,0x10
081f 0fb0       |    |		Execute_Immediate	Equal,-0x50
0820 7002       |p   |		Jump_Nonzero	0x823
0821 4887       |H   |		Short_Literal	0x87
0822 0257       | W  |		Execute	Discrete,Raise
0823 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x23.0x17 = 0x823,0x11
0824 8419       |    |		Call	0x2,0x19
0825 6831       |h1  |		Jump_Zero	0x857
0826 e7fd       |    |		Load	0x3,-0x3							; Debug Table 0x23.0x18 = 0x826,0x12
0827 e41c       |    |		Load	0x2,0x1c
0828 022e       | .  |		Execute	Access,Not_Equal
0829 6811       |h   |		Jump_Zero	0x83b
082a e7fe       |    |		Load	0x3,-0x2							; Debug Table 0x23.0x19 = 0x82a,0x13
082b 7002       |p   |		Jump_Nonzero	0x82e
082c 4887       |H   |		Short_Literal	0x87
082d 0257       | W  |		Execute	Discrete,Raise
082e e7fc       |    |		Load	0x3,-0x4							; Debug Table 0x23.0x1a = 0x82e,0x14
082f 6802       |h   |		Jump_Zero	0x832
0830 4887       |H   |		Short_Literal	0x87
0831 0257       | W  |		Execute	Discrete,Raise
0832 4800       |H   |		Short_Literal	0x0							; Debug Table 0x23.0x1b = 0x832,0x15
0833 e7fd       |    |		Load	0x3,-0x3
0834 4801       |H   |		Short_Literal	0x1
0835 e808       |    |		Load	0x4,0x8
0836 e7fd       |    |		Load	0x3,-0x3
0837 e41b       |    |		Load	0x2,0x1b
0838 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0839 841d       |    |		Call	0x2,0x1d
083a 781c       |x   |		Jump	0x857
083b e7fc       |    |		Load	0x3,-0x4							; Debug Table 0x23.0x1c = 0x83b,0x16
083c 6802       |h   |		Jump_Zero	0x83f
083d 61c6       |a   |		Indirect_Literal	Discrete,0xa04,{0x00000000, 0x58c98501}		; Debug Table 0x23.0x1d = 0x83d,0x17
083e 0257       | W  |		Execute	Discrete,Raise
083f 0092 0a2a  |   *|		Action	Push_String_Extended,0xa2a					; "Error saving code segment"
													; Debug Table 0x23.0x1e = 0x83f,0x18
0841 e602       |    |		Load	0x3,0x2
0842 00e0       |    |		Load_Encached	Standard_Cache
0843 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0844 01cc       |    |		Execute	Vector,Catenate
0845 0092 0a2b  |   +|		Action	Push_String_Extended,0xa2b					; " ("
0847 01cc       |    |		Execute	Vector,Catenate
0848 e603       |    |		Load	0x3,0x3
0849 e01b       |    |		Load	0x0,0x1b
084a 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
084b 01cc       |    |		Execute	Vector,Catenate
084c 0092 0a2c  |   ,|		Action	Push_String_Extended,0xa2c					; "): prerequisite code segment"
084e 01cc       |    |		Execute	Vector,Catenate
084f 00da       |    |		Load_Top	At_Offset_2
0850 00e0       |    |		Load_Encached	Standard_Cache
0851 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0852 01cc       |    |		Execute	Vector,Catenate
0853 0092 0a2d  |   -|		Action	Push_String_Extended,0xa2d					; " has not already been saved"
0855 01cc       |    |		Execute	Vector,Catenate
0856 8021       | !  |		Call	0x0,0x21
0857 00c9       |    |		Action	Pop_Auxiliary_Loop
0858 7f5c       | \  |		Jump	0x7b5
0859 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
085a 0000 0000  |    |		.BLANK	0000[0x6]
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 e605       |    |		Load	0x3,0x5								; Debug Table 0x24 = .DEBUG	0x0863,0x1072,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x02f3
													; Debug Table 0x24.0x0 = 0x863,0x1
0864 09f8       |    |		Execute_Immediate	Binary_Scale,-0x8
0865 e006       |    |		Load	0x0,0x6
0866 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0867 025b       | [  |		Execute	Discrete,Check_In_Type
0868 e610       |    |		Load	0x3,0x10
0869 e60f       |    |		Load	0x3,0xf
086a 01d6       |    |		Execute	Vector,Field_Write
086b e605       |    |		Load	0x3,0x5								; Debug Table 0x24.0x1 = 0x86b,0x2
086c 48ff       |H   |		Short_Literal	0xff
086d 0279       | y  |		Execute	Discrete,And
086e e006       |    |		Load	0x0,0x6
086f 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0870 025b       | [  |		Execute	Discrete,Check_In_Type
0871 e610       |    |		Load	0x3,0x10
0872 0a01       |    |		Execute_Immediate	Plus,0x1
0873 0248       | H  |		Execute	Discrete,Check_In_Integer
0874 e60f       |    |		Load	0x3,0xf
0875 01d6       |    |		Execute	Vector,Field_Write
0876 e610       |    |		Load	0x3,0x10							; Debug Table 0x24.0x2 = 0x876,0x3
0877 0a02       |    |		Execute_Immediate	Plus,0x2
0878 c610       |    |		Store	0x3,0x10
0879 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
087a 0000 0000  |    |		.BLANK	0000[0x6]
0880 ; --------------------------------------------------------------------------------------
0880 ; SUBPROGRAM
0880 ; --------------------------------------------------------------------------------------
0880 089e       |    |		.CONST	0x089e								; Address of begin
0881 0905       |    |		.CONST	0x0905								; Address of exception handler
0882 0006       |    |		.CONST	0x0006								; Number of locals
0883			INIT_0880:
0883 e005       |    |		Load	0x0,0x5								; Debug Table 0x25 = .DEBUG	0x0883,0x107a,0x1004,0x0000,0x0058,0xc985,0x0000,0x0760
													; Debug Table 0x25.0x0 = 0x883,0xffff
0884 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0885 e005       |    |		Load	0x0,0x5								; Debug Table 0x25.0x1 = 0x885,0xfffe
0886 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0887 02c7       |    |		Declare_Variable	Any
0888 00d8       |    |		Load_Top	At_Offset_0
0889 1c00       |    |		Execute_Immediate	Run_Utility,0x0
088a e020       |    |		Load	0x0,0x20							; Debug Table 0x25.0x2 = 0x88a,0xfffd
088b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
088c 02c7       |    |		Declare_Variable	Any
088d 00d8       |    |		Load_Top	At_Offset_0
088e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
088f e020       |    |		Load	0x0,0x20							; Debug Table 0x25.0x3 = 0x88f,0xfffc
0890 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0891 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0892 02c7       |    |		Declare_Variable	Any
0893 00d8       |    |		Load_Top	At_Offset_0
0894 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0895 e002       |    |		Load	0x0,0x2								; Debug Table 0x25.0x4 = 0x895,0xfffb
0896 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0897 02c7       |    |		Declare_Variable	Any
0898 e027       | '  |		Load	0x0,0x27
0899 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
089a e5ff       |    |		Load	0x2,-0x1
089b e002       |    |		Load	0x0,0x2
089c 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
089d c806       |    |		Store	0x4,0x6
089e			BODY_0880:
089e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x25.0x5 = 0x89e,0x1
089f 4800       |H   |		Short_Literal	0x0
08a0 4801       |H   |		Short_Literal	0x1
08a1 e001       |    |		Load	0x0,0x1
08a2 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
08a3 e806       |    |		Load	0x4,0x6
08a4 e029       | )  |		Load	0x0,0x29
08a5 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
08a6 e02a       | *  |		Load	0x0,0x2a
08a7 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
08a8 e020       |    |		Load	0x0,0x20
08a9 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
08aa 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
08ab c805       |    |		Store	0x4,0x5
08ac e005       |    |		Load	0x0,0x5								; Debug Table 0x25.0x6 = 0x8ac,0x2
08ad 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08ae e803       |    |		Load	0x4,0x3
08af 0120       |    |		Execute	Any,Is_Value
08b0 6803       |h   |		Jump_Zero	0x8b4
08b1 e005       |    |		Load	0x0,0x5
08b2 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
08b3 7801       |x   |		Jump	0x8b5
08b4 e803       |    |		Load	0x4,0x3
08b5 614a       |aJ  |		Indirect_Literal	Discrete,0xa00,{0x00000000, 0x00004000}
08b6 00db       |    |		Load_Top	At_Offset_3
08b7 e7fe       |    |		Load	0x3,-0x2
08b8 e005       |    |		Load	0x0,0x5
08b9 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
08ba 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
08bb c803       |    |		Store	0x4,0x3
08bc c802       |    |		Store	0x4,0x2
08bd e802       |    |		Load	0x4,0x2								; Debug Table 0x25.0x7 = 0x8bd,0x3
08be 6811       |h   |		Jump_Zero	0x8d0
08bf 0092 0a18  |    |		Action	Push_String_Extended,0xa18					; "Bad status "
													; Debug Table 0x25.0x8 = 0x8bf,0x4
08c1 e802       |    |		Load	0x4,0x2
08c2 e005       |    |		Load	0x0,0x5
08c3 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08c4 025e       | ^  |		Execute	Discrete,Convert
08c5 1c01       |    |		Execute_Immediate	Run_Utility,0x1
08c6 01cc       |    |		Execute	Vector,Catenate
08c7 0092 0a2e  |   .|		Action	Push_String_Extended,0xa2e					; " getting directory object for program library "
08c9 01cc       |    |		Execute	Vector,Catenate
08ca e7fe       |    |		Load	0x3,-0x2
08cb e005       |    |		Load	0x0,0x5
08cc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
08cd 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
08ce 01cc       |    |		Execute	Vector,Catenate
08cf 8021       | !  |		Call	0x0,0x21
08d0 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25.0x9 = 0x8d0,0x5
08d1 0120       |    |		Execute	Any,Is_Value
08d2 6803       |h   |		Jump_Zero	0x8d6
08d3 e020       |    |		Load	0x0,0x20
08d4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
08d5 7801       |x   |		Jump	0x8d7
08d6 00da       |    |		Load_Top	At_Offset_2
08d7 4801       |H   |		Short_Literal	0x1
08d8 e803       |    |		Load	0x4,0x3
08d9 e805       |    |		Load	0x4,0x5
08da e020       |    |		Load	0x0,0x20
08db 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
08dc 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
08dd c804       |    |		Store	0x4,0x4
08de 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x25.0xa = 0x8de,0x6
08df e020       |    |		Load	0x0,0x20
08e0 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
08e1 012f       | /  |		Execute	Any,Equal
08e2 680d       |h   |		Jump_Zero	0x8f0
08e3 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x25.0xb = 0x8e3,0x7
08e4 e020       |    |		Load	0x0,0x20
08e5 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
08e6 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
08e7 e028       | (  |		Load	0x0,0x28
08e8 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
08e9 e028       | (  |		Load	0x0,0x28							; Debug Table 0x25.0xc = 0x8e9,0x8
08ea 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
08eb 7002       |p   |		Jump_Nonzero	0x8ee
08ec 4887       |H   |		Short_Literal	0x87
08ed 0257       | W  |		Execute	Discrete,Raise
08ee 6125       |a%  |		Indirect_Literal	Discrete,0xa14,{0x00000000, 0x57338501}		; Debug Table 0x25.0xd = 0x8ee,0x9
08ef 0257       | W  |		Execute	Discrete,Raise
08f0 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x25.0xe = 0x8f0,0xa
08f1 00db       |    |		Load_Top	At_Offset_3
08f2 e020       |    |		Load	0x0,0x20
08f3 1b6a       | j  |		Execute	Package,Field_Read,Field_Number 0x6a
08f4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
08f5 c602       |    |		Store	0x3,0x2
08f6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x25.0xf = 0x8f6,0xb
08f7 4801       |H   |		Short_Literal	0x1
08f8 4800       |H   |		Short_Literal	0x0
08f9 e5ff       |    |		Load	0x2,-0x1
08fa e002       |    |		Load	0x0,0x2
08fb 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
08fc c806       |    |		Store	0x4,0x6
08fd e602       |    |		Load	0x3,0x2								; Debug Table 0x25.0x10 = 0x8fd,0xc
08fe e020       |    |		Load	0x0,0x20
08ff 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0900 012f       | /  |		Execute	Any,Equal
0901 6802       |h   |		Jump_Zero	0x904
0902 00cc       |    |		Action	Pop_Block							; Debug Table 0x25.0x11 = 0x902,0xd
0903 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0904 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0905			TRAP_0880:
0905 0007       |    |		Action	Break_Optional
0906 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x25.0x12 = 0x906,0xe
0907 4801       |H   |		Short_Literal	0x1
0908 4800       |H   |		Short_Literal	0x0
0909 e5ff       |    |		Load	0x2,-0x1
090a e002       |    |		Load	0x0,0x2
090b 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
090c c806       |    |		Store	0x4,0x6
090d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x25.0x13 = 0x90d,0xf
090e 0101       |    |		Execute	Exception,Reraise
090f 0000       |    |		.XXX[0x1]
0910 ; --------------------------------------------------------------------------------------
0910 ; SUBPROGRAM
0910 ; --------------------------------------------------------------------------------------
0910 091a       |    |		.CONST	0x091a								; Address of begin
0911 0004       |    |		.CONST	0x0004								; Address of exception handler
0912 0003       |    |		.CONST	0x0003								; Number of locals
0913			INIT_0910:
0913 e019       |    |		Load	0x0,0x19							; Debug Table 0x26 = .DEBUG	0x0913,0x10a4,0x1002,0x0000,0x0058,0xc985,0x0000,0x0762
													; Debug Table 0x26.0x0 = 0x913,0xffff
0914 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0915 e018       |    |		Load	0x0,0x18							; Debug Table 0x26.0x1 = 0x915,0xfffe
0916 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0917 02c7       |    |		Declare_Variable	Any
0918 00d8       |    |		Load_Top	At_Offset_0
0919 1c00       |    |		Execute_Immediate	Run_Utility,0x0
091a			BODY_0910:
091a 00be       |    |		Action	Activate_Tasks
091b e019       |    |		Load	0x0,0x19							; Debug Table 0x26.0x2 = 0x91b,0x1
091c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
091d 00d9       |    |		Load_Top	At_Offset_1
091e 0120       |    |		Execute	Any,Is_Value
091f 6803       |h   |		Jump_Zero	0x923
0920 e018       |    |		Load	0x0,0x18
0921 1b15       |    |		Execute	Package,Field_Read,Field_Number 0x15
0922 7801       |x   |		Jump	0x924
0923 00d9       |    |		Load_Top	At_Offset_1
0924 e5ff       |    |		Load	0x2,-0x1
0925 4800       |H   |		Short_Literal	0x0
0926 e018       |    |		Load	0x0,0x18
0927 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0928 e01b       |    |		Load	0x0,0x1b
0929 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
092a 4801       |H   |		Short_Literal	0x1
092b e9ff       |    |		Load	0x4,-0x1
092c e018       |    |		Load	0x0,0x18
092d 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
092e c803       |    |		Store	0x4,0x3
092f 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0930 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x26.0x3 = 0x930,0x2
0931 6811       |h   |		Jump_Zero	0x943
0932 0092 0a18  |    |		Action	Push_String_Extended,0xa18					; "Bad status "
													; Debug Table 0x26.0x4 = 0x932,0x3
0934 00da       |    |		Load_Top	At_Offset_2
0935 e019       |    |		Load	0x0,0x19
0936 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0937 025e       | ^  |		Execute	Discrete,Convert
0938 1c01       |    |		Execute_Immediate	Run_Utility,0x1
0939 01cc       |    |		Execute	Vector,Catenate
093a 0092 0a2f  |   /|		Action	Push_String_Extended,0xa2f					; " opening code segment "
093c 01cc       |    |		Execute	Vector,Catenate
093d e9ff       |    |		Load	0x4,-0x1
093e e005       |    |		Load	0x0,0x5
093f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0940 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0941 01cc       |    |		Execute	Vector,Catenate
0942 8021       | !  |		Call	0x0,0x21
0943 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x26.0x5 = 0x943,0x4
0944 e018       |    |		Load	0x0,0x18
0945 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0946 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0947 0000       |    |		.XXX[0x1]
0948 ; --------------------------------------------------------------------------------------
0948 ; SUBPROGRAM
0948 ; --------------------------------------------------------------------------------------
0948 094d       | M  |		.CONST	0x094d								; Address of begin
0949 0004       |    |		.CONST	0x0004								; Address of exception handler
094a 0003       |    |		.CONST	0x0003								; Number of locals
094b			INIT_0948:
094b 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x27 = .DEBUG	0x094b,0x10b2,0x1001,0x0000,0x0058,0xc985,0x0000,0x07c8
													; Debug Table 0x27.0x0 = 0x94b,0xffff
094c 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x27.0x1 = 0x94c,0xfffe
094d			BODY_0948:
094d 00cf       |    |		Action	Mark_Auxiliary
094e 0007       |    |		Action	Break_Optional							; Debug Table 0x27.0x2 = 0x94e,0x1
094f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x27.0x3 = 0x94f,0x2
0950 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
0951 4800       |H   |		Short_Literal	0x0							; Debug Table 0x27.0x4 = 0x951,0x3
0952 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0953 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x27.0x5 = 0x953,0x4
0954 e020       |    |		Load	0x0,0x20							; Debug Table 0x27.0x6 = 0x954,0xfbff
0955 1b52       | R  |		Execute	Package,Field_Read,Field_Number 0x52
0956 02c7       |    |		Declare_Variable	Any
0957 e9ff       |    |		Load	0x4,-0x1
0958 c806       |    |		Store	0x4,0x6
0959 e018       |    |		Load	0x0,0x18							; Debug Table 0x27.0x7 = 0x959,0xfbfe
095a 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
095b 02ff       |    |		Declare_Variable	Variant_Record
095c 00d8       |    |		Load_Top	At_Offset_0
095d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
095e 029f 09e3  |    |		Declare_Subprogram	INIT_09e0,For_Call
0960 00cf       |    |		Action	Mark_Auxiliary
0961 780b       |x   |		Jump	0x96d
0962 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27.0x8 = 0x962,0x402
0963 e020       |    |		Load	0x0,0x20
0964 1854       | T  |		Execute	Package,Field_Execute,Field_Number 0x54
0965 00db       |    |		Load_Top	At_Offset_3
0966 016d       | m  |		Execute	Variant_Record,Structure_Write
0967 8808       |    |		Call	0x4,0x8								; Debug Table 0x27.0x9 = 0x967,0x403
0968 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27.0xa = 0x968,0x404
0969 e020       |    |		Load	0x0,0x20
096a 1855       | U  |		Execute	Package,Field_Execute,Field_Number 0x55
096b c806       |    |		Store	0x4,0x6
096c 00c9       |    |		Action	Pop_Auxiliary_Loop
096d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x27.0xb = 0x96d,0x401
096e e020       |    |		Load	0x0,0x20
096f 1b53       | S  |		Execute	Package,Field_Read,Field_Number 0x53
0970 012f       | /  |		Execute	Any,Equal
0971 6ff0       |o   |		Jump_Zero	0x962
0972 00ce       |    |		Action	Pop_Auxiliary
0973 00d3       |    |		Pop_Control	Pop_Count_3
0974 00ce       |    |		Action	Pop_Auxiliary
0975 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x27.0xc = 0x975,0x5
0976 6806       |h   |		Jump_Zero	0x97d
0977 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x27.0xd = 0x977,0x6
0978 7002       |p   |		Jump_Nonzero	0x97b
0979 4887       |H   |		Short_Literal	0x87
097a 0257       | W  |		Execute	Discrete,Raise
097b 00c9       |    |		Action	Pop_Auxiliary_Loop
097c 7fd2       |    |		Jump	0x94f
097d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
097e 0000 0000  |    |		.XXX[0x2]
0980 ; --------------------------------------------------------------------------------------
0980 ; SUBPROGRAM
0980 ; --------------------------------------------------------------------------------------
0980 0988       |    |		.CONST	0x0988								; Address of begin
0981 0004       |    |		.CONST	0x0004								; Address of exception handler
0982 0002       |    |		.CONST	0x0002								; Number of locals
0983			INIT_0980:
0983 e020       |    |		Load	0x0,0x20							; Debug Table 0x28 = .DEBUG	0x0983,0x10d0,0x1001,0x0000,0x0058,0xc985,0x0000,0x084a
													; Debug Table 0x28.0x0 = 0x983,0xffff
0984 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0985 02c7       |    |		Declare_Variable	Any
0986 00d8       |    |		Load_Top	At_Offset_0
0987 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0988			BODY_0980:
0988 e9fe       |    |		Load	0x4,-0x2							; Debug Table 0x28.0x1 = 0x988,0x1
0989 680f       |h   |		Jump_Zero	0x999
098a e9fd       |    |		Load	0x4,-0x3							; Debug Table 0x28.0x2 = 0x98a,0x2
098b 6802       |h   |		Jump_Zero	0x98e
098c 4887       |H   |		Short_Literal	0x87
098d 0257       | W  |		Execute	Discrete,Raise
098e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x28.0x3 = 0x98e,0x3
098f e020       |    |		Load	0x0,0x20
0990 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0991 012f       | /  |		Execute	Any,Equal
0992 7005       |p   |		Jump_Nonzero	0x998
0993 00db       |    |		Load_Top	At_Offset_3
0994 e020       |    |		Load	0x0,0x20
0995 1b6c       | l  |		Execute	Package,Field_Read,Field_Number 0x6c
0996 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0997 6801       |h   |		Jump_Zero	0x999
0998 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x28.0x4 = 0x998,0x4
0999 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x28.0x5 = 0x999,0x5
099a e020       |    |		Load	0x0,0x20
099b 1b6c       | l  |		Execute	Package,Field_Read,Field_Number 0x6c
099c 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
099d 8606       |    |		Call	0x3,0x6
099e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x28.0x6 = 0x99e,0x6
099f e020       |    |		Load	0x0,0x20
09a0 1b6c       | l  |		Execute	Package,Field_Read,Field_Number 0x6c
09a1 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
09a2 8606       |    |		Call	0x3,0x6
09a3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x28.0x7 = 0x9a3,0x7
09a4 e020       |    |		Load	0x0,0x20
09a5 1b6c       | l  |		Execute	Package,Field_Read,Field_Number 0x6c
09a6 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
09a7 8606       |    |		Call	0x3,0x6
09a8 e9fe       |    |		Load	0x4,-0x2							; Debug Table 0x28.0x8 = 0x9a8,0x8
09a9 e9fd       |    |		Load	0x4,-0x3
09aa 0278       | x  |		Execute	Discrete,Or
09ab 6819       |h   |		Jump_Zero	0x9c5
09ac 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x28.0x9 = 0x9ac,0x9
09ad e020       |    |		Load	0x0,0x20
09ae 1b6c       | l  |		Execute	Package,Field_Read,Field_Number 0x6c
09af 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
09b0 c802       |    |		Store	0x4,0x2
09b1 00cf       |    |		Action	Mark_Auxiliary
09b2 780b       |x   |		Jump	0x9be
09b3 4801       |H   |		Short_Literal	0x1							; Debug Table 0x28.0xa = 0x9b3,0xb
09b4 4800       |H   |		Short_Literal	0x0
09b5 00db       |    |		Load_Top	At_Offset_3
09b6 e020       |    |		Load	0x0,0x20
09b7 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
09b8 8607       |    |		Call	0x3,0x7
09b9 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x28.0xb = 0x9b9,0xc
09ba e020       |    |		Load	0x0,0x20
09bb 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
09bc c802       |    |		Store	0x4,0x2
09bd 00c9       |    |		Action	Pop_Auxiliary_Loop
09be 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x28.0xc = 0x9be,0xa
09bf e020       |    |		Load	0x0,0x20
09c0 1b1e       |    |		Execute	Package,Field_Read,Field_Number 0x1e
09c1 012f       | /  |		Execute	Any,Equal
09c2 6ff0       |o   |		Jump_Zero	0x9b3
09c3 00ce       |    |		Action	Pop_Auxiliary
09c4 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
09c5 4800       |H   |		Short_Literal	0x0							; Debug Table 0x28.0xd = 0x9c5,0xd
09c6 4801       |H   |		Short_Literal	0x1
09c7 e9ff       |    |		Load	0x4,-0x1
09c8 e020       |    |		Load	0x0,0x20
09c9 1b6c       | l  |		Execute	Package,Field_Read,Field_Number 0x6c
09ca 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
09cb 8607       |    |		Call	0x3,0x7
09cc 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
09cd 0000 0000  |    |		.XXX[0x3]
09cf 0000       |    |
09d0 ; --------------------------------------------------------------------------------------
09d0 ; SUBPROGRAM
09d0 ; --------------------------------------------------------------------------------------
09d0 09d3       |    |		.CONST	0x09d3								; Address of begin
09d1 0004       |    |		.CONST	0x0004								; Address of exception handler
09d2 0001       |    |		.CONST	0x0001								; Number of locals
09d3			BODY_09d0:
09d3			INIT_09d0:
09d3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x29 = .DEBUG	0x09d3,0x10ee,0x1001,0x0000,0x0058,0xc985,0x0000,0x0deb
													; Debug Table 0x29.0x0 = 0x9d3,0x1
09d4 a5fe       |    |		Store_Unchecked	0x2,-0x2
09d5 e028       | (  |		Load	0x0,0x28							; Debug Table 0x29.0x1 = 0x9d5,0x2
09d6 1827       | '  |		Execute	Package,Field_Execute,Field_Number 0x27
09d7 c5fd       |    |		Store	0x2,-0x3
09d8 e603       |    |		Load	0x3,0x3								; Debug Table 0x29.0x2 = 0x9d8,0x3
09d9 4801       |H   |		Short_Literal	0x1
09da 4800       |H   |		Short_Literal	0x0
09db e7ff       |    |		Load	0x3,-0x1
09dc e002       |    |		Load	0x0,0x2
09dd 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
09de c603       |    |		Store	0x3,0x3
09df 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 09e3       |    |		.CONST	0x09e3								; Address of begin
09e1 09f6       |    |		.CONST	0x09f6								; Address of exception handler
09e2 0001       |    |		.CONST	0x0001								; Number of locals
09e3			BODY_09e0:
09e3			INIT_09e0:
09e3 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2a = .DEBUG	0x09e3,0x10f6,0x1004,0x0000,0x0058,0xc985,0x0000,0x082d
													; Debug Table 0x2a.0x0 = 0x9e3,0x1
09e4 e41c       |    |		Load	0x2,0x1c
09e5 4801       |H   |		Short_Literal	0x1
09e6 e003       |    |		Load	0x0,0x3
09e7 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
09e8 0322       | "  |		Declare_Variable	Record
09e9 00d8       |    |		Load_Top	At_Offset_0
09ea 1c01       |    |		Execute_Immediate	Run_Utility,0x1
09eb e807       |    |		Load	0x4,0x7
09ec 8605       |    |		Call	0x3,0x5
09ed 00d9       |    |		Load_Top	At_Offset_1
09ee 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
09ef e807       |    |		Load	0x4,0x7
09f0 00d9       |    |		Load_Top	At_Offset_1
09f1 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
09f2 841e       |    |		Call	0x2,0x1e
09f3 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2a.0x1 = 0x9f3,0x2
09f4 a803       |    |		Store_Unchecked	0x4,0x3
09f5 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09f6			TRAP_09e0:
09f6 600d       |`   |		Indirect_Literal	Discrete,0xa04,{0x00000000, 0x58c98501}
09f7 010f       |    |		Execute	Exception,Equal
09f8 6803       |h   |		Jump_Zero	0x9fc
09f9 4801       |H   |		Short_Literal	0x1							; Debug Table 0x2a.0x2 = 0x9f9,0x3
09fa a802       |    |		Store_Unchecked	0x4,0x2
09fb 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
09fc 0100       |    |		Execute	Exception,Raise
09fd 0000 0000  |    |		.XXX[0x3]
09ff 0000       |    |
0a00 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0a04 0000 0000  |    |		.LITERAL	{0x00000000, 0x58c98501}
0a08 ffff ffff  |    |		.LITERAL	{0xffffffff, 0xffffa000}
0a0c 0000 0000  |    |		.LITERAL	{0x00000000, 0x000067ff}
0a10 0000 0000  |    |		.LITERAL	{0x00000000, 0x00006000}
0a14 0000 0000  |    |		.LITERAL	{0x00000000, 0x57338501}
0a18 ; --------------------------------------------------------------------------------------
0a18 ; STRING TABLE
0a18 ; --------------------------------------------------------------------------------------
0a18 0032       | 2  |		.STRTAB	0x0032->0x0a31							; "Bad status "
0a19 003b       | ;  |		.STRTAB	0x003b->0x0a36							; " getting directory object for archive of unit"
0a1a 0066       | f  |		.STRTAB	0x0066->0x0a4d							; " getting enclosing world for unit"
0a1b 0085       |    |		.STRTAB	0x0085->0x0a5d							; "Units being saved are not all in one world"
0a1c 00ad       |    |		.STRTAB	0x00ad->0x0a72							; "Unit to be saved is a body, subunit, or command unit"
0a1d 00df       |    |		.STRTAB	0x00df->0x0a8c							; "Version"
0a1e 00e4       |    |		.STRTAB	0x00e4->0x0a90							; " is not supported"
0a1f 00f3       |    |		.STRTAB	0x00f3->0x0a98							; "Unit to be saved (or unit referenced by a saved unit) was not coded with a Delta1-compatible code generator"
0a20 015c       | \  |		.STRTAB	0x015c->0x0ace							; "opening code segment to read"
0a21 0176       | v  |		.STRTAB	0x0176->0x0adc							; " getting directory object for ada unit "
0a22 019b       |    |		.STRTAB	0x019b->0x0aef							; " getting enclosing world for ada unit "
0a23 01bf       |    |		.STRTAB	0x01bf->0x0b02							; "*PROGRAM_LIBRARY"
0a24 01cd       |    |		.STRTAB	0x01cd->0x0b0a							; " getting program library for world "
0a25 01ee       |    |		.STRTAB	0x01ee->0x0b1c							; " getting version of program_library "
0a26 0210       |    |		.STRTAB	0x0210->0x0b2e							; "in Save"
0a27 0215       |    |		.STRTAB	0x0215->0x0b31							; ": "
0a28 0215       |    |		.STRTAB	0x0215->0x0b32							; "reading instruction from code segment"
0a29 0238       | 8  |		.STRTAB	0x0238->0x0b45							; "Unexpected literal instruction in elab code segment:"
0a2a 026a       | j  |		.STRTAB	0x026a->0x0b5f							; "Error saving code segment"
0a2b 0281       |    |		.STRTAB	0x0281->0x0b6b							; " ("
0a2c 0281       |    |		.STRTAB	0x0281->0x0b6c							; "): prerequisite code segment"
0a2d 029b       |    |		.STRTAB	0x029b->0x0b7a							; " has not already been saved"
0a2e 02b4       |    |		.STRTAB	0x02b4->0x0b88							; " getting directory object for program library "
0a2f 02e0       |    |		.STRTAB	0x02e0->0x0b9f							; " opening code segment "
0a30 02f4       |    |		.STREND 0x02f4->0x0baa
0a31 4261 6420  |Bad |		.STRTAB_STRINGS
0baa 0000 0000  |    |		.BLANK	0000[0x6]
0bb0 ; --------------------------------------------------------------------------------------
0bb0 ; Debug Table
0bb0 ; --------------------------------------------------------------------------------------
0bb0 0003 002b  |   +|		.CONST	0x0003,0x002b
0bb2 000b 0d0a  |    |		.DEBUG	0x000b,0x0d0a,0x4000,0x0000,0x0057,0x3ff5,0x0000,0x03d0
0bba 0010 0d10  |    |		.DEBUG	0x0010,0x0d10,0x4000,0x0000,0x0058,0xc8e5,0x0000,0x000c
0bc2 001b 0d16  |    |		.DEBUG	0x001b,0x0d16,0x1001,0x0000,0x0057,0x3ff5,0x0000,0x0427
0bca 0033 0d1a  | 3  |		.DEBUG	0x0033,0x0d1a,0x1001,0x0000,0x0057,0x3ff5,0x0000,0x0435
0bd2 00cb 0d7a  |   z|		.DEBUG	0x00cb,0x0d7a,0x1002,0x0000,0x0058,0xc985,0x0000,0x0026
0bda 00db 0d7e  |   ~|		.DEBUG	0x00db,0x0d7e,0x1002,0x0000,0x0058,0xc985,0x0000,0x0048
0be2 00e3 0d82  |    |		.DEBUG	0x00e3,0x0d82,0x1001,0x0000,0x0058,0xc985,0x0000,0x00ce
0bea 0163 0da4  | c  |		.DEBUG	0x0163,0x0da4,0x1001,0x0000,0x0058,0xc985,0x0000,0x01a1
0bf2 01bb 0dc8  |    |		.DEBUG	0x01bb,0x0dc8,0x1001,0x0000,0x0058,0xc985,0x0000,0x0249
0bfa 01eb 0dd6  |    |		.DEBUG	0x01eb,0x0dd6,0x1001,0x0000,0x0058,0xc985,0x0000,0x028d
0c02 01fb 0dda  |    |		.DEBUG	0x01fb,0x0dda,0x1001,0x0000,0x0058,0xc985,0x0000,0x02aa
0c0a 020b 0dde  |    |		.DEBUG	0x020b,0x0dde,0x1001,0x0000,0x0058,0xc985,0x0000,0x02c7
0c12 021b 0de8  |    |		.DEBUG	0x021b,0x0de8,0x1001,0x0000,0x0058,0xc985,0x0000,0x02f3
0c1a 0233 0df2  | 3  |		.DEBUG	0x0233,0x0df2,0x1001,0x0000,0x0058,0xc985,0x0000,0x0324
0c22 028b 0e18  |    |		.DEBUG	0x028b,0x0e18,0x1001,0x0000,0x0058,0xc985,0x0000,0x03cc
0c2a 02a3 0e22  |   "|		.DEBUG	0x02a3,0x0e22,0x1001,0x0000,0x0058,0xc985,0x0000,0x03f4
0c32 02bb 0e30  |   0|		.DEBUG	0x02bb,0x0e30,0x1001,0x0000,0x0058,0xc985,0x0000,0x042f
0c3a 02d3 0e3e  |   >|		.DEBUG	0x02d3,0x0e3e,0x1001,0x0000,0x0058,0xc985,0x0000,0x046a
0c42 034b 0e6e  | K n|		.DEBUG	0x034b,0x0e6e,0x1001,0x0000,0x0058,0xc985,0x0000,0x0474
0c4a 0363 0e7c  | c ||		.DEBUG	0x0363,0x0e7c,0x1002,0x0000,0x0058,0xc985,0x0000,0x04af
0c52 0373 0e80  | s  |		.DEBUG	0x0373,0x0e80,0x1002,0x0000,0x0058,0xc985,0x0000,0x04d3
0c5a 0383 0e84  |    |		.DEBUG	0x0383,0x0e84,0x1001,0x0000,0x0058,0xc985,0x0000,0x0510
0c62 0433 0ede  | 3  |		.DEBUG	0x0433,0x0ede,0x1001,0x0000,0x0058,0xc985,0x0000,0x0542
0c6a 0473 0ef8  | s  |		.DEBUG	0x0473,0x0ef8,0x1001,0x0000,0x0058,0xc985,0x0000,0x05c9
0c72 04db 0f1c  |    |		.DEBUG	0x04db,0x0f1c,0x1001,0x0000,0x0058,0xc985,0x0000,0x066c
0c7a 04f3 0f2c  |   ,|		.DEBUG	0x04f3,0x0f2c,0x1002,0x0000,0x0058,0xc985,0x0000,0x08f7
0c82 05a3 0f52  |   R|		.DEBUG	0x05a3,0x0f52,0x1001,0x0000,0x0058,0xc985,0x0000,0x0a20
0c8a 068b 0fb2  |    |		.DEBUG	0x068b,0x0fb2,0x1001,0x0000,0x0058,0xc985,0x0000,0x0bee
0c92 069b 0fba  |    |		.DEBUG	0x069b,0x0fba,0x1001,0x0000,0x0058,0xc985,0x0000,0x0c17
0c9a 06bb 0fca  |    |		.DEBUG	0x06bb,0x0fca,0x1001,0x0000,0x0058,0xc985,0x0000,0x0c56
0ca2 06d3 0fd4  |    |		.DEBUG	0x06d3,0x0fd4,0x1001,0x0000,0x0058,0xc985,0x0000,0x0d1c
0caa 06fb 0fec  |    |		.DEBUG	0x06fb,0x0fec,0x1001,0x0000,0x0058,0xc985,0x0000,0x0d74
0cb2 072b 1002  | +  |		.DEBUG	0x072b,0x1002,0x1001,0x0000,0x0058,0xc985,0x0000,0x0dce
0cba 0773 1026  | s &|		.DEBUG	0x0773,0x1026,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x006a
0cc2 078b 102c  |   ,|		.DEBUG	0x078b,0x102c,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x0098
0cca 07a3 1032  |   2|		.DEBUG	0x07a3,0x1032,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x00b9
0cd2 0863 1072  | c r|		.DEBUG	0x0863,0x1072,0x1001,0x0000,0x0058,0xc9c5,0x0000,0x02f3
0cda 0883 107a  |   z|		.DEBUG	0x0883,0x107a,0x1004,0x0000,0x0058,0xc985,0x0000,0x0760
0ce2 0913 10a4  |    |		.DEBUG	0x0913,0x10a4,0x1002,0x0000,0x0058,0xc985,0x0000,0x0762
0cea 094b 10b2  | K  |		.DEBUG	0x094b,0x10b2,0x1001,0x0000,0x0058,0xc985,0x0000,0x07c8
0cf2 0983 10d0  |    |		.DEBUG	0x0983,0x10d0,0x1001,0x0000,0x0058,0xc985,0x0000,0x084a
0cfa 09d3 10ee  |    |		.DEBUG	0x09d3,0x10ee,0x1001,0x0000,0x0058,0xc985,0x0000,0x0deb
0d02 09e3 10f6  |    |		.DEBUG	0x09e3,0x10f6,0x1004,0x0000,0x0058,0xc985,0x0000,0x082d
0d0a ; --------------------------------------------------------------------------------------
0d0a ; Debug3 Subtable 0x0
0d0a ; --------------------------------------------------------------------------------------
0d0a 0002 0000  |    |		.DBG3TAB	0x0002,0x0000
0d0c 000b ffff  |    |		.CONST	0x000b,0xffff
0d0e 000d fffe  |    |		.CONST	0x000d,0xfffe
0d10 ; --------------------------------------------------------------------------------------
0d10 ; Debug3 Subtable 0x1
0d10 ; --------------------------------------------------------------------------------------
0d10 0002 0000  |    |		.DBG3TAB	0x0002,0x0000
0d12 0010 ffff  |    |		.CONST	0x0010,0xffff
0d14 0012 fffe  |    |		.CONST	0x0012,0xfffe
0d16 ; --------------------------------------------------------------------------------------
0d16 ; Debug3 Subtable 0x2
0d16 ; --------------------------------------------------------------------------------------
0d16 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0d18 001b 0001  |    |		.CONST	0x001b,0x0001
0d1a ; --------------------------------------------------------------------------------------
0d1a ; Debug3 Subtable 0x3
0d1a ; --------------------------------------------------------------------------------------
0d1a 002e 0001  | .  |		.DBG3TAB	0x002e,0x0001
0d1c 0033 ffff  | 3  |		.CONST	0x0033,0xffff
0d1e 0035 fffe  | 5  |		.CONST	0x0035,0xfffe
0d20 0042 fffd  | B  |		.CONST	0x0042,0xfffd
0d22 0043 fffc  | C  |		.CONST	0x0043,0xfffc
0d24 0045 fffb  | E  |		.CONST	0x0045,0xfffb
0d26 0052 fffa  | R  |		.CONST	0x0052,0xfffa
0d28 0053 fff9  | S  |		.CONST	0x0053,0xfff9
0d2a 0055 fff8  | U  |		.CONST	0x0055,0xfff8
0d2c 0057 fff7  | W  |		.CONST	0x0057,0xfff7
0d2e 0059 fff6  | Y  |		.CONST	0x0059,0xfff6
0d30 005f fff5  | _  |		.CONST	0x005f,0xfff5
0d32 0067 fff4  | g  |		.CONST	0x0067,0xfff4
0d34 0069 fff3  | i  |		.CONST	0x0069,0xfff3
0d36 006d fff2  | m  |		.CONST	0x006d,0xfff2
0d38 0071 fff1  | q  |		.CONST	0x0071,0xfff1
0d3a 0073 fff0  | s  |		.CONST	0x0073,0xfff0
0d3c 0075 ffef  | u  |		.CONST	0x0075,0xffef
0d3e 0077 ffee  | w  |		.CONST	0x0077,0xffee
0d40 0079 ffed  | y  |		.CONST	0x0079,0xffed
0d42 007b ffec  | {  |		.CONST	0x007b,0xffec
0d44 007d ffeb  | }  |		.CONST	0x007d,0xffeb
0d46 007f ffea  |    |		.CONST	0x007f,0xffea
0d48 0081 ffe9  |    |		.CONST	0x0081,0xffe9
0d4a 0083 ffe8  |    |		.CONST	0x0083,0xffe8
0d4c 0085 ffe7  |    |		.CONST	0x0085,0xffe7
0d4e 0087 ffe6  |    |		.CONST	0x0087,0xffe6
0d50 0089 ffe5  |    |		.CONST	0x0089,0xffe5
0d52 008b ffe4  |    |		.CONST	0x008b,0xffe4
0d54 008d ffe3  |    |		.CONST	0x008d,0xffe3
0d56 008f ffe2  |    |		.CONST	0x008f,0xffe2
0d58 009c ffe1  |    |		.CONST	0x009c,0xffe1
0d5a 009e ffe0  |    |		.CONST	0x009e,0xffe0
0d5c 009f ffdf  |    |		.CONST	0x009f,0xffdf
0d5e 00a1 ffde  |    |		.CONST	0x00a1,0xffde
0d60 00a4 ffdd  |    |		.CONST	0x00a4,0xffdd
0d62 00a6 ffdc  |    |		.CONST	0x00a6,0xffdc
0d64 00a8 ffdb  |    |		.CONST	0x00a8,0xffdb
0d66 00aa ffda  |    |		.CONST	0x00aa,0xffda
0d68 00ac ffd9  |    |		.CONST	0x00ac,0xffd9
0d6a 00ae ffd8  |    |		.CONST	0x00ae,0xffd8
0d6c 00b0 ffd7  |    |		.CONST	0x00b0,0xffd7
0d6e 00b2 ffd6  |    |		.CONST	0x00b2,0xffd6
0d70 00b4 ffd5  |    |		.CONST	0x00b4,0xffd5
0d72 00b8 ffd4  |    |		.CONST	0x00b8,0xffd4
0d74 00ba ffd3  |    |		.CONST	0x00ba,0xffd3
0d76 00bc ffd2  |    |		.CONST	0x00bc,0xffd2
0d78 00be 0001  |    |		.CONST	0x00be,0x0001
0d7a ; --------------------------------------------------------------------------------------
0d7a ; Debug3 Subtable 0x4
0d7a ; --------------------------------------------------------------------------------------
0d7a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0d7c 00cb 0001  |    |		.CONST	0x00cb,0x0001
0d7e ; --------------------------------------------------------------------------------------
0d7e ; Debug3 Subtable 0x5
0d7e ; --------------------------------------------------------------------------------------
0d7e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0d80 00db 0001  |    |		.CONST	0x00db,0x0001
0d82 ; --------------------------------------------------------------------------------------
0d82 ; Debug3 Subtable 0x6
0d82 ; --------------------------------------------------------------------------------------
0d82 0003 000d  |    |		.DBG3TAB	0x0003,0x000d
0d84 00e3 ffff  |    |		.CONST	0x00e3,0xffff
0d86 00e9 fffe  |    |		.CONST	0x00e9,0xfffe
0d88 00eb fffd  |    |		.CONST	0x00eb,0xfffd
0d8a 00f5 0001  |    |		.CONST	0x00f5,0x0001
0d8c 00f9 0002  |    |		.CONST	0x00f9,0x0002
0d8e 010e 0003  |    |		.CONST	0x010e,0x0003
0d90 0110 0004  |    |		.CONST	0x0110,0x0004
0d92 011d 0005  |    |		.CONST	0x011d,0x0005
0d94 0123 0006  | #  |		.CONST	0x0123,0x0006
0d96 0133 0007  | 3  |		.CONST	0x0133,0x0007
0d98 0135 0008  | 5  |		.CONST	0x0135,0x0008
0d9a 0142 0009  | B  |		.CONST	0x0142,0x0009
0d9c 0146 000a  | F  |		.CONST	0x0146,0x000a
0d9e 014b 000b  | K  |		.CONST	0x014b,0x000b
0da0 0152 000c  | R  |		.CONST	0x0152,0x000c
0da2 0159 000d  | Y  |		.CONST	0x0159,0x000d
0da4 ; --------------------------------------------------------------------------------------
0da4 ; Debug3 Subtable 0x7
0da4 ; --------------------------------------------------------------------------------------
0da4 0002 000f  |    |		.DBG3TAB	0x0002,0x000f
0da6 0163 ffff  | c  |		.CONST	0x0163,0xffff
0da8 0167 fffe  | g  |		.CONST	0x0167,0xfffe
0daa 0169 0001  | i  |		.CONST	0x0169,0x0001
0dac 016f 0002  | o  |		.CONST	0x016f,0x0002
0dae 0172 0003  | r  |		.CONST	0x0172,0x0003
0db0 0179 0004  | y  |		.CONST	0x0179,0x0004
0db2 017d 0005  | }  |		.CONST	0x017d,0x0005
0db4 0182 0006  |    |		.CONST	0x0182,0x0006
0db6 0185 0007  |    |		.CONST	0x0185,0x0007
0db8 0187 0008  |    |		.CONST	0x0187,0x0008
0dba 018d 0009  |    |		.CONST	0x018d,0x0009
0dbc 0199 000a  |    |		.CONST	0x0199,0x000a
0dbe 019d 000b  |    |		.CONST	0x019d,0x000b
0dc0 019f 000c  |    |		.CONST	0x019f,0x000c
0dc2 01a1 000d  |    |		.CONST	0x01a1,0x000d
0dc4 01a4 000e  |    |		.CONST	0x01a4,0x000e
0dc6 01ad 000f  |    |		.CONST	0x01ad,0x000f
0dc8 ; --------------------------------------------------------------------------------------
0dc8 ; Debug3 Subtable 0x8
0dc8 ; --------------------------------------------------------------------------------------
0dc8 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0dca 01bb 0001  |    |		.CONST	0x01bb,0x0001
0dcc 01c6 0002  |    |		.CONST	0x01c6,0x0002
0dce 01d0 0003  |    |		.CONST	0x01d0,0x0003
0dd0 01d2 0004  |    |		.CONST	0x01d2,0x0004
0dd2 01d8 0005  |    |		.CONST	0x01d8,0x0005
0dd4 01de 0006  |    |		.CONST	0x01de,0x0006
0dd6 ; --------------------------------------------------------------------------------------
0dd6 ; Debug3 Subtable 0x9
0dd6 ; --------------------------------------------------------------------------------------
0dd6 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0dd8 01eb 0001  |    |		.CONST	0x01eb,0x0001
0dda ; --------------------------------------------------------------------------------------
0dda ; Debug3 Subtable 0xa
0dda ; --------------------------------------------------------------------------------------
0dda 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0ddc 01fb 0001  |    |		.CONST	0x01fb,0x0001
0dde ; --------------------------------------------------------------------------------------
0dde ; Debug3 Subtable 0xb
0dde ; --------------------------------------------------------------------------------------
0dde 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
0de0 020b 0001  |    |		.CONST	0x020b,0x0001
0de2 020d 0002  |    |		.CONST	0x020d,0x0002
0de4 020f 0003  |    |		.CONST	0x020f,0x0003
0de6 0215 0004  |    |		.CONST	0x0215,0x0004
0de8 ; --------------------------------------------------------------------------------------
0de8 ; Debug3 Subtable 0xc
0de8 ; --------------------------------------------------------------------------------------
0de8 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0dea 021b ffff  |    |		.CONST	0x021b,0xffff
0dec 0220 0001  |    |		.CONST	0x0220,0x0001
0dee 0223 0002  | #  |		.CONST	0x0223,0x0002
0df0 0228 0003  | (  |		.CONST	0x0228,0x0003
0df2 ; --------------------------------------------------------------------------------------
0df2 ; Debug3 Subtable 0xd
0df2 ; --------------------------------------------------------------------------------------
0df2 0002 0010  |    |		.DBG3TAB	0x0002,0x0010
0df4 0233 ffff  | 3  |		.CONST	0x0233,0xffff
0df6 0234 fffe  | 4  |		.CONST	0x0234,0xfffe
0df8 0237 0001  | 7  |		.CONST	0x0237,0x0001
0dfa 0242 0002  | B  |		.CONST	0x0242,0x0002
0dfc 0246 0003  | F  |		.CONST	0x0246,0x0003
0dfe 0248 0004  | H  |		.CONST	0x0248,0x0004
0e00 024a 0005  | J  |		.CONST	0x024a,0x0005
0e02 024c 0006  | L  |		.CONST	0x024c,0x0006
0e04 024f 0007  | O  |		.CONST	0x024f,0x0007
0e06 025d 0008  | ]  |		.CONST	0x025d,0x0008
0e08 0260 0009  | `  |		.CONST	0x0260,0x0009
0e0a 0262 000a  | b  |		.CONST	0x0262,0x000a
0e0c 0263 000b  | c  |		.CONST	0x0263,0x000b
0e0e 0265 000c  | e  |		.CONST	0x0265,0x000c
0e10 026b 000d  | k  |		.CONST	0x026b,0x000d
0e12 0276 000e  | v  |		.CONST	0x0276,0x000e
0e14 027b 000f  | {  |		.CONST	0x027b,0x000f
0e16 027f 0010  |    |		.CONST	0x027f,0x0010
0e18 ; --------------------------------------------------------------------------------------
0e18 ; Debug3 Subtable 0xe
0e18 ; --------------------------------------------------------------------------------------
0e18 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0e1a 028b ffff  |    |		.CONST	0x028b,0xffff
0e1c 028e 0001  |    |		.CONST	0x028e,0x0001
0e1e 0291 0002  |    |		.CONST	0x0291,0x0002
0e20 0294 0003  |    |		.CONST	0x0294,0x0003
0e22 ; --------------------------------------------------------------------------------------
0e22 ; Debug3 Subtable 0xf
0e22 ; --------------------------------------------------------------------------------------
0e22 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0e24 02a3 0001  |    |		.CONST	0x02a3,0x0001
0e26 02a5 0002  |    |		.CONST	0x02a5,0x0002
0e28 02aa 0003  |    |		.CONST	0x02aa,0x0003
0e2a 02ac 0004  |    |		.CONST	0x02ac,0x0004
0e2c 02b0 0005  |    |		.CONST	0x02b0,0x0005
0e2e 02b2 0006  |    |		.CONST	0x02b2,0x0006
0e30 ; --------------------------------------------------------------------------------------
0e30 ; Debug3 Subtable 0x10
0e30 ; --------------------------------------------------------------------------------------
0e30 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0e32 02bb 0001  |    |		.CONST	0x02bb,0x0001
0e34 02bd 0002  |    |		.CONST	0x02bd,0x0002
0e36 02c2 0003  |    |		.CONST	0x02c2,0x0003
0e38 02c4 0004  |    |		.CONST	0x02c4,0x0004
0e3a 02c8 0005  |    |		.CONST	0x02c8,0x0005
0e3c 02ca 0006  |    |		.CONST	0x02ca,0x0006
0e3e ; --------------------------------------------------------------------------------------
0e3e ; Debug3 Subtable 0x11
0e3e ; --------------------------------------------------------------------------------------
0e3e 0001 0016  |    |		.DBG3TAB	0x0001,0x0016
0e40 02d3 ffff  |    |		.CONST	0x02d3,0xffff
0e42 02d8 0001  |    |		.CONST	0x02d8,0x0001
0e44 02dd 0002  |    |		.CONST	0x02dd,0x0002
0e46 02e1 0003  |    |		.CONST	0x02e1,0x0003
0e48 02e5 0004  |    |		.CONST	0x02e5,0x0004
0e4a 02e9 0005  |    |		.CONST	0x02e9,0x0005
0e4c 02f0 0006  |    |		.CONST	0x02f0,0x0006
0e4e 02f5 0007  |    |		.CONST	0x02f5,0x0007
0e50 02fa 0008  |    |		.CONST	0x02fa,0x0008
0e52 02ff 0009  |    |		.CONST	0x02ff,0x0009
0e54 0303 000a  |    |		.CONST	0x0303,0x000a
0e56 0307 000b  |    |		.CONST	0x0307,0x000b
0e58 030b 000c  |    |		.CONST	0x030b,0x000c
0e5a 030f 000d  |    |		.CONST	0x030f,0x000d
0e5c 0313 000e  |    |		.CONST	0x0313,0x000e
0e5e 0317 000f  |    |		.CONST	0x0317,0x000f
0e60 031a 0010  |    |		.CONST	0x031a,0x0010
0e62 031e 0011  |    |		.CONST	0x031e,0x0011
0e64 0322 0012  | "  |		.CONST	0x0322,0x0012
0e66 0326 0013  | &  |		.CONST	0x0326,0x0013
0e68 032a 0014  | *  |		.CONST	0x032a,0x0014
0e6a 032e 0015  | .  |		.CONST	0x032e,0x0015
0e6c 0332 0016  | 2  |		.CONST	0x0332,0x0016
0e6e ; --------------------------------------------------------------------------------------
0e6e ; Debug3 Subtable 0x12
0e6e ; --------------------------------------------------------------------------------------
0e6e 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0e70 034b 0001  | K  |		.CONST	0x034b,0x0001
0e72 034d 0002  | M  |		.CONST	0x034d,0x0002
0e74 0352 0003  | R  |		.CONST	0x0352,0x0003
0e76 0354 0004  | T  |		.CONST	0x0354,0x0004
0e78 0358 0005  | X  |		.CONST	0x0358,0x0005
0e7a 035a 0006  | Z  |		.CONST	0x035a,0x0006
0e7c ; --------------------------------------------------------------------------------------
0e7c ; Debug3 Subtable 0x13
0e7c ; --------------------------------------------------------------------------------------
0e7c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0e7e 0363 0001  | c  |		.CONST	0x0363,0x0001
0e80 ; --------------------------------------------------------------------------------------
0e80 ; Debug3 Subtable 0x14
0e80 ; --------------------------------------------------------------------------------------
0e80 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0e82 0373 0001  | s  |		.CONST	0x0373,0x0001
0e84 ; --------------------------------------------------------------------------------------
0e84 ; Debug3 Subtable 0x15
0e84 ; --------------------------------------------------------------------------------------
0e84 0010 001c  |    |		.DBG3TAB	0x0010,0x001c
0e86 0383 ffff  |    |		.CONST	0x0383,0xffff
0e88 0384 fffe  |    |		.CONST	0x0384,0xfffe
0e8a 0389 fffd  |    |		.CONST	0x0389,0xfffd
0e8c 038e fffc  |    |		.CONST	0x038e,0xfffc
0e8e 0393 fffb  |    |		.CONST	0x0393,0xfffb
0e90 0395 fffa  |    |		.CONST	0x0395,0xfffa
0e92 0397 fff9  |    |		.CONST	0x0397,0xfff9
0e94 0398 fff8  |    |		.CONST	0x0398,0xfff8
0e96 039a fff7  |    |		.CONST	0x039a,0xfff7
0e98 039b fff6  |    |		.CONST	0x039b,0xfff6
0e9a 039c fff5  |    |		.CONST	0x039c,0xfff5
0e9c 039e fff4  |    |		.CONST	0x039e,0xfff4
0e9e 03a0 fff3  |    |		.CONST	0x03a0,0xfff3
0ea0 03a3 0001  |    |		.CONST	0x03a3,0x0001
0ea2 03a6 0002  |    |		.CONST	0x03a6,0x0002
0ea4 03a8 0003  |    |		.CONST	0x03a8,0x0003
0ea6 03aa 0004  |    |		.CONST	0x03aa,0x0004
0ea8 03ab 0005  |    |		.CONST	0x03ab,0x0005
0eaa 03c3 0006  |    |		.CONST	0x03c3,0x0006
0eac 03c6 0007  |    |		.CONST	0x03c6,0x0007
0eae 03cb 0008  |    |		.CONST	0x03cb,0x0008
0eb0 03cd 0009  |    |		.CONST	0x03cd,0x0009
0eb2 03cf 000a  |    |		.CONST	0x03cf,0x000a
0eb4 03d1 000b  |    |		.CONST	0x03d1,0x000b
0eb6 03d6 000c  |    |		.CONST	0x03d6,0x000c
0eb8 03db 000d  |    |		.CONST	0x03db,0x000d
0eba 03de 000e  |    |		.CONST	0x03de,0x000e
0ebc 03e7 000f  |    |		.CONST	0x03e7,0x000f
0ebe 03e9 0010  |    |		.CONST	0x03e9,0x0010
0ec0 03ed 0011  |    |		.CONST	0x03ed,0x0011
0ec2 03f5 0012  |    |		.CONST	0x03f5,0x0012
0ec4 0400 0013  |    |		.CONST	0x0400,0x0013
0ec6 0406 0014  |    |		.CONST	0x0406,0x0014
0ec8 0407 fbff  |    |		.CONST	0x0407,0xfbff
0eca 040f fbfe  |    |		.CONST	0x040f,0xfbfe
0ecc 0411 fbfd  |    |		.CONST	0x0411,0xfbfd
0ece 0414 0401  |    |		.CONST	0x0414,0x0401
0ed0 0418 0402  |    |		.CONST	0x0418,0x0402
0ed2 041d 0403  |    |		.CONST	0x041d,0x0403
0ed4 0421 0404  | !  |		.CONST	0x0421,0x0404
0ed6 0423 0405  | #  |		.CONST	0x0423,0x0405
0ed8 0425 0406  | %  |		.CONST	0x0425,0x0406
0eda 0428 0407  | (  |		.CONST	0x0428,0x0407
0edc 0429 0408  | )  |		.CONST	0x0429,0x0408
0ede ; --------------------------------------------------------------------------------------
0ede ; Debug3 Subtable 0x16
0ede ; --------------------------------------------------------------------------------------
0ede 0003 0009  |    |		.DBG3TAB	0x0003,0x0009
0ee0 0433 ffff  | 3  |		.CONST	0x0433,0xffff
0ee2 043e fffe  | >  |		.CONST	0x043e,0xfffe
0ee4 0440 fffd  | @  |		.CONST	0x0440,0xfffd
0ee6 0442 0001  | B  |		.CONST	0x0442,0x0001
0ee8 0447 0002  | G  |		.CONST	0x0447,0x0002
0eea 0449 0003  | I  |		.CONST	0x0449,0x0003
0eec 044d 0004  | M  |		.CONST	0x044d,0x0004
0eee 0453 0005  | S  |		.CONST	0x0453,0x0005
0ef0 0456 0006  | V  |		.CONST	0x0456,0x0006
0ef2 045c 0008  | \  |		.CONST	0x045c,0x0008
0ef4 0461 0009  | a  |		.CONST	0x0461,0x0009
0ef6 0466 0007  | f  |		.CONST	0x0466,0x0007
0ef8 ; --------------------------------------------------------------------------------------
0ef8 ; Debug3 Subtable 0x17
0ef8 ; --------------------------------------------------------------------------------------
0ef8 0007 000a  |    |		.DBG3TAB	0x0007,0x000a
0efa 0473 ffff  | s  |		.CONST	0x0473,0xffff
0efc 0474 fffe  | t  |		.CONST	0x0474,0xfffe
0efe 0480 fffd  |    |		.CONST	0x0480,0xfffd
0f00 0483 fffc  |    |		.CONST	0x0483,0xfffc
0f02 0487 fffb  |    |		.CONST	0x0487,0xfffb
0f04 0489 fffa  |    |		.CONST	0x0489,0xfffa
0f06 0496 fff9  |    |		.CONST	0x0496,0xfff9
0f08 0498 0001  |    |		.CONST	0x0498,0x0001
0f0a 04a4 0002  |    |		.CONST	0x04a4,0x0002
0f0c 04ac 0004  |    |		.CONST	0x04ac,0x0004
0f0e 04b2 0005  |    |		.CONST	0x04b2,0x0005
0f10 04b7 0006  |    |		.CONST	0x04b7,0x0006
0f12 04bb 0007  |    |		.CONST	0x04bb,0x0007
0f14 04bd 0008  |    |		.CONST	0x04bd,0x0008
0f16 04c6 0003  |    |		.CONST	0x04c6,0x0003
0f18 04cc 0009  |    |		.CONST	0x04cc,0x0009
0f1a 04d0 000a  |    |		.CONST	0x04d0,0x000a
0f1c ; --------------------------------------------------------------------------------------
0f1c ; Debug3 Subtable 0x18
0f1c ; --------------------------------------------------------------------------------------
0f1c 0004 0003  |    |		.DBG3TAB	0x0004,0x0003
0f1e 04db ffff  |    |		.CONST	0x04db,0xffff
0f20 04e2 0001  |    |		.CONST	0x04e2,0x0001
0f22 04e3 0002  |    |		.CONST	0x04e3,0x0002
0f24 04e4 fbff  |    |		.CONST	0x04e4,0xfbff
0f26 04e6 fbfe  |    |		.CONST	0x04e6,0xfbfe
0f28 04e8 fbfd  |    |		.CONST	0x04e8,0xfbfd
0f2a 04ea 0401  |    |		.CONST	0x04ea,0x0401
0f2c ; --------------------------------------------------------------------------------------
0f2c ; Debug3 Subtable 0x19
0f2c ; --------------------------------------------------------------------------------------
0f2c 0005 000d  |    |		.DBG3TAB	0x0005,0x000d
0f2e 04f3 ffff  |    |		.CONST	0x04f3,0xffff
0f30 04f9 fffe  |    |		.CONST	0x04f9,0xfffe
0f32 04ff fffd  |    |		.CONST	0x04ff,0xfffd
0f34 0504 fffc  |    |		.CONST	0x0504,0xfffc
0f36 0509 fffb  |    |		.CONST	0x0509,0xfffb
0f38 050b 0001  |    |		.CONST	0x050b,0x0001
0f3a 051b 0002  |    |		.CONST	0x051b,0x0002
0f3c 051d 0003  |    |		.CONST	0x051d,0x0003
0f3e 052e 0004  | .  |		.CONST	0x052e,0x0004
0f40 0541 0005  | A  |		.CONST	0x0541,0x0005
0f42 0543 0006  | C  |		.CONST	0x0543,0x0006
0f44 0557 0007  | W  |		.CONST	0x0557,0x0007
0f46 0568 0008  | h  |		.CONST	0x0568,0x0008
0f48 056a 0009  | j  |		.CONST	0x056a,0x0009
0f4a 057e 000a  | ~  |		.CONST	0x057e,0x000a
0f4c 058b 000b  |    |		.CONST	0x058b,0x000b
0f4e 058d 000c  |    |		.CONST	0x058d,0x000c
0f50 059e 000d  |    |		.CONST	0x059e,0x000d
0f52 ; --------------------------------------------------------------------------------------
0f52 ; Debug3 Subtable 0x1a
0f52 ; --------------------------------------------------------------------------------------
0f52 000f 0020  |    |		.DBG3TAB	0x000f,0x0020
0f54 05a3 ffff  |    |		.CONST	0x05a3,0xffff
0f56 05a8 fffe  |    |		.CONST	0x05a8,0xfffe
0f58 05a9 fffd  |    |		.CONST	0x05a9,0xfffd
0f5a 05ae fffc  |    |		.CONST	0x05ae,0xfffc
0f5c 05b2 fffb  |    |		.CONST	0x05b2,0xfffb
0f5e 05b4 fffa  |    |		.CONST	0x05b4,0xfffa
0f60 05b5 fff9  |    |		.CONST	0x05b5,0xfff9
0f62 05b6 fff8  |    |		.CONST	0x05b6,0xfff8
0f64 05b7 fff7  |    |		.CONST	0x05b7,0xfff7
0f66 05b8 fff6  |    |		.CONST	0x05b8,0xfff6
0f68 05bd fff5  |    |		.CONST	0x05bd,0xfff5
0f6a 05bf fff4  |    |		.CONST	0x05bf,0xfff4
0f6c 05c1 fff3  |    |		.CONST	0x05c1,0xfff3
0f6e 05c2 fff2  |    |		.CONST	0x05c2,0xfff2
0f70 05c6 0001  |    |		.CONST	0x05c6,0x0001
0f72 05ce 0002  |    |		.CONST	0x05ce,0x0002
0f74 05d4 0003  |    |		.CONST	0x05d4,0x0003
0f76 05d7 0004  |    |		.CONST	0x05d7,0x0004
0f78 05dc 0005  |    |		.CONST	0x05dc,0x0005
0f7a 05e2 0006  |    |		.CONST	0x05e2,0x0006
0f7c 05e6 0007  |    |		.CONST	0x05e6,0x0007
0f7e 05ea 0008  |    |		.CONST	0x05ea,0x0008
0f80 05ec 0009  |    |		.CONST	0x05ec,0x0009
0f82 05ed fbff  |    |		.CONST	0x05ed,0xfbff
0f84 05f1 0401  |    |		.CONST	0x05f1,0x0401
0f86 05f7 0402  |    |		.CONST	0x05f7,0x0402
0f88 05fd 0403  |    |		.CONST	0x05fd,0x0403
0f8a 0603 0404  |    |		.CONST	0x0603,0x0404
0f8c 060e 000a  |    |		.CONST	0x060e,0x000a
0f8e 0614 000b  |    |		.CONST	0x0614,0x000b
0f90 062f 000c  | /  |		.CONST	0x062f,0x000c
0f92 0633 000d  | 3  |		.CONST	0x0633,0x000d
0f94 0635 000e  | 5  |		.CONST	0x0635,0x000e
0f96 0639 000f  | 9  |		.CONST	0x0639,0x000f
0f98 063b 0010  | ;  |		.CONST	0x063b,0x0010
0f9a 0644 0011  | D  |		.CONST	0x0644,0x0011
0f9c 0648 0012  | H  |		.CONST	0x0648,0x0012
0f9e 0652 0013  | R  |		.CONST	0x0652,0x0013
0fa0 0654 0014  | T  |		.CONST	0x0654,0x0014
0fa2 0657 0015  | W  |		.CONST	0x0657,0x0015
0fa4 065f 0016  | _  |		.CONST	0x065f,0x0016
0fa6 0663 0017  | c  |		.CONST	0x0663,0x0017
0fa8 0667 0018  | g  |		.CONST	0x0667,0x0018
0faa 066f 0019  | o  |		.CONST	0x066f,0x0019
0fac 0671 001a  | q  |		.CONST	0x0671,0x001a
0fae 067a 001b  | z  |		.CONST	0x067a,0x001b
0fb0 067c 001c  | |  |		.CONST	0x067c,0x001c
0fb2 ; --------------------------------------------------------------------------------------
0fb2 ; Debug3 Subtable 0x1b
0fb2 ; --------------------------------------------------------------------------------------
0fb2 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0fb4 068b 0001  |    |		.CONST	0x068b,0x0001
0fb6 068e 0002  |    |		.CONST	0x068e,0x0002
0fb8 0691 0003  |    |		.CONST	0x0691,0x0003
0fba ; --------------------------------------------------------------------------------------
0fba ; Debug3 Subtable 0x1c
0fba ; --------------------------------------------------------------------------------------
0fba 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
0fbc 069b 0001  |    |		.CONST	0x069b,0x0001
0fbe 069f 0002  |    |		.CONST	0x069f,0x0002
0fc0 06a1 0003  |    |		.CONST	0x06a1,0x0003
0fc2 06a2 fbff  |    |		.CONST	0x06a2,0xfbff
0fc4 06a5 0401  |    |		.CONST	0x06a5,0x0401
0fc6 06aa 0402  |    |		.CONST	0x06aa,0x0402
0fc8 06ae 0403  |    |		.CONST	0x06ae,0x0403
0fca ; --------------------------------------------------------------------------------------
0fca ; Debug3 Subtable 0x1d
0fca ; --------------------------------------------------------------------------------------
0fca 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
0fcc 06bb ffff  |    |		.CONST	0x06bb,0xffff
0fce 06be 0001  |    |		.CONST	0x06be,0x0001
0fd0 06c1 0002  |    |		.CONST	0x06c1,0x0002
0fd2 06c7 0003  |    |		.CONST	0x06c7,0x0003
0fd4 ; --------------------------------------------------------------------------------------
0fd4 ; Debug3 Subtable 0x1e
0fd4 ; --------------------------------------------------------------------------------------
0fd4 0001 000a  |    |		.DBG3TAB	0x0001,0x000a
0fd6 06d3 ffff  |    |		.CONST	0x06d3,0xffff
0fd8 06d5 0001  |    |		.CONST	0x06d5,0x0001
0fda 06d8 0002  |    |		.CONST	0x06d8,0x0002
0fdc 06dd 0003  |    |		.CONST	0x06dd,0x0003
0fde 06e1 0004  |    |		.CONST	0x06e1,0x0004
0fe0 06e3 0005  |    |		.CONST	0x06e3,0x0005
0fe2 06e5 0006  |    |		.CONST	0x06e5,0x0006
0fe4 06e9 0007  |    |		.CONST	0x06e9,0x0007
0fe6 06ef 0008  |    |		.CONST	0x06ef,0x0008
0fe8 06f2 0009  |    |		.CONST	0x06f2,0x0009
0fea 06f4 000a  |    |		.CONST	0x06f4,0x000a
0fec ; --------------------------------------------------------------------------------------
0fec ; Debug3 Subtable 0x1f
0fec ; --------------------------------------------------------------------------------------
0fec 0001 0009  |    |		.DBG3TAB	0x0001,0x0009
0fee 06fb ffff  |    |		.CONST	0x06fb,0xffff
0ff0 06fd 0001  |    |		.CONST	0x06fd,0x0001
0ff2 06ff 0002  |    |		.CONST	0x06ff,0x0002
0ff4 0708 0003  |    |		.CONST	0x0708,0x0003
0ff6 070c 0004  |    |		.CONST	0x070c,0x0004
0ff8 0711 0006  |    |		.CONST	0x0711,0x0006
0ffa 0713 0007  |    |		.CONST	0x0713,0x0007
0ffc 0718 0008  |    |		.CONST	0x0718,0x0008
0ffe 071c 0005  |    |		.CONST	0x071c,0x0005
1000 0721 0009  | !  |		.CONST	0x0721,0x0009
1002 ; --------------------------------------------------------------------------------------
1002 ; Debug3 Subtable 0x20
1002 ; --------------------------------------------------------------------------------------
1002 0003 000e  |    |		.DBG3TAB	0x0003,0x000e
1004 072b ffff  | +  |		.CONST	0x072b,0xffff
1006 072d fffe  | -  |		.CONST	0x072d,0xfffe
1008 0736 fffd  | 6  |		.CONST	0x0736,0xfffd
100a 0738 0001  | 8  |		.CONST	0x0738,0x0001
100c 073a 0002  | :  |		.CONST	0x073a,0x0002
100e 073d 0003  | =  |		.CONST	0x073d,0x0003
1010 0740 0004  | @  |		.CONST	0x0740,0x0004
1012 0741 0005  | A  |		.CONST	0x0741,0x0005
1014 0748 0006  | H  |		.CONST	0x0748,0x0006
1016 074a 0007  | J  |		.CONST	0x074a,0x0007
1018 0750 0008  | P  |		.CONST	0x0750,0x0008
101a 0752 0009  | R  |		.CONST	0x0752,0x0009
101c 0755 000a  | U  |		.CONST	0x0755,0x000a
101e 0757 000b  | W  |		.CONST	0x0757,0x000b
1020 0762 000c  | b  |		.CONST	0x0762,0x000c
1022 0764 000d  | d  |		.CONST	0x0764,0x000d
1024 0768 000e  | h  |		.CONST	0x0768,0x000e
1026 ; --------------------------------------------------------------------------------------
1026 ; Debug3 Subtable 0x21
1026 ; --------------------------------------------------------------------------------------
1026 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
1028 0773 0001  | s  |		.CONST	0x0773,0x0001
102a 0775 0002  | u  |		.CONST	0x0775,0x0002
102c ; --------------------------------------------------------------------------------------
102c ; Debug3 Subtable 0x22
102c ; --------------------------------------------------------------------------------------
102c 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
102e 078b 0001  |    |		.CONST	0x078b,0x0001
1030 0796 0002  |    |		.CONST	0x0796,0x0002
1032 ; --------------------------------------------------------------------------------------
1032 ; Debug3 Subtable 0x23
1032 ; --------------------------------------------------------------------------------------
1032 0007 0018  |    |		.DBG3TAB	0x0007,0x0018
1034 07a3 ffff  |    |		.CONST	0x07a3,0xffff
1036 07a7 fffe  |    |		.CONST	0x07a7,0xfffe
1038 07a9 fffd  |    |		.CONST	0x07a9,0xfffd
103a 07ab fffc  |    |		.CONST	0x07ab,0xfffc
103c 07ad fffb  |    |		.CONST	0x07ad,0xfffb
103e 07af fffa  |    |		.CONST	0x07af,0xfffa
1040 07b1 fff9  |    |		.CONST	0x07b1,0xfff9
1042 07b4 0001  |    |		.CONST	0x07b4,0x0001
1044 07b5 0002  |    |		.CONST	0x07b5,0x0002
1046 07bd 0003  |    |		.CONST	0x07bd,0x0003
1048 07bf 0004  |    |		.CONST	0x07bf,0x0004
104a 07c2 0005  |    |		.CONST	0x07c2,0x0005
104c 07c7 0006  |    |		.CONST	0x07c7,0x0006
104e 07cf 0009  |    |		.CONST	0x07cf,0x0009
1050 07d7 0007  |    |		.CONST	0x07d7,0x0007
1052 07e4 0008  |    |		.CONST	0x07e4,0x0008
1054 07f1 000a  |    |		.CONST	0x07f1,0x000a
1056 07f6 000b  |    |		.CONST	0x07f6,0x000b
1058 07ff 000c  |    |		.CONST	0x07ff,0x000c
105a 0808 000d  |    |		.CONST	0x0808,0x000d
105c 0811 000e  |    |		.CONST	0x0811,0x000e
105e 0815 000f  |    |		.CONST	0x0815,0x000f
1060 081e 0010  |    |		.CONST	0x081e,0x0010
1062 0823 0011  | #  |		.CONST	0x0823,0x0011
1064 0826 0012  | &  |		.CONST	0x0826,0x0012
1066 082a 0013  | *  |		.CONST	0x082a,0x0013
1068 082e 0014  | .  |		.CONST	0x082e,0x0014
106a 0832 0015  | 2  |		.CONST	0x0832,0x0015
106c 083b 0016  | ;  |		.CONST	0x083b,0x0016
106e 083d 0017  | =  |		.CONST	0x083d,0x0017
1070 083f 0018  | ?  |		.CONST	0x083f,0x0018
1072 ; --------------------------------------------------------------------------------------
1072 ; Debug3 Subtable 0x24
1072 ; --------------------------------------------------------------------------------------
1072 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
1074 0863 0001  | c  |		.CONST	0x0863,0x0001
1076 086b 0002  | k  |		.CONST	0x086b,0x0002
1078 0876 0003  | v  |		.CONST	0x0876,0x0003
107a ; --------------------------------------------------------------------------------------
107a ; Debug3 Subtable 0x25
107a ; --------------------------------------------------------------------------------------
107a 0005 000f  |    |		.DBG3TAB	0x0005,0x000f
107c 0883 ffff  |    |		.CONST	0x0883,0xffff
107e 0885 fffe  |    |		.CONST	0x0885,0xfffe
1080 088a fffd  |    |		.CONST	0x088a,0xfffd
1082 088f fffc  |    |		.CONST	0x088f,0xfffc
1084 0895 fffb  |    |		.CONST	0x0895,0xfffb
1086 089e 0001  |    |		.CONST	0x089e,0x0001
1088 08ac 0002  |    |		.CONST	0x08ac,0x0002
108a 08bd 0003  |    |		.CONST	0x08bd,0x0003
108c 08bf 0004  |    |		.CONST	0x08bf,0x0004
108e 08d0 0005  |    |		.CONST	0x08d0,0x0005
1090 08de 0006  |    |		.CONST	0x08de,0x0006
1092 08e3 0007  |    |		.CONST	0x08e3,0x0007
1094 08e9 0008  |    |		.CONST	0x08e9,0x0008
1096 08ee 0009  |    |		.CONST	0x08ee,0x0009
1098 08f0 000a  |    |		.CONST	0x08f0,0x000a
109a 08f6 000b  |    |		.CONST	0x08f6,0x000b
109c 08fd 000c  |    |		.CONST	0x08fd,0x000c
109e 0902 000d  |    |		.CONST	0x0902,0x000d
10a0 0906 000e  |    |		.CONST	0x0906,0x000e
10a2 090d 000f  |    |		.CONST	0x090d,0x000f
10a4 ; --------------------------------------------------------------------------------------
10a4 ; Debug3 Subtable 0x26
10a4 ; --------------------------------------------------------------------------------------
10a4 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
10a6 0913 ffff  |    |		.CONST	0x0913,0xffff
10a8 0915 fffe  |    |		.CONST	0x0915,0xfffe
10aa 091b 0001  |    |		.CONST	0x091b,0x0001
10ac 0930 0002  | 0  |		.CONST	0x0930,0x0002
10ae 0932 0003  | 2  |		.CONST	0x0932,0x0003
10b0 0943 0004  | C  |		.CONST	0x0943,0x0004
10b2 ; --------------------------------------------------------------------------------------
10b2 ; Debug3 Subtable 0x27
10b2 ; --------------------------------------------------------------------------------------
10b2 0004 000a  |    |		.DBG3TAB	0x0004,0x000a
10b4 094b ffff  | K  |		.CONST	0x094b,0xffff
10b6 094c fffe  | L  |		.CONST	0x094c,0xfffe
10b8 094e 0001  | N  |		.CONST	0x094e,0x0001
10ba 094f 0002  | O  |		.CONST	0x094f,0x0002
10bc 0951 0003  | Q  |		.CONST	0x0951,0x0003
10be 0953 0004  | S  |		.CONST	0x0953,0x0004
10c0 0954 fbff  | T  |		.CONST	0x0954,0xfbff
10c2 0959 fbfe  | Y  |		.CONST	0x0959,0xfbfe
10c4 0962 0402  | b  |		.CONST	0x0962,0x0402
10c6 0967 0403  | g  |		.CONST	0x0967,0x0403
10c8 0968 0404  | h  |		.CONST	0x0968,0x0404
10ca 096d 0401  | m  |		.CONST	0x096d,0x0401
10cc 0975 0005  | u  |		.CONST	0x0975,0x0005
10ce 0977 0006  | w  |		.CONST	0x0977,0x0006
10d0 ; --------------------------------------------------------------------------------------
10d0 ; Debug3 Subtable 0x28
10d0 ; --------------------------------------------------------------------------------------
10d0 0001 000d  |    |		.DBG3TAB	0x0001,0x000d
10d2 0983 ffff  |    |		.CONST	0x0983,0xffff
10d4 0988 0001  |    |		.CONST	0x0988,0x0001
10d6 098a 0002  |    |		.CONST	0x098a,0x0002
10d8 098e 0003  |    |		.CONST	0x098e,0x0003
10da 0998 0004  |    |		.CONST	0x0998,0x0004
10dc 0999 0005  |    |		.CONST	0x0999,0x0005
10de 099e 0006  |    |		.CONST	0x099e,0x0006
10e0 09a3 0007  |    |		.CONST	0x09a3,0x0007
10e2 09a8 0008  |    |		.CONST	0x09a8,0x0008
10e4 09ac 0009  |    |		.CONST	0x09ac,0x0009
10e6 09b3 000b  |    |		.CONST	0x09b3,0x000b
10e8 09b9 000c  |    |		.CONST	0x09b9,0x000c
10ea 09be 000a  |    |		.CONST	0x09be,0x000a
10ec 09c5 000d  |    |		.CONST	0x09c5,0x000d
10ee ; --------------------------------------------------------------------------------------
10ee ; Debug3 Subtable 0x29
10ee ; --------------------------------------------------------------------------------------
10ee 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
10f0 09d3 0001  |    |		.CONST	0x09d3,0x0001
10f2 09d5 0002  |    |		.CONST	0x09d5,0x0002
10f4 09d8 0003  |    |		.CONST	0x09d8,0x0003
10f6 ; --------------------------------------------------------------------------------------
10f6 ; Debug3 Subtable 0x2a
10f6 ; --------------------------------------------------------------------------------------
10f6 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
10f8 09e3 0001  |    |		.CONST	0x09e3,0x0001
10fa 09f3 0002  |    |		.CONST	0x09f3,0x0002
10fc 09f9 0003  |    |		.CONST	0x09f9,0x0003
10fe 0000 0000  |    |		.BLANK	0000[0x102]