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

⟦16f43753c⟧

    Length: 6144 (0x1800)
    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 06f8       |    |		.CONST	0x06f8								; 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 0005       |    |		.CONST	0x0005								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00b7       |    |		.CONST	0x00b7								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 002f       | /  |		.CONST	0x002f								; Number of locals
000b			INIT_0008:
000b e001       |    |		Load	0x0,0x1								; Debug Table 0x0 = .DEBUG	0x000b,0x07f2,0x8000,0x0000,0x0058,0xc125,0x0000,0x0013
													; Debug Table 0x0.0x0 = 0xb,0xffff
													; Debug Table 0x0.0x1 = 0xb,0xfffe
													; Debug Table 0x0.0x2 = 0xb,0xfffd
													; Debug Table 0x0.0x3 = 0xb,0xfffc
000c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
000d 0129       | )  |		Execute	Any,Make_Visible
000e 03a9       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible			; Debug Table 0x0.0x4 = 0xe,0xfffb
000f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x5 = 0xf,0xfffa
0010 4802       |H   |		Short_Literal	0x2
0011 029f 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Call
0013 03fe       |    |		Declare_Type	Discrete,Defined,Visible
0014 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x14,0xfff9
													; Debug Table 0x0.0x7 = 0x14,0xfff8
0016 029a 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x16,0xfff7
0018 029a 0153  |   S|		Declare_Subprogram	INIT_0150,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x18,0xfff6
001a 029a 0173  |   s|		Declare_Subprogram	INIT_0170,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1a,0xfff5
001c 029a 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x1c,0xfff4
001e 029a 023b  |   ;|		Declare_Subprogram	INIT_0238,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x1e,0xfff3
0020 029a 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x20,0xfff2
0022 4804       |H   |		Short_Literal	0x4							; Debug Table 0x0.0xe = 0x22,0xfff1
0023 032b       | +  |		Declare_Type	Record,Incomplete,Visible
0024 029a 02fb  |    |		Declare_Subprogram	INIT_02f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x24,0xfff0
0026 029a 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x26,0xffef
0028 029a 036b  |   k|		Declare_Subprogram	INIT_0368,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x11 = 0x28,0xffee
002a 029a 0383  |    |		Declare_Subprogram	INIT_0380,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x12 = 0x2a,0xffed
002c 029a 0393  |    |		Declare_Subprogram	INIT_0390,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x13 = 0x2c,0xffec
002e 029a 039b  |    |		Declare_Subprogram	INIT_0398,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x14 = 0x2e,0xffeb
0030 62bf       |b   |		Indirect_Literal	Discrete,0x2f0,{0x00000000, 0x58c12501}		; Debug Table 0x0.0x15 = 0x30,0xffea
0031 0129       | )  |		Execute	Any,Make_Visible
0032 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x16 = 0x32,0xffe9
0033 4bfd       |K   |		Short_Literal	0x3fd
0034 00e1       |    |		Load_Encached	Boolean_Cache
0035 02a0       |    |		Declare_Subprogram	Null_Subprogram
0036 4801       |H   |		Short_Literal	0x1
0037 035e       | ^  |		Declare_Type	Array,Defined,Visible
0038 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x17 = 0x38,0xffe8
0039 0336       | 6  |		Declare_Variable	Array,Visible
003a 00d9       |    |		Load_Top	At_Offset_1
003b 0337       | 7  |		Declare_Variable	Array
003c 4bfd       |K   |		Short_Literal	0x3fd
003d 4800       |H   |		Short_Literal	0x0
003e 4800       |H   |		Short_Literal	0x0
003f 00d9       |    |		Load_Top	At_Offset_1
0040 e221       | !  |		Load	0x1,0x21
0041 01d6       |    |		Execute	Vector,Field_Write
0042 3ffb       |?   |		Loop_Increasing	0x3e
0043 00da       |    |		Load_Top	At_Offset_2
0044 01c3       |    |		Execute	Vector,Check_In_Type
0045 00d9       |    |		Load_Top	At_Offset_1
0046 01d4       |    |		Execute	Vector,Structure_Write
0047 029a 03ab  |    |		Declare_Subprogram	INIT_03a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x18 = 0x47,0xffe7
0049 029a 03bb  |    |		Declare_Subprogram	INIT_03b8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x19 = 0x49,0xffe6
004b 00c4       |    |		Action	Make_Default							; Debug Table 0x0.0x1a = 0x4b,0xffe5
004c 029a 03c3  |    |		Declare_Subprogram	INIT_03c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1b = 0x4c,0xffe4
004e 029a 03db  |    |		Declare_Subprogram	INIT_03d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1c = 0x4e,0xffe3
0050 e20f       |    |		Load	0x1,0xf								; Debug Table 0x0.0x1d = 0x50,0xffe2
0051 e002       |    |		Load	0x0,0x2
0052 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0053 029f 047b  |   {|		Declare_Subprogram	INIT_0478,For_Call
0055 4802       |H   |		Short_Literal	0x2
0056 032d       | -  |		Declare_Type	Record,Defined
0057 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x1e = 0x57,0xffe1
0058 4bfd       |K   |		Short_Literal	0x3fd
0059 00da       |    |		Load_Top	At_Offset_2
005a 029f 0493  |    |		Declare_Subprogram	INIT_0490,For_Call
005c 4801       |H   |		Short_Literal	0x1
005d 035d       | ]  |		Declare_Type	Array,Defined
005e 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x1f = 0x5e,0xffe0
													; Debug Table 0x0.0x20 = 0x5e,0xffdf
005f 4bff       |K   |		Short_Literal	0x3ff
0060 4806       |H   |		Short_Literal	0x6
0061 026d       | m  |		Execute	Discrete,Exponentiate
0062 0aff       |    |		Execute_Immediate	Plus,-0x1
0063 00e5       |    |		Load_Encached	Long_Integer_Cache
0064 03f8       |    |		Declare_Type	Discrete,Constrained
0065 029b 04ab  |    |		Declare_Subprogram	INIT_04a8,For_Outer_Call,Unelaborated		; Debug Table 0x0.0x21 = 0x65,0xffde
0067 6284       |b   |		Indirect_Literal	Discrete,0x2ec,{0x00000000, 0x0058c125}		; Debug Table 0x0.0x22 = 0x67,0xffdd
0068 49b6       |I   |		Short_Literal	0x1b6
0069 00db       |    |		Load_Top	At_Offset_3
006a e226       | &  |		Load	0x1,0x26
006b e228       | (  |		Load	0x1,0x28
006c 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29
006d e003       |    |		Load	0x0,0x3
006e 0387       |    |		Declare_Variable	Package
006f 00d8       |    |		Load_Top	At_Offset_0
0070 020f       |    |		Execute	Module,Activate
0071 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x0.0x23 = 0x71,0xffdc
0072 00d9       |    |		Load_Top	At_Offset_1
0073 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
0074 00f0       |    |		Load_Encached	Segment_Cache
0075 e21f       |    |		Load	0x1,0x1f
0076 029f 04b3  |    |		Declare_Subprogram	INIT_04b0,For_Call
0078 4804       |H   |		Short_Literal	0x4
0079 032d       | -  |		Declare_Type	Record,Defined
007a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x24 = 0x7a,0xffdb
007b 02a0       |    |		Declare_Subprogram	Null_Subprogram
007c e20e       |    |		Load	0x1,0xe
007d 03a3       |    |		Complete_Type	Heap_Access,By_Defining
007e e20e       |    |		Load	0x1,0xe								; Debug Table 0x0.0x25 = 0x7e,0xffda
													; Debug Table 0x0.0x26 = 0x7e,0xffd9
007f 00e1       |    |		Load_Encached	Boolean_Cache
0080 e004       |    |		Load	0x0,0x4
0081 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0082 e22a       | *  |		Load	0x1,0x2a
0083 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
0084 02a0       |    |		Declare_Subprogram	Null_Subprogram
0085 e217       |    |		Load	0x1,0x17
0086 0326       | &  |		Complete_Type	Record,By_Defining
0087 e20e       |    |		Load	0x1,0xe								; Debug Table 0x0.0x27 = 0x87,0xffd8
0088 0129       | )  |		Execute	Any,Make_Visible
0089 c223       | #  |		Store	0x1,0x23
008a 00bf       |    |		Action	Accept_Activation
008b 1d29       | )  |		Execute_Immediate	Reference_Lex_1,0x29				; Debug Table 0x1 = .DEBUG	0x008b,0x0844,0x8000,0x0000,0x0059,0x8d25,0x0000,0x0021
													; Debug Table 0x1.0x0 = 0x8b,0xffff
													; Debug Table 0x1.0x1 = 0x8b,0xfffe
008c 00c7       |    |		Action	Elaborate_Subprogram
008d 029d 04cb  |    |		Declare_Subprogram	INIT_04c8,For_Outer_Call			; Debug Table 0x1.0x2 = 0x8d,0xfffd
008f 029d 04f3  |    |		Declare_Subprogram	INIT_04f0,For_Outer_Call			; Debug Table 0x1.0x3 = 0x8f,0xfffc
0091 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x4 = 0x91,0xfffb
0092 00c7       |    |		Action	Elaborate_Subprogram
0093 029d 052b  |   +|		Declare_Subprogram	INIT_0528,For_Outer_Call			; Debug Table 0x1.0x5 = 0x93,0xfffa
0095 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x6 = 0x95,0xfff9
0096 00c7       |    |		Action	Elaborate_Subprogram
0097 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x7 = 0x97,0xfff8
0098 00c7       |    |		Action	Elaborate_Subprogram
0099 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x8 = 0x99,0xfff7
009a 00c7       |    |		Action	Elaborate_Subprogram
009b 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x9 = 0x9b,0xfff6
009c 00c7       |    |		Action	Elaborate_Subprogram
009d 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0xa = 0x9d,0xfff5
009e 00c7       |    |		Action	Elaborate_Subprogram
009f 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0xb = 0x9f,0xfff4
00a0 00c7       |    |		Action	Elaborate_Subprogram
00a1 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0xc = 0xa1,0xfff3
00a2 00c7       |    |		Action	Elaborate_Subprogram
00a3 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0xd = 0xa3,0xfff2
00a4 00c7       |    |		Action	Elaborate_Subprogram
00a5 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0xe = 0xa5,0xfff1
00a6 00c7       |    |		Action	Elaborate_Subprogram
00a7 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0xf = 0xa7,0xfff0
00a8 00c7       |    |		Action	Elaborate_Subprogram
00a9 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x10 = 0xa9,0xffef
00aa 00c7       |    |		Action	Elaborate_Subprogram
00ab 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0x11 = 0xab,0xffee
00ac 00c7       |    |		Action	Elaborate_Subprogram
00ad 1d24       | $  |		Execute_Immediate	Reference_Lex_1,0x24				; Debug Table 0x1.0x12 = 0xad,0xffed
00ae 00c7       |    |		Action	Elaborate_Subprogram
00af 029d 0533  |   3|		Declare_Subprogram	INIT_0530,For_Outer_Call			; Debug Table 0x1.0x13 = 0xaf,0xffec
00b1 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21				; Debug Table 0x1.0x14 = 0xb1,0xffeb
00b2 00c7       |    |		Action	Elaborate_Subprogram
00b3 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22				; Debug Table 0x1.0x15 = 0xb3,0xffea
00b4 00c7       |    |		Action	Elaborate_Subprogram
00b5 1d25       | %  |		Execute_Immediate	Reference_Lex_1,0x25				; Debug Table 0x1.0x16 = 0xb5,0xffe9
00b6 00c7       |    |		Action	Elaborate_Subprogram
00b7			BODY_0008:
00b7 00bc       |    |		Action	Signal_Activated
00b8 00bb       |    |		Action	Signal_Completion
00b9 0000 0000  |    |		.BLANK	0000[0x7]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3       |    |		.CONST	0x00c3								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0001       |    |		.CONST	0x0001								; Number of locals
00c3			BODY_00c0:
00c3			INIT_00c0:
00c3 4603       |F   |		Jump_Case	0x4							; Debug Table 0x2 = .DEBUG	0x00c3,0x0874,0x0005,0x0000,0x0058,0xc125,0x0000,0x002f
00c4 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
00c5 7802       |x   |		Jump	0xc8								; case 0x1
00c6 7805       |x   |		Jump	0xcc								; case 0x2
00c7 7809       |x   |		Jump	0xd1								; case 0x3
00c8 00da       |    |		Load_Top	At_Offset_2
00c9 0091 0680  |    |		Action	Push_String_Extended_Indexed,0x680				; "PERFECT"
00cb 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00cc 00db       |    |		Load_Top	At_Offset_3
00cd 00db       |    |		Load_Top	At_Offset_3
00ce 00e0       |    |		Load_Encached	Standard_Cache
00cf 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00d0 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
00d1 00da       |    |		Load_Top	At_Offset_2
00d2 00e0       |    |		Load_Encached	Standard_Cache
00d3 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
00d4 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
00d5 0000 0000  |    |		.XXX[0x3]
00d7 0000       |    |
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 e20e       |    |		Load	0x1,0xe								; Debug Table 0x3 = .DEBUG	0x00db,0x0876,0x0001,0x0000,0x0058,0xc125,0x0000,0x003c
													; Debug Table 0x3.0x0 = 0xdb,0x1
00dc 00db       |    |		Load_Top	At_Offset_3
00dd 039c       |    |		Declare_Variable	Heap_Access,By_Allocation
00de 00d8       |    |		Load_Top	At_Offset_0
00df 0217       |    |		Execute	Heap_Access,All_Reference
00e0 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00e1 a5fe       |    |		Store_Unchecked	0x2,-0x2
00e2 e227       | '  |		Load	0x1,0x27							; Debug Table 0x3.0x1 = 0xe2,0x2
													; Debug Table 0x3.0x2 = 0xe2,0x3
00e3 0337       | 7  |		Declare_Variable	Array
00e4 4bfd       |K   |		Short_Literal	0x3fd
00e5 4800       |H   |		Short_Literal	0x0
00e6 e226       | &  |		Load	0x1,0x26
00e7 0322       | "  |		Declare_Variable	Record
00e8 4802       |H   |		Short_Literal	0x2
00e9 00d9       |    |		Load_Top	At_Offset_1
00ea 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00eb e002       |    |		Load	0x0,0x2
00ec 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
00ed 00d9       |    |		Load_Top	At_Offset_1
00ee 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00ef 00d9       |    |		Load_Top	At_Offset_1
00f0 e402       |    |		Load	0x2,0x2
00f1 01d6       |    |		Execute	Vector,Field_Write
00f2 3ff3       |?   |		Loop_Increasing	0xe6
00f3 e5fe       |    |		Load	0x2,-0x2
00f4 0217       |    |		Execute	Heap_Access,All_Reference
00f5 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00f6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x3 = 0xf6,0x4
00f7 0219       |    |		Execute	Heap_Access,All_Read
00f8 e22a       | *  |		Load	0x1,0x2a
00f9 1b13       |    |		Execute	Package,Field_Read,Field_Number 0x13
00fa e5ff       |    |		Load	0x2,-0x1
00fb e22a       | *  |		Load	0x1,0x2a
00fc 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00fd 00d9       |    |		Load_Top	At_Offset_1
00fe 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00ff 00d1       |    |		Pop_Control	Pop_Count_1
0100 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x3.0x4 = 0x100,0x5
0101 e5fe       |    |		Load	0x2,-0x2
0102 0217       |    |		Execute	Heap_Access,All_Reference
0103 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0104 e220       |    |		Load	0x1,0x20							; Debug Table 0x3.0x5 = 0x104,0x6
0105 e5fe       |    |		Load	0x2,-0x2
0106 0217       |    |		Execute	Heap_Access,All_Reference
0107 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0108 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0109 0000 0000  |    |		.BLANK	0000[0x7]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0118       |    |		.CONST	0x0118								; Address of begin
0111 0004       |    |		.CONST	0x0004								; Address of exception handler
0112 0002       |    |		.CONST	0x0002								; Number of locals
0113			INIT_0110:
0113 e002       |    |		Load	0x0,0x2								; Debug Table 0x4 = .DEBUG	0x0113,0x0884,0x0001,0x0000,0x0058,0xc125,0x0000,0x004a
													; Debug Table 0x4.0x0 = 0x113,0xffff
