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

⟦c0e85d914⟧

    Length: 4096 (0x1000)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df

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 04f0       |    |		.CONST	0x04f0								; 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 0003       |    |		.CONST	0x0003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 009f       |    |		.CONST	0x009f								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0032       | 2  |		.CONST	0x0032								; Number of locals
000b			INIT_0008:
000b 4803       |H   |		Short_Literal	0x3							; Debug Table 0x0 = .DEBUG	0x000b,0x05aa,0x8000,0x0000,0x0057,0x2965,0x0000,0x0007
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 032b       | +  |		Declare_Type	Record,Incomplete,Visible
000d e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x1 = 0xd,0xfffe
000e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
000f 0129       | )  |		Execute	Any,Make_Visible
0010 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x2 = 0x10,0xfffd
0011 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0012 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0013 0129       | )  |		Execute	Any,Make_Visible
0014 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x3 = 0x14,0xfffc
0015 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0016 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0017 0129       | )  |		Execute	Any,Make_Visible
0018 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x4 = 0x18,0xfffb
0019 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
001a 0129       | )  |		Execute	Any,Make_Visible
001b e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x5 = 0x1b,0xfffa
001c 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
001d 0129       | )  |		Execute	Any,Make_Visible
001e e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x6 = 0x1e,0xfff9
001f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0020 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0021 0129       | )  |		Execute	Any,Make_Visible
0022 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x7 = 0x22,0xfff8
0023 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x8 = 0x23,0xfff7
0024 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x24,0xfff6
0026 029a 00bb  |    |		Declare_Subprogram	INIT_00b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x26,0xfff5
0028 029a 00d3  |    |		Declare_Subprogram	INIT_00d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x28,0xfff4
002a 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x2a,0xfff3
002c 029a 00e3  |    |		Declare_Subprogram	INIT_00e0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x2c,0xfff2
002e 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x2e,0xfff1
0030 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x30,0xfff0
0032 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x10 = 0x32,0xffef
0033 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0034 1938       | 8  |		Execute	Package,Field_Reference,Field_Number 0x38
0035 0129       | )  |		Execute	Any,Make_Visible
0036 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x11 = 0x36,0xffee
0037 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0038 193b       | ;  |		Execute	Package,Field_Reference,Field_Number 0x3b
0039 0129       | )  |		Execute	Any,Make_Visible
003a e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x12 = 0x3a,0xffed
003b 1911       |    |		Execute	Package,Field_Reference,Field_Number 0x11
003c 0129       | )  |		Execute	Any,Make_Visible
003d 029a 0103  |    |		Declare_Subprogram	INIT_0100,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x13 = 0x3d,0xffec
003f 029a 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x14 = 0x3f,0xffeb
0041 029a 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x15 = 0x41,0xffea
0043 029a 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x16 = 0x43,0xffe9
0045 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20				; Debug Table 0x0.0x17 = 0x45,0xffe8
0046 0129       | )  |		Execute	Any,Make_Visible
0047 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21				; Debug Table 0x0.0x18 = 0x47,0xffe7
0048 0129       | )  |		Execute	Any,Make_Visible
0049 029a 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x19 = 0x49,0xffe6
004b 029a 03d3  |    |		Declare_Subprogram	INIT_03d0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1a = 0x4b,0xffe5
004d 029a 0423  |   #|		Declare_Subprogram	INIT_0420,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1b = 0x4d,0xffe4
004f 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26				; Debug Table 0x0.0x1c = 0x4f,0xffe3
0050 0129       | )  |		Execute	Any,Make_Visible
0051 029a 042b  |   +|		Declare_Subprogram	INIT_0428,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1d = 0x51,0xffe2
0053 029a 0453  |   S|		Declare_Subprogram	INIT_0450,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1e = 0x53,0xffe1
0055 029a 047b  |   {|		Declare_Subprogram	INIT_0478,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1f = 0x55,0xffe0
0057 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x20 = 0x57,0xffdf
0058 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0059 191d       |    |		Execute	Package,Field_Reference,Field_Number 0x1d
005a 0129       | )  |		Execute	Any,Make_Visible
005b e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x21 = 0x5b,0xffde
005c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
005d 191e       |    |		Execute	Package,Field_Reference,Field_Number 0x1e
005e 0129       | )  |		Execute	Any,Make_Visible
005f 029a 04bb  |    |		Declare_Subprogram	INIT_04b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x22 = 0x5f,0xffdd
0061 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x23 = 0x61,0xffdc
0062 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0063 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0064 e001       |    |		Load	0x0,0x1
0065 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0066 00e1       |    |		Load_Encached	Boolean_Cache
0067 02a0       |    |		Declare_Subprogram	Null_Subprogram
0068 e20d       |    |		Load	0x1,0xd
0069 0326       | &  |		Complete_Type	Record,By_Defining
006a 00bf       |    |		Action	Accept_Activation
006b e002       |    |		Load	0x0,0x2								; Debug Table 0x1 = .DEBUG	0x006b,0x05f4,0x8000,0x0000,0x0057,0x2975,0x0000,0x000f
													; Debug Table 0x1.0x0 = 0x6b,0xffff
006c 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
006d e001       |    |		Load	0x0,0x1
006e 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
006f 011e       |    |		Execute	Any,Convert
0070 e003       |    |		Load	0x0,0x3								; Debug Table 0x1.0x1 = 0x70,0xfffe
0071 1845       | E  |		Execute	Package,Field_Execute,Field_Number 0x45
0072 e001       |    |		Load	0x0,0x1
0073 1b25       | %  |		Execute	Package,Field_Read,Field_Number 0x25
0074 03f1       |    |		Declare_Variable	Discrete,With_Value
0075 029d 04db  |    |		Declare_Subprogram	INIT_04d8,For_Outer_Call			; Debug Table 0x1.0x2 = 0x75,0xfffd
0077 029d 04e3  |    |		Declare_Subprogram	INIT_04e0,For_Outer_Call			; Debug Table 0x1.0x3 = 0x77,0xfffc
0079 029d 04eb  |    |		Declare_Subprogram	INIT_04e8,For_Outer_Call			; Debug Table 0x1.0x4 = 0x79,0xfffb
007b 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x5 = 0x7b,0xfffa
007c 00c7       |    |		Action	Elaborate_Subprogram
007d 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x6 = 0x7d,0xfff9
007e 00c7       |    |		Action	Elaborate_Subprogram
007f 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x7 = 0x7f,0xfff8
0080 00c7       |    |		Action	Elaborate_Subprogram
0081 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x8 = 0x81,0xfff7
0082 00c7       |    |		Action	Elaborate_Subprogram
0083 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0x9 = 0x83,0xfff6
0084 00c7       |    |		Action	Elaborate_Subprogram
0085 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0xa = 0x85,0xfff5
0086 00c7       |    |		Action	Elaborate_Subprogram
0087 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0xb = 0x87,0xfff4
0088 00c7       |    |		Action	Elaborate_Subprogram
0089 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x1.0xc = 0x89,0xfff3
008a 00c7       |    |		Action	Elaborate_Subprogram
008b 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f				; Debug Table 0x1.0xd = 0x8b,0xfff2
008c 00c7       |    |		Action	Elaborate_Subprogram
008d 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20				; Debug Table 0x1.0xe = 0x8d,0xfff1
008e 00c7       |    |		Action	Elaborate_Subprogram
008f 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21				; Debug Table 0x1.0xf = 0x8f,0xfff0
0090 00c7       |    |		Action	Elaborate_Subprogram
0091 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24				; Debug Table 0x1.0x10 = 0x91,0xffef
0092 00c7       |    |		Action	Elaborate_Subprogram
0093 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25				; Debug Table 0x1.0x11 = 0x93,0xffee
0094 00c7       |    |		Action	Elaborate_Subprogram
0095 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26				; Debug Table 0x1.0x12 = 0x95,0xffed
0096 00c7       |    |		Action	Elaborate_Subprogram
0097 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28				; Debug Table 0x1.0x13 = 0x97,0xffec
0098 00c7       |    |		Action	Elaborate_Subprogram
0099 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29				; Debug Table 0x1.0x14 = 0x99,0xffeb
009a 00c7       |    |		Action	Elaborate_Subprogram
009b 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a				; Debug Table 0x1.0x15 = 0x9b,0xffea
009c 00c7       |    |		Action	Elaborate_Subprogram
009d 1d2d       | -  |		Execute_Immediate	Reference_Lex_1,0x2d				; Debug Table 0x1.0x16 = 0x9d,0xffe9
009e 00c7       |    |		Action	Elaborate_Subprogram
009f			BODY_0008:
009f 00bc       |    |		Action	Signal_Activated
00a0 00bb       |    |		Action	Signal_Completion
00a1 0000 0000  |    |		.BLANK	0000[0x7]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab       |    |		.CONST	0x00ab								; Address of begin
00a9 0004       |    |		.CONST	0x0004								; Address of exception handler
00aa 0001       |    |		.CONST	0x0001								; Number of locals
00ab			BODY_00a8:
00ab			INIT_00a8:
00ab 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2 = .DEBUG	0x00ab,0x0624,0x0002,0x0000,0x0057,0x2965,0x0000,0x0052
													; Debug Table 0x2.0x0 = 0xab,0x1
00ac 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00ad 8232       | 2  |		Call	0x1,0x32
00ae 6804       |h   |		Jump_Zero	0xb3
00af 00da       |    |		Load_Top	At_Offset_2
00b0 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00b1 8231       | 1  |		Call	0x1,0x31
00b2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00b3 4800       |H   |		Short_Literal	0x0
00b4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00b5 0000 0000  |    |		.XXX[0x3]
00b7 0000       |    |
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb       |    |		.CONST	0x00bb								; Address of begin
00b9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ba 0001       |    |		.CONST	0x0001								; Number of locals
00bb			BODY_00b8:
00bb			INIT_00b8:
00bb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3 = .DEBUG	0x00bb,0x0628,0x0002,0x0000,0x0057,0x2965,0x0000,0x005b
													; Debug Table 0x3.0x0 = 0xbb,0x1
00bc 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00bd 8232       | 2  |		Call	0x1,0x32
00be 7008       |p   |		Jump_Nonzero	0xc7
00bf 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x1 = 0xbf,0x2
00c0 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00c1 e001       |    |		Load	0x0,0x1
00c2 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
00c3 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00c4 025e       | ^  |		Execute	Discrete,Convert
00c5 1c01       |    |		Execute_Immediate	Run_Utility,0x1
00c6 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00c7 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x2 = 0xc7,0x3
00c8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00c9 e001       |    |		Load	0x0,0x1
00ca 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00cb 025e       | ^  |		Execute	Discrete,Convert
00cc 1c01       |    |		Execute_Immediate	Run_Utility,0x1
00cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ce 0000 0000  |    |		.XXX[0x2]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3       |    |		.CONST	0x00d3								; Address of begin
00d1 0004       |    |		.CONST	0x0004								; Address of exception handler
00d2 0001       |    |		.CONST	0x0001								; Number of locals
00d3			BODY_00d0:
00d3			INIT_00d0:
00d3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x4 = .DEBUG	0x00d3,0x0630,0x0002,0x0000,0x0057,0x2965,0x0000,0x0064
													; Debug Table 0x4.0x0 = 0xd3,0x1
