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

⟦e1c8642e0⟧

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

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 04c0       |    |		.CONST	0x04c0								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0003       |    |		.CONST	0x0003								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0079       | y  |		.CONST	0x0079								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0026       | &  |		.CONST	0x0026								; Number of locals
000b			INIT_0008:
000b 62b4       |b   |		Indirect_Literal	Discrete,0x2c0,{0x00000000, 0x58c11501}		; Debug Table 0x0 = .DEBUG	0x000b,0x057a,0x0000,0x0000,0x0058,0xc115,0x0000,0x0144
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0129       | )  |		Execute	Any,Make_Visible
000d 4803       |H   |		Short_Literal	0x3							; Debug Table 0x0.0x1 = 0xd,0xfffe
000e 032b       | +  |		Declare_Type	Record,Incomplete,Visible
000f 00c4       |    |		Action	Make_Default							; Debug Table 0x0.0x2 = 0xf,0xfffd
0010 00e4       |    |		Load_Encached	Positive_Cache						; Debug Table 0x0.0x3 = 0x10,0xfffc
0011 0266       | f  |		Execute	Discrete,Bounds
0012 00db       |    |		Load_Top	At_Offset_3
0013 02a0       |    |		Declare_Subprogram	Null_Subprogram
0014 4801       |H   |		Short_Literal	0x1
0015 0349       | I  |		Declare_Type	Array,Defined_Incomplete,Visible,Bounds_With_Object
0016 029a 0083  |    |		Declare_Subprogram	INIT_0080,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x16,0xfffb
0018 029a 008b  |    |		Declare_Subprogram	INIT_0088,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x18,0xfffa
001a 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x1a,0xfff9
001c 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x1c,0xfff8
001e 029a 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1e,0xfff7
0020 029a 013b  |   ;|		Declare_Subprogram	INIT_0138,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x20,0xfff6
0022 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x22,0xfff5
0024 029a 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x24,0xfff4
0026 0092 044b  |   K|		Action	Push_String_Extended,0x44b					; "##UNDEFINED##;"
													; Debug Table 0x0.0xc = 0x26,0xfff3
0028 0129       | )  |		Execute	Any,Make_Visible
0029 029a 017b  |   {|		Declare_Subprogram	INIT_0178,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x29,0xfff2
													; Debug Table 0x0.0xe = 0x29,0xfff1
002b 029a 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x2b,0xfff0
002d 4800       |H   |		Short_Literal	0x0							; Debug Table 0x0.0x10 = 0x2d,0xffef
002e 4803       |H   |		Short_Literal	0x3
002f 029f 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Call
0031 03fd       |    |		Declare_Type	Discrete,Defined
0032 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x11 = 0x32,0xffee
0033 00e2       |    |		Load_Encached	Integer_Cache
0034 00ec       |    |		Load_Encached	Diana_Tree_Cache
0035 02a0       |    |		Declare_Subprogram	Null_Subprogram
0036 e20e       |    |		Load	0x1,0xe
0037 0326       | &  |		Complete_Type	Record,By_Defining
0038 e210       |    |		Load	0x1,0x10
0039 0340       | @  |		Complete_Type	Array,By_Component_Completion
003a e20e       |    |		Load	0x1,0xe								; Debug Table 0x0.0x12 = 0x3a,0xffed
003b 0322       | "  |		Declare_Variable	Record
003c 4803       |H   |		Short_Literal	0x3
003d 00d9       |    |		Load_Top	At_Offset_1
003e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
003f 4800       |H   |		Short_Literal	0x0
0040 00d9       |    |		Load_Top	At_Offset_1
0041 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0042 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x0.0x13 = 0x42,0x401
0043 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x0.0x14 = 0x43,0xffed
0044 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0045 0129       | )  |		Execute	Any,Make_Visible
0046 c20f       |    |		Store	0x1,0xf
0047 00bf       |    |		Action	Accept_Activation
0048 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1 = .DEBUG	0x0048,0x05a6,0x0000,0x0000,0x0059,0x8b75,0x0000,0x0010
													; Debug Table 0x1.0x0 = 0x48,0xffff
													; Debug Table 0x1.0x1 = 0x48,0xfffe
0049 4800       |H   |		Short_Literal	0x0
004a e210       |    |		Load	0x1,0x10
004b 0334       | 4  |		Declare_Variable	Array,With_Constraint
004c 4801       |H   |		Short_Literal	0x1
004d 4800       |H   |		Short_Literal	0x0
004e e210       |    |		Load	0x1,0x10
004f 0334       | 4  |		Declare_Variable	Array,With_Constraint
0050 00d9       |    |		Load_Top	At_Offset_1
0051 01d4       |    |		Execute	Vector,Structure_Write
0052 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x1.0x2 = 0x52,0xfffd
0053 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x1.0x3 = 0x53,0x801
0054 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1					; Debug Table 0x1.0x4 = 0x54,0xfffd
0055 029d 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call			; Debug Table 0x1.0x5 = 0x55,0xfffc
													; Debug Table 0x1.0x6 = 0x55,0xfffb
													; Debug Table 0x1.0x7 = 0x55,0xfffa
