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

⟦71b0bcea8⟧

    Length: 2048 (0x800)
    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 0248       | H  |		.CONST	0x0248								; 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 0001       |    |		.CONST	0x0001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 002b       | +  |		.CONST	0x002b								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0016       |    |		.CONST	0x0016								; Number of locals
000b			INIT_0008:
000b 029a 0033  |   3|		Declare_Subprogram	INIT_0030,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x02b2,0x8000,0x0000,0x005a,0x3745,0x0000,0x0007
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 00bf       |    |		Action	Accept_Activation
0012 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0012,0x02ba,0x8000,0x0000,0x005a,0x4355,0x0000,0x0021
													; Debug Table 0x1.0x0 = 0x12,0xffff
0013 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x13,0xfffe
0014 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x14,0xfffd
0015 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0x15,0xfffc
0016 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x4 = 0x16,0xfffb
0017 029d 00d3  |    |		Declare_Subprogram	INIT_00d0,For_Outer_Call			; Debug Table 0x1.0x5 = 0x17,0xfffa
0019 029d 00fb  |    |		Declare_Subprogram	INIT_00f8,For_Outer_Call			; Debug Table 0x1.0x6 = 0x19,0xfff9
001b 029d 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call			; Debug Table 0x1.0x7 = 0x1b,0xfff8
001d 029d 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call			; Debug Table 0x1.0x8 = 0x1d,0xfff7
001f 029d 0183  |    |		Declare_Subprogram	INIT_0180,For_Outer_Call			; Debug Table 0x1.0x9 = 0x1f,0xfff6
0021 029d 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call			; Debug Table 0x1.0xa = 0x21,0xfff5
0023 029d 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call			; Debug Table 0x1.0xb = 0x23,0xfff4
0025 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0xc = 0x25,0xfff3
0026 00c7       |    |		Action	Elaborate_Subprogram
0027 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0xd = 0x27,0xfff2
0028 00c7       |    |		Action	Elaborate_Subprogram
0029 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0xe = 0x29,0xfff1
002a 00c7       |    |		Action	Elaborate_Subprogram
002b			BODY_0008:
002b 00bc       |    |		Action	Signal_Activated
002c 00bb       |    |		Action	Signal_Completion
002d 0000 0000  |    |		.XXX[0x3]
002f 0000       |    |
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 0037       | 7  |		.CONST	0x0037								; Address of begin
0031 0004       |    |		.CONST	0x0004								; Address of exception handler
0032 0002       |    |		.CONST	0x0002								; Number of locals
0033			INIT_0030:
0033 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x2 = .DEBUG	0x0033,0x02da,0x0001,0x0000,0x005a,0x3745,0x0000,0x0008
													; Debug Table 0x2.0x0 = 0x33,0xffff
0034 e001       |    |		Load	0x0,0x1
0035 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0036 03f1       |    |		Declare_Variable	Discrete,With_Value
0037			BODY_0030:
0037 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x2.0x1 = 0x37,0x1
0038 0f79       | y  |		Execute_Immediate	Equal,0x79
0039 6804       |h   |		Jump_Zero	0x3e
003a e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2.0x2 = 0x3a,0x2
003b e002       |    |		Load	0x0,0x2
003c 184e       | N  |		Execute	Package,Field_Execute,Field_Number 0x4e
003d 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
003e 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0x3 = 0x3e,0x3
003f e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x4 = 0x3f,0x401
0040 0007       |    |		Action	Break_Optional
0041 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x2.0x5 = 0x41,0x402
0042 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0x6 = 0x42,0x403
0043 0007       |    |		Action	Break_Optional							; Debug Table 0x2.0x7 = 0x43,0x404
0044 0fa2       |    |		Execute_Immediate	Equal,-0x5e					; Debug Table 0x2.0x8 = 0x44,0x3
0045 7012       |p   |		Jump_Nonzero	0x58
0046 00cf       |    |		Action	Mark_Auxiliary							; Debug Table 0x2.0x9 = 0x46,0x4
0047 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x2.0xa = 0x47,0xf7ff
0048 e5ff       |    |		Load	0x2,-0x1
0049 00eb       |    |		Load_Encached	Diana_Cache
004a 18fb       |    |		Execute	Package,Field_Execute,Field_Number 0xfb
004b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
004c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0xb = 0x4c,0x801
004d e5fe       |    |		Load	0x2,-0x2
004e e003       |    |		Load	0x0,0x3
004f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0050 6805       |h   |		Jump_Zero	0x56
0051 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0xc = 0x51,0x802
0052 e5fe       |    |		Load	0x2,-0x2
0053 e5ff       |    |		Load	0x2,-0x1
0054 8213       |    |		Call	0x1,0x13
0055 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4					; Debug Table 0x2.0xd = 0x55,0x803
0056 00d1       |    |		Pop_Control	Pop_Count_1
0057 00ce       |    |		Action	Pop_Auxiliary
0058 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0xe = 0x58,0x5
0059 e5fe       |    |		Load	0x2,-0x2
005a e003       |    |		Load	0x0,0x3
005b 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
005c 6805       |h   |		Jump_Zero	0x62
005d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0xf = 0x5d,0x6
005e e5fe       |    |		Load	0x2,-0x2
005f e5ff       |    |		Load	0x2,-0x1
0060 8213       |    |		Call	0x1,0x13
0061 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0062 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x10 = 0x62,0x7
0063 e5fe       |    |		Load	0x2,-0x2
0064 e5ff       |    |		Load	0x2,-0x1
0065 8216       |    |		Call	0x1,0x16
0066 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0067 0000       |    |		.XXX[0x1]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 007f       |    |		.CONST	0x007f								; Address of begin
0069 0004       |    |		.CONST	0x0004								; Address of exception handler
006a 0005       |    |		.CONST	0x0005								; Number of locals
006b			INIT_0068:
006b 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3 = .DEBUG	0x006b,0x02fe,0x0001,0x0000,0x005a,0x3745,0x0000,0x001e
													; Debug Table 0x3.0x0 = 0x6b,0xffff