00d4 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
00d5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d6 0000 0000  |    |		.XXX[0x2]
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,0x0634,0x0002,0x0000,0x0057,0x2965,0x0000,0x006d
													; Debug Table 0x5.0x0 = 0xdb,0x1
00dc 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00dd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00de 0000 0000  |    |		.XXX[0x2]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3       |    |		.CONST	0x00e3								; Address of begin
00e1 0004       |    |		.CONST	0x0004								; Address of exception handler
00e2 0001       |    |		.CONST	0x0001								; Number of locals
00e3			BODY_00e0:
00e3			INIT_00e0:
00e3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x00e3,0x0638,0x0002,0x0000,0x0057,0x2965,0x0000,0x0076
													; Debug Table 0x6.0x0 = 0xe3,0x1
00e4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00e5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00e6 0000 0000  |    |		.XXX[0x2]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb       |    |		.CONST	0x00eb								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0001       |    |		.CONST	0x0001								; Number of locals
00eb			BODY_00e8:
00eb			INIT_00e8:
00eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x00eb,0x063c,0x0002,0x0000,0x0057,0x2965,0x0000,0x007f
													; Debug Table 0x7.0x0 = 0xeb,0x1
00ec 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00ed 0f03       |    |		Execute_Immediate	Equal,0x3
00ee 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ef 0000       |    |		.XXX[0x1]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3       |    |		.CONST	0x00f3								; Address of begin
00f1 0004       |    |		.CONST	0x0004								; Address of exception handler
00f2 0001       |    |		.CONST	0x0001								; Number of locals
00f3			BODY_00f0:
00f3			INIT_00f0:
00f3 e20d       |    |		Load	0x1,0xd								; Debug Table 0x8 = .DEBUG	0x00f3,0x0640,0x0002,0x0000,0x0057,0x2965,0x0000,0x0088
													; Debug Table 0x8.0x0 = 0xf3,0x1
00f4 0322       | "  |		Declare_Variable	Record
00f5 4800       |H   |		Short_Literal	0x0
00f6 00d9       |    |		Load_Top	At_Offset_1
00f7 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00f8 4800       |H   |		Short_Literal	0x0
00f9 00d9       |    |		Load_Top	At_Offset_1
00fa 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00fb 4800       |H   |		Short_Literal	0x0
00fc 00d9       |    |		Load_Top	At_Offset_1
00fd 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
00fe 00ca       |    |		Action	Exit_Nullary_Function
00ff 0000       |    |		.XXX[0x1]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0118       |    |		.CONST	0x0118								; Address of begin
0101 01b3       |    |		.CONST	0x01b3								; Address of exception handler
0102 0008       |    |		.CONST	0x0008								; Number of locals
0103			INIT_0100:
0103 0007       |    |		Action	Break_Optional							; Debug Table 0x9 = .DEBUG	0x0103,0x0644,0x0001,0x0000,0x0057,0x2965,0x0000,0x00b8
													; Debug Table 0x9.0x0 = 0x103,0xffff