0057 029d 01eb  |    |		Declare_Subprogram	INIT_01e8,For_Outer_Call			; Debug Table 0x1.0x8 = 0x57,0xfff9
0059 029d 0203  |    |		Declare_Subprogram	INIT_0200,For_Outer_Call			; Debug Table 0x1.0x9 = 0x59,0xfff8
005b 029d 02cb  |    |		Declare_Subprogram	INIT_02c8,For_Outer_Call			; Debug Table 0x1.0xa = 0x5b,0xfff7
005d 029d 02db  |    |		Declare_Subprogram	INIT_02d8,For_Outer_Call			; Debug Table 0x1.0xb = 0x5d,0xfff6
005f 029d 0313  |    |		Declare_Subprogram	INIT_0310,For_Outer_Call			; Debug Table 0x1.0xc = 0x5f,0xfff5
0061 029d 035b  |   [|		Declare_Subprogram	INIT_0358,For_Outer_Call			; Debug Table 0x1.0xd = 0x61,0xfff4
0063 029d 03cb  |    |		Declare_Subprogram	INIT_03c8,For_Outer_Call			; Debug Table 0x1.0xe = 0x63,0xfff3
0065 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0xf = 0x65,0xfff2
0066 00c7       |    |		Action	Elaborate_Subprogram
0067 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x10 = 0x67,0xfff1
0068 00c7       |    |		Action	Elaborate_Subprogram
0069 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x11 = 0x69,0xfff0
006a 00c7       |    |		Action	Elaborate_Subprogram
006b 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x12 = 0x6b,0xffef
006c 00c7       |    |		Action	Elaborate_Subprogram
006d 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x13 = 0x6d,0xffee
006e 00c7       |    |		Action	Elaborate_Subprogram
006f 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x14 = 0x6f,0xffed
0070 00c7       |    |		Action	Elaborate_Subprogram
0071 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x15 = 0x71,0xffec
0072 00c7       |    |		Action	Elaborate_Subprogram
0073 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x16 = 0x73,0xffeb
0074 00c7       |    |		Action	Elaborate_Subprogram
0075 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0x17 = 0x75,0xffea
0076 00c7       |    |		Action	Elaborate_Subprogram
0077 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x18 = 0x77,0xffe9
0078 00c7       |    |		Action	Elaborate_Subprogram
0079			BODY_0008:
0079 00bc       |    |		Action	Signal_Activated
007a 00bb       |    |		Action	Signal_Completion
007b 0000 0000  |    |		.BLANK	0000[0x5]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0083       |    |		.CONST	0x0083								; Address of begin
0081 0004       |    |		.CONST	0x0004								; Address of exception handler
0082 0001       |    |		.CONST	0x0001								; Number of locals
0083			BODY_0080:
0083			INIT_0080:
0083 e21d       |    |		Load	0x1,0x1d							; Debug Table 0x2 = .DEBUG	0x0083,0x05da,0x0002,0x0000,0x0058,0xc115,0x0000,0x0159
													; Debug Table 0x2.0x0 = 0x83,0x1
0084 00ca       |    |		Action	Exit_Nullary_Function
0085 0000 0000  |    |		.XXX[0x3]
0087 0000       |    |
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008c       |    |		.CONST	0x008c								; Address of begin
0089 00af       |    |		.CONST	0x00af								; Address of exception handler
008a 0002       |    |		.CONST	0x0002								; Number of locals
008b			INIT_0088:
008b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3 = .DEBUG	0x008b,0x05de,0x0002,0x0000,0x0058,0xc115,0x0000,0x015e
													; Debug Table 0x3.0x0 = 0x8b,0xffff
008c			BODY_0088:
008c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x1 = 0x8c,0x1
008d 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
008e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x2 = 0x8e,0x401
008f 021d       |    |		Execute	Heap_Access,Is_Null
0090 00d0       |    |		Action	Swap_Control
0091 00d1       |    |		Pop_Control	Pop_Count_1
0092 6802       |h   |		Jump_Zero	0x95							; Debug Table 0x3.0x3 = 0x92,0x1
0093 8211       |    |		Call	0x1,0x11							; Debug Table 0x3.0x4 = 0x93,0x2
0094 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0095 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x5 = 0x95,0x3
0096 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0097 490c       |I   |		Short_Literal	0x10c
0098 00eb       |    |		Load_Encached	Diana_Cache
0099 0096       |    |		Execute	Package,Entry
009a 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
009b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0x6 = 0x9b,0x4
													; Debug Table 0x3.0x7 = 0x9b,0x801
009c 021d       |    |		Execute	Heap_Access,Is_Null
009d 680a       |h   |		Jump_Zero	0xa8							; Debug Table 0x3.0x8 = 0x9d,0x4
009e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0x9 = 0x9e,0x5
009f 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
00a0 e5ff       |    |		Load	0x2,-0x1
00a1 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
00a2 e5ff       |    |		Load	0x2,-0x1
00a3 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
00a4 00eb       |    |		Load_Encached	Diana_Cache
00a5 18d9       |    |		Execute	Package,Field_Execute,Field_Number 0xd9
00a6 8225       | %  |		Call	0x1,0x25
00a7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00a8 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3.0xa = 0xa8,0x6
00a9 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
00aa e5ff       |    |		Load	0x2,-0x1
00ab 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
00ac 00da       |    |		Load_Top	At_Offset_2
00ad 8224       | $  |		Call	0x1,0x24
00ae 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00af			TRAP_0088:
00af e20d       |    |		Load	0x1,0xd
00b0 010f       |    |		Execute	Exception,Equal
00b1 6802       |h   |		Jump_Zero	0xb4
00b2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x3.0xb = 0xb2,0x7
00b3 0101       |    |		Execute	Exception,Reraise
00b4 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0xc = 0xb4,0x8
00b5 e001       |    |		Load	0x0,0x1
00b6 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00b7 0092 044c  |   L|		Action	Push_String_Extended,0x44c					; "Get (1)"
00b9 8220       |    |		Call	0x1,0x20
00ba 8211       |    |		Call	0x1,0x11							; Debug Table 0x3.0xd = 0xba,0x9
00bb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00bc 0000 0000  |    |		.BLANK	0000[0x4]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c4       |    |		.CONST	0x00c4								; Address of begin
00c1 00d8       |    |		.CONST	0x00d8								; Address of exception handler
00c2 0002       |    |		.CONST	0x0002								; Number of locals
00c3			INIT_00c0:
00c3 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4 = .DEBUG	0x00c3,0x05fc,0x0002,0x0000,0x0058,0xc115,0x0000,0x0167
													; Debug Table 0x4.0x0 = 0xc3,0xffff
00c4			BODY_00c0:
00c4 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4.0x1 = 0xc4,0x1
00c5 490c       |I   |		Short_Literal	0x10c
00c6 00eb       |    |		Load_Encached	Diana_Cache
00c7 0096       |    |		Execute	Package,Entry
00c8 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
00c9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x2 = 0xc9,0x2
													; Debug Table 0x4.0x3 = 0xc9,0x401
00ca 021d       |    |		Execute	Heap_Access,Is_Null
00cb 6807       |h   |		Jump_Zero	0xd3							; Debug Table 0x4.0x4 = 0xcb,0x2
00cc 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x5 = 0xcc,0x3
00cd 4800       |H   |		Short_Literal	0x0
00ce e5ff       |    |		Load	0x2,-0x1
00cf 00eb       |    |		Load_Encached	Diana_Cache
00d0 18d9       |    |		Execute	Package,Field_Execute,Field_Number 0xd9
00d1 8225       | %  |		Call	0x1,0x25
00d2 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d3 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x6 = 0xd3,0x4
00d4 4800       |H   |		Short_Literal	0x0
00d5 00da       |    |		Load_Top	At_Offset_2
00d6 8224       | $  |		Call	0x1,0x24
00d7 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00d8			TRAP_00c0:
00d8 e20d       |    |		Load	0x1,0xd
00d9 010f       |    |		Execute	Exception,Equal
00da 6802       |h   |		Jump_Zero	0xdd
00db 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x4.0x7 = 0xdb,0x5
00dc 0101       |    |		Execute	Exception,Reraise
00dd 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x8 = 0xdd,0x6
00de e001       |    |		Load	0x0,0x1
00df 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00e0 0092 044d  |   M|		Action	Push_String_Extended,0x44d					; "Get (2)"
00e2 8220       |    |		Call	0x1,0x20
00e3 8211       |    |		Call	0x1,0x11							; Debug Table 0x4.0x9 = 0xe3,0x7
00e4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00e5 0000 0000  |    |		.XXX[0x3]
00e7 0000       |    |
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00ed       |    |		.CONST	0x00ed								; Address of begin
00e9 011b       |    |		.CONST	0x011b								; Address of exception handler
00ea 0003       |    |		.CONST	0x0003								; Number of locals
00eb			INIT_00e8:
00eb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x5 = .DEBUG	0x00eb,0x0612,0x0002,0x0000,0x0058,0xc115,0x0000,0x0172
													; Debug Table 0x5.0x0 = 0xeb,0xffff
00ec 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x5.0x1 = 0xec,0xfffe
00ed			BODY_00e8:
00ed e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x2 = 0xed,0x1
00ee 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
00ef 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x3 = 0xef,0x401
00f0 021d       |    |		Execute	Heap_Access,Is_Null
00f1 00d0       |    |		Action	Swap_Control
00f2 00d1       |    |		Pop_Control	Pop_Count_1
00f3 680b       |h   |		Jump_Zero	0xff							; Debug Table 0x5.0x4 = 0xf3,0x1
00f4 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x5 = 0xf4,0x2
00f5 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00f6 e002       |    |		Load	0x0,0x2
00f7 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00f8 e002       |    |		Load	0x0,0x2
00f9 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
00fa 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
00fb e003       |    |		Load	0x0,0x3
00fc 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00fd 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
00fe 781a       |x   |		Jump	0x119
00ff 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x5.0x6 = 0xff,0x3
0100 e5ff       |    |		Load	0x2,-0x1
0101 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0102 e004       |    |		Load	0x0,0x4
0103 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0104 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0105 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x7 = 0x105,0x4
0106 3c05       |<   |		Execute	Record,Field_Read,Field_Number 0x5
0107 6811       |h   |		Jump_Zero	0x119
0108 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x5.0x8 = 0x108,0x5
0109 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
010a e004       |    |		Load	0x0,0x4
010b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
010c 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
010d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0x9 = 0x10d,0x6
010e 680a       |h   |		Jump_Zero	0x119
010f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x5.0xa = 0x10f,0x7
0110 00e4       |    |		Load_Encached	Positive_Cache
0111 025b       | [  |		Execute	Discrete,Check_In_Type
0112 e5ff       |    |		Load	0x2,-0x1
0113 3c04       |<   |		Execute	Record,Field_Read,Field_Number 0x4
0114 00db       |    |		Load_Top	At_Offset_3
0115 e002       |    |		Load	0x0,0x2
0116 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
0117 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0118 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0119 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x5.0xb = 0x119,0x8
011a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
011b			TRAP_00e8:
011b 0007       |    |		Action	Break_Optional
011c 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0xc = 0x11c,0x9
011d e001       |    |		Load	0x0,0x1
011e 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
011f 0092 044e  |   N|		Action	Push_String_Extended,0x44e					; "Get_Call"
0121 8220       |    |		Call	0x1,0x20
0122 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x5.0xd = 0x122,0xa
													; Debug Table 0x5.0xe = 0x122,0x801
0123 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1				; Debug Table 0x5.0xf = 0x123,0xa
0124 0000 0000  |    |		.BLANK	0000[0x4]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b       | +  |		.CONST	0x012b								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0001       |    |		.CONST	0x0001								; Number of locals
012b			BODY_0128:
012b			INIT_0128:
012b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x012b,0x0634,0x0002,0x0000,0x0058,0xc115,0x0000,0x017d
													; Debug Table 0x6.0x0 = 0x12b,0x1
012c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
012d 0f02       |    |		Execute_Immediate	Equal,0x2
012e 6807       |h   |		Jump_Zero	0x136
012f 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6.0x1 = 0x12f,0x2
0130 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0131 00eb       |    |		Load_Encached	Diana_Cache
0132 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0133 00eb       |    |		Load_Encached	Diana_Cache
0134 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0135 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0136 e20d       |    |		Load	0x1,0xd								; Debug Table 0x6.0x2 = 0x136,0x3
0137 0257       | W  |		Execute	Discrete,Raise
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b       | ;  |		.CONST	0x013b								; Address of begin
0139 0004       |    |		.CONST	0x0004								; Address of exception handler
013a 0001       |    |		.CONST	0x0001								; Number of locals
013b			BODY_0138:
013b			INIT_0138:
013b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7 = .DEBUG	0x013b,0x063c,0x0002,0x0000,0x0058,0xc115,0x0000,0x0186
													; Debug Table 0x7.0x0 = 0x13b,0x1
013c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
013d 4603       |F   |		Jump_Case	0x4
013e 7803       |x   |		Jump	0x142								; case 0x0
013f 7802       |x   |		Jump	0x142								; case 0x1
0140 7804       |x   |		Jump	0x145								; case 0x2
0141 7803       |x   |		Jump	0x145								; case 0x3
0142 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x1 = 0x142,0x2
0143 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0144 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0145 e20d       |    |		Load	0x1,0xd								; Debug Table 0x7.0x2 = 0x145,0x3
0146 0257       | W  |		Execute	Discrete,Raise
0147 0000       |    |		.XXX[0x1]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b       | K  |		.CONST	0x014b								; Address of begin
0149 0154       | T  |		.CONST	0x0154								; Address of exception handler
014a 0001       |    |		.CONST	0x0001								; Number of locals
014b			BODY_0148:
014b			INIT_0148:
014b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x014b,0x0644,0x0002,0x0000,0x0058,0xc115,0x0000,0x018f
													; Debug Table 0x8.0x0 = 0x14b,0x1
014c 8216       |    |		Call	0x1,0x16
014d 00d8       |    |		Load_Top	At_Offset_0
014e 00e1       |    |		Load_Encached	Boolean_Cache
014f 0260       | `  |		Execute	Discrete,In_Type
0150 7002       |p   |		Jump_Nonzero	0x153
0151 48e0       |H   |		Short_Literal	0xe0
0152 0257       | W  |		Execute	Discrete,Raise
0153 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0154			TRAP_0148:
0154 010e       |    |		Execute	Exception,Is_Constraint_Error
0155 6802       |h   |		Jump_Zero	0x158
0156 e20d       |    |		Load	0x1,0xd								; Debug Table 0x8.0x1 = 0x156,0x2
0157 0257       | W  |		Execute	Discrete,Raise
0158 0100       |    |		Execute	Exception,Raise
0159 0000 0000  |    |		.BLANK	0000[0x7]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163       | c  |		.CONST	0x0163								; Address of begin
0161 016c       | l  |		.CONST	0x016c								; Address of exception handler
0162 0001       |    |		.CONST	0x0001								; Number of locals
0163			BODY_0160:
0163			INIT_0160:
0163 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9 = .DEBUG	0x0163,0x064a,0x0002,0x0000,0x0058,0xc115,0x0000,0x0198
													; Debug Table 0x9.0x0 = 0x163,0x1
0164 8216       |    |		Call	0x1,0x16
0165 00d8       |    |		Load_Top	At_Offset_0
0166 00e8       |    |		Load_Encached	Character_Cache
0167 0260       | `  |		Execute	Discrete,In_Type
0168 7002       |p   |		Jump_Nonzero	0x16b
0169 48e0       |H   |		Short_Literal	0xe0
016a 0257       | W  |		Execute	Discrete,Raise
016b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
016c			TRAP_0160:
016c 010e       |    |		Execute	Exception,Is_Constraint_Error
016d 6802       |h   |		Jump_Zero	0x170
016e e20d       |    |		Load	0x1,0xd								; Debug Table 0x9.0x1 = 0x16e,0x2
016f 0257       | W  |		Execute	Discrete,Raise
0170 0100       |    |		Execute	Exception,Raise
0171 0000 0000  |    |		.BLANK	0000[0x7]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017d       | }  |		.CONST	0x017d								; Address of begin
0179 0191       |    |		.CONST	0x0191								; Address of exception handler
017a 0002       |    |		.CONST	0x0002								; Number of locals
017b			INIT_0178:
017b e20e       |    |		Load	0x1,0xe								; Debug Table 0xa = .DEBUG	0x017b,0x0650,0x0002,0x0000,0x0058,0xc115,0x0000,0x01af
													; Debug Table 0xa.0x0 = 0x17b,0xffff
017c 0322       | "  |		Declare_Variable	Record
017d			BODY_0178:
017d e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xa.0x1 = 0x17d,0x1
017e e5ff       |    |		Load	0x2,-0x1
017f 01dc       |    |		Execute	Vector,Last
0180 027d       | }  |		Execute	Discrete,Greater
0181 6802       |h   |		Jump_Zero	0x184
0182 e219       |    |		Load	0x1,0x19							; Debug Table 0xa.0x2 = 0x182,0x2
0183 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0184 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x3 = 0x184,0x3
0185 e5fe       |    |		Load	0x2,-0x2
0186 e5ff       |    |		Load	0x2,-0x1
0187 8226       | &  |		Call	0x1,0x26
0188 00d9       |    |		Load_Top	At_Offset_1
0189 017d       | }  |		Execute	Record,Structure_Write
018a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0x4 = 0x18a,0x4
018b 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
018c 00eb       |    |		Load_Encached	Diana_Cache
018d 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
018e 00eb       |    |		Load_Encached	Diana_Cache
018f 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0190 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0191			TRAP_0178:
0191 e20d       |    |		Load	0x1,0xd
0192 010f       |    |		Execute	Exception,Equal
0193 6802       |h   |		Jump_Zero	0x196
0194 e219       |    |		Load	0x1,0x19							; Debug Table 0xa.0x5 = 0x194,0x5
0195 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0196 0100       |    |		Execute	Exception,Raise
0197 0000       |    |		.XXX[0x1]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019d       |    |		.CONST	0x019d								; Address of begin
0199 01ad       |    |		.CONST	0x01ad								; Address of exception handler
019a 0002       |    |		.CONST	0x0002								; Number of locals
019b			INIT_0198:
019b e20e       |    |		Load	0x1,0xe								; Debug Table 0xb = .DEBUG	0x019b,0x065e,0x0002,0x0000,0x0058,0xc115,0x0000,0x01bc
													; Debug Table 0xb.0x0 = 0x19b,0xffff