0114 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0115 0322       | "  |		Declare_Variable	Record
0116 00d8       |    |		Load_Top	At_Offset_0
0117 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0118			BODY_0110:
0118 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x4.0x1 = 0x118,0x1
0119 e5fc       |    |		Load	0x2,-0x4
011a 8210       |    |		Call	0x1,0x10
011b c5fa       |    |		Store	0x2,-0x6
011c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x2 = 0x11c,0x2
011d 00d9       |    |		Load_Top	At_Offset_1
011e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
011f 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4.0x3 = 0x11f,0x3
													; Debug Table 0x4.0x4 = 0x11f,0x401
0120 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x4.0x5 = 0x120,0x3
0121 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0122 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x6 = 0x122,0x4
0123 00d9       |    |		Load_Top	At_Offset_1
0124 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0125 4801       |H   |		Short_Literal	0x1							; Debug Table 0x4.0x7 = 0x125,0x5
0126 00d9       |    |		Load_Top	At_Offset_1
0127 3804       |8   |		Execute	Record,Field_Write,Field_Number 0x4
0128 00cf       |    |		Action	Mark_Auxiliary
0129 487e       |H~  |		Short_Literal	0x7e							; Debug Table 0x4.0x8 = 0x129,0x6
012a 4820       |H   |		Short_Literal	0x20
012b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x9 = 0x12b,0x7
012c e005       |    |		Load	0x0,0x5
012d 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
012e 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
012f e402       |    |		Load	0x2,0x2
0130 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0131 e226       | &  |		Load	0x1,0x26							; Debug Table 0x4.0xa = 0x131,0x8
0132 0322       | "  |		Declare_Variable	Record
0133 4800       |H   |		Short_Literal	0x0
0134 00d9       |    |		Load_Top	At_Offset_1
0135 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0136 e402       |    |		Load	0x2,0x2
0137 00d9       |    |		Load_Top	At_Offset_1
0138 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0139 00d9       |    |		Load_Top	At_Offset_1
013a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0xb = 0x13a,0x801
013b e004       |    |		Load	0x0,0x4
013c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
013d 025b       | [  |		Execute	Discrete,Check_In_Type
013e 00d0       |    |		Action	Swap_Control
013f 00d1       |    |		Pop_Control	Pop_Count_1
0140 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x4.0xc = 0x140,0x8
0141 0217       |    |		Execute	Heap_Access,All_Reference
0142 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0143 01d6       |    |		Execute	Vector,Field_Write
0144 00c8       |    |		Action	Pop_Auxiliary_Range
0145 3fe5       |?   |		Loop_Increasing	0x12b
0146 00ce       |    |		Action	Pop_Auxiliary
0147 e5fa       |    |		Load	0x2,-0x6							; Debug Table 0x4.0xd = 0x147,0x9
0148 e5fb       |    |		Load	0x2,-0x5
0149 e5fd       |    |		Load	0x2,-0x3
014a e5fe       |    |		Load	0x2,-0x2
014b e5ff       |    |		Load	0x2,-0x1
014c 8213       |    |		Call	0x1,0x13
014d c5fa       |    |		Store	0x2,-0x6
014e 4506       |E   |		Exit_Suprogram	New_Top_Offset 0x6
014f 0000       |    |		.XXX[0x1]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153       | S  |		.CONST	0x0153								; Address of begin
0151 0004       |    |		.CONST	0x0004								; Address of exception handler
0152 0001       |    |		.CONST	0x0001								; Number of locals
0153			BODY_0150:
0153			INIT_0150:
0153 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5 = .DEBUG	0x0153,0x08a2,0x0001,0x0000,0x0058,0xc125,0x0000,0x0073
													; Debug Table 0x5.0x0 = 0x153,0x1
0154 e5fe       |    |		Load	0x2,-0x2
0155 8210       |    |		Call	0x1,0x10
0156 c5fd       |    |		Store	0x2,-0x3
0157 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x1 = 0x157,0x2
0158 0217       |    |		Execute	Heap_Access,All_Reference
0159 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
015a e5fd       |    |		Load	0x2,-0x3
015b 0217       |    |		Execute	Heap_Access,All_Reference
015c 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
015d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x2 = 0x15d,0x3
015e 0217       |    |		Execute	Heap_Access,All_Reference
015f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0160 e5fd       |    |		Load	0x2,-0x3
0161 0217       |    |		Execute	Heap_Access,All_Reference
0162 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0163 e22a       | *  |		Load	0x1,0x2a
0164 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0165 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5.0x3 = 0x165,0x4
0166 0217       |    |		Execute	Heap_Access,All_Reference
0167 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0168 e5fd       |    |		Load	0x2,-0x3
0169 0217       |    |		Execute	Heap_Access,All_Reference
016a 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
016b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
016c 0000 0000  |    |		.BLANK	0000[0x4]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0193       |    |		.CONST	0x0193								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0009       |    |		.CONST	0x0009								; Number of locals
0173			INIT_0170:
0173 e006       |    |		Load	0x0,0x6								; Debug Table 0x6 = .DEBUG	0x0173,0x08ac,0x0001,0x0000,0x0058,0xc125,0x0000,0x0085
													; Debug Table 0x6.0x0 = 0x173,0xffff
0174 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0175 02c7       |    |		Declare_Variable	Any
0176 00d8       |    |		Load_Top	At_Offset_0
0177 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0178 e006       |    |		Load	0x0,0x6								; Debug Table 0x6.0x1 = 0x178,0xfffe
0179 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
017a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
017b 02c7       |    |		Declare_Variable	Any
017c 00d8       |    |		Load_Top	At_Offset_0
017d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
017e e006       |    |		Load	0x0,0x6								; Debug Table 0x6.0x2 = 0x17e,0xfffd
017f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0180 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0181 02c7       |    |		Declare_Variable	Any
0182 00d8       |    |		Load_Top	At_Offset_0
0183 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0184 e006       |    |		Load	0x0,0x6								; Debug Table 0x6.0x3 = 0x184,0xfffc
0185 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0186 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
0187 02c7       |    |		Declare_Variable	Any
0188 00d8       |    |		Load_Top	At_Offset_0
0189 1c00       |    |		Execute_Immediate	Run_Utility,0x0
018a 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6.0x4 = 0x18a,0xfffb
018b e006       |    |		Load	0x0,0x6								; Debug Table 0x6.0x5 = 0x18b,0xfffa
018c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
018d e006       |    |		Load	0x0,0x6								; Debug Table 0x6.0x6 = 0x18d,0xfff9
018e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
018f 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0190 e006       |    |		Load	0x0,0x6								; Debug Table 0x6.0x7 = 0x190,0xfff8
0191 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0192 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0193			BODY_0170:
0193 e006       |    |		Load	0x0,0x6								; Debug Table 0x6.0x8 = 0x193,0xfff7
													; Debug Table 0x6.0x9 = 0x193,0xfff6
													; Debug Table 0x6.0xa = 0x193,0xfff5
													; Debug Table 0x6.0xb = 0x193,0x1
0194 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0195 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0196 e402       |    |		Load	0x2,0x2
0197 0120       |    |		Execute	Any,Is_Value
0198 6803       |h   |		Jump_Zero	0x19c
0199 e006       |    |		Load	0x0,0x6
019a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
019b 7801       |x   |		Jump	0x19d
019c e402       |    |		Load	0x2,0x2
019d 614a       |aJ  |		Indirect_Literal	Discrete,0x2e8,{0x00000000, 0x00004000}
019e e007       |    |		Load	0x0,0x7
019f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01a0 e5fd       |    |		Load	0x2,-0x3
01a1 e5fe       |    |		Load	0x2,-0x2
01a2 e006       |    |		Load	0x0,0x6
01a3 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
01a4 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
01a5 c402       |    |		Store	0x2,0x2
01a6 005a       | Z  |		Store_Top	Discrete,At_Offset_2
01a7 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0xc = 0x1a7,0x2
01a8 0f00       |    |		Execute_Immediate	Equal,0x0
01a9 822e       | .  |		Call	0x1,0x2e
01aa e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0xd = 0x1aa,0x3
01ab e006       |    |		Load	0x0,0x6
01ac 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01ad 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
01ae c403       |    |		Store	0x2,0x3
01af 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0xe = 0x1af,0x4
01b0 e403       |    |		Load	0x2,0x3
01b1 e006       |    |		Load	0x0,0x6
01b2 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
01b3 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01b4 6817       |h   |		Jump_Zero	0x1cc
01b5 e006       |    |		Load	0x0,0x6								; Debug Table 0x6.0xf = 0x1b5,0x5
01b6 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01b7 e404       |    |		Load	0x2,0x4
01b8 0120       |    |		Execute	Any,Is_Value
01b9 6804       |h   |		Jump_Zero	0x1be
01ba e006       |    |		Load	0x0,0x6
01bb 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01bc 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01bd 7801       |x   |		Jump	0x1bf
01be e404       |    |		Load	0x2,0x4
01bf 6128       |a(  |		Indirect_Literal	Discrete,0x2e8,{0x00000000, 0x00004000}
01c0 e007       |    |		Load	0x0,0x7
01c1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01c2 e403       |    |		Load	0x2,0x3
01c3 e006       |    |		Load	0x0,0x6
01c4 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
01c5 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01c6 c404       |    |		Store	0x2,0x4
01c7 005b       | [  |		Store_Top	Discrete,At_Offset_3
01c8 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x10 = 0x1c8,0x6
01c9 0f00       |    |		Execute_Immediate	Equal,0x0
01ca 822e       | .  |		Call	0x1,0x2e
01cb 7802       |x   |		Jump	0x1ce
01cc e403       |    |		Load	0x2,0x3								; Debug Table 0x6.0x11 = 0x1cc,0x7
01cd c404       |    |		Store	0x2,0x4
01ce e006       |    |		Load	0x0,0x6								; Debug Table 0x6.0x12 = 0x1ce,0x8
01cf 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01d0 e006       |    |		Load	0x0,0x6
01d1 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
01d2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01d3 6114       |a   |		Indirect_Literal	Discrete,0x2e8,{0x00000000, 0x00004000}
01d4 e007       |    |		Load	0x0,0x7
01d5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01d6 4800       |H   |		Short_Literal	0x0
01d7 e404       |    |		Load	0x2,0x4
01d8 e006       |    |		Load	0x0,0x6
01d9 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
01da 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01db 005a       | Z  |		Store_Top	Discrete,At_Offset_2
01dc 005b       | [  |		Store_Top	Discrete,At_Offset_3
01dd 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x13 = 0x1dd,0x9
01de 0f00       |    |		Execute_Immediate	Equal,0x0
01df 822e       | .  |		Call	0x1,0x2e
01e0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x14 = 0x1e0,0xa
01e1 0f03       |    |		Execute_Immediate	Equal,0x3
01e2 7005       |p   |		Jump_Nonzero	0x1e8
01e3 00d8       |    |		Load_Top	At_Offset_0
01e4 0f04       |    |		Execute_Immediate	Equal,0x4
01e5 7002       |p   |		Jump_Nonzero	0x1e8
01e6 4887       |H   |		Short_Literal	0x87							; Debug Table 0x6.0x15 = 0x1e6,0xb
01e7 0257       | W  |		Execute	Discrete,Raise
01e8 e006       |    |		Load	0x0,0x6								; Debug Table 0x6.0x16 = 0x1e8,0xc
01e9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01ea e405       |    |		Load	0x2,0x5
01eb 0120       |    |		Execute	Any,Is_Value
01ec 6804       |h   |		Jump_Zero	0x1f1
01ed e006       |    |		Load	0x0,0x6
01ee 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01ef 1b21       | !  |		Execute	Package,Field_Read,Field_Number 0x21
01f0 7801       |x   |		Jump	0x1f2
01f1 e405       |    |		Load	0x2,0x5
01f2 e006       |    |		Load	0x0,0x6
01f3 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01f4 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
01f5 60f2       |`   |		Indirect_Literal	Discrete,0x2e8,{0x00000000, 0x00004000}
01f6 4801       |H   |		Short_Literal	0x1
01f7 4800       |H   |		Short_Literal	0x0
01f8 4800       |H   |		Short_Literal	0x0
01f9 e007       |    |		Load	0x0,0x7
01fa 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01fb 4801       |H   |		Short_Literal	0x1
01fc e404       |    |		Load	0x2,0x4
01fd e006       |    |		Load	0x0,0x6
01fe 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
01ff 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0200 c406       |    |		Store	0x2,0x6
0201 c405       |    |		Store	0x2,0x5
0202 005b       | [  |		Store_Top	Discrete,At_Offset_3
0203 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x17 = 0x203,0xd
0204 0f00       |    |		Execute_Immediate	Equal,0x0
0205 822e       | .  |		Call	0x1,0x2e
0206 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x6.0x18 = 0x206,0xe
0207 e5fc       |    |		Load	0x2,-0x4
0208 e5ff       |    |		Load	0x2,-0x1
0209 e406       |    |		Load	0x2,0x6
020a e5fe       |    |		Load	0x2,-0x2
020b e008       |    |		Load	0x0,0x8
020c 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
020d c5fb       |    |		Store	0x2,-0x5
020e e006       |    |		Load	0x0,0x6								; Debug Table 0x6.0x19 = 0x20e,0xf
020f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0210 4800       |H   |		Short_Literal	0x0
0211 4801       |H   |		Short_Literal	0x1
0212 e007       |    |		Load	0x0,0x7
0213 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0214 e406       |    |		Load	0x2,0x6
0215 e006       |    |		Load	0x0,0x6
0216 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0217 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0218 005b       | [  |		Store_Top	Discrete,At_Offset_3
0219 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x1a = 0x219,0x10
021a 0f00       |    |		Execute_Immediate	Equal,0x0
021b 822e       | .  |		Call	0x1,0x2e
021c 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
021d 0000 0000  |    |		.XXX[0x3]
021f 0000       |    |
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223       | #  |		.CONST	0x0223								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0001       |    |		.CONST	0x0001								; Number of locals
0223			BODY_0220:
0223			INIT_0220:
0223 e226       | &  |		Load	0x1,0x26							; Debug Table 0x7 = .DEBUG	0x0223,0x08e4,0x0001,0x0000,0x0058,0xc125,0x0000,0x00a8
													; Debug Table 0x7.0x0 = 0x223,0x1
0224 0322       | "  |		Declare_Variable	Record
0225 4800       |H   |		Short_Literal	0x0
0226 00d9       |    |		Load_Top	At_Offset_1
0227 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0228 e5fe       |    |		Load	0x2,-0x2
0229 00d9       |    |		Load_Top	At_Offset_1
022a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
022b 00db       |    |		Load_Top	At_Offset_3
022c e5fd       |    |		Load	0x2,-0x3
022d 0217       |    |		Execute	Heap_Access,All_Reference
022e 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
022f 01d6       |    |		Execute	Vector,Field_Write
0230 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0231 0000 0000  |    |		.BLANK	0000[0x7]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023f       | ?  |		.CONST	0x023f								; Address of begin
0239 0004       |    |		.CONST	0x0004								; Address of exception handler
023a 0002       |    |		.CONST	0x0002								; Number of locals
023b			INIT_0238:
023b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x023b,0x08e8,0x0001,0x0000,0x0058,0xc125,0x0000,0x00bc
													; Debug Table 0x8.0x0 = 0x23b,0xffff
023c 01db       |    |		Execute	Vector,Length
023d 00e3       |    |		Load_Encached	Natural_Cache
023e 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
023f			BODY_0238:
023f 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x1 = 0x23f,0x1
0240 01db       |    |		Execute	Vector,Length
0241 00e3       |    |		Load_Encached	Natural_Cache
0242 025b       | [  |		Execute	Discrete,Check_In_Type
0243 0b00       |    |		Execute_Immediate	Case_Compare,0x0
0244 7056       |pV  |		Jump_Nonzero	0x29b
0245 0b01       |    |		Execute_Immediate	Case_Compare,0x1
0246 7007       |p   |		Jump_Nonzero	0x24e
0247 00d8       |    |		Load_Top	At_Offset_0
0248 4802       |H   |		Short_Literal	0x2
0249 4806       |H   |		Short_Literal	0x6
024a 0262       | b  |		Execute	Discrete,In_Range
024b 700b       |p   |		Jump_Nonzero	0x257
024c e21e       |    |		Load	0x1,0x1e							; Debug Table 0x8.0x2 = 0x24c,0x8
024d 0257       | W  |		Execute	Discrete,Raise
024e e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x8.0x3 = 0x24e,0x3
024f e5fe       |    |		Load	0x2,-0x2
0250 e5ff       |    |		Load	0x2,-0x1
0251 01dd       |    |		Execute	Vector,First
0252 e5ff       |    |		Load	0x2,-0x1
0253 01d7       |    |		Execute	Vector,Field_Read
0254 8214       |    |		Call	0x1,0x14
0255 c5fd       |    |		Store	0x2,-0x3
0256 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0257 e226       | &  |		Load	0x1,0x26							; Debug Table 0x8.0x4 = 0x257,0x4
0258 0322       | "  |		Declare_Variable	Record
0259 4801       |H   |		Short_Literal	0x1
025a 00d9       |    |		Load_Top	At_Offset_1
025b 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
025c e002       |    |		Load	0x0,0x2
025d 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
025e 00d9       |    |		Load_Top	At_Offset_1
025f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0260 e5ff       |    |		Load	0x2,-0x1
0261 01dd       |    |		Execute	Vector,First
0262 e5ff       |    |		Load	0x2,-0x1
0263 01d7       |    |		Execute	Vector,Field_Read
0264 e5fd       |    |		Load	0x2,-0x3
0265 0217       |    |		Execute	Heap_Access,All_Reference
0266 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0267 01d6       |    |		Execute	Vector,Field_Write
0268 00cf       |    |		Action	Mark_Auxiliary
0269 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x5 = 0x269,0x5
026a 01dc       |    |		Execute	Vector,Last
026b 0aff       |    |		Execute_Immediate	Plus,-0x1
026c 0248       | H  |		Execute	Discrete,Check_In_Integer
026d e5ff       |    |		Load	0x2,-0x1
026e 01dd       |    |		Execute	Vector,First
026f 0a01       |    |		Execute_Immediate	Plus,0x1
0270 0248       | H  |		Execute	Discrete,Check_In_Integer
0271 0263       | c  |		Execute	Discrete,Above_Bound
0272 7017       |p   |		Jump_Nonzero	0x28a
0273 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0x6 = 0x273,0x6
0274 e226       | &  |		Load	0x1,0x26
0275 0322       | "  |		Declare_Variable	Record
0276 4801       |H   |		Short_Literal	0x1
0277 00d9       |    |		Load_Top	At_Offset_1
0278 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0279 e002       |    |		Load	0x0,0x2
027a 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
027b 00d9       |    |		Load_Top	At_Offset_1
027c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
027d e5ff       |    |		Load	0x2,-0x1
027e 01dd       |    |		Execute	Vector,First
027f 00db       |    |		Load_Top	At_Offset_3
0280 e5ff       |    |		Load	0x2,-0x1
0281 01cf       |    |		Execute	Vector,Slice_Read
0282 822c       | ,  |		Call	0x1,0x2c
0283 e5fd       |    |		Load	0x2,-0x3
0284 0217       |    |		Execute	Heap_Access,All_Reference
0285 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0286 e22a       | *  |		Load	0x1,0x2a
0287 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0288 00c8       |    |		Action	Pop_Auxiliary_Range
0289 3fe9       |?   |		Loop_Increasing	0x273
028a 00ce       |    |		Action	Pop_Auxiliary
028b 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0x7 = 0x28b,0x7
028c e226       | &  |		Load	0x1,0x26
028d 0322       | "  |		Declare_Variable	Record
028e 4800       |H   |		Short_Literal	0x0
028f 00d9       |    |		Load_Top	At_Offset_1
0290 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0291 e5fe       |    |		Load	0x2,-0x2
0292 00d9       |    |		Load_Top	At_Offset_1
0293 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0294 e5ff       |    |		Load	0x2,-0x1
0295 822c       | ,  |		Call	0x1,0x2c
0296 e5fd       |    |		Load	0x2,-0x3
0297 0217       |    |		Execute	Heap_Access,All_Reference
0298 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0299 e22a       | *  |		Load	0x1,0x2a
029a 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
029b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
029c 0000 0000  |    |		.BLANK	0000[0x4]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02ac       |    |		.CONST	0x02ac								; Address of begin
02a1 02de       |    |		.CONST	0x02de								; Address of exception handler
02a2 0004       |    |		.CONST	0x0004								; Number of locals
02a3			INIT_02a0:
02a3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9 = .DEBUG	0x02a3,0x08fa,0x0001,0x0000,0x0058,0xc125,0x0000,0x00d0
													; Debug Table 0x9.0x0 = 0x2a3,0xffff
02a4 01db       |    |		Execute	Vector,Length
02a5 00e3       |    |		Load_Encached	Natural_Cache
02a6 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
02a7 e226       | &  |		Load	0x1,0x26							; Debug Table 0x9.0x1 = 0x2a7,0xfffe
02a8 0322       | "  |		Declare_Variable	Record
02a9 00d8       |    |		Load_Top	At_Offset_0
02aa 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02ab 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x9.0x2 = 0x2ab,0xfffd
02ac			BODY_02a0:
02ac 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x3 = 0x2ac,0x1
02ad 7003       |p   |		Jump_Nonzero	0x2b1
02ae 4802       |H   |		Short_Literal	0x2							; Debug Table 0x9.0x4 = 0x2ae,0x2
02af a5fc       |    |		Store_Unchecked	0x2,-0x4
02b0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02b1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9.0x5 = 0x2b1,0x3
02b2 0f01       |    |		Execute_Immediate	Equal,0x1
02b3 6812       |h   |		Jump_Zero	0x2c6
02b4 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x6 = 0x2b4,0x4
02b5 01dd       |    |		Execute	Vector,First
02b6 e5fe       |    |		Load	0x2,-0x2
02b7 01d7       |    |		Execute	Vector,Field_Read
02b8 e5ff       |    |		Load	0x2,-0x1
02b9 0217       |    |		Execute	Heap_Access,All_Reference
02ba 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
02bb 01d5       |    |		Execute	Vector,Field_Reference
02bc 00da       |    |		Load_Top	At_Offset_2
02bd 017d       | }  |		Execute	Record,Structure_Write
02be 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x7 = 0x2be,0x5
02bf 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02c0 a5fc       |    |		Store_Unchecked	0x2,-0x4
02c1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x8 = 0x2c1,0x6
02c2 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
02c3 e5fd       |    |		Load	0x2,-0x3
02c4 017d       | }  |		Execute	Record,Structure_Write
02c5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02c6 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x9.0x9 = 0x2c6,0x7
02c7 00da       |    |		Load_Top	At_Offset_2
02c8 e5fe       |    |		Load	0x2,-0x2
02c9 822c       | ,  |		Call	0x1,0x2c
02ca e5ff       |    |		Load	0x2,-0x1
02cb 0217       |    |		Execute	Heap_Access,All_Reference
02cc 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02cd e22a       | *  |		Load	0x1,0x2a
02ce 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
02cf 00d1       |    |		Pop_Control	Pop_Count_1
02d0 0059       | Y  |		Store_Top	Discrete,At_Offset_1
02d1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0xa = 0x2d1,0x8
02d2 6808       |h   |		Jump_Zero	0x2db
02d3 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0xb = 0x2d3,0x9
02d4 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02d5 a5fc       |    |		Store_Unchecked	0x2,-0x4
02d6 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0xc = 0x2d6,0xa
02d7 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
02d8 e5fd       |    |		Load	0x2,-0x3
02d9 017d       | }  |		Execute	Record,Structure_Write
02da 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02db 4802       |H   |		Short_Literal	0x2							; Debug Table 0x9.0xd = 0x2db,0xb
02dc a5fc       |    |		Store_Unchecked	0x2,-0x4
02dd 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02de			TRAP_02a0:
02de e21e       |    |		Load	0x1,0x1e
02df 010f       |    |		Execute	Exception,Equal
02e0 6803       |h   |		Jump_Zero	0x2e4
02e1 4802       |H   |		Short_Literal	0x2							; Debug Table 0x9.0xe = 0x2e1,0xc
02e2 a5fc       |    |		Store_Unchecked	0x2,-0x4
02e3 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02e4 0100       |    |		Execute	Exception,Raise
02e5 0000 0000  |    |		.XXX[0x3]
02e7 0000       |    |
02e8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
02ec 0000 0000  |    |		.LITERAL	{0x00000000, 0x0058c125}
02f0 0000 0000  |    |		.LITERAL	{0x00000000, 0x58c12501}
02f4 0000 0000  |    |		.BLANK	0000[0x4]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fd       |    |		.CONST	0x02fd								; Address of begin
02f9 0329       | )  |		.CONST	0x0329								; Address of exception handler
02fa 0002       |    |		.CONST	0x0002								; Number of locals
02fb			INIT_02f8:
02fb e217       |    |		Load	0x1,0x17							; Debug Table 0xa = .DEBUG	0x02fb,0x091a,0x0001,0x0000,0x0058,0xc125,0x0000,0x00ec
													; Debug Table 0xa.0x0 = 0x2fb,0xffff
02fc 0322       | "  |		Declare_Variable	Record
02fd			BODY_02f8:
02fd 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x1 = 0x2fd,0x1
02fe 00d9       |    |		Load_Top	At_Offset_1
02ff 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0300 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x2 = 0x300,0x2
0301 00d9       |    |		Load_Top	At_Offset_1
0302 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0303 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x3 = 0x303,0x3
0304 00d9       |    |		Load_Top	At_Offset_1
0305 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0306 e22a       | *  |		Load	0x1,0x2a							; Debug Table 0xa.0x4 = 0x306,0x4
0307 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
0308 e5ff       |    |		Load	0x2,-0x1
0309 0217       |    |		Execute	Heap_Access,All_Reference
030a 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
030b e5ff       |    |		Load	0x2,-0x1
030c 0217       |    |		Execute	Heap_Access,All_Reference
030d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
030e e22a       | *  |		Load	0x1,0x2a
030f 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0310 00d9       |    |		Load_Top	At_Offset_1
0311 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0312 00cf       |    |		Action	Mark_Auxiliary
0313 7808       |x   |		Jump	0x31c
0314 e004       |    |		Load	0x0,0x4								; Debug Table 0xa.0x5 = 0x314,0x6
0315 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0316 00da       |    |		Load_Top	At_Offset_2
0317 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0318 0268       | h  |		Execute	Discrete,Successor
0319 00da       |    |		Load_Top	At_Offset_2
031a 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
031b 00c9       |    |		Action	Pop_Auxiliary_Loop
031c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0x6 = 0x31c,0x5
031d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
031e e5ff       |    |		Load	0x2,-0x1
031f 0217       |    |		Execute	Heap_Access,All_Reference
0320 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0321 01d5       |    |		Execute	Vector,Field_Reference
0322 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0323 77f0       |w   |		Jump_Nonzero	0x314
0324 00ce       |    |		Action	Pop_Auxiliary
0325 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x7 = 0x325,0x7
0326 e5fe       |    |		Load	0x2,-0x2
0327 017d       | }  |		Execute	Record,Structure_Write
0328 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0329			TRAP_02f8:
0329 010e       |    |		Execute	Exception,Is_Constraint_Error
032a 6807       |h   |		Jump_Zero	0x332
032b 4800       |H   |		Short_Literal	0x0							; Debug Table 0xa.0x8 = 0x32b,0x8
032c 00da       |    |		Load_Top	At_Offset_2
032d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
032e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0x9 = 0x32e,0x9
032f e5fe       |    |		Load	0x2,-0x2
0330 017d       | }  |		Execute	Record,Structure_Write
0331 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0332 0100       |    |		Execute	Exception,Raise
0333 0000 0000  |    |		.BLANK	0000[0x5]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033b       | ;  |		.CONST	0x033b								; Address of begin
0339 035a       | Z  |		.CONST	0x035a								; Address of exception handler
033a 0001       |    |		.CONST	0x0001								; Number of locals
033b			BODY_0338:
033b			INIT_0338:
033b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb = .DEBUG	0x033b,0x0930,0x0001,0x0000,0x0058,0xc125,0x0000,0x00f8
													; Debug Table 0xb.0x0 = 0x33b,0x1
033c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
033d 6815       |h   |		Jump_Zero	0x353
033e 00cf       |    |		Action	Mark_Auxiliary
033f e004       |    |		Load	0x0,0x4								; Debug Table 0xb.0x1 = 0x33f,0x2
													; Debug Table 0xb.0x2 = 0x33f,0x3
0340 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0341 e5ff       |    |		Load	0x2,-0x1
0342 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0343 0268       | h  |		Execute	Discrete,Successor
0344 e5ff       |    |		Load	0x2,-0x1
0345 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0346 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xb.0x3 = 0x346,0x4
0347 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0348 e5ff       |    |		Load	0x2,-0x1
0349 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
034a 0217       |    |		Execute	Heap_Access,All_Reference
034b 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
034c 01d5       |    |		Execute	Vector,Field_Reference
034d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
034e 6802       |h   |		Jump_Zero	0x351
034f 00c9       |    |		Action	Pop_Auxiliary_Loop
0350 7fee       |    |		Jump	0x33f
0351 00ce       |    |		Action	Pop_Auxiliary
0352 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0353 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x4 = 0x353,0x5
0354 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0355 e22a       | *  |		Load	0x1,0x2a
0356 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0357 00db       |    |		Load_Top	At_Offset_3
0358 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0359 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
035a			TRAP_0338:
035a 010e       |    |		Execute	Exception,Is_Constraint_Error
035b 6804       |h   |		Jump_Zero	0x360
035c 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x5 = 0x35c,0x6
035d e5ff       |    |		Load	0x2,-0x1
035e 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
035f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0360 0100       |    |		Execute	Exception,Raise
0361 0000 0000  |    |		.BLANK	0000[0x7]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036b       | k  |		.CONST	0x036b								; Address of begin
0369 0004       |    |		.CONST	0x0004								; Address of exception handler
036a 0001       |    |		.CONST	0x0001								; Number of locals
036b			BODY_0368:
036b			INIT_0368:
036b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc = .DEBUG	0x036b,0x093e,0x0002,0x0000,0x0058,0xc125,0x0000,0x0100
													; Debug Table 0xc.0x0 = 0x36b,0x1
036c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
036d 680b       |h   |		Jump_Zero	0x379
036e 4801       |H   |		Short_Literal	0x1							; Debug Table 0xc.0x1 = 0x36e,0x2
036f 4801       |H   |		Short_Literal	0x1
0370 e004       |    |		Load	0x0,0x4
0371 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0372 0334       | 4  |		Declare_Variable	Array,With_Constraint
0373 00db       |    |		Load_Top	At_Offset_3
0374 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0375 4801       |H   |		Short_Literal	0x1
0376 00da       |    |		Load_Top	At_Offset_2
0377 01d6       |    |		Execute	Vector,Field_Write
0378 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0379 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc.0x2 = 0x379,0x3
037a 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
037b e22a       | *  |		Load	0x1,0x2a
037c 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
037d 822d       | -  |		Call	0x1,0x2d
037e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
037f 0000       |    |		.XXX[0x1]
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0383       |    |		.CONST	0x0383								; Address of begin
0381 0004       |    |		.CONST	0x0004								; Address of exception handler
0382 0001       |    |		.CONST	0x0001								; Number of locals
0383			BODY_0380:
0383			INIT_0380:
0383 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xd = .DEBUG	0x0383,0x0946,0x0002,0x0000,0x0058,0xc125,0x0000,0x010b
													; Debug Table 0xd.0x0 = 0x383,0x1
0384 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0385 7005       |p   |		Jump_Nonzero	0x38b
0386 00da       |    |		Load_Top	At_Offset_2
0387 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0388 e22a       | *  |		Load	0x1,0x2a
0389 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
038a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
038b 4800       |H   |		Short_Literal	0x0
038c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
038d 0000 0000  |    |		.XXX[0x3]
038f 0000       |    |
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393       |    |		.CONST	0x0393								; Address of begin
0391 0004       |    |		.CONST	0x0004								; Address of exception handler
0392 0001       |    |		.CONST	0x0001								; Number of locals
0393			BODY_0390:
0393			INIT_0390:
0393 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe = .DEBUG	0x0393,0x094a,0x0002,0x0000,0x0058,0xc125,0x0000,0x0114
													; Debug Table 0xe.0x0 = 0x393,0x1
0394 e001       |    |		Load	0x0,0x1
0395 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0396 8224       | $  |		Call	0x1,0x24
0397 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039b       |    |		.CONST	0x039b								; Address of begin
0399 0004       |    |		.CONST	0x0004								; Address of exception handler
039a 0001       |    |		.CONST	0x0001								; Number of locals
039b			BODY_0398:
039b			INIT_0398:
039b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xf = .DEBUG	0x039b,0x094e,0x0001,0x0000,0x0058,0xc125,0x0000,0x011d
													; Debug Table 0xf.0x0 = 0x39b,0x1
039c e001       |    |		Load	0x0,0x1
039d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
039e 00db       |    |		Load_Top	At_Offset_3
039f e009       |    |		Load	0x0,0x9
03a0 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
03a1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03a2 0000 0000  |    |		.BLANK	0000[0x6]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab       |    |		.CONST	0x03ab								; Address of begin
03a9 0004       |    |		.CONST	0x0004								; Address of exception handler
03aa 0001       |    |		.CONST	0x0001								; Number of locals
03ab			BODY_03a8:
03ab			INIT_03a8:
03ab 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x10 = .DEBUG	0x03ab,0x0952,0x0001,0x0000,0x0058,0xc125,0x0000,0x0143
													; Debug Table 0x10.0x0 = 0x3ab,0x1
03ac 00db       |    |		Load_Top	At_Offset_3
03ad e5fd       |    |		Load	0x2,-0x3
03ae 0217       |    |		Execute	Heap_Access,All_Reference
03af 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
03b0 01d6       |    |		Execute	Vector,Field_Write
03b1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
03b2 0000 0000  |    |		.BLANK	0000[0x6]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb       |    |		.CONST	0x03bb								; Address of begin
03b9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ba 0001       |    |		.CONST	0x0001								; Number of locals
03bb			BODY_03b8:
03bb			INIT_03b8:
03bb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x11 = .DEBUG	0x03bb,0x0956,0x0002,0x0000,0x0058,0xc125,0x0000,0x0156
													; Debug Table 0x11.0x0 = 0x3bb,0x1
03bc 0217       |    |		Execute	Heap_Access,All_Reference
03bd 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
03be 0335       | 5  |		Declare_Variable	Array,Duplicate
03bf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c4       |    |		.CONST	0x03c4								; Address of begin
03c1 0004       |    |		.CONST	0x0004								; Address of exception handler
03c2 0002       |    |		.CONST	0x0002								; Number of locals
03c3			INIT_03c0:
03c3 e20e       |    |		Load	0x1,0xe								; Debug Table 0x12 = .DEBUG	0x03c3,0x095a,0x0002,0x0000,0x0058,0xc125,0x0000,0x0163
													; Debug Table 0x12.0x0 = 0x3c3,0xffff
03c4			BODY_03c0:
03c4 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x1 = 0x3c4,0x1
03c5 e009       |    |		Load	0x0,0x9
03c6 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03c7 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
03c8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x2 = 0x3c8,0x2
03c9 7009       |p   |		Jump_Nonzero	0x3d3
03ca 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x3 = 0x3ca,0x3
03cb e009       |    |		Load	0x0,0x9
03cc 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
03cd 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
03ce e001       |    |		Load	0x0,0x1
03cf 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
03d0 e009       |    |		Load	0x0,0x9
03d1 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03d2 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
03d3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x4 = 0x3d3,0x4
03d4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03d5 0000 0000  |    |		.XXX[0x3]
03d7 0000       |    |
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03f6       |    |		.CONST	0x03f6								; Address of begin
03d9 0004       |    |		.CONST	0x0004								; Address of exception handler
03da 000b       |    |		.CONST	0x000b								; Number of locals
03db			INIT_03d8:
03db 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x13 = .DEBUG	0x03db,0x0966,0x0001,0x0000,0x0058,0xc125,0x0000,0x016c
													; Debug Table 0x13.0x0 = 0x3db,0xffff
03dc e006       |    |		Load	0x0,0x6								; Debug Table 0x13.0x1 = 0x3dc,0xfffe
03dd 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03de 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
03df 02c7       |    |		Declare_Variable	Any
03e0 00d8       |    |		Load_Top	At_Offset_0
03e1 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03e2 e006       |    |		Load	0x0,0x6								; Debug Table 0x13.0x2 = 0x3e2,0xfffd
03e3 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03e4 02c7       |    |		Declare_Variable	Any
03e5 00d8       |    |		Load_Top	At_Offset_0
03e6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
03e7 e006       |    |		Load	0x0,0x6								; Debug Table 0x13.0x3 = 0x3e7,0xfffc
03e8 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03e9 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03ea e006       |    |		Load	0x0,0x6								; Debug Table 0x13.0x4 = 0x3ea,0xfffb
03eb 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03ec 0092 0683  |    |		Action	Push_String_Extended,0x683					; "_COMMANDS"
													; Debug Table 0x13.0x5 = 0x3ec,0xfffa
03ee 0092 0684  |    |		Action	Push_String_Extended,0x684					; "_KEY_NAMES"
													; Debug Table 0x13.0x6 = 0x3ee,0xfff9
03f0 029f 053b  |   ;|		Declare_Subprogram	INIT_0538,For_Call				; Debug Table 0x13.0x7 = 0x3f0,0xfff8
													; Debug Table 0x13.0x8 = 0x3f0,0xfff7
													; Debug Table 0x13.0x9 = 0x3f0,0xfff6
03f2 029f 057b  |   {|		Declare_Subprogram	INIT_0578,For_Call				; Debug Table 0x13.0xa = 0x3f2,0xfff5
03f4 029f 0583  |    |		Declare_Subprogram	INIT_0580,For_Call				; Debug Table 0x13.0xb = 0x3f4,0xfff4
03f6			BODY_03d8:
03f6 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x13.0xc = 0x3f6,0x1
03f7 48d5       |H   |		Short_Literal	0xd5
03f8 e00a       |    |		Load	0x0,0xa
03f9 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
03fa c402       |    |		Store	0x2,0x2
03fb e006       |    |		Load	0x0,0x6								; Debug Table 0x13.0xd = 0x3fb,0x2
03fc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03fd 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
03fe e403       |    |		Load	0x2,0x3
03ff 66e8       |f   |		Indirect_Literal	Discrete,0x2e8,{0x00000000, 0x00004000}
0400 e007       |    |		Load	0x0,0x7
0401 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0402 e00b       |    |		Load	0x0,0xb
0403 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0404 e00c       |    |		Load	0x0,0xc
0405 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0406 4801       |H   |		Short_Literal	0x1
0407 4800       |H   |		Short_Literal	0x0
0408 e00d       |    |		Load	0x0,0xd
0409 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
040a 0092 0685  |    |		Action	Push_String_Extended,0x685					; "@"
040c e408       |    |		Load	0x2,0x8
040d 01cc       |    |		Execute	Vector,Catenate
040e 0092 0686  |    |		Action	Push_String_Extended,0x686					; "'SPEC"
0410 01cc       |    |		Execute	Vector,Catenate
0411 e006       |    |		Load	0x0,0x6
0412 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0413 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0414 c403       |    |		Store	0x2,0x3
0415 c405       |    |		Store	0x2,0x5
0416 00cf       |    |		Action	Mark_Auxiliary
0417 7819       |x   |		Jump	0x431
0418 e006       |    |		Load	0x0,0x6								; Debug Table 0x13.0xe = 0x418,0x4
0419 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
041a e404       |    |		Load	0x2,0x4
041b 0120       |    |		Execute	Any,Is_Value
041c 6803       |h   |		Jump_Zero	0x420
041d e006       |    |		Load	0x0,0x6
041e 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
041f 7801       |x   |		Jump	0x421
0420 e404       |    |		Load	0x2,0x4
0421 e403       |    |		Load	0x2,0x3
0422 e006       |    |		Load	0x0,0x6
0423 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0424 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0425 c404       |    |		Store	0x2,0x4
0426 c406       |    |		Store	0x2,0x6
0427 e406       |    |		Load	0x2,0x6								; Debug Table 0x13.0xf = 0x427,0x5
0428 7002       |p   |		Jump_Nonzero	0x42b
0429 e404       |    |		Load	0x2,0x4								; Debug Table 0x13.0x10 = 0x429,0x6
042a 840b       |    |		Call	0x2,0xb
042b e403       |    |		Load	0x2,0x3								; Debug Table 0x13.0x11 = 0x42b,0x7
042c e006       |    |		Load	0x0,0x6
042d 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
042e 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
042f c403       |    |		Store	0x2,0x3
0430 00c9       |    |		Action	Pop_Auxiliary_Loop
0431 e403       |    |		Load	0x2,0x3								; Debug Table 0x13.0x12 = 0x431,0x3
0432 e006       |    |		Load	0x0,0x6
0433 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0434 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0435 6fe2       |o   |		Jump_Zero	0x418
0436 00ce       |    |		Action	Pop_Auxiliary
0437 e006       |    |		Load	0x0,0x6								; Debug Table 0x13.0x13 = 0x437,0x8
0438 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0439 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
043a e403       |    |		Load	0x2,0x3
043b 66ac       |f   |		Indirect_Literal	Discrete,0x2e8,{0x00000000, 0x00004000}
043c e007       |    |		Load	0x0,0x7
043d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
043e e00b       |    |		Load	0x0,0xb
043f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0440 e00c       |    |		Load	0x0,0xc
0441 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0442 4801       |H   |		Short_Literal	0x1
0443 4800       |H   |		Short_Literal	0x0
0444 e00d       |    |		Load	0x0,0xd
0445 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0446 0092 0685  |    |		Action	Push_String_Extended,0x685					; "@"
0448 e407       |    |		Load	0x2,0x7
0449 01cc       |    |		Execute	Vector,Catenate
044a 0092 0686  |    |		Action	Push_String_Extended,0x686					; "'SPEC"
044c 01cc       |    |		Execute	Vector,Catenate
044d e006       |    |		Load	0x0,0x6
044e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
044f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0450 c403       |    |		Store	0x2,0x3
0451 c405       |    |		Store	0x2,0x5
0452 00cf       |    |		Action	Mark_Auxiliary
0453 781e       |x   |		Jump	0x472
0454 e006       |    |		Load	0x0,0x6								; Debug Table 0x13.0x14 = 0x454,0xa
0455 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0456 e404       |    |		Load	0x2,0x4
0457 0120       |    |		Execute	Any,Is_Value
0458 6803       |h   |		Jump_Zero	0x45c
0459 e006       |    |		Load	0x0,0x6
045a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
045b 7801       |x   |		Jump	0x45d
045c e404       |    |		Load	0x2,0x4
045d e403       |    |		Load	0x2,0x3
045e e006       |    |		Load	0x0,0x6
045f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0460 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
0461 c404       |    |		Store	0x2,0x4
0462 c406       |    |		Store	0x2,0x6
0463 e406       |    |		Load	0x2,0x6								; Debug Table 0x13.0x15 = 0x463,0xb
0464 7007       |p   |		Jump_Nonzero	0x46c
0465 e404       |    |		Load	0x2,0x4								; Debug Table 0x13.0x16 = 0x465,0xc
0466 840b       |    |		Call	0x2,0xb
0467 e404       |    |		Load	0x2,0x4								; Debug Table 0x13.0x17 = 0x467,0xd
0468 e006       |    |		Load	0x0,0x6
0469 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
046a 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
046b 8409       |    |		Call	0x2,0x9
046c e403       |    |		Load	0x2,0x3								; Debug Table 0x13.0x18 = 0x46c,0xe
046d e006       |    |		Load	0x0,0x6
046e 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
046f 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0470 c403       |    |		Store	0x2,0x3
0471 00c9       |    |		Action	Pop_Auxiliary_Loop
0472 e403       |    |		Load	0x2,0x3								; Debug Table 0x13.0x19 = 0x472,0x9
0473 e006       |    |		Load	0x0,0x6
0474 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0475 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0476 6fdd       |o   |		Jump_Zero	0x454
0477 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047b       | {  |		.CONST	0x047b								; Address of begin
0479 0004       |    |		.CONST	0x0004								; Address of exception handler
047a 0001       |    |		.CONST	0x0001								; Number of locals
047b			BODY_0478:
047b			INIT_0478:
047b 4608       |F   |		Jump_Case	0x9							; Debug Table 0x14 = .DEBUG	0x047b,0x099c,0x0005,0x0000,0x0058,0xc125,0x0000,0x0171
047c 7808       |x   |		Jump	0x485								; case 0x0
047d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
047e 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
047f 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
0480 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
0481 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
0482 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
0483 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
0484 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
0485 00da       |    |		Load_Top	At_Offset_2
0486 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0487 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0488 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0489 0000 0000  |    |		.BLANK	0000[0x7]
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0493       |    |		.CONST	0x0493								; Address of begin
0491 0004       |    |		.CONST	0x0004								; Address of exception handler
0492 0001       |    |		.CONST	0x0001								; Number of locals
0493			BODY_0490:
0493			INIT_0490:
0493 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x15 = .DEBUG	0x0493,0x099e,0x0005,0x0000,0x0058,0xc125,0x0000,0x0181
0494 00da       |    |		Load_Top	At_Offset_2
0495 01dc       |    |		Execute	Vector,Last
0496 00db       |    |		Load_Top	At_Offset_3
0497 01dd       |    |		Execute	Vector,First
0498 0263       | c  |		Execute	Discrete,Above_Bound
0499 7006       |p   |		Jump_Nonzero	0x4a0
049a 00d8       |    |		Load_Top	At_Offset_0
049b e5ff       |    |		Load	0x2,-0x1
049c 01d5       |    |		Execute	Vector,Field_Reference
049d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
049e 0a01       |    |		Execute_Immediate	Plus,0x1
049f 7ff8       |    |		Jump	0x498
04a0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
04a1 0000 0000  |    |		.BLANK	0000[0x7]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ab       |    |		.CONST	0x04ab								; Address of begin
04a9 0004       |    |		.CONST	0x0004								; Address of exception handler
04aa 0001       |    |		.CONST	0x0001								; Number of locals
04ab			BODY_04a8:
04ab			INIT_04a8:
04ab 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x16 = .DEBUG	0x04ab,0x09a0,0x0002,0x0000,0x0058,0xc125,0x0000,0x01ad
													; Debug Table 0x16.0x0 = 0x4ab,0x1
04ac 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04ad 0000 0000  |    |		.XXX[0x3]
04af 0000       |    |
04b0 ; --------------------------------------------------------------------------------------
04b0 ; SUBPROGRAM
04b0 ; --------------------------------------------------------------------------------------
04b0 04b3       |    |		.CONST	0x04b3								; Address of begin
04b1 0004       |    |		.CONST	0x0004								; Address of exception handler
04b2 0001       |    |		.CONST	0x0001								; Number of locals
04b3			BODY_04b0:
04b3			INIT_04b0:
04b3 4608       |F   |		Jump_Case	0x9							; Debug Table 0x17 = .DEBUG	0x04b3,0x09a4,0x0005,0x0000,0x0058,0xc125,0x0000,0x01c7
04b4 7808       |x   |		Jump	0x4bd								; case 0x0
04b5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
04b6 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
04b7 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
04b8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
04b9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
04ba 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
04bb 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
04bc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
04bd 00da       |    |		Load_Top	At_Offset_2
04be 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
04bf 1c00       |    |		Execute_Immediate	Run_Utility,0x0
04c0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
04c1 0000 0000  |    |		.BLANK	0000[0x7]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cc       |    |		.CONST	0x04cc								; Address of begin
04c9 04ec       |    |		.CONST	0x04ec								; Address of exception handler
04ca 0002       |    |		.CONST	0x0002								; Number of locals
04cb			INIT_04c8:
04cb e228       | (  |		Load	0x1,0x28							; Debug Table 0x18 = .DEBUG	0x04cb,0x09a6,0x0002,0x0000,0x0059,0x8d25,0x0000,0x0034
													; Debug Table 0x18.0x0 = 0x4cb,0xffff
04cc			BODY_04c8:
04cc 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0x1 = 0x4cc,0x1
04cd 01dd       |    |		Execute	Vector,First
04ce e5ff       |    |		Load	0x2,-0x1
04cf 01d7       |    |		Execute	Vector,Field_Read
04d0 e228       | (  |		Load	0x1,0x28
04d1 025b       | [  |		Execute	Discrete,Check_In_Type
04d2 0a01       |    |		Execute_Immediate	Plus,0x1
04d3 0059       | Y  |		Store_Top	Discrete,At_Offset_1
04d4 00cf       |    |		Action	Mark_Auxiliary
04d5 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x18.0x2 = 0x4d5,0x2
04d6 01dc       |    |		Execute	Vector,Last
04d7 e5ff       |    |		Load	0x2,-0x1
04d8 01dd       |    |		Execute	Vector,First
04d9 0a01       |    |		Execute_Immediate	Plus,0x1
04da 0248       | H  |		Execute	Discrete,Check_In_Integer
04db 0263       | c  |		Execute	Discrete,Above_Bound
04dc 700c       |p   |		Jump_Nonzero	0x4e9
04dd 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x18.0x3 = 0x4dd,0x3
04de 4bff       |K   |		Short_Literal	0x3ff
04df 0271       | q  |		Execute	Discrete,Times
04e0 00d9       |    |		Load_Top	At_Offset_1
04e1 e5ff       |    |		Load	0x2,-0x1
04e2 01d7       |    |		Execute	Vector,Field_Read
04e3 e228       | (  |		Load	0x1,0x28
04e4 025b       | [  |		Execute	Discrete,Check_In_Type
04e5 0273       | s  |		Execute	Discrete,Plus
04e6 c402       |    |		Store	0x2,0x2
04e7 00c8       |    |		Action	Pop_Auxiliary_Range
04e8 3ff4       |?   |		Loop_Increasing	0x4dd
04e9 00ce       |    |		Action	Pop_Auxiliary
04ea 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x18.0x4 = 0x4ea,0x4
04eb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
04ec			TRAP_04c8:
04ec 0007       |    |		Action	Break_Optional
04ed e21e       |    |		Load	0x1,0x1e							; Debug Table 0x18.0x5 = 0x4ed,0x5
04ee 0257       | W  |		Execute	Discrete,Raise
04ef 0000       |    |		.XXX[0x1]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 0500       |    |		.CONST	0x0500								; Address of begin
04f1 0004       |    |		.CONST	0x0004								; Address of exception handler
04f2 0004       |    |		.CONST	0x0004								; Number of locals
04f3			INIT_04f0:
04f3 4801       |H   |		Short_Literal	0x1							; Debug Table 0x19 = .DEBUG	0x04f3,0x09b4,0x0002,0x0000,0x0059,0x8d25,0x0000,0x007f
													; Debug Table 0x19.0x0 = 0x4f3,0xffff
04f4 4806       |H   |		Short_Literal	0x6
04f5 e004       |    |		Load	0x0,0x4
04f6 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
04f7 0334       | 4  |		Declare_Variable	Array,With_Constraint
04f8 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x19.0x1 = 0x4f8,0xfffe
04f9 e228       | (  |		Load	0x1,0x28
04fa 03f1       |    |		Declare_Variable	Discrete,With_Value
04fb 4bfd       |K   |		Short_Literal	0x3fd							; Debug Table 0x19.0x2 = 0x4fb,0xfffd
04fc 0a01       |    |		Execute_Immediate	Plus,0x1
04fd 0a01       |    |		Execute_Immediate	Plus,0x1
04fe e228       | (  |		Load	0x1,0x28
04ff 03ec       |    |		Declare_Variable	Discrete,With_Value,With_Constraint
0500			BODY_04f0:
0500 00cf       |    |		Action	Mark_Auxiliary
0501 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x19.0x3 = 0x501,0x1
0502 01da       |    |		Execute	Vector,Bounds
0503 e403       |    |		Load	0x2,0x3								; Debug Table 0x19.0x4 = 0x503,0x2
0504 e404       |    |		Load	0x2,0x4
0505 027c       | |  |		Execute	Discrete,Less
0506 680d       |h   |		Jump_Zero	0x514
0507 e403       |    |		Load	0x2,0x3								; Debug Table 0x19.0x5 = 0x507,0x3
0508 0aff       |    |		Execute_Immediate	Plus,-0x1
0509 e004       |    |		Load	0x0,0x4
050a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
050b 025b       | [  |		Execute	Discrete,Check_In_Type
050c 00d9       |    |		Load_Top	At_Offset_1
050d e402       |    |		Load	0x2,0x2
050e 01d6       |    |		Execute	Vector,Field_Write
050f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x19.0x6 = 0x50f,0x4
0510 4806       |H   |		Short_Literal	0x6
0511 e402       |    |		Load	0x2,0x2
0512 01cf       |    |		Execute	Vector,Slice_Read
0513 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0514 e403       |    |		Load	0x2,0x3								; Debug Table 0x19.0x7 = 0x514,0x5
0515 e404       |    |		Load	0x2,0x4
0516 026f       | o  |		Execute	Discrete,Remainder
0517 e004       |    |		Load	0x0,0x4
0518 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0519 025b       | [  |		Execute	Discrete,Check_In_Type
051a 00d9       |    |		Load_Top	At_Offset_1
051b e402       |    |		Load	0x2,0x2
051c 01d6       |    |		Execute	Vector,Field_Write
051d e403       |    |		Load	0x2,0x3								; Debug Table 0x19.0x8 = 0x51d,0x6
051e e404       |    |		Load	0x2,0x4
051f 0270       | p  |		Execute	Discrete,Divide
0520 c403       |    |		Store	0x2,0x3
0521 00c8       |    |		Action	Pop_Auxiliary_Range
0522 37e0       |7   |		Loop_Decreasing	0x503
0523 00ce       |    |		Action	Pop_Auxiliary
0524 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x19.0x9 = 0x524,0x7
0525 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0526 0000 0000  |    |		.XXX[0x2]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 052b       | +  |		.CONST	0x052b								; Address of begin
0529 0004       |    |		.CONST	0x0004								; Address of exception handler
052a 0001       |    |		.CONST	0x0001								; Number of locals
052b			BODY_0528:
052b			INIT_0528:
052b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1a = .DEBUG	0x052b,0x09ca,0x0001,0x0000,0x0059,0x8d25,0x0000,0x012f
													; Debug Table 0x1a.0x0 = 0x52b,0x1
052c 7002       |p   |		Jump_Nonzero	0x52f
052d 6046       |`F  |		Indirect_Literal	Discrete,0x574,{0x00000000, 0x598d2501}		; Debug Table 0x1a.0x1 = 0x52d,0x2
052e 0257       | W  |		Execute	Discrete,Raise
052f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0533       | 3  |		.CONST	0x0533								; Address of begin
0531 0004       |    |		.CONST	0x0004								; Address of exception handler
0532 0001       |    |		.CONST	0x0001								; Number of locals
0533			BODY_0530:
0533			INIT_0530:
0533 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1b = .DEBUG	0x0533,0x09d0,0x0001,0x0000,0x0059,0x8d25,0x0000,0x061a
													; Debug Table 0x1b.0x0 = 0x533,0x1
0534 00db       |    |		Load_Top	At_Offset_3
0535 e009       |    |		Load	0x0,0x9
0536 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0537 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 0547       | G  |		.CONST	0x0547								; Address of begin
0539 0556       | V  |		.CONST	0x0556								; Address of exception handler
053a 0003       |    |		.CONST	0x0003								; Number of locals
053b			INIT_0538:
053b e20e       |    |		Load	0x1,0xe								; Debug Table 0x1c = .DEBUG	0x053b,0x09d4,0x0001,0x0000,0x0059,0x8d25,0x0000,0x06bb
													; Debug Table 0x1c.0x0 = 0x53b,0xffff
053c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1c.0x1 = 0x53c,0xfffe
053d 01dd       |    |		Execute	Vector,First
053e e7ff       |    |		Load	0x3,-0x1
053f 01dc       |    |		Execute	Vector,Last
0540 0af7       |    |		Execute_Immediate	Plus,-0x9
0541 0248       | H  |		Execute	Discrete,Check_In_Integer
0542 e7ff       |    |		Load	0x3,-0x1
0543 01cf       |    |		Execute	Vector,Slice_Read
0544 0335       | 5  |		Declare_Variable	Array,Duplicate
0545 00d0       |    |		Action	Swap_Control
0546 00d1       |    |		Pop_Control	Pop_Count_1
0547			BODY_0538:
0547 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1c.0x2 = 0x547,0x1
0548 4801       |H   |		Short_Literal	0x1
0549 e402       |    |		Load	0x2,0x2
054a e00d       |    |		Load	0x0,0xd
054b 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
054c e7ff       |    |		Load	0x3,-0x1
054d e603       |    |		Load	0x3,0x3
054e e004       |    |		Load	0x0,0x4
054f 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0550 8211       |    |		Call	0x1,0x11
0551 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0552 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1c.0x3 = 0x552,0x2
0553 00da       |    |		Load_Top	At_Offset_2
0554 822f       | /  |		Call	0x1,0x2f
0555 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0556			TRAP_0538:
0556 4887       |H   |		Short_Literal	0x87
0557 010f       |    |		Execute	Exception,Equal
0558 6809       |h   |		Jump_Zero	0x562
0559 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1c.0x4 = 0x559,0x3
055a 0092 0687  |    |		Action	Push_String_Extended,0x687					; " not installed; terminal keybindings not made."
055c 01cc       |    |		Execute	Vector,Catenate
055d 0092 0688  |    |		Action	Push_String_Extended,0x688					; "CE_Initialization"
055f e00e       |    |		Load	0x0,0xe
0560 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0561 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0562 0092 0689  |    |		Action	Push_String_Extended,0x689					; "Error reading "
													; Debug Table 0x1c.0x5 = 0x562,0x4
0564 00da       |    |		Load_Top	At_Offset_2
0565 01cc       |    |		Execute	Vector,Catenate
0566 0092 068a  |    |		Action	Push_String_Extended,0x68a					; " : "
0568 01cc       |    |		Execute	Vector,Catenate
0569 e00f       |    |		Load	0x0,0xf
056a 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
056b 01cc       |    |		Execute	Vector,Catenate
056c 0092 068b  |    |		Action	Push_String_Extended,0x68b					; "; some or all terminal keybindings not made."
056e 01cc       |    |		Execute	Vector,Catenate
056f 0092 0688  |    |		Action	Push_String_Extended,0x688					; "CE_Initialization"
0571 e00e       |    |		Load	0x0,0xe
0572 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0573 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0574 0000 0000  |    |		.LITERAL	{0x00000000, 0x598d2501}
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057b       | {  |		.CONST	0x057b								; Address of begin
0579 0004       |    |		.CONST	0x0004								; Address of exception handler
057a 0001       |    |		.CONST	0x0001								; Number of locals
057b			BODY_0578:
057b			INIT_0578:
057b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1d = .DEBUG	0x057b,0x09e2,0x0001,0x0000,0x0059,0x8d25,0x0000,0x072f
													; Debug Table 0x1d.0x0 = 0x57b,0x1
057c 6802       |h   |		Jump_Zero	0x57f
057d 4887       |H   |		Short_Literal	0x87							; Debug Table 0x1d.0x1 = 0x57d,0x2
057e 0257       | W  |		Execute	Discrete,Raise
057f 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0580 ; --------------------------------------------------------------------------------------
0580 ; SUBPROGRAM
0580 ; --------------------------------------------------------------------------------------
0580 05a5       |    |		.CONST	0x05a5								; Address of begin
0581 0677       | w  |		.CONST	0x0677								; Address of exception handler
0582 000a       |    |		.CONST	0x000a								; Number of locals
0583			INIT_0580:
0583 e006       |    |		Load	0x0,0x6								; Debug Table 0x1e = .DEBUG	0x0583,0x09e8,0x0001,0x0000,0x0059,0x8d25,0x0000,0x074b
													; Debug Table 0x1e.0x0 = 0x583,0xffff
0584 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0585 02c7       |    |		Declare_Variable	Any
0586 00d8       |    |		Load_Top	At_Offset_0
0587 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0588 e006       |    |		Load	0x0,0x6								; Debug Table 0x1e.0x1 = 0x588,0xfffe
0589 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
058a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
058b 02c7       |    |		Declare_Variable	Any
058c 00d8       |    |		Load_Top	At_Offset_0
058d 1c00       |    |		Execute_Immediate	Run_Utility,0x0
058e e006       |    |		Load	0x0,0x6								; Debug Table 0x1e.0x2 = 0x58e,0xfffd
058f 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0590 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0591 02c7       |    |		Declare_Variable	Any
0592 00d8       |    |		Load_Top	At_Offset_0
0593 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0594 e006       |    |		Load	0x0,0x6								; Debug Table 0x1e.0x3 = 0x594,0xfffc
0595 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0596 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0597 e006       |    |		Load	0x0,0x6								; Debug Table 0x1e.0x4 = 0x597,0xfffb
0598 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0599 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
059a e006       |    |		Load	0x0,0x6								; Debug Table 0x1e.0x5 = 0x59a,0xfffa
059b 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
059c 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
059d 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x1e.0x6 = 0x59d,0xfff9
059e e010       |    |		Load	0x0,0x10							; Debug Table 0x1e.0x7 = 0x59e,0xfff8
059f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05a0 02c7       |    |		Declare_Variable	Any
05a1 00d8       |    |		Load_Top	At_Offset_0
05a2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
05a3 e006       |    |		Load	0x0,0x6								; Debug Table 0x1e.0x8 = 0x5a3,0xfff7
05a4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05a5			BODY_0580:
05a5 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1e.0x9 = 0x5a5,0x1
05a6 e006       |    |		Load	0x0,0x6
05a7 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
05a8 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
05a9 c603       |    |		Store	0x3,0x3
05aa e006       |    |		Load	0x0,0x6								; Debug Table 0x1e.0xa = 0x5aa,0x2
05ab 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05ac e006       |    |		Load	0x0,0x6
05ad 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
05ae 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05af 60cc       |`   |		Indirect_Literal	Discrete,0x67c,{0x00000000, 0x00004000}
05b0 e007       |    |		Load	0x0,0x7
05b1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
05b2 4800       |H   |		Short_Literal	0x0
05b3 e603       |    |		Load	0x3,0x3
05b4 e006       |    |		Load	0x0,0x6
05b5 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
05b6 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
05b7 c606       |    |		Store	0x3,0x6
05b8 0059       | Y  |		Store_Top	Discrete,At_Offset_1
05b9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0xb = 0x5b9,0x3
05ba 840a       |    |		Call	0x2,0xa
05bb e606       |    |		Load	0x3,0x6								; Debug Table 0x1e.0xc = 0x5bb,0x4
05bc 0f03       |    |		Execute_Immediate	Equal,0x3
05bd 7042       |pB  |		Jump_Nonzero	0x600
05be e606       |    |		Load	0x3,0x6
05bf 0f04       |    |		Execute_Immediate	Equal,0x4
05c0 703f       |p?  |		Jump_Nonzero	0x600
05c1 e006       |    |		Load	0x0,0x6								; Debug Table 0x1e.0xd = 0x5c1,0x5
05c2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05c3 e006       |    |		Load	0x0,0x6
05c4 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
05c5 60b6       |`   |		Indirect_Literal	Discrete,0x67c,{0x00000000, 0x00004000}
05c6 e007       |    |		Load	0x0,0x7
05c7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
05c8 4800       |H   |		Short_Literal	0x0
05c9 e7ff       |    |		Load	0x3,-0x1
05ca e006       |    |		Load	0x0,0x6
05cb 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
05cc 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
05cd c605       |    |		Store	0x3,0x5
05ce 0059       | Y  |		Store_Top	Discrete,At_Offset_1
05cf 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0xe = 0x5cf,0x6
05d0 840a       |    |		Call	0x2,0xa
05d1 e006       |    |		Load	0x0,0x6								; Debug Table 0x1e.0xf = 0x5d1,0x7
05d2 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05d3 00f1       |    |		Load_Encached	Diana_Temp_Seq
05d4 e006       |    |		Load	0x0,0x6
05d5 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
05d6 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
05d7 e609       |    |		Load	0x3,0x9
05d8 0120       |    |		Execute	Any,Is_Value
05d9 6803       |h   |		Jump_Zero	0x5dd
05da e010       |    |		Load	0x0,0x10
05db 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
05dc 7801       |x   |		Jump	0x5de
05dd e609       |    |		Load	0x3,0x9
05de e605       |    |		Load	0x3,0x5
05df 609c       |`   |		Indirect_Literal	Discrete,0x67c,{0x00000000, 0x00004000}
05e0 e007       |    |		Load	0x0,0x7
05e1 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
05e2 4800       |H   |		Short_Literal	0x0
05e3 e006       |    |		Load	0x0,0x6
05e4 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
05e5 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
05e6 e006       |    |		Load	0x0,0x6
05e7 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
05e8 4803       |H   |		Short_Literal	0x3
05e9 e006       |    |		Load	0x0,0x6
05ea 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
05eb 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
05ec c605       |    |		Store	0x3,0x5
05ed c609       |    |		Store	0x3,0x9
05ee c607       |    |		Store	0x3,0x7
05ef c608       |    |		Store	0x3,0x8
05f0 0059       | Y  |		Store_Top	Discrete,At_Offset_1
05f1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0x10 = 0x5f1,0x8
05f2 680d       |h   |		Jump_Zero	0x600
05f3 e7ff       |    |		Load	0x3,-0x1							; Debug Table 0x1e.0x11 = 0x5f3,0x9
05f4 e006       |    |		Load	0x0,0x6
05f5 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
05f6 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
05f7 0092 068c  |    |		Action	Push_String_Extended,0x68c					; " could not be Installed."
05f9 01cc       |    |		Execute	Vector,Catenate
05fa 0092 0688  |    |		Action	Push_String_Extended,0x688					; "CE_Initialization"
05fc e00e       |    |		Load	0x0,0xe
05fd 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
05fe 4887       |H   |		Short_Literal	0x87							; Debug Table 0x1e.0x12 = 0x5fe,0xa
05ff 0257       | W  |		Execute	Discrete,Raise
0600 4800       |H   |		Short_Literal	0x0							; Debug Table 0x1e.0x13 = 0x600,0xb
0601 e603       |    |		Load	0x3,0x3
0602 e006       |    |		Load	0x0,0x6
0603 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0604 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0605 6870       |hp  |		Jump_Zero	0x676
0606 e006       |    |		Load	0x0,0x6								; Debug Table 0x1e.0x14 = 0x606,0xc
0607 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0608 e604       |    |		Load	0x3,0x4
0609 0120       |    |		Execute	Any,Is_Value
060a 6804       |h   |		Jump_Zero	0x60f
060b e006       |    |		Load	0x0,0x6
060c 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
060d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
060e 7801       |x   |		Jump	0x610
060f e604       |    |		Load	0x3,0x4
0610 606b       |`k  |		Indirect_Literal	Discrete,0x67c,{0x00000000, 0x00004000}
0611 e007       |    |		Load	0x0,0x7
0612 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0613 e603       |    |		Load	0x3,0x3
0614 e006       |    |		Load	0x0,0x6
0615 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0616 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0617 c604       |    |		Store	0x3,0x4
0618 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0619 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0x15 = 0x619,0xd
061a 840a       |    |		Call	0x2,0xa
061b e006       |    |		Load	0x0,0x6								; Debug Table 0x1e.0x16 = 0x61b,0xe
061c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
061d e006       |    |		Load	0x0,0x6
061e 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
061f 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0620 605b       |`[  |		Indirect_Literal	Discrete,0x67c,{0x00000000, 0x00004000}
0621 e007       |    |		Load	0x0,0x7
0622 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0623 4800       |H   |		Short_Literal	0x0
0624 e604       |    |		Load	0x3,0x4
0625 e006       |    |		Load	0x0,0x6
0626 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0627 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0628 c606       |    |		Store	0x3,0x6
0629 0059       | Y  |		Store_Top	Discrete,At_Offset_1
062a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0x17 = 0x62a,0xf
062b 840a       |    |		Call	0x2,0xa
062c e606       |    |		Load	0x3,0x6								; Debug Table 0x1e.0x18 = 0x62c,0x10
062d 0f03       |    |		Execute_Immediate	Equal,0x3
062e 7047       |pG  |		Jump_Nonzero	0x676
062f e606       |    |		Load	0x3,0x6
0630 0f04       |    |		Execute_Immediate	Equal,0x4
0631 7044       |pD  |		Jump_Nonzero	0x676
0632 e604       |    |		Load	0x3,0x4								; Debug Table 0x1e.0x19 = 0x632,0x11
0633 e006       |    |		Load	0x0,0x6
0634 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
0635 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0636 c602       |    |		Store	0x3,0x2
0637 e006       |    |		Load	0x0,0x6								; Debug Table 0x1e.0x1a = 0x637,0x12
0638 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0639 e006       |    |		Load	0x0,0x6
063a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
063b 6040       |`@  |		Indirect_Literal	Discrete,0x67c,{0x00000000, 0x00004000}
063c e007       |    |		Load	0x0,0x7
063d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
063e 4800       |H   |		Short_Literal	0x0
063f e602       |    |		Load	0x3,0x2
0640 e006       |    |		Load	0x0,0x6
0641 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
0642 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0643 c605       |    |		Store	0x3,0x5
0644 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0645 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0x1b = 0x645,0x13
0646 840a       |    |		Call	0x2,0xa
0647 e006       |    |		Load	0x0,0x6								; Debug Table 0x1e.0x1c = 0x647,0x14
0648 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0649 00f1       |    |		Load_Encached	Diana_Temp_Seq
064a e006       |    |		Load	0x0,0x6
064b 1b38       | 8  |		Execute	Package,Field_Read,Field_Number 0x38
064c 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
064d e609       |    |		Load	0x3,0x9
064e 0120       |    |		Execute	Any,Is_Value
064f 6803       |h   |		Jump_Zero	0x653
0650 e010       |    |		Load	0x0,0x10
0651 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0652 7801       |x   |		Jump	0x654
0653 e609       |    |		Load	0x3,0x9
0654 e605       |    |		Load	0x3,0x5
0655 6026       |`&  |		Indirect_Literal	Discrete,0x67c,{0x00000000, 0x00004000}
0656 e007       |    |		Load	0x0,0x7
0657 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0658 4800       |H   |		Short_Literal	0x0
0659 e006       |    |		Load	0x0,0x6
065a 1b34       | 4  |		Execute	Package,Field_Read,Field_Number 0x34
065b 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
065c e006       |    |		Load	0x0,0x6
065d 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
065e 4803       |H   |		Short_Literal	0x3
065f e006       |    |		Load	0x0,0x6
0660 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
0661 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0662 c605       |    |		Store	0x3,0x5
0663 c609       |    |		Store	0x3,0x9
0664 c607       |    |		Store	0x3,0x7
0665 c608       |    |		Store	0x3,0x8
0666 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0667 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1e.0x1d = 0x667,0x15
0668 680d       |h   |		Jump_Zero	0x676
0669 e602       |    |		Load	0x3,0x2								; Debug Table 0x1e.0x1e = 0x669,0x16
066a e006       |    |		Load	0x0,0x6
066b 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
066c 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
066d 0092 068c  |    |		Action	Push_String_Extended,0x68c					; " could not be Installed."
066f 01cc       |    |		Execute	Vector,Catenate
0670 0092 0688  |    |		Action	Push_String_Extended,0x688					; "CE_Initialization"
0672 e00e       |    |		Load	0x0,0xe
0673 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0674 4887       |H   |		Short_Literal	0x87							; Debug Table 0x1e.0x1f = 0x674,0x17
0675 0257       | W  |		Execute	Discrete,Raise
0676 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0677			TRAP_0580:
0677 4887       |H   |		Short_Literal	0x87
0678 010f       |    |		Execute	Exception,Equal
0679 6801       |h   |		Jump_Zero	0x67b
067a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0x1e.0x20 = 0x67a,0x18
067b 0100       |    |		Execute	Exception,Raise
067c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
0680 ; --------------------------------------------------------------------------------------
0680 ; STRING TABLE
0680 ; --------------------------------------------------------------------------------------
0680 001c       |    |		.STRTAB	0x001c->0x068e							; "PERFECT"
0681 0021       | !  |		.STRTAB	0x0021->0x0691							; "PREFIX"
0682 0025       | %  |		.STRTAB	0x0025->0x0694							; "NONE_POSSIBLE"
0683 0030       | 0  |		.STRTAB	0x0030->0x069b							; "_COMMANDS"
0684 0037       | 7  |		.STRTAB	0x0037->0x069f							; "_KEY_NAMES"
0685 003f       | ?  |		.STRTAB	0x003f->0x06a4							; "@"
0686 003e       | >  |		.STRTAB	0x003e->0x06a5							; "'SPEC"
0687 0041       | A  |		.STRTAB	0x0041->0x06a7							; " not installed; terminal keybindings not made."
0688 006d       | m  |		.STRTAB	0x006d->0x06be							; "CE_Initialization"
0689 007c       | |  |		.STRTAB	0x007c->0x06c7							; "Error reading "
068a 0088       |    |		.STRTAB	0x0088->0x06ce							; " : "
068b 0089       |    |		.STRTAB	0x0089->0x06cf							; "; some or all terminal keybindings not made."
068c 00b3       |    |		.STRTAB	0x00b3->0x06e5							; " could not be Installed."
068d 00c9       |    |		.STREND 0x00c9->0x06f1
068e 5045 5246  |PERF|		.STRTAB_STRINGS
06f2 0000 0000  |    |		.BLANK	0000[0x6]
06f8 ; --------------------------------------------------------------------------------------
06f8 ; Debug Table
06f8 ; --------------------------------------------------------------------------------------
06f8 0003 001f  |    |		.CONST	0x0003,0x001f
06fa 000b 07f2  |    |		.DEBUG	0x000b,0x07f2,0x8000,0x0000,0x0058,0xc125,0x0000,0x0013
0702 008b 0844  |   D|		.DEBUG	0x008b,0x0844,0x8000,0x0000,0x0059,0x8d25,0x0000,0x0021
070a 00c3 0874  |   t|		.DEBUG	0x00c3,0x0874,0x0005,0x0000,0x0058,0xc125,0x0000,0x002f
0712 00db 0876  |   v|		.DEBUG	0x00db,0x0876,0x0001,0x0000,0x0058,0xc125,0x0000,0x003c
071a 0113 0884  |    |		.DEBUG	0x0113,0x0884,0x0001,0x0000,0x0058,0xc125,0x0000,0x004a
0722 0153 08a2  | S  |		.DEBUG	0x0153,0x08a2,0x0001,0x0000,0x0058,0xc125,0x0000,0x0073
072a 0173 08ac  | s  |		.DEBUG	0x0173,0x08ac,0x0001,0x0000,0x0058,0xc125,0x0000,0x0085
0732 0223 08e4  | #  |		.DEBUG	0x0223,0x08e4,0x0001,0x0000,0x0058,0xc125,0x0000,0x00a8
073a 023b 08e8  | ;  |		.DEBUG	0x023b,0x08e8,0x0001,0x0000,0x0058,0xc125,0x0000,0x00bc
0742 02a3 08fa  |    |		.DEBUG	0x02a3,0x08fa,0x0001,0x0000,0x0058,0xc125,0x0000,0x00d0
074a 02fb 091a  |    |		.DEBUG	0x02fb,0x091a,0x0001,0x0000,0x0058,0xc125,0x0000,0x00ec
0752 033b 0930  | ; 0|		.DEBUG	0x033b,0x0930,0x0001,0x0000,0x0058,0xc125,0x0000,0x00f8
075a 036b 093e  | k >|		.DEBUG	0x036b,0x093e,0x0002,0x0000,0x0058,0xc125,0x0000,0x0100
0762 0383 0946  |   F|		.DEBUG	0x0383,0x0946,0x0002,0x0000,0x0058,0xc125,0x0000,0x010b
076a 0393 094a  |   J|		.DEBUG	0x0393,0x094a,0x0002,0x0000,0x0058,0xc125,0x0000,0x0114
0772 039b 094e  |   N|		.DEBUG	0x039b,0x094e,0x0001,0x0000,0x0058,0xc125,0x0000,0x011d
077a 03ab 0952  |   R|		.DEBUG	0x03ab,0x0952,0x0001,0x0000,0x0058,0xc125,0x0000,0x0143
0782 03bb 0956  |   V|		.DEBUG	0x03bb,0x0956,0x0002,0x0000,0x0058,0xc125,0x0000,0x0156
078a 03c3 095a  |   Z|		.DEBUG	0x03c3,0x095a,0x0002,0x0000,0x0058,0xc125,0x0000,0x0163
0792 03db 0966  |   f|		.DEBUG	0x03db,0x0966,0x0001,0x0000,0x0058,0xc125,0x0000,0x016c
079a 047b 099c  | {  |		.DEBUG	0x047b,0x099c,0x0005,0x0000,0x0058,0xc125,0x0000,0x0171
07a2 0493 099e  |    |		.DEBUG	0x0493,0x099e,0x0005,0x0000,0x0058,0xc125,0x0000,0x0181
07aa 04ab 09a0  |    |		.DEBUG	0x04ab,0x09a0,0x0002,0x0000,0x0058,0xc125,0x0000,0x01ad
07b2 04b3 09a4  |    |		.DEBUG	0x04b3,0x09a4,0x0005,0x0000,0x0058,0xc125,0x0000,0x01c7
07ba 04cb 09a6  |    |		.DEBUG	0x04cb,0x09a6,0x0002,0x0000,0x0059,0x8d25,0x0000,0x0034
07c2 04f3 09b4  |    |		.DEBUG	0x04f3,0x09b4,0x0002,0x0000,0x0059,0x8d25,0x0000,0x007f
07ca 052b 09ca  | +  |		.DEBUG	0x052b,0x09ca,0x0001,0x0000,0x0059,0x8d25,0x0000,0x012f
07d2 0533 09d0  | 3  |		.DEBUG	0x0533,0x09d0,0x0001,0x0000,0x0059,0x8d25,0x0000,0x061a
07da 053b 09d4  | ;  |		.DEBUG	0x053b,0x09d4,0x0001,0x0000,0x0059,0x8d25,0x0000,0x06bb
07e2 057b 09e2  | {  |		.DEBUG	0x057b,0x09e2,0x0001,0x0000,0x0059,0x8d25,0x0000,0x072f
07ea 0583 09e8  |    |		.DEBUG	0x0583,0x09e8,0x0001,0x0000,0x0059,0x8d25,0x0000,0x074b
07f2 ; --------------------------------------------------------------------------------------
07f2 ; Debug3 Subtable 0x0
07f2 ; --------------------------------------------------------------------------------------
07f2 0028 0000  | (  |		.DBG3TAB	0x0028,0x0000
07f4 000b ffff  |    |		.CONST	0x000b,0xffff
07f6 000b fffe  |    |		.CONST	0x000b,0xfffe
07f8 000b fffd  |    |		.CONST	0x000b,0xfffd
07fa 000b fffc  |    |		.CONST	0x000b,0xfffc
07fc 000e fffb  |    |		.CONST	0x000e,0xfffb
07fe 000f fffa  |    |		.CONST	0x000f,0xfffa
0800 0014 fff9  |    |		.CONST	0x0014,0xfff9
0802 0014 fff8  |    |		.CONST	0x0014,0xfff8
0804 0016 fff7  |    |		.CONST	0x0016,0xfff7
0806 0018 fff6  |    |		.CONST	0x0018,0xfff6
0808 001a fff5  |    |		.CONST	0x001a,0xfff5
080a 001c fff4  |    |		.CONST	0x001c,0xfff4
080c 001e fff3  |    |		.CONST	0x001e,0xfff3
080e 0020 fff2  |    |		.CONST	0x0020,0xfff2
0810 0022 fff1  | "  |		.CONST	0x0022,0xfff1
0812 0024 fff0  | $  |		.CONST	0x0024,0xfff0
0814 0026 ffef  | &  |		.CONST	0x0026,0xffef
0816 0028 ffee  | (  |		.CONST	0x0028,0xffee
0818 002a ffed  | *  |		.CONST	0x002a,0xffed
081a 002c ffec  | ,  |		.CONST	0x002c,0xffec
081c 002e ffeb  | .  |		.CONST	0x002e,0xffeb
081e 0030 ffea  | 0  |		.CONST	0x0030,0xffea
0820 0032 ffe9  | 2  |		.CONST	0x0032,0xffe9
0822 0038 ffe8  | 8  |		.CONST	0x0038,0xffe8
0824 0047 ffe7  | G  |		.CONST	0x0047,0xffe7
0826 0049 ffe6  | I  |		.CONST	0x0049,0xffe6
0828 004b ffe5  | K  |		.CONST	0x004b,0xffe5
082a 004c ffe4  | L  |		.CONST	0x004c,0xffe4
082c 004e ffe3  | N  |		.CONST	0x004e,0xffe3
082e 0050 ffe2  | P  |		.CONST	0x0050,0xffe2
0830 0057 ffe1  | W  |		.CONST	0x0057,0xffe1
0832 005e ffe0  | ^  |		.CONST	0x005e,0xffe0
0834 005e ffdf  | ^  |		.CONST	0x005e,0xffdf
0836 0065 ffde  | e  |		.CONST	0x0065,0xffde
0838 0067 ffdd  | g  |		.CONST	0x0067,0xffdd
083a 0071 ffdc  | q  |		.CONST	0x0071,0xffdc
083c 007a ffdb  | z  |		.CONST	0x007a,0xffdb
083e 007e ffda  | ~  |		.CONST	0x007e,0xffda
0840 007e ffd9  | ~  |		.CONST	0x007e,0xffd9
0842 0087 ffd8  |    |		.CONST	0x0087,0xffd8
0844 ; --------------------------------------------------------------------------------------
0844 ; Debug3 Subtable 0x1
0844 ; --------------------------------------------------------------------------------------
0844 0017 0000  |    |		.DBG3TAB	0x0017,0x0000
0846 008b ffff  |    |		.CONST	0x008b,0xffff
0848 008b fffe  |    |		.CONST	0x008b,0xfffe
084a 008d fffd  |    |		.CONST	0x008d,0xfffd
084c 008f fffc  |    |		.CONST	0x008f,0xfffc
084e 0091 fffb  |    |		.CONST	0x0091,0xfffb
0850 0093 fffa  |    |		.CONST	0x0093,0xfffa
0852 0095 fff9  |    |		.CONST	0x0095,0xfff9
0854 0097 fff8  |    |		.CONST	0x0097,0xfff8
0856 0099 fff7  |    |		.CONST	0x0099,0xfff7
0858 009b fff6  |    |		.CONST	0x009b,0xfff6
085a 009d fff5  |    |		.CONST	0x009d,0xfff5
085c 009f fff4  |    |		.CONST	0x009f,0xfff4
085e 00a1 fff3  |    |		.CONST	0x00a1,0xfff3
0860 00a3 fff2  |    |		.CONST	0x00a3,0xfff2
0862 00a5 fff1  |    |		.CONST	0x00a5,0xfff1
0864 00a7 fff0  |    |		.CONST	0x00a7,0xfff0
0866 00a9 ffef  |    |		.CONST	0x00a9,0xffef
0868 00ab ffee  |    |		.CONST	0x00ab,0xffee
086a 00ad ffed  |    |		.CONST	0x00ad,0xffed
086c 00af ffec  |    |		.CONST	0x00af,0xffec
086e 00b1 ffeb  |    |		.CONST	0x00b1,0xffeb
0870 00b3 ffea  |    |		.CONST	0x00b3,0xffea
0872 00b5 ffe9  |    |		.CONST	0x00b5,0xffe9
0874 ; --------------------------------------------------------------------------------------
0874 ; Debug3 Subtable 0x2
0874 ; --------------------------------------------------------------------------------------
0874 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0876 ; --------------------------------------------------------------------------------------
0876 ; Debug3 Subtable 0x3
0876 ; --------------------------------------------------------------------------------------
0876 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0878 00db 0001  |    |		.CONST	0x00db,0x0001
087a 00e2 0002  |    |		.CONST	0x00e2,0x0002
087c 00e2 0003  |    |		.CONST	0x00e2,0x0003
087e 00f6 0004  |    |		.CONST	0x00f6,0x0004
0880 0100 0005  |    |		.CONST	0x0100,0x0005
0882 0104 0006  |    |		.CONST	0x0104,0x0006
0884 ; --------------------------------------------------------------------------------------
0884 ; Debug3 Subtable 0x4
0884 ; --------------------------------------------------------------------------------------
0884 0001 000d  |    |		.DBG3TAB	0x0001,0x000d
0886 0113 ffff  |    |		.CONST	0x0113,0xffff
0888 0118 0001  |    |		.CONST	0x0118,0x0001
088a 011c 0002  |    |		.CONST	0x011c,0x0002
088c 011f 0003  |    |		.CONST	0x011f,0x0003
088e 011f 0401  |    |		.CONST	0x011f,0x0401
0890 0120 0003  |    |		.CONST	0x0120,0x0003
0892 0122 0004  | "  |		.CONST	0x0122,0x0004
0894 0125 0005  | %  |		.CONST	0x0125,0x0005
0896 0129 0006  | )  |		.CONST	0x0129,0x0006
0898 012b 0007  | +  |		.CONST	0x012b,0x0007
089a 0131 0008  | 1  |		.CONST	0x0131,0x0008
089c 013a 0801  | :  |		.CONST	0x013a,0x0801
089e 0140 0008  | @  |		.CONST	0x0140,0x0008
08a0 0147 0009  | G  |		.CONST	0x0147,0x0009
08a2 ; --------------------------------------------------------------------------------------
08a2 ; Debug3 Subtable 0x5
08a2 ; --------------------------------------------------------------------------------------
08a2 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
08a4 0153 0001  | S  |		.CONST	0x0153,0x0001
08a6 0157 0002  | W  |		.CONST	0x0157,0x0002
08a8 015d 0003  | ]  |		.CONST	0x015d,0x0003
08aa 0165 0004  | e  |		.CONST	0x0165,0x0004
08ac ; --------------------------------------------------------------------------------------
08ac ; Debug3 Subtable 0x6
08ac ; --------------------------------------------------------------------------------------
08ac 000b 0010  |    |		.DBG3TAB	0x000b,0x0010
08ae 0173 ffff  | s  |		.CONST	0x0173,0xffff
08b0 0178 fffe  | x  |		.CONST	0x0178,0xfffe
08b2 017e fffd  | ~  |		.CONST	0x017e,0xfffd
08b4 0184 fffc  |    |		.CONST	0x0184,0xfffc
08b6 018a fffb  |    |		.CONST	0x018a,0xfffb
08b8 018b fffa  |    |		.CONST	0x018b,0xfffa
08ba 018d fff9  |    |		.CONST	0x018d,0xfff9
08bc 0190 fff8  |    |		.CONST	0x0190,0xfff8
08be 0193 fff7  |    |		.CONST	0x0193,0xfff7
08c0 0193 fff6  |    |		.CONST	0x0193,0xfff6
08c2 0193 fff5  |    |		.CONST	0x0193,0xfff5
08c4 0193 0001  |    |		.CONST	0x0193,0x0001
08c6 01a7 0002  |    |		.CONST	0x01a7,0x0002
08c8 01aa 0003  |    |		.CONST	0x01aa,0x0003
08ca 01af 0004  |    |		.CONST	0x01af,0x0004
08cc 01b5 0005  |    |		.CONST	0x01b5,0x0005
08ce 01c8 0006  |    |		.CONST	0x01c8,0x0006
08d0 01cc 0007  |    |		.CONST	0x01cc,0x0007
08d2 01ce 0008  |    |		.CONST	0x01ce,0x0008
08d4 01dd 0009  |    |		.CONST	0x01dd,0x0009
08d6 01e0 000a  |    |		.CONST	0x01e0,0x000a
08d8 01e6 000b  |    |		.CONST	0x01e6,0x000b
08da 01e8 000c  |    |		.CONST	0x01e8,0x000c
08dc 0203 000d  |    |		.CONST	0x0203,0x000d
08de 0206 000e  |    |		.CONST	0x0206,0x000e
08e0 020e 000f  |    |		.CONST	0x020e,0x000f
08e2 0219 0010  |    |		.CONST	0x0219,0x0010
08e4 ; --------------------------------------------------------------------------------------
08e4 ; Debug3 Subtable 0x7
08e4 ; --------------------------------------------------------------------------------------
08e4 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
08e6 0223 0001  | #  |		.CONST	0x0223,0x0001
08e8 ; --------------------------------------------------------------------------------------
08e8 ; Debug3 Subtable 0x8
08e8 ; --------------------------------------------------------------------------------------
08e8 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
08ea 023b ffff  | ;  |		.CONST	0x023b,0xffff
08ec 023f 0001  | ?  |		.CONST	0x023f,0x0001
08ee 024c 0008  | L  |		.CONST	0x024c,0x0008
08f0 024e 0003  | N  |		.CONST	0x024e,0x0003
08f2 0257 0004  | W  |		.CONST	0x0257,0x0004
08f4 0269 0005  | i  |		.CONST	0x0269,0x0005
08f6 0273 0006  | s  |		.CONST	0x0273,0x0006
08f8 028b 0007  |    |		.CONST	0x028b,0x0007
08fa ; --------------------------------------------------------------------------------------
08fa ; Debug3 Subtable 0x9
08fa ; --------------------------------------------------------------------------------------
08fa 0003 000c  |    |		.DBG3TAB	0x0003,0x000c
08fc 02a3 ffff  |    |		.CONST	0x02a3,0xffff
08fe 02a7 fffe  |    |		.CONST	0x02a7,0xfffe
0900 02ab fffd  |    |		.CONST	0x02ab,0xfffd
0902 02ac 0001  |    |		.CONST	0x02ac,0x0001
0904 02ae 0002  |    |		.CONST	0x02ae,0x0002
0906 02b1 0003  |    |		.CONST	0x02b1,0x0003
0908 02b4 0004  |    |		.CONST	0x02b4,0x0004
090a 02be 0005  |    |		.CONST	0x02be,0x0005
090c 02c1 0006  |    |		.CONST	0x02c1,0x0006
090e 02c6 0007  |    |		.CONST	0x02c6,0x0007
0910 02d1 0008  |    |		.CONST	0x02d1,0x0008
0912 02d3 0009  |    |		.CONST	0x02d3,0x0009
0914 02d6 000a  |    |		.CONST	0x02d6,0x000a
0916 02db 000b  |    |		.CONST	0x02db,0x000b
0918 02e1 000c  |    |		.CONST	0x02e1,0x000c
091a ; --------------------------------------------------------------------------------------
091a ; Debug3 Subtable 0xa
091a ; --------------------------------------------------------------------------------------
091a 0001 0009  |    |		.DBG3TAB	0x0001,0x0009
091c 02fb ffff  |    |		.CONST	0x02fb,0xffff
091e 02fd 0001  |    |		.CONST	0x02fd,0x0001
0920 0300 0002  |    |		.CONST	0x0300,0x0002
0922 0303 0003  |    |		.CONST	0x0303,0x0003
0924 0306 0004  |    |		.CONST	0x0306,0x0004
0926 0314 0006  |    |		.CONST	0x0314,0x0006
0928 031c 0005  |    |		.CONST	0x031c,0x0005
092a 0325 0007  | %  |		.CONST	0x0325,0x0007
092c 032b 0008  | +  |		.CONST	0x032b,0x0008
092e 032e 0009  | .  |		.CONST	0x032e,0x0009
0930 ; --------------------------------------------------------------------------------------
0930 ; Debug3 Subtable 0xb
0930 ; --------------------------------------------------------------------------------------
0930 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0932 033b 0001  | ;  |		.CONST	0x033b,0x0001
0934 033f 0002  | ?  |		.CONST	0x033f,0x0002
0936 033f 0003  | ?  |		.CONST	0x033f,0x0003
0938 0346 0004  | F  |		.CONST	0x0346,0x0004
093a 0353 0005  | S  |		.CONST	0x0353,0x0005
093c 035c 0006  | \  |		.CONST	0x035c,0x0006
093e ; --------------------------------------------------------------------------------------
093e ; Debug3 Subtable 0xc
093e ; --------------------------------------------------------------------------------------
093e 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0940 036b 0001  | k  |		.CONST	0x036b,0x0001
0942 036e 0002  | n  |		.CONST	0x036e,0x0002
0944 0379 0003  | y  |		.CONST	0x0379,0x0003
0946 ; --------------------------------------------------------------------------------------
0946 ; Debug3 Subtable 0xd
0946 ; --------------------------------------------------------------------------------------
0946 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0948 0383 0001  |    |		.CONST	0x0383,0x0001
094a ; --------------------------------------------------------------------------------------
094a ; Debug3 Subtable 0xe
094a ; --------------------------------------------------------------------------------------
094a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
094c 0393 0001  |    |		.CONST	0x0393,0x0001
094e ; --------------------------------------------------------------------------------------
094e ; Debug3 Subtable 0xf
094e ; --------------------------------------------------------------------------------------
094e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0950 039b 0001  |    |		.CONST	0x039b,0x0001
0952 ; --------------------------------------------------------------------------------------
0952 ; Debug3 Subtable 0x10
0952 ; --------------------------------------------------------------------------------------
0952 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0954 03ab 0001  |    |		.CONST	0x03ab,0x0001
0956 ; --------------------------------------------------------------------------------------
0956 ; Debug3 Subtable 0x11
0956 ; --------------------------------------------------------------------------------------
0956 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0958 03bb 0001  |    |		.CONST	0x03bb,0x0001
095a ; --------------------------------------------------------------------------------------
095a ; Debug3 Subtable 0x12
095a ; --------------------------------------------------------------------------------------
095a 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
095c 03c3 ffff  |    |		.CONST	0x03c3,0xffff
095e 03c4 0001  |    |		.CONST	0x03c4,0x0001
0960 03c8 0002  |    |		.CONST	0x03c8,0x0002
0962 03ca 0003  |    |		.CONST	0x03ca,0x0003
0964 03d3 0004  |    |		.CONST	0x03d3,0x0004
0966 ; --------------------------------------------------------------------------------------
0966 ; Debug3 Subtable 0x13
0966 ; --------------------------------------------------------------------------------------
0966 000c 000e  |    |		.DBG3TAB	0x000c,0x000e
0968 03db ffff  |    |		.CONST	0x03db,0xffff
096a 03dc fffe  |    |		.CONST	0x03dc,0xfffe
096c 03e2 fffd  |    |		.CONST	0x03e2,0xfffd
096e 03e7 fffc  |    |		.CONST	0x03e7,0xfffc
0970 03ea fffb  |    |		.CONST	0x03ea,0xfffb
0972 03ec fffa  |    |		.CONST	0x03ec,0xfffa
0974 03ee fff9  |    |		.CONST	0x03ee,0xfff9
0976 03f0 fff8  |    |		.CONST	0x03f0,0xfff8
0978 03f0 fff7  |    |		.CONST	0x03f0,0xfff7
097a 03f0 fff6  |    |		.CONST	0x03f0,0xfff6
097c 03f2 fff5  |    |		.CONST	0x03f2,0xfff5
097e 03f4 fff4  |    |		.CONST	0x03f4,0xfff4
0980 03f6 0001  |    |		.CONST	0x03f6,0x0001
0982 03fb 0002  |    |		.CONST	0x03fb,0x0002
0984 0418 0004  |    |		.CONST	0x0418,0x0004
0986 0427 0005  | '  |		.CONST	0x0427,0x0005
0988 0429 0006  | )  |		.CONST	0x0429,0x0006
098a 042b 0007  | +  |		.CONST	0x042b,0x0007
098c 0431 0003  | 1  |		.CONST	0x0431,0x0003
098e 0437 0008  | 7  |		.CONST	0x0437,0x0008
0990 0454 000a  | T  |		.CONST	0x0454,0x000a
0992 0463 000b  | c  |		.CONST	0x0463,0x000b
0994 0465 000c  | e  |		.CONST	0x0465,0x000c
0996 0467 000d  | g  |		.CONST	0x0467,0x000d
0998 046c 000e  | l  |		.CONST	0x046c,0x000e
099a 0472 0009  | r  |		.CONST	0x0472,0x0009
099c ; --------------------------------------------------------------------------------------
099c ; Debug3 Subtable 0x14
099c ; --------------------------------------------------------------------------------------
099c 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
099e ; --------------------------------------------------------------------------------------
099e ; Debug3 Subtable 0x15
099e ; --------------------------------------------------------------------------------------
099e 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
09a0 ; --------------------------------------------------------------------------------------
09a0 ; Debug3 Subtable 0x16
09a0 ; --------------------------------------------------------------------------------------
09a0 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
09a2 04ab 0001  |    |		.CONST	0x04ab,0x0001
09a4 ; --------------------------------------------------------------------------------------
09a4 ; Debug3 Subtable 0x17
09a4 ; --------------------------------------------------------------------------------------
09a4 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
09a6 ; --------------------------------------------------------------------------------------
09a6 ; Debug3 Subtable 0x18
09a6 ; --------------------------------------------------------------------------------------
09a6 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
09a8 04cb ffff  |    |		.CONST	0x04cb,0xffff
09aa 04cc 0001  |    |		.CONST	0x04cc,0x0001
09ac 04d5 0002  |    |		.CONST	0x04d5,0x0002
09ae 04dd 0003  |    |		.CONST	0x04dd,0x0003
09b0 04ea 0004  |    |		.CONST	0x04ea,0x0004
09b2 04ed 0005  |    |		.CONST	0x04ed,0x0005
09b4 ; --------------------------------------------------------------------------------------
09b4 ; Debug3 Subtable 0x19
09b4 ; --------------------------------------------------------------------------------------
09b4 0003 0007  |    |		.DBG3TAB	0x0003,0x0007
09b6 04f3 ffff  |    |		.CONST	0x04f3,0xffff
09b8 04f8 fffe  |    |		.CONST	0x04f8,0xfffe
09ba 04fb fffd  |    |		.CONST	0x04fb,0xfffd
09bc 0501 0001  |    |		.CONST	0x0501,0x0001
09be 0503 0002  |    |		.CONST	0x0503,0x0002
09c0 0507 0003  |    |		.CONST	0x0507,0x0003
09c2 050f 0004  |    |		.CONST	0x050f,0x0004
09c4 0514 0005  |    |		.CONST	0x0514,0x0005
09c6 051d 0006  |    |		.CONST	0x051d,0x0006
09c8 0524 0007  | $  |		.CONST	0x0524,0x0007
09ca ; --------------------------------------------------------------------------------------
09ca ; Debug3 Subtable 0x1a
09ca ; --------------------------------------------------------------------------------------
09ca 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
09cc 052b 0001  | +  |		.CONST	0x052b,0x0001
09ce 052d 0002  | -  |		.CONST	0x052d,0x0002
09d0 ; --------------------------------------------------------------------------------------
09d0 ; Debug3 Subtable 0x1b
09d0 ; --------------------------------------------------------------------------------------
09d0 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
09d2 0533 0001  | 3  |		.CONST	0x0533,0x0001
09d4 ; --------------------------------------------------------------------------------------
09d4 ; Debug3 Subtable 0x1c
09d4 ; --------------------------------------------------------------------------------------
09d4 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
09d6 053b ffff  | ;  |		.CONST	0x053b,0xffff
09d8 053c fffe  | <  |		.CONST	0x053c,0xfffe
09da 0547 0001  | G  |		.CONST	0x0547,0x0001
09dc 0552 0002  | R  |		.CONST	0x0552,0x0002
09de 0559 0003  | Y  |		.CONST	0x0559,0x0003
09e0 0562 0004  | b  |		.CONST	0x0562,0x0004
09e2 ; --------------------------------------------------------------------------------------
09e2 ; Debug3 Subtable 0x1d
09e2 ; --------------------------------------------------------------------------------------
09e2 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
09e4 057b 0001  | {  |		.CONST	0x057b,0x0001
09e6 057d 0002  | }  |		.CONST	0x057d,0x0002
09e8 ; --------------------------------------------------------------------------------------
09e8 ; Debug3 Subtable 0x1e
09e8 ; --------------------------------------------------------------------------------------
09e8 0009 0018  |    |		.DBG3TAB	0x0009,0x0018
09ea 0583 ffff  |    |		.CONST	0x0583,0xffff
09ec 0588 fffe  |    |		.CONST	0x0588,0xfffe
09ee 058e fffd  |    |		.CONST	0x058e,0xfffd
09f0 0594 fffc  |    |		.CONST	0x0594,0xfffc
09f2 0597 fffb  |    |		.CONST	0x0597,0xfffb
09f4 059a fffa  |    |		.CONST	0x059a,0xfffa
09f6 059d fff9  |    |		.CONST	0x059d,0xfff9
09f8 059e fff8  |    |		.CONST	0x059e,0xfff8
09fa 05a3 fff7  |    |		.CONST	0x05a3,0xfff7
09fc 05a5 0001  |    |		.CONST	0x05a5,0x0001
09fe 05aa 0002  |    |		.CONST	0x05aa,0x0002
0a00 05b9 0003  |    |		.CONST	0x05b9,0x0003
0a02 05bb 0004  |    |		.CONST	0x05bb,0x0004
0a04 05c1 0005  |    |		.CONST	0x05c1,0x0005
0a06 05cf 0006  |    |		.CONST	0x05cf,0x0006
0a08 05d1 0007  |    |		.CONST	0x05d1,0x0007
0a0a 05f1 0008  |    |		.CONST	0x05f1,0x0008
0a0c 05f3 0009  |    |		.CONST	0x05f3,0x0009
0a0e 05fe 000a  |    |		.CONST	0x05fe,0x000a
0a10 0600 000b  |    |		.CONST	0x0600,0x000b
0a12 0606 000c  |    |		.CONST	0x0606,0x000c
0a14 0619 000d  |    |		.CONST	0x0619,0x000d
0a16 061b 000e  |    |		.CONST	0x061b,0x000e
0a18 062a 000f  | *  |		.CONST	0x062a,0x000f
0a1a 062c 0010  | ,  |		.CONST	0x062c,0x0010
0a1c 0632 0011  | 2  |		.CONST	0x0632,0x0011
0a1e 0637 0012  | 7  |		.CONST	0x0637,0x0012
0a20 0645 0013  | E  |		.CONST	0x0645,0x0013
0a22 0647 0014  | G  |		.CONST	0x0647,0x0014
0a24 0667 0015  | g  |		.CONST	0x0667,0x0015
0a26 0669 0016  | i  |		.CONST	0x0669,0x0016
0a28 0674 0017  | t  |		.CONST	0x0674,0x0017
0a2a 067a 0018  | z  |		.CONST	0x067a,0x0018
0a2c 0000 0000  |    |		.BLANK	0000[0x1d4]