0104 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x9.0x1 = 0x104,0xfffe
0105 e004       |    |		Load	0x0,0x4								; Debug Table 0x9.0x2 = 0x105,0xfffd
0106 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0107 02c7       |    |		Declare_Variable	Any
0108 00d8       |    |		Load_Top	At_Offset_0
0109 1c00       |    |		Execute_Immediate	Run_Utility,0x0
010a e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0x3 = 0x10a,0xfffc
010b 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
010c 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
010d 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x9.0x4 = 0x10d,0xfffb
010e e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0x5 = 0x10e,0xfffa
010f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0110 e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0x6 = 0x110,0xfff9
0111 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0112 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0113 e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0x7 = 0x113,0xfff8
0114 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0115 02ff       |    |		Declare_Variable	Variant_Record
0116 00d8       |    |		Load_Top	At_Offset_0
0117 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0118			BODY_0100:
0118 4800       |H   |		Short_Literal	0x0							; Debug Table 0x9.0x8 = 0x118,0x1
0119 a402       |    |		Store_Unchecked	0x2,0x2
011a 821a       |    |		Call	0x1,0x1a							; Debug Table 0x9.0x9 = 0x11a,0x2
011b e5fb       |    |		Load	0x2,-0x5
011c 017d       | }  |		Execute	Record,Structure_Write
011d e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0xa = 0x11d,0x3
011e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
011f 00e1       |    |		Load_Encached	Boolean_Cache
0120 62ab       |b   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
0121 e5fd       |    |		Load	0x2,-0x3
0122 e5fe       |    |		Load	0x2,-0x2
0123 e001       |    |		Load	0x0,0x1
0124 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
0125 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0126 c402       |    |		Store	0x2,0x2
0127 005b       | [  |		Store_Top	Discrete,At_Offset_3
0128 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0xb = 0x128,0x4
0129 8231       | 1  |		Call	0x1,0x31
012a 7004       |p   |		Jump_Nonzero	0x12f
012b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0xc = 0x12b,0x5
012c e5fb       |    |		Load	0x2,-0x5
012d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
012e 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x9.0xd = 0x12e,0x6
012f e402       |    |		Load	0x2,0x2								; Debug Table 0x9.0xe = 0x12f,0x7
0130 6810       |h   |		Jump_Zero	0x141
0131 e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0xf = 0x131,0x8
0132 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0133 6298       |b   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
0134 e5fd       |    |		Load	0x2,-0x3
0135 e5fe       |    |		Load	0x2,-0x2
0136 e001       |    |		Load	0x0,0x1
0137 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
0138 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0139 005b       | [  |		Store_Top	Discrete,At_Offset_3
013a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x10 = 0x13a,0x9
013b 8231       | 1  |		Call	0x1,0x31
013c 7004       |p   |		Jump_Nonzero	0x141
013d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x11 = 0x13d,0xa
013e e5fb       |    |		Load	0x2,-0x5
013f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0140 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x9.0x12 = 0x140,0xb
0141 e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0x13 = 0x141,0xc
0142 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0143 e001       |    |		Load	0x0,0x1
0144 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0145 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0146 6285       |b   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
0147 e5fd       |    |		Load	0x2,-0x3
0148 4800       |H   |		Short_Literal	0x0
0149 e5fe       |    |		Load	0x2,-0x2
014a e001       |    |		Load	0x0,0x1
014b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
014c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
014d 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
014e 005b       | [  |		Store_Top	Discrete,At_Offset_3
014f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x14 = 0x14f,0xd
0150 8231       | 1  |		Call	0x1,0x31
0151 7005       |p   |		Jump_Nonzero	0x157
0152 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x15 = 0x152,0xe
0153 e5fb       |    |		Load	0x2,-0x5
0154 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0155 6272       |br  |		Indirect_Literal	Discrete,0x3c8,{0x00000000, 0x57297501}		; Debug Table 0x9.0x16 = 0x155,0xf
0156 0257       | W  |		Execute	Discrete,Raise
0157 e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0x17 = 0x157,0x10
0158 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0159 00f1       |    |		Load_Encached	Diana_Temp_Seq
015a e001       |    |		Load	0x0,0x1
015b 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
015c 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
015d e403       |    |		Load	0x2,0x3
015e 0120       |    |		Execute	Any,Is_Value
015f 6803       |h   |		Jump_Zero	0x163
0160 e004       |    |		Load	0x0,0x4
0161 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0162 7801       |x   |		Jump	0x164
0163 e403       |    |		Load	0x2,0x3
0164 e408       |    |		Load	0x2,0x8
0165 6266       |bf  |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
0166 e5fd       |    |		Load	0x2,-0x3
0167 4800       |H   |		Short_Literal	0x0
0168 e001       |    |		Load	0x0,0x1
0169 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
016a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
016b e001       |    |		Load	0x0,0x1
016c 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
016d 6256       |bV  |		Indirect_Literal	Discrete,0x3c4,{0x00000000, 0x7fffffff}
016e 4ffc       |O   |		Short_Literal	-0x4
016f 4ffd       |O   |		Short_Literal	-0x3
0170 e407       |    |		Load	0x2,0x7
0171 e22f       | /  |		Load	0x1,0x2f
0172 e22e       | .  |		Load	0x1,0x2e
0173 e5ff       |    |		Load	0x2,-0x1
0174 e001       |    |		Load	0x0,0x1
0175 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
0176 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0177 00d1       |    |		Pop_Control	Pop_Count_1
0178 c403       |    |		Store	0x2,0x3
0179 c404       |    |		Store	0x2,0x4
017a c405       |    |		Store	0x2,0x5
017b 005b       | [  |		Store_Top	Discrete,At_Offset_3
017c 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x18 = 0x17c,0x11
017d 8231       | 1  |		Call	0x1,0x31
017e 7005       |p   |		Jump_Nonzero	0x184
017f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x19 = 0x17f,0x12
0180 e5fb       |    |		Load	0x2,-0x5
0181 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0182 6245       |bE  |		Indirect_Literal	Discrete,0x3c8,{0x00000000, 0x57297501}		; Debug Table 0x9.0x1a = 0x182,0x13
0183 0257       | W  |		Execute	Discrete,Raise
0184 e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0x1b = 0x184,0x14
0185 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0186 e5fc       |    |		Load	0x2,-0x4
0187 0120       |    |		Execute	Any,Is_Value
0188 6803       |h   |		Jump_Zero	0x18c
0189 e001       |    |		Load	0x0,0x1
018a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
018b 7801       |x   |		Jump	0x18d
018c e5fc       |    |		Load	0x2,-0x4
018d 623e       |b>  |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
018e e5fd       |    |		Load	0x2,-0x3
018f e408       |    |		Load	0x2,0x8
0190 e001       |    |		Load	0x0,0x1
0191 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0192 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0193 c5fc       |    |		Store	0x2,-0x4
0194 005b       | [  |		Store_Top	Discrete,At_Offset_3
0195 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x1c = 0x195,0x15
0196 8231       | 1  |		Call	0x1,0x31
0197 7005       |p   |		Jump_Nonzero	0x19d
0198 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x1d = 0x198,0x16
0199 e5fb       |    |		Load	0x2,-0x5
019a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
019b 622c       |b,  |		Indirect_Literal	Discrete,0x3c8,{0x00000000, 0x57297501}		; Debug Table 0x9.0x1e = 0x19b,0x17
019c 0257       | W  |		Execute	Discrete,Raise
019d e402       |    |		Load	0x2,0x2								; Debug Table 0x9.0x1f = 0x19d,0x18
019e 6810       |h   |		Jump_Zero	0x1af
019f e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0x20 = 0x19f,0x19
01a0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01a1 622a       |b*  |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
01a2 e5fd       |    |		Load	0x2,-0x3
01a3 e5fe       |    |		Load	0x2,-0x2
01a4 e001       |    |		Load	0x0,0x1
01a5 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
01a6 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01a7 005b       | [  |		Store_Top	Discrete,At_Offset_3
01a8 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x21 = 0x1a8,0x1a
01a9 8231       | 1  |		Call	0x1,0x31
01aa 7004       |p   |		Jump_Nonzero	0x1af
01ab 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x22 = 0x1ab,0x1b
01ac e5fb       |    |		Load	0x2,-0x5
01ad 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01ae 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x9.0x23 = 0x1ae,0x1c
01af 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0x24 = 0x1af,0x1d
01b0 e5fb       |    |		Load	0x2,-0x5
01b1 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01b2 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01b3			TRAP_0100:
01b3 6214       |b   |		Indirect_Literal	Discrete,0x3c8,{0x00000000, 0x57297501}
01b4 010f       |    |		Execute	Exception,Equal
01b5 680c       |h   |		Jump_Zero	0x1c2
01b6 e402       |    |		Load	0x2,0x2								; Debug Table 0x9.0x25 = 0x1b6,0x1e
01b7 6809       |h   |		Jump_Zero	0x1c1
01b8 e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0x26 = 0x1b8,0x1f
01b9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ba 6211       |b   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
01bb e5fd       |    |		Load	0x2,-0x3
01bc e5fe       |    |		Load	0x2,-0x2
01bd e001       |    |		Load	0x0,0x1
01be 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
01bf 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01c0 c406       |    |		Store	0x2,0x6
01c1 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01c2 0100       |    |		Execute	Exception,Raise
01c3 0000 0000  |    |		.BLANK	0000[0x5]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01e6       |    |		.CONST	0x01e6								; Address of begin
01c9 0298       |    |		.CONST	0x0298								; Address of exception handler
01ca 0009       |    |		.CONST	0x0009								; Number of locals
01cb			INIT_01c8:
01cb 0007       |    |		Action	Break_Optional							; Debug Table 0xa = .DEBUG	0x01cb,0x0694,0x0001,0x0000,0x0057,0x2965,0x0000,0x00d5
													; Debug Table 0xa.0x0 = 0x1cb,0xffff
01cc 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xa.0x1 = 0x1cc,0xfffe
01cd e004       |    |		Load	0x0,0x4								; Debug Table 0xa.0x2 = 0x1cd,0xfffd
01ce 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01cf 02c7       |    |		Declare_Variable	Any
01d0 00d8       |    |		Load_Top	At_Offset_0
01d1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d2 e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x3 = 0x1d2,0xfffc
01d3 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01d4 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
01d5 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0xa.0x4 = 0x1d5,0xfffb
01d6 e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x5 = 0x1d6,0xfffa
01d7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01d8 e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x6 = 0x1d8,0xfff9
01d9 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01da 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
01db e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x7 = 0x1db,0xfff8
01dc 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
01dd 02ff       |    |		Declare_Variable	Variant_Record
01de 00d8       |    |		Load_Top	At_Offset_0
01df 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01e0 e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x8 = 0x1e0,0xfff7
01e1 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
01e2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01e3 02c7       |    |		Declare_Variable	Any
01e4 00d8       |    |		Load_Top	At_Offset_0
01e5 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01e6			BODY_01c8:
01e6 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x9 = 0x1e6,0x1
01e7 a402       |    |		Store_Unchecked	0x2,0x2
01e8 821a       |    |		Call	0x1,0x1a							; Debug Table 0xa.0xa = 0x1e8,0x2
01e9 e5fa       |    |		Load	0x2,-0x6
01ea 017d       | }  |		Execute	Record,Structure_Write
01eb e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0xb = 0x1eb,0x3
01ec 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ed 00e1       |    |		Load_Encached	Boolean_Cache
01ee 61dd       |a   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
01ef e5fc       |    |		Load	0x2,-0x4
01f0 e5fe       |    |		Load	0x2,-0x2
01f1 e001       |    |		Load	0x0,0x1
01f2 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
01f3 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01f4 c402       |    |		Store	0x2,0x2
01f5 c406       |    |		Store	0x2,0x6
01f6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0xc = 0x1f6,0x4
01f7 8231       | 1  |		Call	0x1,0x31
01f8 7004       |p   |		Jump_Nonzero	0x1fd
01f9 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0xd = 0x1f9,0x5
01fa e5fa       |    |		Load	0x2,-0x6
01fb 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01fc 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0xa.0xe = 0x1fc,0x6
01fd e402       |    |		Load	0x2,0x2								; Debug Table 0xa.0xf = 0x1fd,0x7
01fe 6811       |h   |		Jump_Zero	0x210
01ff e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x10 = 0x1ff,0x8
0200 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0201 61ca       |a   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
0202 e005       |    |		Load	0x0,0x5
0203 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0204 e5fe       |    |		Load	0x2,-0x2
0205 e001       |    |		Load	0x0,0x1
0206 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
0207 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0208 c406       |    |		Store	0x2,0x6
0209 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x11 = 0x209,0x9
020a 8231       | 1  |		Call	0x1,0x31
020b 7004       |p   |		Jump_Nonzero	0x210
020c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x12 = 0x20c,0xa
020d e5fa       |    |		Load	0x2,-0x6
020e 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
020f 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0xa.0x13 = 0x20f,0xb
0210 e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x14 = 0x210,0xc
0211 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0212 00d9       |    |		Load_Top	At_Offset_1
0213 0120       |    |		Execute	Any,Is_Value
0214 6804       |h   |		Jump_Zero	0x219
0215 e001       |    |		Load	0x0,0x1
0216 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0217 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0218 7801       |x   |		Jump	0x21a
0219 00d9       |    |		Load_Top	At_Offset_1
021a 61b1       |a   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
021b e005       |    |		Load	0x0,0x5
021c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
021d e001       |    |		Load	0x0,0x1
021e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
021f 4802       |H   |		Short_Literal	0x2
0220 61a3       |a   |		Indirect_Literal	Discrete,0x3c4,{0x00000000, 0x7fffffff}
0221 61a2       |a   |		Indirect_Literal	Discrete,0x3c4,{0x00000000, 0x7fffffff}
0222 e001       |    |		Load	0x0,0x1
0223 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0224 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0225 e001       |    |		Load	0x0,0x1
0226 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0227 e5fe       |    |		Load	0x2,-0x2
0228 e001       |    |		Load	0x0,0x1
0229 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
022a 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
022b e5fd       |    |		Load	0x2,-0x3
022c e5ff       |    |		Load	0x2,-0x1
022d e001       |    |		Load	0x0,0x1
022e 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
022f 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0230 c409       |    |		Store	0x2,0x9
0231 c406       |    |		Store	0x2,0x6
0232 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x15 = 0x232,0xd
0233 8231       | 1  |		Call	0x1,0x31
0234 7005       |p   |		Jump_Nonzero	0x23a
0235 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x16 = 0x235,0xe
0236 e5fa       |    |		Load	0x2,-0x6
0237 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0238 6187       |a   |		Indirect_Literal	Discrete,0x3c0,{0x00000000, 0x57297502}		; Debug Table 0xa.0x17 = 0x238,0xf
0239 0257       | W  |		Execute	Discrete,Raise
023a e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x18 = 0x23a,0x10
023b 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
023c 00f1       |    |		Load_Encached	Diana_Temp_Seq
023d e001       |    |		Load	0x0,0x1
023e 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
023f 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0240 e403       |    |		Load	0x2,0x3
0241 0120       |    |		Execute	Any,Is_Value
0242 6803       |h   |		Jump_Zero	0x246
0243 e004       |    |		Load	0x0,0x4
0244 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0245 7801       |x   |		Jump	0x247
0246 e403       |    |		Load	0x2,0x3
0247 e408       |    |		Load	0x2,0x8
0248 6183       |a   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
0249 e005       |    |		Load	0x0,0x5
024a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
024b 4800       |H   |		Short_Literal	0x0
024c e001       |    |		Load	0x0,0x1
024d 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
024e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
024f e001       |    |		Load	0x0,0x1
0250 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0251 4ffc       |O   |		Short_Literal	-0x4
0252 4ffd       |O   |		Short_Literal	-0x3
0253 e409       |    |		Load	0x2,0x9
0254 e001       |    |		Load	0x0,0x1
0255 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0256 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0257 e001       |    |		Load	0x0,0x1
0258 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
0259 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
025a 00d1       |    |		Pop_Control	Pop_Count_1
025b c403       |    |		Store	0x2,0x3
025c c404       |    |		Store	0x2,0x4
025d c405       |    |		Store	0x2,0x5
025e c406       |    |		Store	0x2,0x6
025f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x19 = 0x25f,0x11
0260 8231       | 1  |		Call	0x1,0x31
0261 7005       |p   |		Jump_Nonzero	0x267
0262 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x1a = 0x262,0x12
0263 e5fa       |    |		Load	0x2,-0x6
0264 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0265 615a       |aZ  |		Indirect_Literal	Discrete,0x3c0,{0x00000000, 0x57297502}		; Debug Table 0xa.0x1b = 0x265,0x13
0266 0257       | W  |		Execute	Discrete,Raise
0267 e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x1c = 0x267,0x14
0268 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0269 e5fb       |    |		Load	0x2,-0x5
026a 0120       |    |		Execute	Any,Is_Value
026b 6803       |h   |		Jump_Zero	0x26f
026c e001       |    |		Load	0x0,0x1
026d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
026e 7801       |x   |		Jump	0x270
026f e5fb       |    |		Load	0x2,-0x5
0270 615b       |a[  |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
0271 e005       |    |		Load	0x0,0x5
0272 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0273 e408       |    |		Load	0x2,0x8
0274 e001       |    |		Load	0x0,0x1
0275 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0276 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0277 c5fb       |    |		Store	0x2,-0x5
0278 c406       |    |		Store	0x2,0x6
0279 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x1d = 0x279,0x15
027a 8231       | 1  |		Call	0x1,0x31
027b 7005       |p   |		Jump_Nonzero	0x281
027c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x1e = 0x27c,0x16
027d e5fa       |    |		Load	0x2,-0x6
027e 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
027f 6140       |a@  |		Indirect_Literal	Discrete,0x3c0,{0x00000000, 0x57297502}		; Debug Table 0xa.0x1f = 0x27f,0x17
0280 0257       | W  |		Execute	Discrete,Raise
0281 e402       |    |		Load	0x2,0x2								; Debug Table 0xa.0x20 = 0x281,0x18
0282 6811       |h   |		Jump_Zero	0x294
0283 e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x21 = 0x283,0x19
0284 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0285 6146       |aF  |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
0286 e005       |    |		Load	0x0,0x5
0287 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0288 e5fe       |    |		Load	0x2,-0x2
0289 e001       |    |		Load	0x0,0x1
028a 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
028b 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
028c c406       |    |		Store	0x2,0x6
028d 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x22 = 0x28d,0x1a
028e 8231       | 1  |		Call	0x1,0x31
028f 7004       |p   |		Jump_Nonzero	0x294
0290 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x23 = 0x290,0x1b
0291 e5fa       |    |		Load	0x2,-0x6
0292 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0293 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0xa.0x24 = 0x293,0x1c
0294 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x25 = 0x294,0x1d
0295 e5fa       |    |		Load	0x2,-0x6
0296 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0297 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0298			TRAP_01c8:
0298 6127       |a'  |		Indirect_Literal	Discrete,0x3c0,{0x00000000, 0x57297502}
0299 010f       |    |		Execute	Exception,Equal
029a 680d       |h   |		Jump_Zero	0x2a8
029b e402       |    |		Load	0x2,0x2								; Debug Table 0xa.0x26 = 0x29b,0x1e
029c 680a       |h   |		Jump_Zero	0x2a7
029d e001       |    |		Load	0x0,0x1								; Debug Table 0xa.0x27 = 0x29d,0x1f
029e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
029f 612c       |a,  |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
02a0 e005       |    |		Load	0x0,0x5
02a1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02a2 e5fe       |    |		Load	0x2,-0x2
02a3 e001       |    |		Load	0x0,0x1
02a4 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
02a5 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
02a6 c406       |    |		Store	0x2,0x6
02a7 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
02a8 0100       |    |		Execute	Exception,Raise
02a9 0000 0000  |    |		.BLANK	0000[0x7]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02c2       |    |		.CONST	0x02c2								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0007       |    |		.CONST	0x0007								; Number of locals
02b3			INIT_02b0:
02b3 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xb = .DEBUG	0x02b3,0x06e6,0x0001,0x0000,0x0057,0x2965,0x0000,0x00fb
													; Debug Table 0xb.0x0 = 0x2b3,0xffff
02b4 e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x1 = 0x2b4,0xfffe
02b5 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02b6 e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x2 = 0x2b6,0xfffd
02b7 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02b8 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
02b9 e004       |    |		Load	0x0,0x4								; Debug Table 0xb.0x3 = 0x2b9,0xfffc
02ba 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02bb 02c7       |    |		Declare_Variable	Any
02bc 00d8       |    |		Load_Top	At_Offset_0
02bd 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02be e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x4 = 0x2be,0xfffb
02bf 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
02c0 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
02c1 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0xb.0x5 = 0x2c1,0xfffa
02c2			BODY_02b0:
02c2 821a       |    |		Call	0x1,0x1a							; Debug Table 0xb.0x6 = 0x2c2,0x1
02c3 e5fc       |    |		Load	0x2,-0x4
02c4 017d       | }  |		Execute	Record,Structure_Write
02c5 e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x7 = 0x2c5,0x2
02c6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02c7 e001       |    |		Load	0x0,0x1
02c8 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02c9 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
02ca 6101       |a   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
02cb e5fd       |    |		Load	0x2,-0x3
02cc 4800       |H   |		Short_Literal	0x0
02cd e5fe       |    |		Load	0x2,-0x2
02ce e001       |    |		Load	0x0,0x1
02cf 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02d0 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
02d1 c404       |    |		Store	0x2,0x4
02d2 c403       |    |		Store	0x2,0x3
02d3 e403       |    |		Load	0x2,0x3								; Debug Table 0xb.0x8 = 0x2d3,0x3
02d4 8231       | 1  |		Call	0x1,0x31
02d5 7004       |p   |		Jump_Nonzero	0x2da
02d6 e403       |    |		Load	0x2,0x3								; Debug Table 0xb.0x9 = 0x2d6,0x4
02d7 e5fc       |    |		Load	0x2,-0x4
02d8 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02d9 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0xb.0xa = 0x2d9,0x5
02da e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0xb = 0x2da,0x6
02db 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02dc 00e1       |    |		Load_Encached	Boolean_Cache
02dd 60ee       |`   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
02de e5fd       |    |		Load	0x2,-0x3
02df e5fe       |    |		Load	0x2,-0x2
02e0 e001       |    |		Load	0x0,0x1
02e1 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
02e2 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
02e3 c402       |    |		Store	0x2,0x2
02e4 c403       |    |		Store	0x2,0x3
02e5 e403       |    |		Load	0x2,0x3								; Debug Table 0xb.0xc = 0x2e5,0x7
02e6 8231       | 1  |		Call	0x1,0x31
02e7 7004       |p   |		Jump_Nonzero	0x2ec
02e8 e403       |    |		Load	0x2,0x3								; Debug Table 0xb.0xd = 0x2e8,0x8
02e9 e5fc       |    |		Load	0x2,-0x4
02ea 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02eb 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0xb.0xe = 0x2eb,0x9
02ec e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0xf = 0x2ec,0xa
02ed 6810       |h   |		Jump_Zero	0x2fe
02ee e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x10 = 0x2ee,0xb
02ef 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02f0 60db       |`   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
02f1 e5fd       |    |		Load	0x2,-0x3
02f2 e5fe       |    |		Load	0x2,-0x2
02f3 e001       |    |		Load	0x0,0x1
02f4 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
02f5 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
02f6 c403       |    |		Store	0x2,0x3
02f7 e403       |    |		Load	0x2,0x3								; Debug Table 0xb.0x11 = 0x2f7,0xc
02f8 8231       | 1  |		Call	0x1,0x31
02f9 7004       |p   |		Jump_Nonzero	0x2fe
02fa e403       |    |		Load	0x2,0x3								; Debug Table 0xb.0x12 = 0x2fa,0xd
02fb e5fc       |    |		Load	0x2,-0x4
02fc 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02fd 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0xb.0x13 = 0x2fd,0xe
02fe e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x14 = 0x2fe,0xf
02ff 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0300 00f1       |    |		Load_Encached	Diana_Temp_Seq
0301 e001       |    |		Load	0x0,0x1
0302 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0303 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0304 e405       |    |		Load	0x2,0x5
0305 0120       |    |		Execute	Any,Is_Value
0306 6803       |h   |		Jump_Zero	0x30a
0307 e004       |    |		Load	0x0,0x4
0308 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0309 7801       |x   |		Jump	0x30b
030a e405       |    |		Load	0x2,0x5
030b 60c0       |`   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
030c e5fd       |    |		Load	0x2,-0x3
030d 4800       |H   |		Short_Literal	0x0
030e e001       |    |		Load	0x0,0x1
030f 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
0310 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0311 e001       |    |		Load	0x0,0x1
0312 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0313 4800       |H   |		Short_Literal	0x0
0314 e404       |    |		Load	0x2,0x4
0315 e5ff       |    |		Load	0x2,-0x1
0316 e001       |    |		Load	0x0,0x1
0317 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
0318 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0319 c405       |    |		Store	0x2,0x5
031a c406       |    |		Store	0x2,0x6
031b 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
031c c403       |    |		Store	0x2,0x3
031d e403       |    |		Load	0x2,0x3								; Debug Table 0xb.0x15 = 0x31d,0x10
031e 8231       | 1  |		Call	0x1,0x31
031f 7004       |p   |		Jump_Nonzero	0x324
0320 e403       |    |		Load	0x2,0x3								; Debug Table 0xb.0x16 = 0x320,0x11
0321 e5fc       |    |		Load	0x2,-0x4
0322 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0323 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0xb.0x17 = 0x323,0x12
0324 e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0x18 = 0x324,0x13
0325 6810       |h   |		Jump_Zero	0x336
0326 e001       |    |		Load	0x0,0x1								; Debug Table 0xb.0x19 = 0x326,0x14
0327 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0328 60a3       |`   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
0329 e5fd       |    |		Load	0x2,-0x3
032a e5fe       |    |		Load	0x2,-0x2
032b e001       |    |		Load	0x0,0x1
032c 1b3b       | ;  |		Execute	Package,Field_Read,Field_Number 0x3b
032d 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
032e c403       |    |		Store	0x2,0x3
032f e403       |    |		Load	0x2,0x3								; Debug Table 0xb.0x1a = 0x32f,0x15
0330 8231       | 1  |		Call	0x1,0x31
0331 7004       |p   |		Jump_Nonzero	0x336
0332 e403       |    |		Load	0x2,0x3								; Debug Table 0xb.0x1b = 0x332,0x16
0333 e5fc       |    |		Load	0x2,-0x4
0334 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0335 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0xb.0x1c = 0x335,0x17
0336 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0337 0000       |    |		.XXX[0x1]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 0343       | C  |		.CONST	0x0343								; Address of begin
0339 0004       |    |		.CONST	0x0004								; Address of exception handler
033a 0003       |    |		.CONST	0x0003								; Number of locals
033b			INIT_0338:
033b e001       |    |		Load	0x0,0x1								; Debug Table 0xc = .DEBUG	0x033b,0x0722,0x0001,0x0000,0x0057,0x2965,0x0000,0x0114
													; Debug Table 0xc.0x0 = 0x33b,0xffff
033c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
033d e001       |    |		Load	0x0,0x1								; Debug Table 0xc.0x1 = 0x33d,0xfffe
033e 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
033f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0340 02c7       |    |		Declare_Variable	Any
0341 00d8       |    |		Load_Top	At_Offset_0
0342 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0343			BODY_0338:
0343 821a       |    |		Call	0x1,0x1a							; Debug Table 0xc.0x2 = 0x343,0x1
0344 e5fd       |    |		Load	0x2,-0x3
0345 017d       | }  |		Execute	Record,Structure_Write
0346 e001       |    |		Load	0x0,0x1								; Debug Table 0xc.0x3 = 0x346,0x2
0347 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0348 00d9       |    |		Load_Top	At_Offset_1
0349 0120       |    |		Execute	Any,Is_Value
034a 6804       |h   |		Jump_Zero	0x34f
034b e001       |    |		Load	0x0,0x1
034c 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
034d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
034e 7801       |x   |		Jump	0x350
034f 00d9       |    |		Load_Top	At_Offset_1
0350 e5ff       |    |		Load	0x2,-0x1
0351 e001       |    |		Load	0x0,0x1
0352 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0353 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0354 c403       |    |		Store	0x2,0x3
0355 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0356 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x4 = 0x356,0x3
0357 8231       | 1  |		Call	0x1,0x31
0358 7004       |p   |		Jump_Nonzero	0x35d
0359 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x5 = 0x359,0x4
035a e5fd       |    |		Load	0x2,-0x3
035b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
035c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xc.0x6 = 0x35c,0x5
035d e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xc.0x7 = 0x35d,0x6
035e e5fe       |    |		Load	0x2,-0x2
035f 00da       |    |		Load_Top	At_Offset_2
0360 e001       |    |		Load	0x0,0x1
0361 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0362 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0363 e5ff       |    |		Load	0x2,-0x1
0364 e001       |    |		Load	0x0,0x1
0365 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0366 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0367 8220       |    |		Call	0x1,0x20
0368 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0369 0000 0000  |    |		.BLANK	0000[0x7]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 037b       | {  |		.CONST	0x037b								; Address of begin
0371 0004       |    |		.CONST	0x0004								; Address of exception handler
0372 0004       |    |		.CONST	0x0004								; Number of locals
0373			INIT_0370:
0373 e001       |    |		Load	0x0,0x1								; Debug Table 0xd = .DEBUG	0x0373,0x0734,0x0001,0x0000,0x0057,0x2965,0x0000,0x015b
													; Debug Table 0xd.0x0 = 0x373,0xffff
0374 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0375 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0376 e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x1 = 0x376,0xfffe
0377 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0378 e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x2 = 0x378,0xfffd
0379 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
037a 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
037b			BODY_0370:
037b 821a       |    |		Call	0x1,0x1a							; Debug Table 0xd.0x3 = 0x37b,0x1
037c e5fa       |    |		Load	0x2,-0x6
037d 017d       | }  |		Execute	Record,Structure_Write
037e e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x4 = 0x37e,0x2
037f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0380 e001       |    |		Load	0x0,0x1
0381 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0382 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0383 6048       |`H  |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
0384 e5fd       |    |		Load	0x2,-0x3
0385 4800       |H   |		Short_Literal	0x0
0386 e5fe       |    |		Load	0x2,-0x2
0387 e001       |    |		Load	0x0,0x1
0388 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0389 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
038a 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
038b 005a       | Z  |		Store_Top	Discrete,At_Offset_2
038c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x5 = 0x38c,0x3
038d 8231       | 1  |		Call	0x1,0x31
038e 7004       |p   |		Jump_Nonzero	0x393
038f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x6 = 0x38f,0x4
0390 e5fa       |    |		Load	0x2,-0x6
0391 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0392 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5					; Debug Table 0xd.0x7 = 0x392,0x5
0393 e001       |    |		Load	0x0,0x1								; Debug Table 0xd.0x8 = 0x393,0x6
0394 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0395 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0396 e5fb       |    |		Load	0x2,-0x5
0397 0120       |    |		Execute	Any,Is_Value
0398 6803       |h   |		Jump_Zero	0x39c
0399 e001       |    |		Load	0x0,0x1
039a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
039b 7801       |x   |		Jump	0x39d
039c e5fb       |    |		Load	0x2,-0x5
039d 602e       |`.  |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
039e e5fd       |    |		Load	0x2,-0x3
039f e404       |    |		Load	0x2,0x4
03a0 e5ff       |    |		Load	0x2,-0x1
03a1 e001       |    |		Load	0x0,0x1
03a2 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03a3 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
03a4 c5fb       |    |		Store	0x2,-0x5
03a5 005b       | [  |		Store_Top	Discrete,At_Offset_3
03a6 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xd.0x9 = 0x3a6,0x7
03a7 00db       |    |		Load_Top	At_Offset_3
03a8 8230       | 0  |		Call	0x1,0x30
03a9 0279       | y  |		Execute	Discrete,And
03aa 680e       |h   |		Jump_Zero	0x3b9
03ab e5fa       |    |		Load	0x2,-0x6							; Debug Table 0xd.0xa = 0x3ab,0x8
03ac e5fb       |    |		Load	0x2,-0x5
03ad 0120       |    |		Execute	Any,Is_Value
03ae 6802       |h   |		Jump_Zero	0x3b1
03af e211       |    |		Load	0x1,0x11
03b0 7801       |x   |		Jump	0x3b2
03b1 e5fb       |    |		Load	0x2,-0x5
03b2 e5fd       |    |		Load	0x2,-0x3
03b3 e5fe       |    |		Load	0x2,-0x2
03b4 e5ff       |    |		Load	0x2,-0x1
03b5 821e       |    |		Call	0x1,0x1e
03b6 c5fb       |    |		Store	0x2,-0x5
03b7 00d1       |    |		Pop_Control	Pop_Count_1
03b8 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03b9 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd.0xb = 0x3b9,0x9
03ba e5fa       |    |		Load	0x2,-0x6
03bb 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
03bc 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
03bd 0000 0000  |    |		.XXX[0x3]
03bf 0000       |    |
03c0 0000 0000  |    |		.LITERAL	{0x00000000, 0x57297502}
03c4 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
03c8 0000 0000  |    |		.LITERAL	{0x00000000, 0x57297501}
03cc 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03db       |    |		.CONST	0x03db								; Address of begin
03d1 0004       |    |		.CONST	0x0004								; Address of exception handler
03d2 0004       |    |		.CONST	0x0004								; Number of locals
03d3			INIT_03d0:
03d3 e001       |    |		Load	0x0,0x1								; Debug Table 0xe = .DEBUG	0x03d3,0x074e,0x0001,0x0000,0x0057,0x2965,0x0000,0x017d
													; Debug Table 0xe.0x0 = 0x3d3,0xffff
03d4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03d5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03d6 e001       |    |		Load	0x0,0x1								; Debug Table 0xe.0x1 = 0x3d6,0xfffe
03d7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03d8 e001       |    |		Load	0x0,0x1								; Debug Table 0xe.0x2 = 0x3d8,0xfffd
03d9 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03da 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
03db			BODY_03d0:
03db 821a       |    |		Call	0x1,0x1a							; Debug Table 0xe.0x3 = 0x3db,0x1
03dc e5f9       |    |		Load	0x2,-0x7
03dd 017d       | }  |		Execute	Record,Structure_Write
03de e001       |    |		Load	0x0,0x1								; Debug Table 0xe.0x4 = 0x3de,0x2
03df 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03e0 e001       |    |		Load	0x0,0x1
03e1 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03e2 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
03e3 67e8       |g   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
03e4 e5fc       |    |		Load	0x2,-0x4
03e5 4800       |H   |		Short_Literal	0x0
03e6 e5fe       |    |		Load	0x2,-0x2
03e7 e001       |    |		Load	0x0,0x1
03e8 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03e9 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03ea 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
03eb 005a       | Z  |		Store_Top	Discrete,At_Offset_2
03ec 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0x5 = 0x3ec,0x3
03ed 8231       | 1  |		Call	0x1,0x31
03ee 7004       |p   |		Jump_Nonzero	0x3f3
03ef 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xe.0x6 = 0x3ef,0x4
03f0 e5f9       |    |		Load	0x2,-0x7
03f1 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
03f2 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6					; Debug Table 0xe.0x7 = 0x3f2,0x5
03f3 e001       |    |		Load	0x0,0x1								; Debug Table 0xe.0x8 = 0x3f3,0x6
03f4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03f5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03f6 e5fa       |    |		Load	0x2,-0x6
03f7 0120       |    |		Execute	Any,Is_Value
03f8 6803       |h   |		Jump_Zero	0x3fc
03f9 e001       |    |		Load	0x0,0x1
03fa 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03fb 7801       |x   |		Jump	0x3fd
03fc e5fa       |    |		Load	0x2,-0x6
03fd 67ce       |g   |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
03fe e5fc       |    |		Load	0x2,-0x4
03ff e404       |    |		Load	0x2,0x4
0400 e5ff       |    |		Load	0x2,-0x1
0401 e001       |    |		Load	0x0,0x1
0402 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0403 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0404 c5fa       |    |		Store	0x2,-0x6
0405 005b       | [  |		Store_Top	Discrete,At_Offset_3
0406 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0xe.0x9 = 0x406,0x7
0407 00db       |    |		Load_Top	At_Offset_3
0408 8230       | 0  |		Call	0x1,0x30
0409 0279       | y  |		Execute	Discrete,And
040a 680f       |h   |		Jump_Zero	0x41a
040b e5f9       |    |		Load	0x2,-0x7							; Debug Table 0xe.0xa = 0x40b,0x8
040c e5fa       |    |		Load	0x2,-0x6
040d 0120       |    |		Execute	Any,Is_Value
040e 6802       |h   |		Jump_Zero	0x411
040f e211       |    |		Load	0x1,0x11
0410 7801       |x   |		Jump	0x412
0411 e5fa       |    |		Load	0x2,-0x6
0412 e5fc       |    |		Load	0x2,-0x4
0413 e5fd       |    |		Load	0x2,-0x3
0414 e5fe       |    |		Load	0x2,-0x2
0415 e5ff       |    |		Load	0x2,-0x1
0416 821f       |    |		Call	0x1,0x1f
0417 c5fa       |    |		Store	0x2,-0x6
0418 00d1       |    |		Pop_Control	Pop_Count_1
0419 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
041a 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe.0xb = 0x41a,0x9
041b e5f9       |    |		Load	0x2,-0x7
041c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
041d 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
041e 0000 0000  |    |		.XXX[0x2]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0423       | #  |		.CONST	0x0423								; Address of begin
0421 0004       |    |		.CONST	0x0004								; Address of exception handler
0422 0001       |    |		.CONST	0x0001								; Number of locals
0423			BODY_0420:
0423			INIT_0420:
0423 821a       |    |		Call	0x1,0x1a							; Debug Table 0xf = .DEBUG	0x0423,0x0768,0x0001,0x0000,0x0057,0x2965,0x0000,0x01a8
													; Debug Table 0xf.0x0 = 0x423,0x1
0424 e5fe       |    |		Load	0x2,-0x2
0425 017d       | }  |		Execute	Record,Structure_Write
0426 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0427 0000       |    |		.XXX[0x1]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 0433       | 3  |		.CONST	0x0433								; Address of begin
0429 0004       |    |		.CONST	0x0004								; Address of exception handler
042a 0003       |    |		.CONST	0x0003								; Number of locals
042b			INIT_0428:
042b e001       |    |		Load	0x0,0x1								; Debug Table 0x10 = .DEBUG	0x042b,0x076c,0x0002,0x0000,0x0057,0x2965,0x0000,0x01c2
													; Debug Table 0x10.0x0 = 0x42b,0xffff
042c 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
042d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
042e 02c7       |    |		Declare_Variable	Any
042f 00d8       |    |		Load_Top	At_Offset_0
0430 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0431 e001       |    |		Load	0x0,0x1								; Debug Table 0x10.0x1 = 0x431,0xfffe
0432 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0433			BODY_0428:
0433 e001       |    |		Load	0x0,0x1								; Debug Table 0x10.0x2 = 0x433,0x1
0434 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0435 00da       |    |		Load_Top	At_Offset_2
0436 0120       |    |		Execute	Any,Is_Value
0437 6804       |h   |		Jump_Zero	0x43c
0438 e001       |    |		Load	0x0,0x1
0439 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
043a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
043b 7801       |x   |		Jump	0x43d
043c 00da       |    |		Load_Top	At_Offset_2
043d e5ff       |    |		Load	0x2,-0x1
043e e001       |    |		Load	0x0,0x1
043f 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0440 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0441 c402       |    |		Store	0x2,0x2
0442 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0443 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x3 = 0x443,0x2
0444 8231       | 1  |		Call	0x1,0x31
0445 7002       |p   |		Jump_Nonzero	0x448
0446 4887       |H   |		Short_Literal	0x87
0447 0257       | W  |		Execute	Discrete,Raise
0448 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x4 = 0x448,0x3
0449 e001       |    |		Load	0x0,0x1
044a 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
044b 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
044c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
044d 0000 0000  |    |		.XXX[0x3]
044f 0000       |    |
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 045b       | [  |		.CONST	0x045b								; Address of begin
0451 0004       |    |		.CONST	0x0004								; Address of exception handler
0452 0003       |    |		.CONST	0x0003								; Number of locals
0453			INIT_0450:
0453 e001       |    |		Load	0x0,0x1								; Debug Table 0x11 = .DEBUG	0x0453,0x0778,0x0002,0x0000,0x0057,0x2965,0x0000,0x01cb
													; Debug Table 0x11.0x0 = 0x453,0xffff
0454 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0455 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0456 02c7       |    |		Declare_Variable	Any
0457 00d8       |    |		Load_Top	At_Offset_0
0458 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0459 e001       |    |		Load	0x0,0x1								; Debug Table 0x11.0x1 = 0x459,0xfffe
045a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
045b			BODY_0450:
045b e001       |    |		Load	0x0,0x1								; Debug Table 0x11.0x2 = 0x45b,0x1
045c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
045d 00da       |    |		Load_Top	At_Offset_2
045e 0120       |    |		Execute	Any,Is_Value
045f 6804       |h   |		Jump_Zero	0x464
0460 e001       |    |		Load	0x0,0x1
0461 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0462 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0463 7801       |x   |		Jump	0x465
0464 00da       |    |		Load_Top	At_Offset_2
0465 e5ff       |    |		Load	0x2,-0x1
0466 e001       |    |		Load	0x0,0x1
0467 1b3d       | =  |		Execute	Package,Field_Read,Field_Number 0x3d
0468 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0469 c402       |    |		Store	0x2,0x2
046a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
046b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x3 = 0x46b,0x2
046c 8231       | 1  |		Call	0x1,0x31
046d 7002       |p   |		Jump_Nonzero	0x470
046e 4887       |H   |		Short_Literal	0x87
046f 0257       | W  |		Execute	Discrete,Raise
0470 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x4 = 0x470,0x3
0471 e001       |    |		Load	0x0,0x1
0472 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0473 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0474 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0475 0000 0000  |    |		.XXX[0x3]
0477 0000       |    |
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 0483       |    |		.CONST	0x0483								; Address of begin
0479 0004       |    |		.CONST	0x0004								; Address of exception handler
047a 0004       |    |		.CONST	0x0004								; Number of locals
047b			INIT_0478:
047b e001       |    |		Load	0x0,0x1								; Debug Table 0x12 = .DEBUG	0x047b,0x0784,0x0001,0x0000,0x0057,0x2965,0x0000,0x01d4
													; Debug Table 0x12.0x0 = 0x47b,0xffff
047c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
047d 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
047e e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x1 = 0x47e,0xfffe
047f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0480 e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x2 = 0x480,0xfffd
0481 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0482 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0483			BODY_0478:
0483 821a       |    |		Call	0x1,0x1a							; Debug Table 0x12.0x3 = 0x483,0x1
0484 e5fb       |    |		Load	0x2,-0x5
0485 017d       | }  |		Execute	Record,Structure_Write
0486 e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x4 = 0x486,0x2
0487 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0488 e001       |    |		Load	0x0,0x1
0489 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
048a 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
048b 6740       |g@  |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
048c e5fd       |    |		Load	0x2,-0x3
048d 4800       |H   |		Short_Literal	0x0
048e e5fe       |    |		Load	0x2,-0x2
048f e001       |    |		Load	0x0,0x1
0490 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0491 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0492 c402       |    |		Store	0x2,0x2
0493 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0494 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x12.0x5 = 0x494,0x3
0495 8231       | 1  |		Call	0x1,0x31
0496 7004       |p   |		Jump_Nonzero	0x49b
0497 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x12.0x6 = 0x497,0x4
0498 e5fb       |    |		Load	0x2,-0x5
0499 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
049a 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x12.0x7 = 0x49a,0x5
049b e001       |    |		Load	0x0,0x1								; Debug Table 0x12.0x8 = 0x49b,0x6
049c 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
049d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
049e e5fc       |    |		Load	0x2,-0x4
049f 672c       |g,  |		Indirect_Literal	Discrete,0x3cc,{0x00000000, 0x00004000}
04a0 e5fd       |    |		Load	0x2,-0x3
04a1 e006       |    |		Load	0x0,0x6
04a2 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
04a3 e007       |    |		Load	0x0,0x7
04a4 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
04a5 4801       |H   |		Short_Literal	0x1
04a6 4800       |H   |		Short_Literal	0x0
04a7 e402       |    |		Load	0x2,0x2
04a8 e5ff       |    |		Load	0x2,-0x1
04a9 e001       |    |		Load	0x0,0x1
04aa 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
04ab 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
04ac c5fc       |    |		Store	0x2,-0x4
04ad 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04ae 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x9 = 0x4ae,0x7
04af 8232       | 2  |		Call	0x1,0x32
04b0 7004       |p   |		Jump_Nonzero	0x4b5
04b1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0xa = 0x4b1,0x8
04b2 e5fb       |    |		Load	0x2,-0x5
04b3 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
04b4 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x12.0xb = 0x4b4,0x9
04b5 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
04b6 0000 0000  |    |		.XXX[0x2]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04bd       |    |		.CONST	0x04bd								; Address of begin
04b9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ba 0002       |    |		.CONST	0x0002								; Number of locals
04bb			INIT_04b8:
04bb e001       |    |		Load	0x0,0x1								; Debug Table 0x13 = .DEBUG	0x04bb,0x079e,0x0001,0x0000,0x0057,0x2965,0x0000,0x0212
													; Debug Table 0x13.0x0 = 0x4bb,0xffff
04bc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04bd			BODY_04b8:
04bd 821a       |    |		Call	0x1,0x1a							; Debug Table 0x13.0x1 = 0x4bd,0x1
04be e5fd       |    |		Load	0x2,-0x3
04bf 017d       | }  |		Execute	Record,Structure_Write
04c0 e001       |    |		Load	0x0,0x1								; Debug Table 0x13.0x2 = 0x4c0,0x2
04c1 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
04c2 e5fe       |    |		Load	0x2,-0x2
04c3 0120       |    |		Execute	Any,Is_Value
04c4 6803       |h   |		Jump_Zero	0x4c8
04c5 e001       |    |		Load	0x0,0x1
04c6 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
04c7 7801       |x   |		Jump	0x4c9
04c8 e5fe       |    |		Load	0x2,-0x2
04c9 e5ff       |    |		Load	0x2,-0x1
04ca e001       |    |		Load	0x0,0x1
04cb 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
04cc 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
04cd c5fe       |    |		Store	0x2,-0x2
04ce 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04cf 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x3 = 0x4cf,0x3
04d0 8231       | 1  |		Call	0x1,0x31
04d1 7004       |p   |		Jump_Nonzero	0x4d6
04d2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x4 = 0x4d2,0x4
04d3 e5fd       |    |		Load	0x2,-0x3
04d4 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
04d5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x13.0x5 = 0x4d5,0x5
04d6 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
04d7 0000       |    |		.XXX[0x1]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04db       |    |		.CONST	0x04db								; Address of begin
04d9 0004       |    |		.CONST	0x0004								; Address of exception handler
04da 0001       |    |		.CONST	0x0001								; Number of locals
04db			BODY_04d8:
04db			INIT_04d8:
04db 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x14 = .DEBUG	0x04db,0x07ac,0x0002,0x0000,0x0057,0x2975,0x0000,0x0024
													; Debug Table 0x14.0x0 = 0x4db,0x1
04dc 0f03       |    |		Execute_Immediate	Equal,0x3
04dd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04de 0000 0000  |    |		.XXX[0x2]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e3       |    |		.CONST	0x04e3								; Address of begin
04e1 0004       |    |		.CONST	0x0004								; Address of exception handler
04e2 0001       |    |		.CONST	0x0001								; Number of locals
04e3			BODY_04e0:
04e3			INIT_04e0:
04e3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15 = .DEBUG	0x04e3,0x07b0,0x0002,0x0000,0x0057,0x2975,0x0000,0x0043
													; Debug Table 0x15.0x0 = 0x4e3,0x1
04e4 0f00       |    |		Execute_Immediate	Equal,0x0
04e5 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04e6 0000 0000  |    |		.XXX[0x2]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 04eb       |    |		.CONST	0x04eb								; Address of begin
04e9 0004       |    |		.CONST	0x0004								; Address of exception handler
04ea 0001       |    |		.CONST	0x0001								; Number of locals
04eb			BODY_04e8:
04eb			INIT_04e8:
04eb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x16 = .DEBUG	0x04eb,0x07b4,0x0002,0x0000,0x0057,0x2975,0x0000,0x005c
													; Debug Table 0x16.0x0 = 0x4eb,0x1
04ec 0f00       |    |		Execute_Immediate	Equal,0x0
04ed 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04ee 0000 0000  |    |		.XXX[0x2]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; Debug Table
04f0 ; --------------------------------------------------------------------------------------
04f0 0003 0017  |    |		.CONST	0x0003,0x0017
04f2 000b 05aa  |    |		.DEBUG	0x000b,0x05aa,0x8000,0x0000,0x0057,0x2965,0x0000,0x0007
04fa 006b 05f4  | k  |		.DEBUG	0x006b,0x05f4,0x8000,0x0000,0x0057,0x2975,0x0000,0x000f
0502 00ab 0624  |   $|		.DEBUG	0x00ab,0x0624,0x0002,0x0000,0x0057,0x2965,0x0000,0x0052
050a 00bb 0628  |   (|		.DEBUG	0x00bb,0x0628,0x0002,0x0000,0x0057,0x2965,0x0000,0x005b
0512 00d3 0630  |   0|		.DEBUG	0x00d3,0x0630,0x0002,0x0000,0x0057,0x2965,0x0000,0x0064
051a 00db 0634  |   4|		.DEBUG	0x00db,0x0634,0x0002,0x0000,0x0057,0x2965,0x0000,0x006d
0522 00e3 0638  |   8|		.DEBUG	0x00e3,0x0638,0x0002,0x0000,0x0057,0x2965,0x0000,0x0076
052a 00eb 063c  |   <|		.DEBUG	0x00eb,0x063c,0x0002,0x0000,0x0057,0x2965,0x0000,0x007f
0532 00f3 0640  |   @|		.DEBUG	0x00f3,0x0640,0x0002,0x0000,0x0057,0x2965,0x0000,0x0088
053a 0103 0644  |   D|		.DEBUG	0x0103,0x0644,0x0001,0x0000,0x0057,0x2965,0x0000,0x00b8
0542 01cb 0694  |    |		.DEBUG	0x01cb,0x0694,0x0001,0x0000,0x0057,0x2965,0x0000,0x00d5
054a 02b3 06e6  |    |		.DEBUG	0x02b3,0x06e6,0x0001,0x0000,0x0057,0x2965,0x0000,0x00fb
0552 033b 0722  | ; "|		.DEBUG	0x033b,0x0722,0x0001,0x0000,0x0057,0x2965,0x0000,0x0114
055a 0373 0734  | s 4|		.DEBUG	0x0373,0x0734,0x0001,0x0000,0x0057,0x2965,0x0000,0x015b
0562 03d3 074e  |   N|		.DEBUG	0x03d3,0x074e,0x0001,0x0000,0x0057,0x2965,0x0000,0x017d
056a 0423 0768  | # h|		.DEBUG	0x0423,0x0768,0x0001,0x0000,0x0057,0x2965,0x0000,0x01a8
0572 042b 076c  | + l|		.DEBUG	0x042b,0x076c,0x0002,0x0000,0x0057,0x2965,0x0000,0x01c2
057a 0453 0778  | S x|		.DEBUG	0x0453,0x0778,0x0002,0x0000,0x0057,0x2965,0x0000,0x01cb
0582 047b 0784  | {  |		.DEBUG	0x047b,0x0784,0x0001,0x0000,0x0057,0x2965,0x0000,0x01d4
058a 04bb 079e  |    |		.DEBUG	0x04bb,0x079e,0x0001,0x0000,0x0057,0x2965,0x0000,0x0212
0592 04db 07ac  |    |		.DEBUG	0x04db,0x07ac,0x0002,0x0000,0x0057,0x2975,0x0000,0x0024
059a 04e3 07b0  |    |		.DEBUG	0x04e3,0x07b0,0x0002,0x0000,0x0057,0x2975,0x0000,0x0043
05a2 04eb 07b4  |    |		.DEBUG	0x04eb,0x07b4,0x0002,0x0000,0x0057,0x2975,0x0000,0x005c
05aa ; --------------------------------------------------------------------------------------
05aa ; Debug3 Subtable 0x0
05aa ; --------------------------------------------------------------------------------------
05aa 0024 0000  | $  |		.DBG3TAB	0x0024,0x0000
05ac 000b ffff  |    |		.CONST	0x000b,0xffff
05ae 000d fffe  |    |		.CONST	0x000d,0xfffe
05b0 0010 fffd  |    |		.CONST	0x0010,0xfffd
05b2 0014 fffc  |    |		.CONST	0x0014,0xfffc
05b4 0018 fffb  |    |		.CONST	0x0018,0xfffb
05b6 001b fffa  |    |		.CONST	0x001b,0xfffa
05b8 001e fff9  |    |		.CONST	0x001e,0xfff9
05ba 0022 fff8  | "  |		.CONST	0x0022,0xfff8
05bc 0023 fff7  | #  |		.CONST	0x0023,0xfff7
05be 0024 fff6  | $  |		.CONST	0x0024,0xfff6
05c0 0026 fff5  | &  |		.CONST	0x0026,0xfff5
05c2 0028 fff4  | (  |		.CONST	0x0028,0xfff4
05c4 002a fff3  | *  |		.CONST	0x002a,0xfff3
05c6 002c fff2  | ,  |		.CONST	0x002c,0xfff2
05c8 002e fff1  | .  |		.CONST	0x002e,0xfff1
05ca 0030 fff0  | 0  |		.CONST	0x0030,0xfff0
05cc 0032 ffef  | 2  |		.CONST	0x0032,0xffef
05ce 0036 ffee  | 6  |		.CONST	0x0036,0xffee
05d0 003a ffed  | :  |		.CONST	0x003a,0xffed
05d2 003d ffec  | =  |		.CONST	0x003d,0xffec
05d4 003f ffeb  | ?  |		.CONST	0x003f,0xffeb
05d6 0041 ffea  | A  |		.CONST	0x0041,0xffea
05d8 0043 ffe9  | C  |		.CONST	0x0043,0xffe9
05da 0045 ffe8  | E  |		.CONST	0x0045,0xffe8
05dc 0047 ffe7  | G  |		.CONST	0x0047,0xffe7
05de 0049 ffe6  | I  |		.CONST	0x0049,0xffe6
05e0 004b ffe5  | K  |		.CONST	0x004b,0xffe5
05e2 004d ffe4  | M  |		.CONST	0x004d,0xffe4
05e4 004f ffe3  | O  |		.CONST	0x004f,0xffe3
05e6 0051 ffe2  | Q  |		.CONST	0x0051,0xffe2
05e8 0053 ffe1  | S  |		.CONST	0x0053,0xffe1
05ea 0055 ffe0  | U  |		.CONST	0x0055,0xffe0
05ec 0057 ffdf  | W  |		.CONST	0x0057,0xffdf
05ee 005b ffde  | [  |		.CONST	0x005b,0xffde
05f0 005f ffdd  | _  |		.CONST	0x005f,0xffdd
05f2 0061 ffdc  | a  |		.CONST	0x0061,0xffdc
05f4 ; --------------------------------------------------------------------------------------
05f4 ; Debug3 Subtable 0x1
05f4 ; --------------------------------------------------------------------------------------
05f4 0017 0000  |    |		.DBG3TAB	0x0017,0x0000
05f6 006b ffff  | k  |		.CONST	0x006b,0xffff
05f8 0070 fffe  | p  |		.CONST	0x0070,0xfffe
05fa 0075 fffd  | u  |		.CONST	0x0075,0xfffd
05fc 0077 fffc  | w  |		.CONST	0x0077,0xfffc
05fe 0079 fffb  | y  |		.CONST	0x0079,0xfffb
0600 007b fffa  | {  |		.CONST	0x007b,0xfffa
0602 007d fff9  | }  |		.CONST	0x007d,0xfff9
0604 007f fff8  |    |		.CONST	0x007f,0xfff8
0606 0081 fff7  |    |		.CONST	0x0081,0xfff7
0608 0083 fff6  |    |		.CONST	0x0083,0xfff6
060a 0085 fff5  |    |		.CONST	0x0085,0xfff5
060c 0087 fff4  |    |		.CONST	0x0087,0xfff4
060e 0089 fff3  |    |		.CONST	0x0089,0xfff3
0610 008b fff2  |    |		.CONST	0x008b,0xfff2
0612 008d fff1  |    |		.CONST	0x008d,0xfff1
0614 008f fff0  |    |		.CONST	0x008f,0xfff0
0616 0091 ffef  |    |		.CONST	0x0091,0xffef
0618 0093 ffee  |    |		.CONST	0x0093,0xffee
061a 0095 ffed  |    |		.CONST	0x0095,0xffed
061c 0097 ffec  |    |		.CONST	0x0097,0xffec
061e 0099 ffeb  |    |		.CONST	0x0099,0xffeb
0620 009b ffea  |    |		.CONST	0x009b,0xffea
0622 009d ffe9  |    |		.CONST	0x009d,0xffe9
0624 ; --------------------------------------------------------------------------------------
0624 ; Debug3 Subtable 0x2
0624 ; --------------------------------------------------------------------------------------
0624 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0626 00ab 0001  |    |		.CONST	0x00ab,0x0001
0628 ; --------------------------------------------------------------------------------------
0628 ; Debug3 Subtable 0x3
0628 ; --------------------------------------------------------------------------------------
0628 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
062a 00bb 0001  |    |		.CONST	0x00bb,0x0001
062c 00bf 0002  |    |		.CONST	0x00bf,0x0002
062e 00c7 0003  |    |		.CONST	0x00c7,0x0003
0630 ; --------------------------------------------------------------------------------------
0630 ; Debug3 Subtable 0x4
0630 ; --------------------------------------------------------------------------------------
0630 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0632 00d3 0001  |    |		.CONST	0x00d3,0x0001
0634 ; --------------------------------------------------------------------------------------
0634 ; Debug3 Subtable 0x5
0634 ; --------------------------------------------------------------------------------------
0634 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0636 00db 0001  |    |		.CONST	0x00db,0x0001
0638 ; --------------------------------------------------------------------------------------
0638 ; Debug3 Subtable 0x6
0638 ; --------------------------------------------------------------------------------------
0638 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
063a 00e3 0001  |    |		.CONST	0x00e3,0x0001
063c ; --------------------------------------------------------------------------------------
063c ; Debug3 Subtable 0x7
063c ; --------------------------------------------------------------------------------------
063c 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
063e 00eb 0001  |    |		.CONST	0x00eb,0x0001
0640 ; --------------------------------------------------------------------------------------
0640 ; Debug3 Subtable 0x8
0640 ; --------------------------------------------------------------------------------------
0640 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0642 00f3 0001  |    |		.CONST	0x00f3,0x0001
0644 ; --------------------------------------------------------------------------------------
0644 ; Debug3 Subtable 0x9
0644 ; --------------------------------------------------------------------------------------
0644 0008 001f  |    |		.DBG3TAB	0x0008,0x001f
0646 0103 ffff  |    |		.CONST	0x0103,0xffff
0648 0104 fffe  |    |		.CONST	0x0104,0xfffe
064a 0105 fffd  |    |		.CONST	0x0105,0xfffd
064c 010a fffc  |    |		.CONST	0x010a,0xfffc
064e 010d fffb  |    |		.CONST	0x010d,0xfffb
0650 010e fffa  |    |		.CONST	0x010e,0xfffa
0652 0110 fff9  |    |		.CONST	0x0110,0xfff9
0654 0113 fff8  |    |		.CONST	0x0113,0xfff8
0656 0118 0001  |    |		.CONST	0x0118,0x0001
0658 011a 0002  |    |		.CONST	0x011a,0x0002
065a 011d 0003  |    |		.CONST	0x011d,0x0003
065c 0128 0004  | (  |		.CONST	0x0128,0x0004
065e 012b 0005  | +  |		.CONST	0x012b,0x0005
0660 012e 0006  | .  |		.CONST	0x012e,0x0006
0662 012f 0007  | /  |		.CONST	0x012f,0x0007
0664 0131 0008  | 1  |		.CONST	0x0131,0x0008
0666 013a 0009  | :  |		.CONST	0x013a,0x0009
0668 013d 000a  | =  |		.CONST	0x013d,0x000a
066a 0140 000b  | @  |		.CONST	0x0140,0x000b
066c 0141 000c  | A  |		.CONST	0x0141,0x000c
066e 014f 000d  | O  |		.CONST	0x014f,0x000d
0670 0152 000e  | R  |		.CONST	0x0152,0x000e
0672 0155 000f  | U  |		.CONST	0x0155,0x000f
0674 0157 0010  | W  |		.CONST	0x0157,0x0010
0676 017c 0011  | |  |		.CONST	0x017c,0x0011
0678 017f 0012  |    |		.CONST	0x017f,0x0012
067a 0182 0013  |    |		.CONST	0x0182,0x0013
067c 0184 0014  |    |		.CONST	0x0184,0x0014
067e 0195 0015  |    |		.CONST	0x0195,0x0015
0680 0198 0016  |    |		.CONST	0x0198,0x0016
0682 019b 0017  |    |		.CONST	0x019b,0x0017
0684 019d 0018  |    |		.CONST	0x019d,0x0018
0686 019f 0019  |    |		.CONST	0x019f,0x0019
0688 01a8 001a  |    |		.CONST	0x01a8,0x001a
068a 01ab 001b  |    |		.CONST	0x01ab,0x001b
068c 01ae 001c  |    |		.CONST	0x01ae,0x001c
068e 01af 001d  |    |		.CONST	0x01af,0x001d
0690 01b6 001e  |    |		.CONST	0x01b6,0x001e
0692 01b8 001f  |    |		.CONST	0x01b8,0x001f
0694 ; --------------------------------------------------------------------------------------
0694 ; Debug3 Subtable 0xa
0694 ; --------------------------------------------------------------------------------------
0694 0009 001f  |    |		.DBG3TAB	0x0009,0x001f
0696 01cb ffff  |    |		.CONST	0x01cb,0xffff
0698 01cc fffe  |    |		.CONST	0x01cc,0xfffe
069a 01cd fffd  |    |		.CONST	0x01cd,0xfffd
069c 01d2 fffc  |    |		.CONST	0x01d2,0xfffc
069e 01d5 fffb  |    |		.CONST	0x01d5,0xfffb
06a0 01d6 fffa  |    |		.CONST	0x01d6,0xfffa
06a2 01d8 fff9  |    |		.CONST	0x01d8,0xfff9
06a4 01db fff8  |    |		.CONST	0x01db,0xfff8
06a6 01e0 fff7  |    |		.CONST	0x01e0,0xfff7
06a8 01e6 0001  |    |		.CONST	0x01e6,0x0001
06aa 01e8 0002  |    |		.CONST	0x01e8,0x0002
06ac 01eb 0003  |    |		.CONST	0x01eb,0x0003
06ae 01f6 0004  |    |		.CONST	0x01f6,0x0004
06b0 01f9 0005  |    |		.CONST	0x01f9,0x0005
06b2 01fc 0006  |    |		.CONST	0x01fc,0x0006
06b4 01fd 0007  |    |		.CONST	0x01fd,0x0007
06b6 01ff 0008  |    |		.CONST	0x01ff,0x0008
06b8 0209 0009  |    |		.CONST	0x0209,0x0009
06ba 020c 000a  |    |		.CONST	0x020c,0x000a
06bc 020f 000b  |    |		.CONST	0x020f,0x000b
06be 0210 000c  |    |		.CONST	0x0210,0x000c
06c0 0232 000d  | 2  |		.CONST	0x0232,0x000d
06c2 0235 000e  | 5  |		.CONST	0x0235,0x000e
06c4 0238 000f  | 8  |		.CONST	0x0238,0x000f
06c6 023a 0010  | :  |		.CONST	0x023a,0x0010
06c8 025f 0011  | _  |		.CONST	0x025f,0x0011
06ca 0262 0012  | b  |		.CONST	0x0262,0x0012
06cc 0265 0013  | e  |		.CONST	0x0265,0x0013
06ce 0267 0014  | g  |		.CONST	0x0267,0x0014
06d0 0279 0015  | y  |		.CONST	0x0279,0x0015
06d2 027c 0016  | |  |		.CONST	0x027c,0x0016
06d4 027f 0017  |    |		.CONST	0x027f,0x0017
06d6 0281 0018  |    |		.CONST	0x0281,0x0018
06d8 0283 0019  |    |		.CONST	0x0283,0x0019
06da 028d 001a  |    |		.CONST	0x028d,0x001a
06dc 0290 001b  |    |		.CONST	0x0290,0x001b
06de 0293 001c  |    |		.CONST	0x0293,0x001c
06e0 0294 001d  |    |		.CONST	0x0294,0x001d
06e2 029b 001e  |    |		.CONST	0x029b,0x001e
06e4 029d 001f  |    |		.CONST	0x029d,0x001f
06e6 ; --------------------------------------------------------------------------------------
06e6 ; Debug3 Subtable 0xb
06e6 ; --------------------------------------------------------------------------------------
06e6 0006 0017  |    |		.DBG3TAB	0x0006,0x0017
06e8 02b3 ffff  |    |		.CONST	0x02b3,0xffff
06ea 02b4 fffe  |    |		.CONST	0x02b4,0xfffe
06ec 02b6 fffd  |    |		.CONST	0x02b6,0xfffd
06ee 02b9 fffc  |    |		.CONST	0x02b9,0xfffc
06f0 02be fffb  |    |		.CONST	0x02be,0xfffb
06f2 02c1 fffa  |    |		.CONST	0x02c1,0xfffa
06f4 02c2 0001  |    |		.CONST	0x02c2,0x0001
06f6 02c5 0002  |    |		.CONST	0x02c5,0x0002
06f8 02d3 0003  |    |		.CONST	0x02d3,0x0003
06fa 02d6 0004  |    |		.CONST	0x02d6,0x0004
06fc 02d9 0005  |    |		.CONST	0x02d9,0x0005
06fe 02da 0006  |    |		.CONST	0x02da,0x0006
0700 02e5 0007  |    |		.CONST	0x02e5,0x0007
0702 02e8 0008  |    |		.CONST	0x02e8,0x0008
0704 02eb 0009  |    |		.CONST	0x02eb,0x0009
0706 02ec 000a  |    |		.CONST	0x02ec,0x000a
0708 02ee 000b  |    |		.CONST	0x02ee,0x000b
070a 02f7 000c  |    |		.CONST	0x02f7,0x000c
070c 02fa 000d  |    |		.CONST	0x02fa,0x000d
070e 02fd 000e  |    |		.CONST	0x02fd,0x000e
0710 02fe 000f  |    |		.CONST	0x02fe,0x000f
0712 031d 0010  |    |		.CONST	0x031d,0x0010
0714 0320 0011  |    |		.CONST	0x0320,0x0011
0716 0323 0012  | #  |		.CONST	0x0323,0x0012
0718 0324 0013  | $  |		.CONST	0x0324,0x0013
071a 0326 0014  | &  |		.CONST	0x0326,0x0014
071c 032f 0015  | /  |		.CONST	0x032f,0x0015
071e 0332 0016  | 2  |		.CONST	0x0332,0x0016
0720 0335 0017  | 5  |		.CONST	0x0335,0x0017
0722 ; --------------------------------------------------------------------------------------
0722 ; Debug3 Subtable 0xc
0722 ; --------------------------------------------------------------------------------------
0722 0002 0006  |    |		.DBG3TAB	0x0002,0x0006
0724 033b ffff  | ;  |		.CONST	0x033b,0xffff
0726 033d fffe  | =  |		.CONST	0x033d,0xfffe
0728 0343 0001  | C  |		.CONST	0x0343,0x0001
072a 0346 0002  | F  |		.CONST	0x0346,0x0002
072c 0356 0003  | V  |		.CONST	0x0356,0x0003
072e 0359 0004  | Y  |		.CONST	0x0359,0x0004
0730 035c 0005  | \  |		.CONST	0x035c,0x0005
0732 035d 0006  | ]  |		.CONST	0x035d,0x0006
0734 ; --------------------------------------------------------------------------------------
0734 ; Debug3 Subtable 0xd
0734 ; --------------------------------------------------------------------------------------
0734 0003 0009  |    |		.DBG3TAB	0x0003,0x0009
0736 0373 ffff  | s  |		.CONST	0x0373,0xffff
0738 0376 fffe  | v  |		.CONST	0x0376,0xfffe
073a 0378 fffd  | x  |		.CONST	0x0378,0xfffd
073c 037b 0001  | {  |		.CONST	0x037b,0x0001
073e 037e 0002  | ~  |		.CONST	0x037e,0x0002
0740 038c 0003  |    |		.CONST	0x038c,0x0003
0742 038f 0004  |    |		.CONST	0x038f,0x0004
0744 0392 0005  |    |		.CONST	0x0392,0x0005
0746 0393 0006  |    |		.CONST	0x0393,0x0006
0748 03a6 0007  |    |		.CONST	0x03a6,0x0007
074a 03ab 0008  |    |		.CONST	0x03ab,0x0008
074c 03b9 0009  |    |		.CONST	0x03b9,0x0009
074e ; --------------------------------------------------------------------------------------
074e ; Debug3 Subtable 0xe
074e ; --------------------------------------------------------------------------------------
074e 0003 0009  |    |		.DBG3TAB	0x0003,0x0009
0750 03d3 ffff  |    |		.CONST	0x03d3,0xffff
0752 03d6 fffe  |    |		.CONST	0x03d6,0xfffe
0754 03d8 fffd  |    |		.CONST	0x03d8,0xfffd
0756 03db 0001  |    |		.CONST	0x03db,0x0001
0758 03de 0002  |    |		.CONST	0x03de,0x0002
075a 03ec 0003  |    |		.CONST	0x03ec,0x0003
075c 03ef 0004  |    |		.CONST	0x03ef,0x0004
075e 03f2 0005  |    |		.CONST	0x03f2,0x0005
0760 03f3 0006  |    |		.CONST	0x03f3,0x0006
0762 0406 0007  |    |		.CONST	0x0406,0x0007
0764 040b 0008  |    |		.CONST	0x040b,0x0008
0766 041a 0009  |    |		.CONST	0x041a,0x0009
0768 ; --------------------------------------------------------------------------------------
0768 ; Debug3 Subtable 0xf
0768 ; --------------------------------------------------------------------------------------
0768 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
076a 0423 0001  | #  |		.CONST	0x0423,0x0001
076c ; --------------------------------------------------------------------------------------
076c ; Debug3 Subtable 0x10
076c ; --------------------------------------------------------------------------------------
076c 0002 0003  |    |		.DBG3TAB	0x0002,0x0003
076e 042b ffff  | +  |		.CONST	0x042b,0xffff
0770 0431 fffe  | 1  |		.CONST	0x0431,0xfffe
0772 0433 0001  | 3  |		.CONST	0x0433,0x0001
0774 0443 0002  | C  |		.CONST	0x0443,0x0002
0776 0448 0003  | H  |		.CONST	0x0448,0x0003
0778 ; --------------------------------------------------------------------------------------
0778 ; Debug3 Subtable 0x11
0778 ; --------------------------------------------------------------------------------------
0778 0002 0003  |    |		.DBG3TAB	0x0002,0x0003
077a 0453 ffff  | S  |		.CONST	0x0453,0xffff
077c 0459 fffe  | Y  |		.CONST	0x0459,0xfffe
077e 045b 0001  | [  |		.CONST	0x045b,0x0001
0780 046b 0002  | k  |		.CONST	0x046b,0x0002
0782 0470 0003  | p  |		.CONST	0x0470,0x0003
0784 ; --------------------------------------------------------------------------------------
0784 ; Debug3 Subtable 0x12
0784 ; --------------------------------------------------------------------------------------
0784 0003 0009  |    |		.DBG3TAB	0x0003,0x0009
0786 047b ffff  | {  |		.CONST	0x047b,0xffff
0788 047e fffe  | ~  |		.CONST	0x047e,0xfffe
078a 0480 fffd  |    |		.CONST	0x0480,0xfffd
078c 0483 0001  |    |		.CONST	0x0483,0x0001
078e 0486 0002  |    |		.CONST	0x0486,0x0002
0790 0494 0003  |    |		.CONST	0x0494,0x0003
0792 0497 0004  |    |		.CONST	0x0497,0x0004
0794 049a 0005  |    |		.CONST	0x049a,0x0005
0796 049b 0006  |    |		.CONST	0x049b,0x0006
0798 04ae 0007  |    |		.CONST	0x04ae,0x0007
079a 04b1 0008  |    |		.CONST	0x04b1,0x0008
079c 04b4 0009  |    |		.CONST	0x04b4,0x0009
079e ; --------------------------------------------------------------------------------------
079e ; Debug3 Subtable 0x13
079e ; --------------------------------------------------------------------------------------
079e 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
07a0 04bb ffff  |    |		.CONST	0x04bb,0xffff
07a2 04bd 0001  |    |		.CONST	0x04bd,0x0001
07a4 04c0 0002  |    |		.CONST	0x04c0,0x0002
07a6 04cf 0003  |    |		.CONST	0x04cf,0x0003
07a8 04d2 0004  |    |		.CONST	0x04d2,0x0004
07aa 04d5 0005  |    |		.CONST	0x04d5,0x0005
07ac ; --------------------------------------------------------------------------------------
07ac ; Debug3 Subtable 0x14
07ac ; --------------------------------------------------------------------------------------
07ac 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
07ae 04db 0001  |    |		.CONST	0x04db,0x0001
07b0 ; --------------------------------------------------------------------------------------
07b0 ; Debug3 Subtable 0x15
07b0 ; --------------------------------------------------------------------------------------
07b0 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
07b2 04e3 0001  |    |		.CONST	0x04e3,0x0001
07b4 ; --------------------------------------------------------------------------------------
07b4 ; Debug3 Subtable 0x16
07b4 ; --------------------------------------------------------------------------------------
07b4 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
07b6 04eb 0001  |    |		.CONST	0x04eb,0x0001
07b8 0000 0000  |    |		.BLANK	0000[0x48]