019c 0322       | "  |		Declare_Variable	Record
019d			BODY_0198:
019d e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x1 = 0x19d,0x1
019e e5ff       |    |		Load	0x2,-0x1
019f 01dc       |    |		Execute	Vector,Last
01a0 027d       | }  |		Execute	Discrete,Greater
01a1 6802       |h   |		Jump_Zero	0x1a4
01a2 6119       |a   |		Indirect_Literal	Discrete,0x2bc,{0xffffffff, 0x80000001}		; Debug Table 0xb.0x2 = 0x1a2,0x2
01a3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01a4 4800       |H   |		Short_Literal	0x0							; Debug Table 0xb.0x3 = 0x1a4,0x3
01a5 e5fe       |    |		Load	0x2,-0x2
01a6 e5ff       |    |		Load	0x2,-0x1
01a7 8226       | &  |		Call	0x1,0x26
01a8 00d9       |    |		Load_Top	At_Offset_1
01a9 017d       | }  |		Execute	Record,Structure_Write
01aa 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x4 = 0x1aa,0x4
01ab 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01ac 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01ad			TRAP_0198:
01ad e20d       |    |		Load	0x1,0xd
01ae 010f       |    |		Execute	Exception,Equal
01af 6802       |h   |		Jump_Zero	0x1b2
01b0 610b       |a   |		Indirect_Literal	Discrete,0x2bc,{0xffffffff, 0x80000001}		; Debug Table 0xb.0x5 = 0x1b0,0x5
01b1 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
01b2 0100       |    |		Execute	Exception,Raise
01b3 0000 0000  |    |		.BLANK	0000[0x5]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb       |    |		.CONST	0x01bb								; Address of begin
01b9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ba 0001       |    |		.CONST	0x0001								; Number of locals
01bb			BODY_01b8:
01bb			INIT_01b8:
01bb 4603       |F   |		Jump_Case	0x4							; Debug Table 0xc = .DEBUG	0x01bb,0x066c,0x0005,0x0000,0x0058,0xc115,0x0000,0x01ca
01bc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x0
01bd 7802       |x   |		Jump	0x1c0								; case 0x1
01be 7805       |x   |		Jump	0x1c4								; case 0x2
01bf 7809       |x   |		Jump	0x1c9								; case 0x3
01c0 00da       |    |		Load_Top	At_Offset_2
01c1 0091 0447  |   G|		Action	Push_String_Extended_Indexed,0x447				; "ENUMERATED"
01c3 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01c4 00db       |    |		Load_Top	At_Offset_3
01c5 00db       |    |		Load_Top	At_Offset_3
01c6 00e0       |    |		Load_Encached	Standard_Cache
01c7 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01c8 4202       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x2
01c9 00da       |    |		Load_Top	At_Offset_2
01ca 00e0       |    |		Load_Encached	Standard_Cache
01cb 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01cc 4201       |B   |		Exit_Subprogram	From_Utility,With_Result,New_Top_Offset 0x1
01cd 0000 0000  |    |		.XXX[0x3]
01cf 0000       |    |
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3       |    |		.CONST	0x01d3								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0001       |    |		.CONST	0x0001								; Number of locals
01d3			BODY_01d0:
01d3			INIT_01d0:
01d3 e005       |    |		Load	0x0,0x5								; Debug Table 0xd = .DEBUG	0x01d3,0x066e,0x0001,0x0000,0x0059,0x8b75,0x0000,0x0035
													; Debug Table 0xd.0x0 = 0x1d3,0x1
01d4 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01d5 0092 044f  |   O|		Action	Push_String_Extended,0x44f					; "*** Bad status from Directory."
													; Debug Table 0xd.0x1 = 0x1d5,0x2
01d7 00db       |    |		Load_Top	At_Offset_3
01d8 01cc       |    |		Execute	Vector,Catenate
01d9 e5fe       |    |		Load	0x2,-0x2
01da e006       |    |		Load	0x0,0x6
01db 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01dc 025e       | ^  |		Execute	Discrete,Convert
01dd 1c01       |    |		Execute_Immediate	Run_Utility,0x1
01de 01cc       |    |		Execute	Vector,Catenate
01df e005       |    |		Load	0x0,0x5
01e0 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01e1 60d6       |`   |		Indirect_Literal	Discrete,0x2b8,{0x00000000, 0x598b7502}		; Debug Table 0xd.0x2 = 0x1e1,0x3
01e2 0257       | W  |		Execute	Discrete,Raise
01e3 0000 0000  |    |		.BLANK	0000[0x5]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb       |    |		.CONST	0x01eb								; Address of begin
01e9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ea 0001       |    |		.CONST	0x0001								; Number of locals
01eb			BODY_01e8:
01eb			INIT_01e8:
01eb e005       |    |		Load	0x0,0x5								; Debug Table 0xe = .DEBUG	0x01eb,0x0676,0x0001,0x0000,0x0059,0x8b75,0x0000,0x0062
													; Debug Table 0xe.0x0 = 0x1eb,0x1
01ec 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01ed 0092 0450  |   P|		Action	Push_String_Extended,0x450					; "*** Exception in Command.Parameters."
													; Debug Table 0xe.0x1 = 0x1ed,0x2
01ef 00db       |    |		Load_Top	At_Offset_3
01f0 01cc       |    |		Execute	Vector,Catenate
01f1 0092 0451  |   Q|		Action	Push_String_Extended,0x451					; ": "
01f3 01cc       |    |		Execute	Vector,Catenate
01f4 e5fe       |    |		Load	0x2,-0x2
01f5 01cc       |    |		Execute	Vector,Catenate
01f6 e005       |    |		Load	0x0,0x5
01f7 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01f8 60bb       |`   |		Indirect_Literal	Discrete,0x2b4,{0x00000000, 0x598b7501}		; Debug Table 0xe.0x2 = 0x1f8,0x3
01f9 0257       | W  |		Execute	Discrete,Raise
01fa 0000 0000  |    |		.BLANK	0000[0x6]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0207       |    |		.CONST	0x0207								; Address of begin
0201 029f       |    |		.CONST	0x029f								; Address of exception handler
0202 0003       |    |		.CONST	0x0003								; Number of locals
0203			INIT_0200:
0203 029f 03fb  |    |		Declare_Subprogram	INIT_03f8,For_Call				; Debug Table 0xf = .DEBUG	0x0203,0x067e,0x0002,0x0000,0x0059,0x8b75,0x0000,0x0090
													; Debug Table 0xf.0x0 = 0x203,0xffff
0205 029f 042b  |   +|		Declare_Subprogram	INIT_0428,For_Call
0207			BODY_0200:
0207 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf.0x1 = 0x207,0x1
													; Debug Table 0xf.0x2 = 0x207,0x401
0208 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xf.0x3 = 0x208,0x402
0209 0b12       |    |		Execute_Immediate	Case_Compare,0x12				; Debug Table 0xf.0x4 = 0x209,0x403
													; Debug Table 0xf.0x5 = 0x209,0x404
													; Debug Table 0xf.0x6 = 0x209,0x1
020a 7010       |p   |		Jump_Nonzero	0x21b
020b 0b17       |    |		Execute_Immediate	Case_Compare,0x17
020c 7013       |p   |		Jump_Nonzero	0x220
020d 0b16       |    |		Execute_Immediate	Case_Compare,0x16
020e 7014       |p   |		Jump_Nonzero	0x223
020f 0b08       |    |		Execute_Immediate	Case_Compare,0x8
0210 7047       |pG  |		Jump_Nonzero	0x258
0211 0b0b       |    |		Execute_Immediate	Case_Compare,0xb
0212 7047       |pG  |		Jump_Nonzero	0x25a
0213 0b0c       |    |		Execute_Immediate	Case_Compare,0xc
0214 7051       |pQ  |		Jump_Nonzero	0x266
0215 0b10       |    |		Execute_Immediate	Case_Compare,0x10
0216 7066       |pf  |		Jump_Nonzero	0x27d
0217 0ba9       |    |		Execute_Immediate	Case_Compare,0xa9
0218 707e       |p~  |		Jump_Nonzero	0x297
0219 e20d       |    |		Load	0x1,0xd								; Debug Table 0xf.0x7 = 0x219,0xa
021a 0257       | W  |		Execute	Discrete,Raise
021b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf.0x8 = 0x21b,0x2
021c 00eb       |    |		Load_Encached	Diana_Cache
021d 18c0       |    |		Execute	Package,Field_Execute,Field_Number 0xc0
021e 8221       | !  |		Call	0x1,0x21
021f 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0220 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf.0x9 = 0x220,0x3
0221 8402       |    |		Call	0x2,0x2
0222 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0223 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0xf.0xa = 0x223,0x4
0224 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xf.0xb = 0x224,0xf7ff
0225 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf.0xc = 0x225,0x801
0226 00eb       |    |		Load_Encached	Diana_Cache
0227 18fa       |    |		Execute	Package,Field_Execute,Field_Number 0xfa
0228 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0229 e406       |    |		Load	0x2,0x6								; Debug Table 0xf.0xd = 0x229,0x802
													; Debug Table 0xf.0xe = 0x229,0xc01
022a 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0xf.0xf = 0x22a,0xc02
022b 0b1d       |    |		Execute_Immediate	Case_Compare,0x1d				; Debug Table 0xf.0x10 = 0x22b,0xc03
													; Debug Table 0xf.0x11 = 0x22b,0xc04
													; Debug Table 0xf.0x12 = 0x22b,0x802