006c 00db       |    |		Load_Top	At_Offset_3
006d 00eb       |    |		Load_Encached	Diana_Cache
006e 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
006f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0070 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3.0x1 = 0x70,0xfffe
0071 e5ff       |    |		Load	0x2,-0x1
0072 00eb       |    |		Load_Encached	Diana_Cache
0073 18c0       |    |		Execute	Package,Field_Execute,Field_Number 0xc0
0074 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0075 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3.0x2 = 0x75,0xfffd
0076 00da       |    |		Load_Top	At_Offset_2
0077 00eb       |    |		Load_Encached	Diana_Cache
0078 18fc       |    |		Execute	Package,Field_Execute,Field_Number 0xfc
0079 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
007a 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x3.0x3 = 0x7a,0xfffc
007b 00da       |    |		Load_Top	At_Offset_2
007c 00eb       |    |		Load_Encached	Diana_Cache
007d 18fa       |    |		Execute	Package,Field_Execute,Field_Number 0xfa
007e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
007f			BODY_0068:
007f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3.0x4 = 0x7f,0x1
0080 e402       |    |		Load	0x2,0x2
0081 e004       |    |		Load	0x0,0x4
0082 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
0083 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x3.0x5 = 0x83,0x2
0084 e005       |    |		Load	0x0,0x5
0085 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0086 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0087 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0x6 = 0x87,0x3
0088 00d9       |    |		Load_Top	At_Offset_1
0089 00db       |    |		Load_Top	At_Offset_3
008a 820d       |    |		Call	0x1,0xd
008b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
008c 0000 0000  |    |		.BLANK	0000[0x4]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 00ab       |    |		.CONST	0x00ab								; Address of begin
0091 0004       |    |		.CONST	0x0004								; Address of exception handler
0092 0007       |    |		.CONST	0x0007								; Number of locals
0093			INIT_0090:
0093 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4 = .DEBUG	0x0093,0x030e,0x0001,0x0000,0x005a,0x3745,0x0000,0x002e
													; Debug Table 0x4.0x0 = 0x93,0xffff
0094 00db       |    |		Load_Top	At_Offset_3
0095 00eb       |    |		Load_Encached	Diana_Cache
0096 18d4       |    |		Execute	Package,Field_Execute,Field_Number 0xd4
0097 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0098 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0x4.0x1 = 0x98,0xfffe
0099 e5ff       |    |		Load	0x2,-0x1
009a 00eb       |    |		Load_Encached	Diana_Cache
009b 18c9       |    |		Execute	Package,Field_Execute,Field_Number 0xc9
009c 00eb       |    |		Load_Encached	Diana_Cache
009d 1888       |    |		Execute	Package,Field_Execute,Field_Number 0x88
009e 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
009f 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x4.0x2 = 0x9f,0xfffd
00a0 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
00a1 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x3 = 0xa1,0xfffc
00a2 8210       |    |		Call	0x1,0x10
00a3 00e2       |    |		Load_Encached	Integer_Cache
00a4 03f1       |    |		Declare_Variable	Discrete,With_Value
00a5 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x4 = 0xa5,0xfffb
00a6 e001       |    |		Load	0x0,0x1
00a7 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
00a8 03f1       |    |		Declare_Variable	Discrete,With_Value
00a9 029f 01f3  |    |		Declare_Subprogram	INIT_01f0,For_Call				; Debug Table 0x4.0x5 = 0xa9,0xfffa
00ab			BODY_0090:
00ab e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x6 = 0xab,0x1
00ac 0f79       | y  |		Execute_Immediate	Equal,0x79
00ad 6804       |h   |		Jump_Zero	0xb2
00ae e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0x7 = 0xae,0x2
00af e002       |    |		Load	0x0,0x2
00b0 184e       | N  |		Execute	Package,Field_Execute,Field_Number 0x4e
00b1 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
00b2 e403       |    |		Load	0x2,0x3								; Debug Table 0x4.0x8 = 0xb2,0x3
00b3 8407       |    |		Call	0x2,0x7
00b4 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x9 = 0xb4,0x4
00b5 e402       |    |		Load	0x2,0x2
00b6 e004       |    |		Load	0x0,0x4
00b7 180d       |    |		Execute	Package,Field_Execute,Field_Number 0xd
00b8 0007       |    |		Action	Break_Optional							; Debug Table 0x4.0xa = 0xb8,0x5
00b9 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x4.0xb = 0xb9,0x401
00ba 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0xc = 0xba,0x5
00bb 4800       |H   |		Short_Literal	0x0
00bc 6183       |a   |		Indirect_Literal	Discrete,0x240,{0x00000000, 0x7fffffff}
00bd e404       |    |		Load	0x2,0x4
00be e405       |    |		Load	0x2,0x5
00bf 0273       | s  |		Execute	Discrete,Plus
00c0 0248       | H  |		Execute	Discrete,Check_In_Integer
00c1 e406       |    |		Load	0x2,0x6
00c2 e404       |    |		Load	0x2,0x4
00c3 e006       |    |		Load	0x0,0x6
00c4 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00c5 e007       |    |		Load	0x0,0x7
00c6 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
00c7 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x4.0xd = 0xc7,0x6
00c8 e007       |    |		Load	0x0,0x7
00c9 1873       | s  |		Execute	Package,Field_Execute,Field_Number 0x73
00ca 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00cb 0000 0000  |    |		.BLANK	0000[0x5]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3       |    |		.CONST	0x00d3								; Address of begin
00d1 0004       |    |		.CONST	0x0004								; Address of exception handler
00d2 0001       |    |		.CONST	0x0001								; Number of locals
00d3			BODY_00d0:
00d3			INIT_00d0:
00d3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x00d3,0x032c,0x0002,0x0000,0x005a,0x4355,0x0000,0x0036
													; Debug Table 0x5.0x0 = 0xd3,0x1
00d4 4879       |Hy  |		Short_Literal	0x79
00d5 0272       | r  |		Execute	Discrete,Minus
00d6 4610       |F   |		Jump_Case	0x11
00d7 7812       |x   |		Jump	0xea								; case 0x0
00d8 780f       |x   |		Jump	0xe8								; case 0x1
00d9 7812       |x   |		Jump	0xec								; case 0x2
00da 7815       |x   |		Jump	0xf0								; case 0x3
00db 7812       |x   |		Jump	0xee								; case 0x4
00dc 7813       |x   |		Jump	0xf0								; case 0x5
00dd 7812       |x   |		Jump	0xf0								; case 0x6
00de 7811       |x   |		Jump	0xf0								; case 0x7
00df 7810       |x   |		Jump	0xf0								; case 0x8
00e0 780f       |x   |		Jump	0xf0								; case 0x9
00e1 780e       |x   |		Jump	0xf0								; case 0xa
00e2 780d       |x   |		Jump	0xf0								; case 0xb
00e3 780c       |x   |		Jump	0xf0								; case 0xc
00e4 780b       |x   |		Jump	0xf0								; case 0xd
00e5 780a       |x   |		Jump	0xf0								; case 0xe
00e6 7809       |x   |		Jump	0xf0								; case 0xf
00e7 7808       |x   |		Jump	0xf0								; case 0x10
00e8 4802       |H   |		Short_Literal	0x2							; Debug Table 0x5.0x1 = 0xe8,0x2
00e9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ea 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x2 = 0xea,0x3
00eb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ec 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x3 = 0xec,0x4
00ed 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00ee 4800       |H   |		Short_Literal	0x0							; Debug Table 0x5.0x4 = 0xee,0x5
00ef 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00f0 614b       |aK  |		Indirect_Literal	Discrete,0x23c,{0x00000000, 0x00002710}		; Debug Table 0x5.0x5 = 0xf0,0x6
00f1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00f2 0000 0000  |    |		.BLANK	0000[0x6]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 0100       |    |		.CONST	0x0100								; Address of begin
00f9 0004       |    |		.CONST	0x0004								; Address of exception handler
00fa 0002       |    |		.CONST	0x0002								; Number of locals
00fb			INIT_00f8:
00fb 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x6 = .DEBUG	0x00fb,0x033a,0x0002,0x0000,0x005a,0x4355,0x0000,0x0070
													; Debug Table 0x6.0x0 = 0xfb,0xffff
00fc 00db       |    |		Load_Top	At_Offset_3
00fd 00eb       |    |		Load_Encached	Diana_Cache
00fe 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
00ff 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0100			BODY_00f8:
0100 00cf       |    |		Action	Mark_Auxiliary
0101 7805       |x   |		Jump	0x107
0102 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x6.0x1 = 0x102,0x2
0103 00eb       |    |		Load_Encached	Diana_Cache
0104 18ec       |    |		Execute	Package,Field_Execute,Field_Number 0xec
0105 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0106 00c9       |    |		Action	Pop_Auxiliary_Loop
0107 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0x2 = 0x107,0x1
0108 e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0x3 = 0x108,0x401
0109 0007       |    |		Action	Break_Optional
010a 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x6.0x4 = 0x10a,0x402
010b 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0x5 = 0x10b,0x403
010c 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0x6 = 0x10c,0x404
010d 0f72       | r  |		Execute_Immediate	Equal,0x72					; Debug Table 0x6.0x7 = 0x10d,0x1
010e 7007       |p   |		Jump_Nonzero	0x116
010f e402       |    |		Load	0x2,0x2								; Debug Table 0x6.0x8 = 0x10f,0x801
0110 0007       |    |		Action	Break_Optional
0111 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x6.0x9 = 0x111,0x802
0112 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0xa = 0x112,0x803
0113 0007       |    |		Action	Break_Optional							; Debug Table 0x6.0xb = 0x113,0x804
0114 0fa2       |    |		Execute_Immediate	Equal,-0x5e					; Debug Table 0x6.0xc = 0x114,0x404
0115 7801       |x   |		Jump	0x117
0116 4801       |H   |		Short_Literal	0x1
0117 6fea       |o   |		Jump_Zero	0x102
0118 00ce       |    |		Action	Pop_Auxiliary
0119 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0xd = 0x119,0x3
011a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
011b 0000 0000  |    |		.BLANK	0000[0x5]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0130       | 0  |		.CONST	0x0130								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0004       |    |		.CONST	0x0004								; Number of locals
0123			INIT_0120:
0123 00f0       |    |		Load_Encached	Segment_Cache						; Debug Table 0x7 = .DEBUG	0x0123,0x0358,0x0002,0x0000,0x005a,0x4355,0x0000,0x00b9
													; Debug Table 0x7.0x0 = 0x123,0xffff
0124 e008       |    |		Load	0x0,0x8
0125 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0126 e008       |    |		Load	0x0,0x8
0127 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0128 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0129 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0x7.0x1 = 0x129,0xfffe
012a e5ff       |    |		Load	0x2,-0x1
012b 8211       |    |		Call	0x1,0x11
012c 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
012d 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x7.0x2 = 0x12d,0xfffd
012e 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0x7.0x3 = 0x12e,0x401
012f 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1					; Debug Table 0x7.0x4 = 0x12f,0xfffd
0130			BODY_0120:
0130 00cf       |    |		Action	Mark_Auxiliary
0131 780a       |x   |		Jump	0x13c
0132 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x5 = 0x132,0x2
0133 00da       |    |		Load_Top	At_Offset_2
0134 e403       |    |		Load	0x2,0x3
0135 00eb       |    |		Load_Encached	Diana_Cache
0136 1875       | u  |		Execute	Package,Field_Execute,Field_Number 0x75
0137 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0138 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x6 = 0x138,0x3
0139 8211       |    |		Call	0x1,0x11
013a 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3
013b 00c9       |    |		Action	Pop_Auxiliary_Loop
013c 0007       |    |		Action	Break_Optional							; Debug Table 0x7.0x7 = 0x13c,0x1
013d e403       |    |		Load	0x2,0x3								; Debug Table 0x7.0x8 = 0x13d,0x801
013e 0007       |    |		Action	Break_Optional
013f 0145       | E  |		Execute	Heap_Access,Diana_Tree_Kind					; Debug Table 0x7.0x9 = 0x13f,0x802
0140 0007       |    |		Action	Break_Optional							; Debug Table 0x7.0xa = 0x140,0x803
0141 0007       |    |		Action	Break_Optional							; Debug Table 0x7.0xb = 0x141,0x804
0142 0f72       | r  |		Execute_Immediate	Equal,0x72					; Debug Table 0x7.0xc = 0x142,0x1
0143 6fee       |o   |		Jump_Zero	0x132
0144 00ce       |    |		Action	Pop_Auxiliary
0145 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0xd = 0x145,0x4
0146 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0147 0000       |    |		.XXX[0x1]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 0164       | d  |		.CONST	0x0164								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0006       |    |		.CONST	0x0006								; Number of locals
014b			INIT_0148:
014b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8 = .DEBUG	0x014b,0x0376,0x0001,0x0000,0x005a,0x4355,0x0000,0x010a
													; Debug Table 0x8.0x0 = 0x14b,0xffff