022c 7006       |p   |		Jump_Nonzero	0x233
022d 0b31       | 1  |		Execute_Immediate	Case_Compare,0x31
022e 700a       |p   |		Jump_Nonzero	0x239
022f 0b00       |    |		Execute_Immediate	Case_Compare,0x0
0230 7024       |p$  |		Jump_Nonzero	0x255
0231 e20d       |    |		Load	0x1,0xd								; Debug Table 0xf.0x13 = 0x231,0x806
0232 0257       | W  |		Execute	Discrete,Raise
0233 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xf.0x14 = 0x233,0x803
0234 4901       |I   |		Short_Literal	0x101
0235 00eb       |    |		Load_Encached	Diana_Cache
0236 0096       |    |		Execute	Package,Entry
0237 8221       | !  |		Call	0x1,0x21
0238 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0239 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0xf.0x15 = 0x239,0x804
023a 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xf.0x16 = 0x23a,0xefff
023b 00db       |    |		Load_Top	At_Offset_3
023c 00eb       |    |		Load_Encached	Diana_Cache
023d 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
023e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
023f 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xf.0x17 = 0x23f,0xeffe
0240 00d9       |    |		Load_Top	At_Offset_1
0241 00eb       |    |		Load_Encached	Diana_Cache
0242 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
0243 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0244 e20e       |    |		Load	0x1,0xe								; Debug Table 0xf.0x18 = 0x244,0x1001
0245 0322       | "  |		Declare_Variable	Record
0246 4800       |H   |		Short_Literal	0x0
0247 00d9       |    |		Load_Top	At_Offset_1
0248 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0249 00d9       |    |		Load_Top	At_Offset_1
024a e406       |    |		Load	0x2,0x6
024b 4975       |Iu  |		Short_Literal	0x175
024c 00eb       |    |		Load_Encached	Diana_Cache
024d 0098       |    |		Execute	Package,Field_Read_Dynamic
024e 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
024f 00d9       |    |		Load_Top	At_Offset_1
0250 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0251 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xf.0x19 = 0x251,0x1401
0252 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xf.0x1a = 0x252,0x1001
0253 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0254 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0255 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf.0x1b = 0x255,0x805
0256 8402       |    |		Call	0x2,0x2
0257 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0258 8403       |    |		Call	0x2,0x3								; Debug Table 0xf.0x1c = 0x258,0x5
0259 7842       |xB  |		Jump	0x29c
025a e20e       |    |		Load	0x1,0xe								; Debug Table 0xf.0x1d = 0x25a,0x6
025b 0322       | "  |		Declare_Variable	Record
025c 4802       |H   |		Short_Literal	0x2
025d 00d9       |    |		Load_Top	At_Offset_1
025e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
025f 4800       |H   |		Short_Literal	0x0
0260 00d9       |    |		Load_Top	At_Offset_1
0261 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0262 e5ff       |    |		Load	0x2,-0x1
0263 00d9       |    |		Load_Top	At_Offset_1
0264 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0265 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0266 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0xf.0x1e = 0x266,0x7
0267 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf.0x1f = 0x267,0xe7ff
0268 00eb       |    |		Load_Encached	Diana_Cache
0269 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
026a 00eb       |    |		Load_Encached	Diana_Cache
026b 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
026c e20e       |    |		Load	0x1,0xe								; Debug Table 0xf.0x20 = 0x26c,0x1801
026d 0322       | "  |		Declare_Variable	Record
026e 4800       |H   |		Short_Literal	0x0
026f 00d9       |    |		Load_Top	At_Offset_1
0270 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0271 00d9       |    |		Load_Top	At_Offset_1
0272 01dd       |    |		Execute	Vector,First
0273 0a01       |    |		Execute_Immediate	Plus,0x1
0274 0248       | H  |		Execute	Discrete,Check_In_Integer
0275 00da       |    |		Load_Top	At_Offset_2
0276 01d7       |    |		Execute	Vector,Field_Read
0277 00d9       |    |		Load_Top	At_Offset_1
0278 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0279 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xf.0x21 = 0x279,0x1c01
027a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xf.0x22 = 0x27a,0x1801
027b 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
027c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
027d 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0xf.0x23 = 0x27d,0x8
027e 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0xf.0x24 = 0x27e,0xdfff
027f 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xf.0x25 = 0x27f,0xdffe
0280 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xf.0x26 = 0x280,0x2001
0281 00e2       |    |		Load_Encached	Integer_Cache
0282 e5ff       |    |		Load	0x2,-0x1
0283 e004       |    |		Load	0x0,0x4
0284 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0285 005b       | [  |		Store_Top	Discrete,At_Offset_3
0286 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0287 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x27 = 0x287,0x2002
0288 680c       |h   |		Jump_Zero	0x295
0289 e20e       |    |		Load	0x1,0xe								; Debug Table 0xf.0x28 = 0x289,0x2003
028a 0322       | "  |		Declare_Variable	Record
028b 4801       |H   |		Short_Literal	0x1
028c 00d9       |    |		Load_Top	At_Offset_1
028d 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
028e 00da       |    |		Load_Top	At_Offset_2
028f 00d9       |    |		Load_Top	At_Offset_1
0290 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0291 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xf.0x29 = 0x291,0x2401
0292 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xf.0x2a = 0x292,0x2003
0293 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0294 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0295 e20d       |    |		Load	0x1,0xd								; Debug Table 0xf.0x2b = 0x295,0x2004
0296 0257       | W  |		Execute	Discrete,Raise
0297 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xf.0x2c = 0x297,0x9
0298 00eb       |    |		Load_Encached	Diana_Cache
0299 18b2       |    |		Execute	Package,Field_Execute,Field_Number 0xb2
029a 8221       | !  |		Call	0x1,0x21
029b 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
029c 00d1       |    |		Pop_Control	Pop_Count_1
029d 4831       |H1  |		Short_Literal	0x31
029e 0257       | W  |		Execute	Discrete,Raise
029f			TRAP_0200:
029f e20d       |    |		Load	0x1,0xd
02a0 010f       |    |		Execute	Exception,Equal
02a1 6802       |h   |		Jump_Zero	0x2a4
02a2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x2d = 0x2a2,0xb
02a3 0101       |    |		Execute	Exception,Reraise
02a4 600f       |`   |		Indirect_Literal	Discrete,0x2b4,{0x00000000, 0x598b7501}
02a5 010f       |    |		Execute	Exception,Equal
02a6 6802       |h   |		Jump_Zero	0x2a9
02a7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x2e = 0x2a7,0xc
02a8 0101       |    |		Execute	Exception,Reraise
02a9 4801       |H   |		Short_Literal	0x1							; Debug Table 0xf.0x2f = 0x2a9,0xd
02aa e001       |    |		Load	0x0,0x1
02ab 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
02ac 0092 0452  |   R|		Action	Push_String_Extended,0x452					; "Parameter_Of"
02ae 8220       |    |		Call	0x1,0x20
02af 4831       |H1  |		Short_Literal	0x31
02b0 0257       | W  |		Execute	Discrete,Raise
02b1 0000 0000  |    |		.XXX[0x3]
02b3 0000       |    |
02b4 0000 0000  |    |		.LITERAL	{0x00000000, 0x598b7501}
02b8 0000 0000  |    |		.LITERAL	{0x00000000, 0x598b7502}
02bc ffff ffff  |    |		.LITERAL	{0xffffffff, 0x80000001}
02c0 0000 0000  |    |		.LITERAL	{0x00000000, 0x58c11501}
02c4 0000 0000  |    |		.BLANK	0000[0x4]
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb       |    |		.CONST	0x02cb								; Address of begin
02c9 0004       |    |		.CONST	0x0004								; Address of exception handler
02ca 0001       |    |		.CONST	0x0001								; Number of locals
02cb			BODY_02c8:
02cb			INIT_02c8:
02cb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x10 = .DEBUG	0x02cb,0x06e0,0x0002,0x0000,0x0059,0x8b75,0x0000,0x0286
													; Debug Table 0x10.0x0 = 0x2cb,0x1
02cc 0d00       |    |		Execute_Immediate	Less,0x0
02cd 6802       |h   |		Jump_Zero	0x2d0
02ce 4fff       |O   |		Short_Literal	-0x1							; Debug Table 0x10.0x1 = 0x2ce,0x2
02cf 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d0 4801       |H   |		Short_Literal	0x1							; Debug Table 0x10.0x2 = 0x2d0,0x3
02d1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02d2 0000 0000  |    |		.BLANK	0000[0x6]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db       |    |		.CONST	0x02db								; Address of begin
02d9 02f9       |    |		.CONST	0x02f9								; Address of exception handler
02da 0001       |    |		.CONST	0x0001								; Number of locals
02db			BODY_02d8:
02db			INIT_02d8:
02db 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11 = .DEBUG	0x02db,0x06e8,0x0001,0x0000,0x0059,0x8b75,0x0000,0x02a4
													; Debug Table 0x11.0x0 = 0x2db,0x1
02dc 681b       |h   |		Jump_Zero	0x2f8
02dd 00cf       |    |		Action	Mark_Auxiliary
02de e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x11.0x1 = 0x2de,0x2
02df 01d9       |    |		Execute	Vector,Reverse_Bounds
02e0 0263       | c  |		Execute	Discrete,Above_Bound
02e1 7015       |p   |		Jump_Nonzero	0x2f7
02e2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x2 = 0x2e2,0x3
02e3 e5fd       |    |		Load	0x2,-0x3
02e4 01d5       |    |		Execute	Vector,Field_Reference
02e5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02e6 0f01       |    |		Execute_Immediate	Equal,0x1
02e7 680d       |h   |		Jump_Zero	0x2f5
02e8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x3 = 0x2e8,0x4
02e9 e5fd       |    |		Load	0x2,-0x3
02ea 01d5       |    |		Execute	Vector,Field_Reference
02eb 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02ec 8222       | "  |		Call	0x1,0x22
02ed e5ff       |    |		Load	0x2,-0x1
02ee 0271       | q  |		Execute	Discrete,Times
02ef 00d9       |    |		Load_Top	At_Offset_1
02f0 e5fd       |    |		Load	0x2,-0x3
02f1 01d5       |    |		Execute	Vector,Field_Reference
02f2 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
02f3 00d2       |    |		Pop_Control	Pop_Count_2						; Debug Table 0x11.0x4 = 0x2f3,0x5
02f4 7802       |x   |		Jump	0x2f7
02f5 00c8       |    |		Action	Pop_Auxiliary_Range
02f6 3feb       |?   |		Loop_Increasing	0x2e2
02f7 00ce       |    |		Action	Pop_Auxiliary
02f8 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02f9			TRAP_02d8:
02f9 e20d       |    |		Load	0x1,0xd
02fa 010f       |    |		Execute	Exception,Equal
02fb 6802       |h   |		Jump_Zero	0x2fe
02fc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x5 = 0x2fc,0x6
02fd 0101       |    |		Execute	Exception,Reraise
02fe 67b5       |g   |		Indirect_Literal	Discrete,0x2b4,{0x00000000, 0x598b7501}
02ff 010f       |    |		Execute	Exception,Equal
0300 6802       |h   |		Jump_Zero	0x303
0301 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x6 = 0x301,0x7
0302 0101       |    |		Execute	Exception,Reraise
0303 4801       |H   |		Short_Literal	0x1							; Debug Table 0x11.0x7 = 0x303,0x8
0304 e001       |    |		Load	0x0,0x1
0305 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0306 0092 0453  |   S|		Action	Push_String_Extended,0x453					; "Adjust_Argument"
0308 8220       |    |		Call	0x1,0x20
0309 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
030a 0000 0000  |    |		.BLANK	0000[0x6]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0320       |    |		.CONST	0x0320								; Address of begin
0311 0345       | E  |		.CONST	0x0345								; Address of exception handler
0312 0003       |    |		.CONST	0x0003								; Number of locals
0313			INIT_0310:
0313 00ef       |    |		Load_Encached	Diana_Sequence_Cache					; Debug Table 0x12 = .DEBUG	0x0313,0x06fa,0x0002,0x0000,0x0059,0x8b75,0x0000,0x02fe
													; Debug Table 0x12.0x0 = 0x313,0xffff
0314 00db       |    |		Load_Top	At_Offset_3
0315 00eb       |    |		Load_Encached	Diana_Cache
0316 18ed       |    |		Execute	Package,Field_Execute,Field_Number 0xed
0317 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0318 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12.0x1 = 0x318,0xfffe
0319 00d9       |    |		Load_Top	At_Offset_1
031a 4975       |Iu  |		Short_Literal	0x175
031b 00eb       |    |		Load_Encached	Diana_Cache
031c 0098       |    |		Execute	Package,Field_Read_Dynamic
031d 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
031e e210       |    |		Load	0x1,0x10
031f 0334       | 4  |		Declare_Variable	Array,With_Constraint
0320			BODY_0310:
0320 00cf       |    |		Action	Mark_Auxiliary
0321 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x12.0x2 = 0x321,0x1
0322 01d9       |    |		Execute	Vector,Reverse_Bounds
0323 0263       | c  |		Execute	Discrete,Above_Bound
0324 7018       |p   |		Jump_Nonzero	0x33d
0325 e402       |    |		Load	0x2,0x2								; Debug Table 0x12.0x3 = 0x325,0x2
0326 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x4 = 0x326,0x401
0327 0217       |    |		Execute	Heap_Access,All_Reference
0328 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0329 00d9       |    |		Load_Top	At_Offset_1
032a e409       |    |		Load	0x2,0x9								; Debug Table 0x12.0x5 = 0x32a,0x801
032b 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x12.0x6 = 0x32b,0x802
032c 00d0       |    |		Action	Swap_Control							; Debug Table 0x12.0x7 = 0x32c,0x803
													; Debug Table 0x12.0x8 = 0x32c,0x804
032d 00d1       |    |		Pop_Control	Pop_Count_1
032e 49af       |I   |		Short_Literal	0x1af							; Debug Table 0x12.0x9 = 0x32e,0x401
032f 00eb       |    |		Load_Encached	Diana_Cache
0330 0096       |    |		Execute	Package,Entry
0331 00d0       |    |		Action	Swap_Control
0332 00d1       |    |		Pop_Control	Pop_Count_1
0333 8221       | !  |		Call	0x1,0x21							; Debug Table 0x12.0xa = 0x333,0x2
0334 00d9       |    |		Load_Top	At_Offset_1
0335 e403       |    |		Load	0x2,0x3
0336 01d6       |    |		Execute	Vector,Field_Write
0337 e402       |    |		Load	0x2,0x2								; Debug Table 0x12.0xb = 0x337,0x3
													; Debug Table 0x12.0xc = 0x337,0xc01
0338 0217       |    |		Execute	Heap_Access,All_Reference
0339 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
033a a402       |    |		Store_Unchecked	0x2,0x2							; Debug Table 0x12.0xd = 0x33a,0x3
033b 00c8       |    |		Action	Pop_Auxiliary_Range
033c 3fe8       |?   |		Loop_Increasing	0x325
033d 00ce       |    |		Action	Pop_Auxiliary
033e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0xe = 0x33e,0x4
033f e5fd       |    |		Load	0x2,-0x3
0340 e5fe       |    |		Load	0x2,-0x2
0341 8223       | #  |		Call	0x1,0x23
0342 00d1       |    |		Pop_Control	Pop_Count_1
0343 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0xf = 0x343,0x5
0344 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
0345			TRAP_0310:
0345 e20d       |    |		Load	0x1,0xd
0346 010f       |    |		Execute	Exception,Equal
0347 6802       |h   |		Jump_Zero	0x34a
0348 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x10 = 0x348,0x6
0349 0101       |    |		Execute	Exception,Reraise
034a 6769       |gi  |		Indirect_Literal	Discrete,0x2b4,{0x00000000, 0x598b7501}
034b 010f       |    |		Execute	Exception,Equal
034c 6802       |h   |		Jump_Zero	0x34f
034d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x11 = 0x34d,0x7
034e 0101       |    |		Execute	Exception,Reraise
034f 4801       |H   |		Short_Literal	0x1							; Debug Table 0x12.0x12 = 0x34f,0x8
0350 e001       |    |		Load	0x0,0x1
0351 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0352 0092 0454  |   T|		Action	Push_String_Extended,0x454					; "List_From_Normalized"
0354 8220       |    |		Call	0x1,0x20
0355 4831       |H1  |		Short_Literal	0x31
0356 0257       | W  |		Execute	Discrete,Raise
0357 0000       |    |		.XXX[0x1]
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 0368       | h  |		.CONST	0x0368								; Address of begin
0359 03b0       |    |		.CONST	0x03b0								; Address of exception handler
035a 0003       |    |		.CONST	0x0003								; Number of locals
035b			INIT_0358:
035b 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x13 = .DEBUG	0x035b,0x0722,0x0002,0x0000,0x0059,0x8b75,0x0000,0x036a
													; Debug Table 0x13.0x0 = 0x35b,0xffff
035c 00db       |    |		Load_Top	At_Offset_3
035d 00eb       |    |		Load_Encached	Diana_Cache
035e 1889       |    |		Execute	Package,Field_Execute,Field_Number 0x89
035f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0360 4801       |H   |		Short_Literal	0x1							; Debug Table 0x13.0x1 = 0x360,0xfffe
0361 00d9       |    |		Load_Top	At_Offset_1
0362 4975       |Iu  |		Short_Literal	0x175
0363 00eb       |    |		Load_Encached	Diana_Cache
0364 0098       |    |		Execute	Package,Field_Read_Dynamic
0365 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0366 e210       |    |		Load	0x1,0x10
0367 0334       | 4  |		Declare_Variable	Array,With_Constraint
0368			BODY_0358:
0368 00cf       |    |		Action	Mark_Auxiliary
0369 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x13.0x2 = 0x369,0x1
036a 01d9       |    |		Execute	Vector,Reverse_Bounds
036b 0263       | c  |		Execute	Discrete,Above_Bound
036c 703b       |p;  |		Jump_Nonzero	0x3a8
036d e402       |    |		Load	0x2,0x2								; Debug Table 0x13.0x3 = 0x36d,0x2
036e 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x4 = 0x36e,0x401
036f 7002       |p   |		Jump_Nonzero	0x372
0370 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x13.0x5 = 0x370,0x402
0371 7826       |x&  |		Jump	0x398
0372 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x6 = 0x372,0x403
0373 0217       |    |		Execute	Heap_Access,All_Reference
0374 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0375 6804       |h   |		Jump_Zero	0x37a
0376 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x7 = 0x376,0x404
0377 0217       |    |		Execute	Heap_Access,All_Reference
0378 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0379 781e       |x   |		Jump	0x398
037a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x8 = 0x37a,0x405
037b e408       |    |		Load	0x2,0x8								; Debug Table 0x13.0x9 = 0x37b,0x801
037c 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0x13.0xa = 0x37c,0x802
037d 00d0       |    |		Action	Swap_Control							; Debug Table 0x13.0xb = 0x37d,0x803
													; Debug Table 0x13.0xc = 0x37d,0x804
037e 00d1       |    |		Pop_Control	Pop_Count_1
037f 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0x13.0xd = 0x37f,0x405
0380 00eb       |    |		Load_Encached	Diana_Cache
0381 0098       |    |		Execute	Package,Field_Read_Dynamic
0382 012c       | ,  |		Execute	Any,Size
0383 e007       |    |		Load	0x0,0x7
0384 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0385 025b       | [  |		Execute	Discrete,Check_In_Type
0386 0273       | s  |		Execute	Discrete,Plus
0387 00d9       |    |		Load_Top	At_Offset_1
0388 e409       |    |		Load	0x2,0x9								; Debug Table 0x13.0xe = 0x388,0xc01
0389 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0x13.0xf = 0x389,0xc02
038a 00d0       |    |		Action	Swap_Control							; Debug Table 0x13.0x10 = 0x38a,0xc03
													; Debug Table 0x13.0x11 = 0x38a,0xc04
038b 00d1       |    |		Pop_Control	Pop_Count_1
038c 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0x13.0x12 = 0x38c,0x804
038d 00eb       |    |		Load_Encached	Diana_Cache
038e 0098       |    |		Execute	Package,Field_Read_Dynamic
038f 49c9       |I   |		Short_Literal	0x1c9
0390 00eb       |    |		Load_Encached	Diana_Cache
0391 0098       |    |		Execute	Package,Field_Read_Dynamic
0392 49ca       |I   |		Short_Literal	0x1ca
0393 00eb       |    |		Load_Encached	Diana_Cache
0394 0095       |    |		Execute	Package,Field_Reference_Dynamic
0395 e008       |    |		Load	0x0,0x8
0396 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0397 7800       |x   |		Jump	0x398
0398 00d0       |    |		Action	Swap_Control
0399 00d1       |    |		Pop_Control	Pop_Count_1
039a 8221       | !  |		Call	0x1,0x21							; Debug Table 0x13.0x13 = 0x39a,0x2
039b 00d9       |    |		Load_Top	At_Offset_1
039c e403       |    |		Load	0x2,0x3
039d 01d6       |    |		Execute	Vector,Field_Write
039e e402       |    |		Load	0x2,0x2								; Debug Table 0x13.0x14 = 0x39e,0x3
													; Debug Table 0x13.0x15 = 0x39e,0x1001
039f 7002       |p   |		Jump_Nonzero	0x3a2
03a0 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x13.0x16 = 0x3a0,0x1002
03a1 7803       |x   |		Jump	0x3a5
03a2 e402       |    |		Load	0x2,0x2								; Debug Table 0x13.0x17 = 0x3a2,0x1003
03a3 0217       |    |		Execute	Heap_Access,All_Reference
03a4 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
03a5 a402       |    |		Store_Unchecked	0x2,0x2							; Debug Table 0x13.0x18 = 0x3a5,0x3
03a6 00c8       |    |		Action	Pop_Auxiliary_Range
03a7 3fc5       |?   |		Loop_Increasing	0x36d
03a8 00ce       |    |		Action	Pop_Auxiliary
03a9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x19 = 0x3a9,0x4
03aa e5fd       |    |		Load	0x2,-0x3
03ab e5fe       |    |		Load	0x2,-0x2
03ac 8223       | #  |		Call	0x1,0x23
03ad 00d1       |    |		Pop_Control	Pop_Count_1
03ae 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x1a = 0x3ae,0x5
03af 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
03b0			TRAP_0358:
03b0 e20d       |    |		Load	0x1,0xd
03b1 010f       |    |		Execute	Exception,Equal
03b2 6802       |h   |		Jump_Zero	0x3b5
03b3 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x1b = 0x3b3,0x6
03b4 0101       |    |		Execute	Exception,Reraise
03b5 66fe       |f   |		Indirect_Literal	Discrete,0x2b4,{0x00000000, 0x598b7501}
03b6 010f       |    |		Execute	Exception,Equal
03b7 6802       |h   |		Jump_Zero	0x3ba
03b8 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x1c = 0x3b8,0x7
03b9 0101       |    |		Execute	Exception,Reraise
03ba 4801       |H   |		Short_Literal	0x1							; Debug Table 0x13.0x1d = 0x3ba,0x8
03bb e001       |    |		Load	0x0,0x1
03bc 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
03bd 0092 0455  |   U|		Action	Push_String_Extended,0x455					; "List_From_Call"
03bf 8220       |    |		Call	0x1,0x20
03c0 4831       |H1  |		Short_Literal	0x31
03c1 0257       | W  |		Execute	Discrete,Raise
03c2 0000 0000  |    |		.BLANK	0000[0x6]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03ce       |    |		.CONST	0x03ce								; Address of begin
03c9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ca 0004       |    |		.CONST	0x0004								; Number of locals
03cb			INIT_03c8:
03cb 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x14 = .DEBUG	0x03cb,0x0760,0x0002,0x0000,0x0059,0x8b75,0x0000,0x03d6
													; Debug Table 0x14.0x0 = 0x3cb,0xffff
03cc 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x14.0x1 = 0x3cc,0xfffe
03cd 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x14.0x2 = 0x3cd,0xfffd
03ce			BODY_03c8:
03ce 4800       |H   |		Short_Literal	0x0							; Debug Table 0x14.0x3 = 0x3ce,0x1
03cf 0053       | S  |		Store_Top_Uncheched	Discrete,At_Offset_3
03d0 4800       |H   |		Short_Literal	0x0							; Debug Table 0x14.0x4 = 0x3d0,0x2
03d1 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
03d2 00cf       |    |		Action	Mark_Auxiliary
03d3 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x14.0x5 = 0x3d3,0x3
03d4 01d9       |    |		Execute	Vector,Reverse_Bounds
03d5 0263       | c  |		Execute	Discrete,Above_Bound
03d6 7017       |p   |		Jump_Nonzero	0x3ee
03d7 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x14.0x6 = 0x3d7,0x4
03d8 00d9       |    |		Load_Top	At_Offset_1
03d9 e5ff       |    |		Load	0x2,-0x1
03da 01d5       |    |		Execute	Vector,Field_Reference
03db 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
03dc 0f02       |    |		Execute_Immediate	Equal,0x2
03dd 027f       |    |		Execute	Discrete,Equal
03de 680d       |h   |		Jump_Zero	0x3ec
03df e402       |    |		Load	0x2,0x2								; Debug Table 0x14.0x7 = 0x3df,0x5
03e0 0a01       |    |		Execute_Immediate	Plus,0x1
03e1 c402       |    |		Store	0x2,0x2
03e2 e402       |    |		Load	0x2,0x2								; Debug Table 0x14.0x8 = 0x3e2,0x6
03e3 e5fe       |    |		Load	0x2,-0x2
03e4 027f       |    |		Execute	Discrete,Equal
03e5 6806       |h   |		Jump_Zero	0x3ec
03e6 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x9 = 0x3e6,0x7
03e7 a403       |    |		Store_Unchecked	0x2,0x3
03e8 4801       |H   |		Short_Literal	0x1							; Debug Table 0x14.0xa = 0x3e8,0x8
03e9 a404       |    |		Store_Unchecked	0x2,0x4
03ea 00d2       |    |		Pop_Control	Pop_Count_2						; Debug Table 0x14.0xb = 0x3ea,0x9
03eb 7802       |x   |		Jump	0x3ee
03ec 00c8       |    |		Action	Pop_Auxiliary_Range
03ed 3fe9       |?   |		Loop_Increasing	0x3d7
03ee 00ce       |    |		Action	Pop_Auxiliary
03ef 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0xc = 0x3ef,0xa
03f0 6804       |h   |		Jump_Zero	0x3f5
03f1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x14.0xd = 0x3f1,0xb
03f2 e5ff       |    |		Load	0x2,-0x1
03f3 01d5       |    |		Execute	Vector,Field_Reference
03f4 4403       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x3
03f5 e20d       |    |		Load	0x1,0xd								; Debug Table 0x14.0xe = 0x3f5,0xc
03f6 0257       | W  |		Execute	Discrete,Raise
03f7 0000       |    |		.XXX[0x1]
03f8 ; --------------------------------------------------------------------------------------
03f8 ; SUBPROGRAM
03f8 ; --------------------------------------------------------------------------------------
03f8 0400       |    |		.CONST	0x0400								; Address of begin
03f9 0004       |    |		.CONST	0x0004								; Address of exception handler
03fa 0002       |    |		.CONST	0x0002								; Number of locals
03fb			INIT_03f8:
03fb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x15 = .DEBUG	0x03fb,0x0780,0x0002,0x0000,0x0059,0x8b75,0x0000,0x009a
													; Debug Table 0x15.0x0 = 0x3fb,0xffff
03fc 00eb       |    |		Load_Encached	Diana_Cache
03fd 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
03fe 00eb       |    |		Load_Encached	Diana_Cache
03ff 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0400			BODY_03f8:
0400 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x1 = 0x400,0x1
0401 0092 0456  |   V|		Action	Push_String_Extended,0x456					; "TRUE"
0403 01df       |    |		Execute	Vector,Equal
0404 680c       |h   |		Jump_Zero	0x411
0405 e20e       |    |		Load	0x1,0xe								; Debug Table 0x15.0x2 = 0x405,0x2
0406 0322       | "  |		Declare_Variable	Record
0407 4800       |H   |		Short_Literal	0x0
0408 00d9       |    |		Load_Top	At_Offset_1
0409 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
040a 4801       |H   |		Short_Literal	0x1
040b 00d9       |    |		Load_Top	At_Offset_1
040c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
040d 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x15.0x3 = 0x40d,0x401
040e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x15.0x4 = 0x40e,0x2
040f 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0410 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0411 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x5 = 0x411,0x3
0412 0092 0457  |   W|		Action	Push_String_Extended,0x457					; "FALSE"
0414 01df       |    |		Execute	Vector,Equal
0415 680c       |h   |		Jump_Zero	0x422
0416 e20e       |    |		Load	0x1,0xe								; Debug Table 0x15.0x6 = 0x416,0x4
0417 0322       | "  |		Declare_Variable	Record
0418 4800       |H   |		Short_Literal	0x0
0419 00d9       |    |		Load_Top	At_Offset_1
041a 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
041b 4800       |H   |		Short_Literal	0x0
041c 00d9       |    |		Load_Top	At_Offset_1
041d 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
041e 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x15.0x7 = 0x41e,0x801
041f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x15.0x8 = 0x41f,0x4
0420 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0421 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0422 e20d       |    |		Load	0x1,0xd								; Debug Table 0x15.0x9 = 0x422,0x5
0423 0257       | W  |		Execute	Discrete,Raise
0424 0000 0000  |    |		.BLANK	0000[0x4]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042c       | ,  |		.CONST	0x042c								; Address of begin
0429 0442       | B  |		.CONST	0x0442								; Address of exception handler
042a 0002       |    |		.CONST	0x0002								; Number of locals
042b			INIT_0428:
042b 00e2       |    |		Load_Encached	Integer_Cache						; Debug Table 0x16 = .DEBUG	0x042b,0x0796,0x0004,0x0000,0x0059,0x8b75,0x0000,0x01cd
													; Debug Table 0x16.0x0 = 0x42b,0xffff
042c			BODY_0428:
042c e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x16.0x1 = 0x42c,0x1
042d 00eb       |    |		Load_Encached	Diana_Cache
042e 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
042f 00eb       |    |		Load_Encached	Diana_Cache
0430 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
0431 00e2       |    |		Load_Encached	Integer_Cache
0432 00e0       |    |		Load_Encached	Standard_Cache
0433 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0434 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0435 e20e       |    |		Load	0x1,0xe								; Debug Table 0x16.0x2 = 0x435,0x2
0436 0322       | "  |		Declare_Variable	Record
0437 4801       |H   |		Short_Literal	0x1
0438 00d9       |    |		Load_Top	At_Offset_1
0439 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
043a 00d9       |    |		Load_Top	At_Offset_1
043b 00d9       |    |		Load_Top	At_Offset_1
043c 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
043d 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x16.0x3 = 0x43d,0x401
043e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x16.0x4 = 0x43e,0x2
043f 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0440 00cb       |    |		Action	Pop_Block_With_Result
0441 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0442			TRAP_0428:
0442 010e       |    |		Execute	Exception,Is_Constraint_Error
0443 6802       |h   |		Jump_Zero	0x446
0444 e20d       |    |		Load	0x1,0xd								; Debug Table 0x16.0x5 = 0x444,0x3
0445 0257       | W  |		Execute	Discrete,Raise
0446 0100       |    |		Execute	Exception,Raise
0447 ; --------------------------------------------------------------------------------------
0447 ; STRING TABLE
0447 ; --------------------------------------------------------------------------------------
0447 0024       | $  |		.STRTAB	0x0024->0x0459							; "ENUMERATED"
0448 002c       | ,  |		.STRTAB	0x002c->0x045e							; "NUMERIC"
0449 0031       | 1  |		.STRTAB	0x0031->0x0461							; "TEXT"
044a 0033       | 3  |		.STRTAB	0x0033->0x0463							; "UNKNOWN"
044b 0038       | 8  |		.STRTAB	0x0038->0x0467							; "##UNDEFINED##;"
044c 0044       | D  |		.STRTAB	0x0044->0x046e							; "Get (1)"
044d 0049       | I  |		.STRTAB	0x0049->0x0471							; "Get (2)"
044e 004e       | N  |		.STRTAB	0x004e->0x0475							; "Get_Call"
044f 0054       | T  |		.STRTAB	0x0054->0x0479							; "*** Bad status from Directory."
0450 0070       | p  |		.STRTAB	0x0070->0x0488							; "*** Exception in Command.Parameters."
0451 0092       |    |		.STRTAB	0x0092->0x049a							; ": "
0452 0092       |    |		.STRTAB	0x0092->0x049b							; "Parameter_Of"
0453 009c       |    |		.STRTAB	0x009c->0x04a1							; "Adjust_Argument"
0454 00a9       |    |		.STRTAB	0x00a9->0x04a8							; "List_From_Normalized"
0455 00bb       |    |		.STRTAB	0x00bb->0x04b2							; "List_From_Call"
0456 00c7       |    |		.STRTAB	0x00c7->0x04b9							; "TRUE"
0457 00c9       |    |		.STRTAB	0x00c9->0x04bb							; "FALSE"
0458 00cc       |    |		.STREND 0x00cc->0x04be
0459 454e 554d  |ENUM|		.STRTAB_STRINGS
04be 0000 0000  |    |		.XXX[0x2]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; Debug Table
04c0 ; --------------------------------------------------------------------------------------
04c0 0003 0017  |    |		.CONST	0x0003,0x0017
04c2 000b 057a  |   z|		.DEBUG	0x000b,0x057a,0x0000,0x0000,0x0058,0xc115,0x0000,0x0144
04ca 0048 05a6  | H  |		.DEBUG	0x0048,0x05a6,0x0000,0x0000,0x0059,0x8b75,0x0000,0x0010
04d2 0083 05da  |    |		.DEBUG	0x0083,0x05da,0x0002,0x0000,0x0058,0xc115,0x0000,0x0159
04da 008b 05de  |    |		.DEBUG	0x008b,0x05de,0x0002,0x0000,0x0058,0xc115,0x0000,0x015e
04e2 00c3 05fc  |    |		.DEBUG	0x00c3,0x05fc,0x0002,0x0000,0x0058,0xc115,0x0000,0x0167
04ea 00eb 0612  |    |		.DEBUG	0x00eb,0x0612,0x0002,0x0000,0x0058,0xc115,0x0000,0x0172
04f2 012b 0634  | + 4|		.DEBUG	0x012b,0x0634,0x0002,0x0000,0x0058,0xc115,0x0000,0x017d
04fa 013b 063c  | ; <|		.DEBUG	0x013b,0x063c,0x0002,0x0000,0x0058,0xc115,0x0000,0x0186
0502 014b 0644  | K D|		.DEBUG	0x014b,0x0644,0x0002,0x0000,0x0058,0xc115,0x0000,0x018f
050a 0163 064a  | c J|		.DEBUG	0x0163,0x064a,0x0002,0x0000,0x0058,0xc115,0x0000,0x0198
0512 017b 0650  | { P|		.DEBUG	0x017b,0x0650,0x0002,0x0000,0x0058,0xc115,0x0000,0x01af
051a 019b 065e  |   ^|		.DEBUG	0x019b,0x065e,0x0002,0x0000,0x0058,0xc115,0x0000,0x01bc
0522 01bb 066c  |   l|		.DEBUG	0x01bb,0x066c,0x0005,0x0000,0x0058,0xc115,0x0000,0x01ca
052a 01d3 066e  |   n|		.DEBUG	0x01d3,0x066e,0x0001,0x0000,0x0059,0x8b75,0x0000,0x0035
0532 01eb 0676  |   v|		.DEBUG	0x01eb,0x0676,0x0001,0x0000,0x0059,0x8b75,0x0000,0x0062
053a 0203 067e  |   ~|		.DEBUG	0x0203,0x067e,0x0002,0x0000,0x0059,0x8b75,0x0000,0x0090
0542 02cb 06e0  |    |		.DEBUG	0x02cb,0x06e0,0x0002,0x0000,0x0059,0x8b75,0x0000,0x0286
054a 02db 06e8  |    |		.DEBUG	0x02db,0x06e8,0x0001,0x0000,0x0059,0x8b75,0x0000,0x02a4
0552 0313 06fa  |    |		.DEBUG	0x0313,0x06fa,0x0002,0x0000,0x0059,0x8b75,0x0000,0x02fe
055a 035b 0722  | [ "|		.DEBUG	0x035b,0x0722,0x0002,0x0000,0x0059,0x8b75,0x0000,0x036a
0562 03cb 0760  |   `|		.DEBUG	0x03cb,0x0760,0x0002,0x0000,0x0059,0x8b75,0x0000,0x03d6
056a 03fb 0780  |    |		.DEBUG	0x03fb,0x0780,0x0002,0x0000,0x0059,0x8b75,0x0000,0x009a
0572 042b 0796  | +  |		.DEBUG	0x042b,0x0796,0x0004,0x0000,0x0059,0x8b75,0x0000,0x01cd
057a ; --------------------------------------------------------------------------------------
057a ; Debug3 Subtable 0x0
057a ; --------------------------------------------------------------------------------------
057a 0014 0001  |    |		.DBG3TAB	0x0014,0x0001
057c 000b ffff  |    |		.CONST	0x000b,0xffff
057e 000d fffe  |    |		.CONST	0x000d,0xfffe
0580 000f fffd  |    |		.CONST	0x000f,0xfffd
0582 0010 fffc  |    |		.CONST	0x0010,0xfffc
0584 0016 fffb  |    |		.CONST	0x0016,0xfffb
0586 0018 fffa  |    |		.CONST	0x0018,0xfffa
0588 001a fff9  |    |		.CONST	0x001a,0xfff9
058a 001c fff8  |    |		.CONST	0x001c,0xfff8
058c 001e fff7  |    |		.CONST	0x001e,0xfff7
058e 0020 fff6  |    |		.CONST	0x0020,0xfff6
0590 0022 fff5  | "  |		.CONST	0x0022,0xfff5
0592 0024 fff4  | $  |		.CONST	0x0024,0xfff4
0594 0026 fff3  | &  |		.CONST	0x0026,0xfff3
0596 0029 fff2  | )  |		.CONST	0x0029,0xfff2
0598 0029 fff1  | )  |		.CONST	0x0029,0xfff1
059a 002b fff0  | +  |		.CONST	0x002b,0xfff0
059c 002d ffef  | -  |		.CONST	0x002d,0xffef
059e 0032 ffee  | 2  |		.CONST	0x0032,0xffee
05a0 003a ffed  | :  |		.CONST	0x003a,0xffed
05a2 0042 0401  | B  |		.CONST	0x0042,0x0401
05a4 0043 ffed  | C  |		.CONST	0x0043,0xffed
05a6 ; --------------------------------------------------------------------------------------
05a6 ; Debug3 Subtable 0x1
05a6 ; --------------------------------------------------------------------------------------
05a6 0018 0001  |    |		.DBG3TAB	0x0018,0x0001
05a8 0048 ffff  | H  |		.CONST	0x0048,0xffff
05aa 0048 fffe  | H  |		.CONST	0x0048,0xfffe
05ac 0052 fffd  | R  |		.CONST	0x0052,0xfffd
05ae 0053 0801  | S  |		.CONST	0x0053,0x0801
05b0 0054 fffd  | T  |		.CONST	0x0054,0xfffd
05b2 0055 fffc  | U  |		.CONST	0x0055,0xfffc
05b4 0055 fffb  | U  |		.CONST	0x0055,0xfffb
05b6 0055 fffa  | U  |		.CONST	0x0055,0xfffa
05b8 0057 fff9  | W  |		.CONST	0x0057,0xfff9
05ba 0059 fff8  | Y  |		.CONST	0x0059,0xfff8
05bc 005b fff7  | [  |		.CONST	0x005b,0xfff7
05be 005d fff6  | ]  |		.CONST	0x005d,0xfff6
05c0 005f fff5  | _  |		.CONST	0x005f,0xfff5
05c2 0061 fff4  | a  |		.CONST	0x0061,0xfff4
05c4 0063 fff3  | c  |		.CONST	0x0063,0xfff3
05c6 0065 fff2  | e  |		.CONST	0x0065,0xfff2
05c8 0067 fff1  | g  |		.CONST	0x0067,0xfff1
05ca 0069 fff0  | i  |		.CONST	0x0069,0xfff0
05cc 006b ffef  | k  |		.CONST	0x006b,0xffef
05ce 006d ffee  | m  |		.CONST	0x006d,0xffee
05d0 006f ffed  | o  |		.CONST	0x006f,0xffed
05d2 0071 ffec  | q  |		.CONST	0x0071,0xffec
05d4 0073 ffeb  | s  |		.CONST	0x0073,0xffeb
05d6 0075 ffea  | u  |		.CONST	0x0075,0xffea
05d8 0077 ffe9  | w  |		.CONST	0x0077,0xffe9
05da ; --------------------------------------------------------------------------------------
05da ; Debug3 Subtable 0x2
05da ; --------------------------------------------------------------------------------------
05da 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
05dc 0083 0001  |    |		.CONST	0x0083,0x0001
05de ; --------------------------------------------------------------------------------------
05de ; Debug3 Subtable 0x3
05de ; --------------------------------------------------------------------------------------
05de 0001 000d  |    |		.DBG3TAB	0x0001,0x000d
05e0 008b ffff  |    |		.CONST	0x008b,0xffff
05e2 008c 0001  |    |		.CONST	0x008c,0x0001
05e4 008e 0401  |    |		.CONST	0x008e,0x0401
05e6 0092 0001  |    |		.CONST	0x0092,0x0001
05e8 0093 0002  |    |		.CONST	0x0093,0x0002
05ea 0095 0003  |    |		.CONST	0x0095,0x0003
05ec 009b 0004  |    |		.CONST	0x009b,0x0004
05ee 009b 0801  |    |		.CONST	0x009b,0x0801
05f0 009d 0004  |    |		.CONST	0x009d,0x0004
05f2 009e 0005  |    |		.CONST	0x009e,0x0005
05f4 00a8 0006  |    |		.CONST	0x00a8,0x0006
05f6 00b2 0007  |    |		.CONST	0x00b2,0x0007
05f8 00b4 0008  |    |		.CONST	0x00b4,0x0008
05fa 00ba 0009  |    |		.CONST	0x00ba,0x0009
05fc ; --------------------------------------------------------------------------------------
05fc ; Debug3 Subtable 0x4
05fc ; --------------------------------------------------------------------------------------
05fc 0001 0009  |    |		.DBG3TAB	0x0001,0x0009
05fe 00c3 ffff  |    |		.CONST	0x00c3,0xffff
0600 00c4 0001  |    |		.CONST	0x00c4,0x0001
0602 00c9 0002  |    |		.CONST	0x00c9,0x0002
0604 00c9 0401  |    |		.CONST	0x00c9,0x0401
0606 00cb 0002  |    |		.CONST	0x00cb,0x0002
0608 00cc 0003  |    |		.CONST	0x00cc,0x0003
060a 00d3 0004  |    |		.CONST	0x00d3,0x0004
060c 00db 0005  |    |		.CONST	0x00db,0x0005
060e 00dd 0006  |    |		.CONST	0x00dd,0x0006
0610 00e3 0007  |    |		.CONST	0x00e3,0x0007
0612 ; --------------------------------------------------------------------------------------
0612 ; Debug3 Subtable 0x5
0612 ; --------------------------------------------------------------------------------------
0612 0002 000e  |    |		.DBG3TAB	0x0002,0x000e
0614 00eb ffff  |    |		.CONST	0x00eb,0xffff
0616 00ec fffe  |    |		.CONST	0x00ec,0xfffe
0618 00ed 0001  |    |		.CONST	0x00ed,0x0001
061a 00ef 0401  |    |		.CONST	0x00ef,0x0401
061c 00f3 0001  |    |		.CONST	0x00f3,0x0001
061e 00f4 0002  |    |		.CONST	0x00f4,0x0002
0620 00ff 0003  |    |		.CONST	0x00ff,0x0003
0622 0105 0004  |    |		.CONST	0x0105,0x0004
0624 0108 0005  |    |		.CONST	0x0108,0x0005
0626 010d 0006  |    |		.CONST	0x010d,0x0006
0628 010f 0007  |    |		.CONST	0x010f,0x0007
062a 0119 0008  |    |		.CONST	0x0119,0x0008
062c 011c 0009  |    |		.CONST	0x011c,0x0009
062e 0122 000a  | "  |		.CONST	0x0122,0x000a
0630 0122 0801  | "  |		.CONST	0x0122,0x0801
0632 0123 000a  | #  |		.CONST	0x0123,0x000a
0634 ; --------------------------------------------------------------------------------------
0634 ; Debug3 Subtable 0x6
0634 ; --------------------------------------------------------------------------------------
0634 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0636 012b 0001  | +  |		.CONST	0x012b,0x0001
0638 012f 0002  | /  |		.CONST	0x012f,0x0002
063a 0136 0003  | 6  |		.CONST	0x0136,0x0003
063c ; --------------------------------------------------------------------------------------
063c ; Debug3 Subtable 0x7
063c ; --------------------------------------------------------------------------------------
063c 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
063e 013b 0001  | ;  |		.CONST	0x013b,0x0001
0640 0142 0002  | B  |		.CONST	0x0142,0x0002
0642 0145 0003  | E  |		.CONST	0x0145,0x0003
0644 ; --------------------------------------------------------------------------------------
0644 ; Debug3 Subtable 0x8
0644 ; --------------------------------------------------------------------------------------
0644 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0646 014b 0001  | K  |		.CONST	0x014b,0x0001
0648 0156 0002  | V  |		.CONST	0x0156,0x0002
064a ; --------------------------------------------------------------------------------------
064a ; Debug3 Subtable 0x9
064a ; --------------------------------------------------------------------------------------
064a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
064c 0163 0001  | c  |		.CONST	0x0163,0x0001
064e 016e 0002  | n  |		.CONST	0x016e,0x0002
0650 ; --------------------------------------------------------------------------------------
0650 ; Debug3 Subtable 0xa
0650 ; --------------------------------------------------------------------------------------
0650 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
0652 017b ffff  | {  |		.CONST	0x017b,0xffff
0654 017d 0001  | }  |		.CONST	0x017d,0x0001
0656 0182 0002  |    |		.CONST	0x0182,0x0002
0658 0184 0003  |    |		.CONST	0x0184,0x0003
065a 018a 0004  |    |		.CONST	0x018a,0x0004
065c 0194 0005  |    |		.CONST	0x0194,0x0005
065e ; --------------------------------------------------------------------------------------
065e ; Debug3 Subtable 0xb
065e ; --------------------------------------------------------------------------------------
065e 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
0660 019b ffff  |    |		.CONST	0x019b,0xffff
0662 019d 0001  |    |		.CONST	0x019d,0x0001
0664 01a2 0002  |    |		.CONST	0x01a2,0x0002
0666 01a4 0003  |    |		.CONST	0x01a4,0x0003
0668 01aa 0004  |    |		.CONST	0x01aa,0x0004
066a 01b0 0005  |    |		.CONST	0x01b0,0x0005
066c ; --------------------------------------------------------------------------------------
066c ; Debug3 Subtable 0xc
066c ; --------------------------------------------------------------------------------------
066c 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
066e ; --------------------------------------------------------------------------------------
066e ; Debug3 Subtable 0xd
066e ; --------------------------------------------------------------------------------------
066e 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0670 01d3 0001  |    |		.CONST	0x01d3,0x0001
0672 01d5 0002  |    |		.CONST	0x01d5,0x0002
0674 01e1 0003  |    |		.CONST	0x01e1,0x0003
0676 ; --------------------------------------------------------------------------------------
0676 ; Debug3 Subtable 0xe
0676 ; --------------------------------------------------------------------------------------
0676 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
0678 01eb 0001  |    |		.CONST	0x01eb,0x0001
067a 01ed 0002  |    |		.CONST	0x01ed,0x0002
067c 01f8 0003  |    |		.CONST	0x01f8,0x0003
067e ; --------------------------------------------------------------------------------------
067e ; Debug3 Subtable 0xf
067e ; --------------------------------------------------------------------------------------
067e 0007 0029  |   )|		.DBG3TAB	0x0007,0x0029
0680 0203 ffff  |    |		.CONST	0x0203,0xffff
0682 0207 0001  |    |		.CONST	0x0207,0x0001
0684 0207 0401  |    |		.CONST	0x0207,0x0401
0686 0208 0402  |    |		.CONST	0x0208,0x0402
0688 0209 0403  |    |		.CONST	0x0209,0x0403
068a 0209 0404  |    |		.CONST	0x0209,0x0404
068c 0209 0001  |    |		.CONST	0x0209,0x0001
068e 0219 000a  |    |		.CONST	0x0219,0x000a
0690 021b 0002  |    |		.CONST	0x021b,0x0002
0692 0220 0003  |    |		.CONST	0x0220,0x0003
0694 0223 0004  | #  |		.CONST	0x0223,0x0004
0696 0224 f7ff  | $  |		.CONST	0x0224,0xf7ff
0698 0225 0801  | %  |		.CONST	0x0225,0x0801
069a 0229 0802  | )  |		.CONST	0x0229,0x0802
069c 0229 0c01  | )  |		.CONST	0x0229,0x0c01
069e 022a 0c02  | *  |		.CONST	0x022a,0x0c02
06a0 022b 0c03  | +  |		.CONST	0x022b,0x0c03
06a2 022b 0c04  | +  |		.CONST	0x022b,0x0c04
06a4 022b 0802  | +  |		.CONST	0x022b,0x0802
06a6 0231 0806  | 1  |		.CONST	0x0231,0x0806
06a8 0233 0803  | 3  |		.CONST	0x0233,0x0803
06aa 0239 0804  | 9  |		.CONST	0x0239,0x0804
06ac 023a efff  | :  |		.CONST	0x023a,0xefff
06ae 023f effe  | ?  |		.CONST	0x023f,0xeffe
06b0 0244 1001  | D  |		.CONST	0x0244,0x1001
06b2 0251 1401  | Q  |		.CONST	0x0251,0x1401
06b4 0252 1001  | R  |		.CONST	0x0252,0x1001
06b6 0255 0805  | U  |		.CONST	0x0255,0x0805
06b8 0258 0005  | X  |		.CONST	0x0258,0x0005
06ba 025a 0006  | Z  |		.CONST	0x025a,0x0006
06bc 0266 0007  | f  |		.CONST	0x0266,0x0007
06be 0267 e7ff  | g  |		.CONST	0x0267,0xe7ff
06c0 026c 1801  | l  |		.CONST	0x026c,0x1801
06c2 0279 1c01  | y  |		.CONST	0x0279,0x1c01
06c4 027a 1801  | z  |		.CONST	0x027a,0x1801
06c6 027d 0008  | }  |		.CONST	0x027d,0x0008
06c8 027e dfff  | ~  |		.CONST	0x027e,0xdfff
06ca 027f dffe  |    |		.CONST	0x027f,0xdffe
06cc 0280 2001  |    |		.CONST	0x0280,0x2001
06ce 0287 2002  |    |		.CONST	0x0287,0x2002
06d0 0289 2003  |    |		.CONST	0x0289,0x2003
06d2 0291 2401  |  $ |		.CONST	0x0291,0x2401
06d4 0292 2003  |    |		.CONST	0x0292,0x2003
06d6 0295 2004  |    |		.CONST	0x0295,0x2004
06d8 0297 0009  |    |		.CONST	0x0297,0x0009
06da 02a2 000b  |    |		.CONST	0x02a2,0x000b
06dc 02a7 000c  |    |		.CONST	0x02a7,0x000c
06de 02a9 000d  |    |		.CONST	0x02a9,0x000d
06e0 ; --------------------------------------------------------------------------------------
06e0 ; Debug3 Subtable 0x10
06e0 ; --------------------------------------------------------------------------------------
06e0 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
06e2 02cb 0001  |    |		.CONST	0x02cb,0x0001
06e4 02ce 0002  |    |		.CONST	0x02ce,0x0002
06e6 02d0 0003  |    |		.CONST	0x02d0,0x0003
06e8 ; --------------------------------------------------------------------------------------
06e8 ; Debug3 Subtable 0x11
06e8 ; --------------------------------------------------------------------------------------
06e8 0000 0008  |    |		.DBG3TAB	0x0000,0x0008
06ea 02db 0001  |    |		.CONST	0x02db,0x0001
06ec 02de 0002  |    |		.CONST	0x02de,0x0002
06ee 02e2 0003  |    |		.CONST	0x02e2,0x0003
06f0 02e8 0004  |    |		.CONST	0x02e8,0x0004
06f2 02f3 0005  |    |		.CONST	0x02f3,0x0005
06f4 02fc 0006  |    |		.CONST	0x02fc,0x0006
06f6 0301 0007  |    |		.CONST	0x0301,0x0007
06f8 0303 0008  |    |		.CONST	0x0303,0x0008
06fa ; --------------------------------------------------------------------------------------
06fa ; Debug3 Subtable 0x12
06fa ; --------------------------------------------------------------------------------------
06fa 0002 0011  |    |		.DBG3TAB	0x0002,0x0011
06fc 0313 ffff  |    |		.CONST	0x0313,0xffff
06fe 0318 fffe  |    |		.CONST	0x0318,0xfffe
0700 0321 0001  | !  |		.CONST	0x0321,0x0001
0702 0325 0002  | %  |		.CONST	0x0325,0x0002
0704 0326 0401  | &  |		.CONST	0x0326,0x0401
0706 032a 0801  | *  |		.CONST	0x032a,0x0801
0708 032b 0802  | +  |		.CONST	0x032b,0x0802
070a 032c 0803  | ,  |		.CONST	0x032c,0x0803
070c 032c 0804  | ,  |		.CONST	0x032c,0x0804
070e 032e 0401  | .  |		.CONST	0x032e,0x0401
0710 0333 0002  | 3  |		.CONST	0x0333,0x0002
0712 0337 0003  | 7  |		.CONST	0x0337,0x0003
0714 0337 0c01  | 7  |		.CONST	0x0337,0x0c01
0716 033a 0003  | :  |		.CONST	0x033a,0x0003
0718 033e 0004  | >  |		.CONST	0x033e,0x0004
071a 0343 0005  | C  |		.CONST	0x0343,0x0005
071c 0348 0006  | H  |		.CONST	0x0348,0x0006
071e 034d 0007  | M  |		.CONST	0x034d,0x0007
0720 034f 0008  | O  |		.CONST	0x034f,0x0008
0722 ; --------------------------------------------------------------------------------------
0722 ; Debug3 Subtable 0x13
0722 ; --------------------------------------------------------------------------------------
0722 0002 001c  |    |		.DBG3TAB	0x0002,0x001c
0724 035b ffff  | [  |		.CONST	0x035b,0xffff
0726 0360 fffe  | `  |		.CONST	0x0360,0xfffe
0728 0369 0001  | i  |		.CONST	0x0369,0x0001
072a 036d 0002  | m  |		.CONST	0x036d,0x0002
072c 036e 0401  | n  |		.CONST	0x036e,0x0401
072e 0370 0402  | p  |		.CONST	0x0370,0x0402
0730 0372 0403  | r  |		.CONST	0x0372,0x0403
0732 0376 0404  | v  |		.CONST	0x0376,0x0404
0734 037a 0405  | z  |		.CONST	0x037a,0x0405
0736 037b 0801  | {  |		.CONST	0x037b,0x0801
0738 037c 0802  | |  |		.CONST	0x037c,0x0802
073a 037d 0803  | }  |		.CONST	0x037d,0x0803
073c 037d 0804  | }  |		.CONST	0x037d,0x0804
073e 037f 0405  |    |		.CONST	0x037f,0x0405
0740 0388 0c01  |    |		.CONST	0x0388,0x0c01
0742 0389 0c02  |    |		.CONST	0x0389,0x0c02
0744 038a 0c03  |    |		.CONST	0x038a,0x0c03
0746 038a 0c04  |    |		.CONST	0x038a,0x0c04
0748 038c 0804  |    |		.CONST	0x038c,0x0804
074a 039a 0002  |    |		.CONST	0x039a,0x0002
074c 039e 0003  |    |		.CONST	0x039e,0x0003
074e 039e 1001  |    |		.CONST	0x039e,0x1001
0750 03a0 1002  |    |		.CONST	0x03a0,0x1002
0752 03a2 1003  |    |		.CONST	0x03a2,0x1003
0754 03a5 0003  |    |		.CONST	0x03a5,0x0003
0756 03a9 0004  |    |		.CONST	0x03a9,0x0004
0758 03ae 0005  |    |		.CONST	0x03ae,0x0005
075a 03b3 0006  |    |		.CONST	0x03b3,0x0006
075c 03b8 0007  |    |		.CONST	0x03b8,0x0007
075e 03ba 0008  |    |		.CONST	0x03ba,0x0008
0760 ; --------------------------------------------------------------------------------------
0760 ; Debug3 Subtable 0x14
0760 ; --------------------------------------------------------------------------------------
0760 0003 000c  |    |		.DBG3TAB	0x0003,0x000c
0762 03cb ffff  |    |		.CONST	0x03cb,0xffff
0764 03cc fffe  |    |		.CONST	0x03cc,0xfffe
0766 03cd fffd  |    |		.CONST	0x03cd,0xfffd
0768 03ce 0001  |    |		.CONST	0x03ce,0x0001
076a 03d0 0002  |    |		.CONST	0x03d0,0x0002
076c 03d3 0003  |    |		.CONST	0x03d3,0x0003
076e 03d7 0004  |    |		.CONST	0x03d7,0x0004
0770 03df 0005  |    |		.CONST	0x03df,0x0005
0772 03e2 0006  |    |		.CONST	0x03e2,0x0006
0774 03e6 0007  |    |		.CONST	0x03e6,0x0007
0776 03e8 0008  |    |		.CONST	0x03e8,0x0008
0778 03ea 0009  |    |		.CONST	0x03ea,0x0009
077a 03ef 000a  |    |		.CONST	0x03ef,0x000a
077c 03f1 000b  |    |		.CONST	0x03f1,0x000b
077e 03f5 000c  |    |		.CONST	0x03f5,0x000c
0780 ; --------------------------------------------------------------------------------------
0780 ; Debug3 Subtable 0x15
0780 ; --------------------------------------------------------------------------------------
0780 0001 0009  |    |		.DBG3TAB	0x0001,0x0009
0782 03fb ffff  |    |		.CONST	0x03fb,0xffff
0784 0400 0001  |    |		.CONST	0x0400,0x0001
0786 0405 0002  |    |		.CONST	0x0405,0x0002
0788 040d 0401  |    |		.CONST	0x040d,0x0401
078a 040e 0002  |    |		.CONST	0x040e,0x0002
078c 0411 0003  |    |		.CONST	0x0411,0x0003
078e 0416 0004  |    |		.CONST	0x0416,0x0004
0790 041e 0801  |    |		.CONST	0x041e,0x0801
0792 041f 0004  |    |		.CONST	0x041f,0x0004
0794 0422 0005  | "  |		.CONST	0x0422,0x0005
0796 ; --------------------------------------------------------------------------------------
0796 ; Debug3 Subtable 0x16
0796 ; --------------------------------------------------------------------------------------
0796 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
0798 042b ffff  | +  |		.CONST	0x042b,0xffff
079a 042c 0001  | ,  |		.CONST	0x042c,0x0001
079c 0435 0002  | 5  |		.CONST	0x0435,0x0002
079e 043d 0401  | =  |		.CONST	0x043d,0x0401
07a0 043e 0002  | >  |		.CONST	0x043e,0x0002
07a2 0444 0003  | D  |		.CONST	0x0444,0x0003
07a4 0000 0000  |    |		.BLANK	0000[0x5c]