014c e009       |    |		Load	0x0,0x9
014d 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
014e 00e2       |    |		Load_Encached	Integer_Cache
014f 03f1       |    |		Declare_Variable	Discrete,With_Value
0150 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x1 = 0x150,0xfffe
0151 e005       |    |		Load	0x0,0x5
0152 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0153 e001       |    |		Load	0x0,0x1
0154 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0155 03f1       |    |		Declare_Variable	Discrete,With_Value
0156 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0x2 = 0x156,0xfffd
0157 e00a       |    |		Load	0x0,0xa
0158 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0159 e001       |    |		Load	0x0,0x1
015a 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
015b 03f1       |    |		Declare_Variable	Discrete,With_Value
015c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0x3 = 0x15c,0xfffc
015d e00a       |    |		Load	0x0,0xa
015e 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
015f e001       |    |		Load	0x0,0x1
0160 1b18       |    |		Execute	Package,Field_Read,Field_Number 0x18
0161 03f1       |    |		Declare_Variable	Discrete,With_Value
0162 e001       |    |		Load	0x0,0x1								; Debug Table 0x8.0x4 = 0x162,0xfffb
0163 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
0164			BODY_0148:
0164 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x5 = 0x164,0x1
0165 0f0d       |    |		Execute_Immediate	Equal,0xd
0166 6809       |h   |		Jump_Zero	0x170
0167 e5fd       |    |		Load	0x2,-0x3
0168 0f79       | y  |		Execute_Immediate	Equal,0x79
0169 6806       |h   |		Jump_Zero	0x170
016a 00da       |    |		Load_Top	At_Offset_2
016b 0f01       |    |		Execute_Immediate	Equal,0x1
016c 6803       |h   |		Jump_Zero	0x170
016d 487b       |H{  |		Short_Literal	0x7b							; Debug Table 0x8.0x6 = 0x16d,0x2
016e 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
016f 7802       |x   |		Jump	0x172
0170 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x8.0x7 = 0x170,0x3
0171 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0172 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0x8 = 0x172,0x4
0173 00db       |    |		Load_Top	At_Offset_3
0174 00db       |    |		Load_Top	At_Offset_3
0175 e402       |    |		Load	0x2,0x2
0176 e5fd       |    |		Load	0x2,-0x3
0177 8210       |    |		Call	0x1,0x10
0178 e406       |    |		Load	0x2,0x6
0179 e403       |    |		Load	0x2,0x3
017a e007       |    |		Load	0x0,0x7
017b 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
017c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x8.0x9 = 0x17c,0x5
017d e007       |    |		Load	0x0,0x7
017e 1872       | r  |		Execute	Package,Field_Execute,Field_Number 0x72
017f 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0190       |    |		.CONST	0x0190								; Address of begin
0181 0004       |    |		.CONST	0x0004								; Address of exception handler
0182 0004       |    |		.CONST	0x0004								; Number of locals
0183			INIT_0180:
0183 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x9 = .DEBUG	0x0183,0x038c,0x0001,0x0000,0x005a,0x4355,0x0000,0x01a6
													; Debug Table 0x9.0x0 = 0x183,0xffff
0184 e009       |    |		Load	0x0,0x9
0185 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0186 00e2       |    |		Load_Encached	Integer_Cache
0187 03f1       |    |		Declare_Variable	Discrete,With_Value
0188 e001       |    |		Load	0x0,0x1								; Debug Table 0x9.0x1 = 0x188,0xfffe
0189 1b1a       |    |		Execute	Package,Field_Read,Field_Number 0x1a
018a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x2 = 0x18a,0xfffd
018b e00a       |    |		Load	0x0,0xa
018c 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
018d e001       |    |		Load	0x0,0x1
018e 1b19       |    |		Execute	Package,Field_Read,Field_Number 0x19
018f 03f1       |    |		Declare_Variable	Discrete,With_Value
0190			BODY_0180:
0190 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x3 = 0x190,0x1
0191 0f79       | y  |		Execute_Immediate	Equal,0x79
0192 6806       |h   |		Jump_Zero	0x199
0193 00d8       |    |		Load_Top	At_Offset_0
0194 0f01       |    |		Execute_Immediate	Equal,0x1
0195 6803       |h   |		Jump_Zero	0x199
0196 487b       |H{  |		Short_Literal	0x7b							; Debug Table 0x9.0x4 = 0x196,0x2
0197 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
0198 7802       |x   |		Jump	0x19b
0199 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x5 = 0x199,0x3
019a 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
019b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x6 = 0x19b,0x4
019c 00d9       |    |		Load_Top	At_Offset_1
019d e5ff       |    |		Load	0x2,-0x1
019e e00a       |    |		Load	0x0,0xa
019f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01a0 e402       |    |		Load	0x2,0x2
01a1 e5fe       |    |		Load	0x2,-0x2
01a2 8210       |    |		Call	0x1,0x10
01a3 e403       |    |		Load	0x2,0x3
01a4 480d       |H   |		Short_Literal	0xd
01a5 e007       |    |		Load	0x0,0x7
01a6 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
01a7 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9.0x7 = 0x1a7,0x5
01a8 e007       |    |		Load	0x0,0x7
01a9 1872       | r  |		Execute	Package,Field_Execute,Field_Number 0x72
01aa 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01ab 0000 0000  |    |		.BLANK	0000[0x5]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b8       |    |		.CONST	0x01b8								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0002       |    |		.CONST	0x0002								; Number of locals
01b3			INIT_01b0:
01b3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa = .DEBUG	0x01b3,0x039e,0x0001,0x0000,0x005a,0x4355,0x0000,0x0220
													; Debug Table 0xa.0x0 = 0x1b3,0xffff
01b4 e009       |    |		Load	0x0,0x9
01b5 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
01b6 00e2       |    |		Load_Encached	Integer_Cache
01b7 03f1       |    |		Declare_Variable	Discrete,With_Value
01b8			BODY_01b0:
01b8 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x1 = 0x1b8,0x1
01b9 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xa.0x2 = 0x1b9,0x401
01ba 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0x3 = 0x1ba,0x1
01bb 4801       |H   |		Short_Literal	0x1
01bc 00db       |    |		Load_Top	At_Offset_3
01bd 4800       |H   |		Short_Literal	0x0
01be 487b       |H{  |		Short_Literal	0x7b
01bf 480d       |H   |		Short_Literal	0xd
01c0 e007       |    |		Load	0x0,0x7
01c1 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
01c2 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01c3 0000 0000  |    |		.BLANK	0000[0x5]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d0       |    |		.CONST	0x01d0								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 0003       |    |		.CONST	0x0003								; Number of locals
01cb			INIT_01c8:
01cb 00f1       |    |		Load_Encached	Diana_Temp_Seq						; Debug Table 0xb = .DEBUG	0x01cb,0x03a8,0x0001,0x0000,0x005a,0x4355,0x0000,0x0258
													; Debug Table 0xb.0x0 = 0x1cb,0xffff
01cc e5fe       |    |		Load	0x2,-0x2
01cd 8212       |    |		Call	0x1,0x12
01ce 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
01cf 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xb.0x1 = 0x1cf,0xfffe
01d0			BODY_01c8:
01d0 00cf       |    |		Action	Mark_Auxiliary
01d1 7815       |x   |		Jump	0x1e7
01d2 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x2 = 0x1d2,0x2
01d3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x3 = 0x1d3,0x401
01d4 0217       |    |		Execute	Heap_Access,All_Reference
01d5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01d6 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2					; Debug Table 0xb.0x4 = 0x1d6,0x2
01d7 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x5 = 0x1d7,0x3
01d8 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x6 = 0x1d8,0x801
01d9 0217       |    |		Execute	Heap_Access,All_Reference
01da 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01db 0033       | 3  |		Store_Top	Heap_Access,At_Offset_3					; Debug Table 0xb.0x7 = 0x1db,0x3
01dc 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0x8 = 0x1dc,0x4
01dd 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0x9 = 0x1dd,0xc01
01de 021d       |    |		Execute	Heap_Access,Is_Null
01df 6804       |h   |		Jump_Zero	0x1e4							; Debug Table 0xb.0xa = 0x1df,0x4
01e0 00d9       |    |		Load_Top	At_Offset_1
01e1 e00a       |    |		Load	0x0,0xa
01e2 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
01e3 6802       |h   |		Jump_Zero	0x1e6
01e4 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xb.0xb = 0x1e4,0x5
01e5 8215       |    |		Call	0x1,0x15
01e6 00c9       |    |		Action	Pop_Auxiliary_Loop
01e7 0007       |    |		Action	Break_Optional							; Debug Table 0xb.0xc = 0x1e7,0x1
01e8 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xb.0xd = 0x1e8,0x1001
01e9 021d       |    |		Execute	Heap_Access,Is_Null
01ea 6fe7       |o   |		Jump_Zero	0x1d2							; Debug Table 0xb.0xe = 0x1ea,0x1
01eb 00ce       |    |		Action	Pop_Auxiliary
01ec e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xb.0xf = 0x1ec,0x6
01ed e5fe       |    |		Load	0x2,-0x2
01ee 8214       |    |		Call	0x1,0x14
01ef 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f3       |    |		.CONST	0x01f3								; Address of begin
01f1 0004       |    |		.CONST	0x0004								; Address of exception handler
01f2 0001       |    |		.CONST	0x0001								; Number of locals
01f3			BODY_01f0:
01f3			INIT_01f0:
01f3 0007       |    |		Action	Break_Optional							; Debug Table 0xc = .DEBUG	0x01f3,0x03ca,0x0001,0x0000,0x005a,0x4355,0x0000,0x03dd
													; Debug Table 0xc.0x0 = 0x1f3,0x1
01f4 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc.0x1 = 0x1f4,0x401
01f5 021d       |    |		Execute	Heap_Access,Is_Null
01f6 7042       |pB  |		Jump_Nonzero	0x239							; Debug Table 0xc.0x2 = 0x1f6,0x1
01f7 e404       |    |		Load	0x2,0x4								; Debug Table 0xc.0x3 = 0x1f7,0x2
01f8 0a01       |    |		Execute_Immediate	Plus,0x1
01f9 c404       |    |		Store	0x2,0x4
01fa 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x4 = 0x1fa,0x3
01fb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc.0x5 = 0x1fb,0x801
01fc 7002       |p   |		Jump_Nonzero	0x1ff
01fd 00ee       |    |		Load_Encached	Diana_Seq_Type_Cache					; Debug Table 0xc.0x6 = 0x1fd,0x802
01fe 7803       |x   |		Jump	0x202
01ff 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc.0x7 = 0x1ff,0x803
0200 0217       |    |		Execute	Heap_Access,All_Reference
0201 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0202 8407       |    |		Call	0x2,0x7								; Debug Table 0xc.0x8 = 0x202,0x3
0203 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc.0x9 = 0x203,0x4
0204 0007       |    |		Action	Break_Optional
0205 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xa = 0x205,0xc01
0206 7002       |p   |		Jump_Nonzero	0x209
0207 00ec       |    |		Load_Encached	Diana_Tree_Cache					; Debug Table 0xc.0xb = 0x207,0xc02
0208 782c       |x,  |		Jump	0x235
0209 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xc = 0x209,0xc03
020a 0217       |    |		Execute	Heap_Access,All_Reference
020b 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
020c 6804       |h   |		Jump_Zero	0x211
020d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xd = 0x20d,0xc04
020e 0217       |    |		Execute	Heap_Access,All_Reference
020f 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0210 7824       |x$  |		Jump	0x235
0211 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xc.0xe = 0x211,0xc05
0212 0007       |    |		Action	Break_Optional
0213 e603       |    |		Load	0x3,0x3								; Debug Table 0xc.0xf = 0x213,0x1001
0214 0007       |    |		Action	Break_Optional
0215 0148       | H  |		Execute	Heap_Access,Get_Offset						; Debug Table 0xc.0x10 = 0x215,0x1002
0216 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x11 = 0x216,0x1003
0217 00d0       |    |		Action	Swap_Control							; Debug Table 0xc.0x12 = 0x217,0x1004
0218 00d1       |    |		Pop_Control	Pop_Count_1
0219 49bb       |I   |		Short_Literal	0x1bb							; Debug Table 0xc.0x13 = 0x219,0xc05
021a 00eb       |    |		Load_Encached	Diana_Cache
021b 0098       |    |		Execute	Package,Field_Read_Dynamic
021c 012c       | ,  |		Execute	Any,Size
021d e00b       |    |		Load	0x0,0xb
021e 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
021f 025b       | [  |		Execute	Discrete,Check_In_Type
0220 0273       | s  |		Execute	Discrete,Plus
0221 00d9       |    |		Load_Top	At_Offset_1
0222 0007       |    |		Action	Break_Optional
0223 e604       |    |		Load	0x3,0x4								; Debug Table 0xc.0x14 = 0x223,0x1401
0224 0007       |    |		Action	Break_Optional
0225 0210       |    |		Execute	Heap_Access,Get_Segment						; Debug Table 0xc.0x15 = 0x225,0x1402
0226 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x16 = 0x226,0x1403
0227 00d0       |    |		Action	Swap_Control							; Debug Table 0xc.0x17 = 0x227,0x1404
0228 00d1       |    |		Pop_Control	Pop_Count_1
0229 49c8       |I   |		Short_Literal	0x1c8							; Debug Table 0xc.0x18 = 0x229,0x1004
022a 00eb       |    |		Load_Encached	Diana_Cache
022b 0098       |    |		Execute	Package,Field_Read_Dynamic
022c 49c9       |I   |		Short_Literal	0x1c9
022d 00eb       |    |		Load_Encached	Diana_Cache
022e 0098       |    |		Execute	Package,Field_Read_Dynamic
022f 49ca       |I   |		Short_Literal	0x1ca
0230 00eb       |    |		Load_Encached	Diana_Cache
0231 0095       |    |		Execute	Package,Field_Reference_Dynamic
0232 e00c       |    |		Load	0x0,0xc
0233 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0234 7800       |x   |		Jump	0x235
0235 00d0       |    |		Action	Swap_Control
0236 00d1       |    |		Pop_Control	Pop_Count_1
0237 e004       |    |		Load	0x0,0x4								; Debug Table 0xc.0x19 = 0x237,0x4
0238 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0239 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
023a 0000 0000  |    |		.XXX[0x2]
023c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00002710}
0240 0000 0000  |    |		.LITERAL	{0x00000000, 0x7fffffff}
0244 0000 0000  |    |		.BLANK	0000[0x4]
0248 ; --------------------------------------------------------------------------------------
0248 ; Debug Table
0248 ; --------------------------------------------------------------------------------------
0248 0003 000d  |    |		.CONST	0x0003,0x000d
024a 000b 02b2  |    |		.DEBUG	0x000b,0x02b2,0x8000,0x0000,0x005a,0x3745,0x0000,0x0007
0252 0012 02ba  |    |		.DEBUG	0x0012,0x02ba,0x8000,0x0000,0x005a,0x4355,0x0000,0x0021
025a 0033 02da  | 3  |		.DEBUG	0x0033,0x02da,0x0001,0x0000,0x005a,0x3745,0x0000,0x0008
0262 006b 02fe  | k  |		.DEBUG	0x006b,0x02fe,0x0001,0x0000,0x005a,0x3745,0x0000,0x001e
026a 0093 030e  |    |		.DEBUG	0x0093,0x030e,0x0001,0x0000,0x005a,0x3745,0x0000,0x002e
0272 00d3 032c  |   ,|		.DEBUG	0x00d3,0x032c,0x0002,0x0000,0x005a,0x4355,0x0000,0x0036
027a 00fb 033a  |   :|		.DEBUG	0x00fb,0x033a,0x0002,0x0000,0x005a,0x4355,0x0000,0x0070
0282 0123 0358  | # X|		.DEBUG	0x0123,0x0358,0x0002,0x0000,0x005a,0x4355,0x0000,0x00b9
028a 014b 0376  | K v|		.DEBUG	0x014b,0x0376,0x0001,0x0000,0x005a,0x4355,0x0000,0x010a
0292 0183 038c  |    |		.DEBUG	0x0183,0x038c,0x0001,0x0000,0x005a,0x4355,0x0000,0x01a6
029a 01b3 039e  |    |		.DEBUG	0x01b3,0x039e,0x0001,0x0000,0x005a,0x4355,0x0000,0x0220
02a2 01cb 03a8  |    |		.DEBUG	0x01cb,0x03a8,0x0001,0x0000,0x005a,0x4355,0x0000,0x0258
02aa 01f3 03ca  |    |		.DEBUG	0x01f3,0x03ca,0x0001,0x0000,0x005a,0x4355,0x0000,0x03dd
02b2 ; --------------------------------------------------------------------------------------
02b2 ; Debug3 Subtable 0x0
02b2 ; --------------------------------------------------------------------------------------
02b2 0003 0000  |    |		.DBG3TAB	0x0003,0x0000
02b4 000b ffff  |    |		.CONST	0x000b,0xffff
02b6 000d fffe  |    |		.CONST	0x000d,0xfffe
02b8 000f fffd  |    |		.CONST	0x000f,0xfffd
02ba ; --------------------------------------------------------------------------------------
02ba ; Debug3 Subtable 0x1
02ba ; --------------------------------------------------------------------------------------
02ba 000f 0000  |    |		.DBG3TAB	0x000f,0x0000
02bc 0012 ffff  |    |		.CONST	0x0012,0xffff
02be 0013 fffe  |    |		.CONST	0x0013,0xfffe
02c0 0014 fffd  |    |		.CONST	0x0014,0xfffd
02c2 0015 fffc  |    |		.CONST	0x0015,0xfffc
02c4 0016 fffb  |    |		.CONST	0x0016,0xfffb
02c6 0017 fffa  |    |		.CONST	0x0017,0xfffa
02c8 0019 fff9  |    |		.CONST	0x0019,0xfff9
02ca 001b fff8  |    |		.CONST	0x001b,0xfff8
02cc 001d fff7  |    |		.CONST	0x001d,0xfff7
02ce 001f fff6  |    |		.CONST	0x001f,0xfff6
02d0 0021 fff5  | !  |		.CONST	0x0021,0xfff5
02d2 0023 fff4  | #  |		.CONST	0x0023,0xfff4
02d4 0025 fff3  | %  |		.CONST	0x0025,0xfff3
02d6 0027 fff2  | '  |		.CONST	0x0027,0xfff2
02d8 0029 fff1  | )  |		.CONST	0x0029,0xfff1
02da ; --------------------------------------------------------------------------------------
02da ; Debug3 Subtable 0x2
02da ; --------------------------------------------------------------------------------------
02da 0002 000f  |    |		.DBG3TAB	0x0002,0x000f
02dc 0033 ffff  | 3  |		.CONST	0x0033,0xffff
02de 0037 0001  | 7  |		.CONST	0x0037,0x0001
02e0 003a 0002  | :  |		.CONST	0x003a,0x0002
02e2 003e 0003  | >  |		.CONST	0x003e,0x0003
02e4 003f 0401  | ?  |		.CONST	0x003f,0x0401
02e6 0041 0402  | A  |		.CONST	0x0041,0x0402
02e8 0042 0403  | B  |		.CONST	0x0042,0x0403
02ea 0043 0404  | C  |		.CONST	0x0043,0x0404
02ec 0044 0003  | D  |		.CONST	0x0044,0x0003
02ee 0046 0004  | F  |		.CONST	0x0046,0x0004
02f0 0047 f7ff  | G  |		.CONST	0x0047,0xf7ff
02f2 004c 0801  | L  |		.CONST	0x004c,0x0801
02f4 0051 0802  | Q  |		.CONST	0x0051,0x0802
02f6 0055 0803  | U  |		.CONST	0x0055,0x0803
02f8 0058 0005  | X  |		.CONST	0x0058,0x0005
02fa 005d 0006  | ]  |		.CONST	0x005d,0x0006
02fc 0062 0007  | b  |		.CONST	0x0062,0x0007
02fe ; --------------------------------------------------------------------------------------
02fe ; Debug3 Subtable 0x3
02fe ; --------------------------------------------------------------------------------------
02fe 0004 0003  |    |		.DBG3TAB	0x0004,0x0003
0300 006b ffff  | k  |		.CONST	0x006b,0xffff
0302 0070 fffe  | p  |		.CONST	0x0070,0xfffe
0304 0075 fffd  | u  |		.CONST	0x0075,0xfffd
0306 007a fffc  | z  |		.CONST	0x007a,0xfffc
0308 007f 0001  |    |		.CONST	0x007f,0x0001
030a 0083 0002  |    |		.CONST	0x0083,0x0002
030c 0087 0003  |    |		.CONST	0x0087,0x0003
030e ; --------------------------------------------------------------------------------------
030e ; Debug3 Subtable 0x4
030e ; --------------------------------------------------------------------------------------
030e 0006 0008  |    |		.DBG3TAB	0x0006,0x0008
0310 0093 ffff  |    |		.CONST	0x0093,0xffff
0312 0098 fffe  |    |		.CONST	0x0098,0xfffe
0314 009f fffd  |    |		.CONST	0x009f,0xfffd
0316 00a1 fffc  |    |		.CONST	0x00a1,0xfffc
0318 00a5 fffb  |    |		.CONST	0x00a5,0xfffb
031a 00a9 fffa  |    |		.CONST	0x00a9,0xfffa
031c 00ab 0001  |    |		.CONST	0x00ab,0x0001
031e 00ae 0002  |    |		.CONST	0x00ae,0x0002
0320 00b2 0003  |    |		.CONST	0x00b2,0x0003
0322 00b4 0004  |    |		.CONST	0x00b4,0x0004
0324 00b8 0005  |    |		.CONST	0x00b8,0x0005
0326 00b9 0401  |    |		.CONST	0x00b9,0x0401
0328 00ba 0005  |    |		.CONST	0x00ba,0x0005
032a 00c7 0006  |    |		.CONST	0x00c7,0x0006
032c ; --------------------------------------------------------------------------------------
032c ; Debug3 Subtable 0x5
032c ; --------------------------------------------------------------------------------------
032c 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
032e 00d3 0001  |    |		.CONST	0x00d3,0x0001
0330 00e8 0002  |    |		.CONST	0x00e8,0x0002
0332 00ea 0003  |    |		.CONST	0x00ea,0x0003
0334 00ec 0004  |    |		.CONST	0x00ec,0x0004
0336 00ee 0005  |    |		.CONST	0x00ee,0x0005
0338 00f0 0006  |    |		.CONST	0x00f0,0x0006
033a ; --------------------------------------------------------------------------------------
033a ; Debug3 Subtable 0x6
033a ; --------------------------------------------------------------------------------------
033a 0001 000d  |    |		.DBG3TAB	0x0001,0x000d
033c 00fb ffff  |    |		.CONST	0x00fb,0xffff
033e 0102 0002  |    |		.CONST	0x0102,0x0002
0340 0107 0001  |    |		.CONST	0x0107,0x0001
0342 0108 0401  |    |		.CONST	0x0108,0x0401
0344 010a 0402  |    |		.CONST	0x010a,0x0402
0346 010b 0403  |    |		.CONST	0x010b,0x0403
0348 010c 0404  |    |		.CONST	0x010c,0x0404
034a 010d 0001  |    |		.CONST	0x010d,0x0001
034c 010f 0801  |    |		.CONST	0x010f,0x0801
034e 0111 0802  |    |		.CONST	0x0111,0x0802
0350 0112 0803  |    |		.CONST	0x0112,0x0803
0352 0113 0804  |    |		.CONST	0x0113,0x0804
0354 0114 0404  |    |		.CONST	0x0114,0x0404
0356 0119 0003  |    |		.CONST	0x0119,0x0003
0358 ; --------------------------------------------------------------------------------------
0358 ; Debug3 Subtable 0x7
0358 ; --------------------------------------------------------------------------------------
0358 0004 000a  |    |		.DBG3TAB	0x0004,0x000a
035a 0123 ffff  | #  |		.CONST	0x0123,0xffff
035c 0129 fffe  | )  |		.CONST	0x0129,0xfffe
035e 012d fffd  | -  |		.CONST	0x012d,0xfffd
0360 012e 0401  | .  |		.CONST	0x012e,0x0401
0362 012f fffd  | /  |		.CONST	0x012f,0xfffd
0364 0132 0002  | 2  |		.CONST	0x0132,0x0002
0366 0138 0003  | 8  |		.CONST	0x0138,0x0003
0368 013c 0001  | <  |		.CONST	0x013c,0x0001
036a 013d 0801  | =  |		.CONST	0x013d,0x0801
036c 013f 0802  | ?  |		.CONST	0x013f,0x0802
036e 0140 0803  | @  |		.CONST	0x0140,0x0803
0370 0141 0804  | A  |		.CONST	0x0141,0x0804
0372 0142 0001  | B  |		.CONST	0x0142,0x0001
0374 0145 0004  | E  |		.CONST	0x0145,0x0004
0376 ; --------------------------------------------------------------------------------------
0376 ; Debug3 Subtable 0x8
0376 ; --------------------------------------------------------------------------------------
0376 0005 0005  |    |		.DBG3TAB	0x0005,0x0005
0378 014b ffff  | K  |		.CONST	0x014b,0xffff
037a 0150 fffe  | P  |		.CONST	0x0150,0xfffe
037c 0156 fffd  | V  |		.CONST	0x0156,0xfffd
037e 015c fffc  | \  |		.CONST	0x015c,0xfffc
0380 0162 fffb  | b  |		.CONST	0x0162,0xfffb
0382 0164 0001  | d  |		.CONST	0x0164,0x0001
0384 016d 0002  | m  |		.CONST	0x016d,0x0002
0386 0170 0003  | p  |		.CONST	0x0170,0x0003
0388 0172 0004  | r  |		.CONST	0x0172,0x0004
038a 017c 0005  | |  |		.CONST	0x017c,0x0005
038c ; --------------------------------------------------------------------------------------
038c ; Debug3 Subtable 0x9
038c ; --------------------------------------------------------------------------------------
038c 0003 0005  |    |		.DBG3TAB	0x0003,0x0005
038e 0183 ffff  |    |		.CONST	0x0183,0xffff
0390 0188 fffe  |    |		.CONST	0x0188,0xfffe
0392 018a fffd  |    |		.CONST	0x018a,0xfffd
0394 0190 0001  |    |		.CONST	0x0190,0x0001
0396 0196 0002  |    |		.CONST	0x0196,0x0002
0398 0199 0003  |    |		.CONST	0x0199,0x0003
039a 019b 0004  |    |		.CONST	0x019b,0x0004
039c 01a7 0005  |    |		.CONST	0x01a7,0x0005
039e ; --------------------------------------------------------------------------------------
039e ; Debug3 Subtable 0xa
039e ; --------------------------------------------------------------------------------------
039e 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
03a0 01b3 ffff  |    |		.CONST	0x01b3,0xffff
03a2 01b8 0001  |    |		.CONST	0x01b8,0x0001
03a4 01b9 0401  |    |		.CONST	0x01b9,0x0401
03a6 01ba 0001  |    |		.CONST	0x01ba,0x0001
03a8 ; --------------------------------------------------------------------------------------
03a8 ; Debug3 Subtable 0xb
03a8 ; --------------------------------------------------------------------------------------
03a8 0002 000e  |    |		.DBG3TAB	0x0002,0x000e
03aa 01cb ffff  |    |		.CONST	0x01cb,0xffff
03ac 01cf fffe  |    |		.CONST	0x01cf,0xfffe
03ae 01d2 0002  |    |		.CONST	0x01d2,0x0002
03b0 01d3 0401  |    |		.CONST	0x01d3,0x0401
03b2 01d6 0002  |    |		.CONST	0x01d6,0x0002
03b4 01d7 0003  |    |		.CONST	0x01d7,0x0003
03b6 01d8 0801  |    |		.CONST	0x01d8,0x0801
03b8 01db 0003  |    |		.CONST	0x01db,0x0003
03ba 01dc 0004  |    |		.CONST	0x01dc,0x0004
03bc 01dd 0c01  |    |		.CONST	0x01dd,0x0c01
03be 01df 0004  |    |		.CONST	0x01df,0x0004
03c0 01e4 0005  |    |		.CONST	0x01e4,0x0005
03c2 01e7 0001  |    |		.CONST	0x01e7,0x0001
03c4 01e8 1001  |    |		.CONST	0x01e8,0x1001
03c6 01ea 0001  |    |		.CONST	0x01ea,0x0001
03c8 01ec 0006  |    |		.CONST	0x01ec,0x0006
03ca ; --------------------------------------------------------------------------------------
03ca ; Debug3 Subtable 0xc
03ca ; --------------------------------------------------------------------------------------
03ca 0000 001a  |    |		.DBG3TAB	0x0000,0x001a
03cc 01f3 0001  |    |		.CONST	0x01f3,0x0001
03ce 01f4 0401  |    |		.CONST	0x01f4,0x0401
03d0 01f6 0001  |    |		.CONST	0x01f6,0x0001
03d2 01f7 0002  |    |		.CONST	0x01f7,0x0002
03d4 01fa 0003  |    |		.CONST	0x01fa,0x0003
03d6 01fb 0801  |    |		.CONST	0x01fb,0x0801
03d8 01fd 0802  |    |		.CONST	0x01fd,0x0802
03da 01ff 0803  |    |		.CONST	0x01ff,0x0803
03dc 0202 0003  |    |		.CONST	0x0202,0x0003
03de 0203 0004  |    |		.CONST	0x0203,0x0004
03e0 0205 0c01  |    |		.CONST	0x0205,0x0c01
03e2 0207 0c02  |    |		.CONST	0x0207,0x0c02
03e4 0209 0c03  |    |		.CONST	0x0209,0x0c03
03e6 020d 0c04  |    |		.CONST	0x020d,0x0c04
03e8 0211 0c05  |    |		.CONST	0x0211,0x0c05
03ea 0213 1001  |    |		.CONST	0x0213,0x1001
03ec 0215 1002  |    |		.CONST	0x0215,0x1002
03ee 0216 1003  |    |		.CONST	0x0216,0x1003
03f0 0217 1004  |    |		.CONST	0x0217,0x1004
03f2 0219 0c05  |    |		.CONST	0x0219,0x0c05
03f4 0223 1401  | #  |		.CONST	0x0223,0x1401
03f6 0225 1402  | %  |		.CONST	0x0225,0x1402
03f8 0226 1403  | &  |		.CONST	0x0226,0x1403
03fa 0227 1404  | '  |		.CONST	0x0227,0x1404
03fc 0229 1004  | )  |		.CONST	0x0229,0x1004
03fe 0237 0004  | 7  |		.CONST	0x0237,0x0004