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

⟦11ac7c01f⟧

    Length: 3072 (0xc00)
    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 03a8       |    |		.CONST	0x03a8								; 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 0002       |    |		.CONST	0x0002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00a8       |    |		.CONST	0x00a8								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 002f       | /  |		.CONST	0x002f								; Number of locals
000b			INIT_0008:
000b e001       |    |		Load	0x0,0x1								; Debug Table 0x0 = .DEBUG	0x000b,0x0452,0x8000,0x0000,0x005a,0x9595,0x0000,0x000f
													; Debug Table 0x0.0x0 = 0xb,0xffff
000c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
000d 0129       | )  |		Execute	Any,Make_Visible
000e 03a9       |    |		Declare_Type	Heap_Access,Indirect_Literal,Visible			; Debug Table 0x0.0x1 = 0xe,0xfffe
000f 4802       |H   |		Short_Literal	0x2							; Debug Table 0x0.0x2 = 0xf,0xfffd
0010 032b       | +  |		Declare_Type	Record,Incomplete,Visible
0011 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x3 = 0x11,0xfffc
0012 02a0       |    |		Declare_Subprogram	Null_Subprogram
0013 4818       |H   |		Short_Literal	0x18
0014 03d4       |    |		Declare_Type	Access,Defined,Visible,Accesses_Protected
0015 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x4 = 0x15,0xfffb
0016 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0017 00d9       |    |		Load_Top	At_Offset_1
0018 02a0       |    |		Declare_Subprogram	Null_Subprogram
0019 e20f       |    |		Load	0x1,0xf
001a 0326       | &  |		Complete_Type	Record,By_Defining
001b 4802       |H   |		Short_Literal	0x2							; Debug Table 0x0.0x5 = 0x1b,0xfffa
001c 032b       | +  |		Declare_Type	Record,Incomplete,Visible
001d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x6 = 0x1d,0xfff9
001e 02a0       |    |		Declare_Subprogram	Null_Subprogram
001f 4818       |H   |		Short_Literal	0x18
0020 03d4       |    |		Declare_Type	Access,Defined,Visible,Accesses_Protected
0021 e20d       |    |		Load	0x1,0xd								; Debug Table 0x0.0x7 = 0x21,0xfff8
0022 00d9       |    |		Load_Top	At_Offset_1
0023 02a0       |    |		Declare_Subprogram	Null_Subprogram
0024 e211       |    |		Load	0x1,0x11
0025 0326       | &  |		Complete_Type	Record,By_Defining
0026 4804       |H   |		Short_Literal	0x4							; Debug Table 0x0.0x8 = 0x26,0xfff7
0027 032b       | +  |		Declare_Type	Record,Incomplete,Visible
0028 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x9 = 0x28,0xfff6
0029 02a0       |    |		Declare_Subprogram	Null_Subprogram
002a 4818       |H   |		Short_Literal	0x18
002b 03d4       |    |		Declare_Type	Access,Defined,Visible,Accesses_Protected
002c e20d       |    |		Load	0x1,0xd								; Debug Table 0x0.0xa = 0x2c,0xfff5
002d e210       |    |		Load	0x1,0x10
002e 00e3       |    |		Load_Encached	Natural_Cache
002f e212       |    |		Load	0x1,0x12
0030 029f 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Call
0032 e213       |    |		Load	0x1,0x13
0033 0326       | &  |		Complete_Type	Record,By_Defining
0034 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x34,0xfff4
0036 029a 00db  |    |		Declare_Subprogram	INIT_00d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xc = 0x36,0xfff3
0038 029a 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xd = 0x38,0xfff2
003a 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xe = 0x3a,0xfff1
003c 029a 00fb  |    |		Declare_Subprogram	INIT_00f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xf = 0x3c,0xfff0
003e 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x10 = 0x3e,0xffef
0040 029a 0133  |   3|		Declare_Subprogram	INIT_0130,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x11 = 0x40,0xffee
0042 029a 015b  |   [|		Declare_Subprogram	INIT_0158,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x12 = 0x42,0xffed
0044 029a 01db  |    |		Declare_Subprogram	INIT_01d8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x13 = 0x44,0xffec
0046 029a 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x14 = 0x46,0xffeb
0048 029a 0243  |   C|		Declare_Subprogram	INIT_0240,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x15 = 0x48,0xffea
004a 029b 029b  |    |		Declare_Subprogram	INIT_0298,For_Outer_Call,Unelaborated		; Debug Table 0x0.0x16 = 0x4a,0xffe9
004c 029b 02a3  |    |		Declare_Subprogram	INIT_02a0,For_Outer_Call,Unelaborated		; Debug Table 0x0.0x17 = 0x4c,0xffe8
004e 029b 02d3  |    |		Declare_Subprogram	INIT_02d0,For_Outer_Call,Unelaborated		; Debug Table 0x0.0x18 = 0x4e,0xffe7
0050 029b 032b  |   +|		Declare_Subprogram	INIT_0328,For_Outer_Call,Unelaborated		; Debug Table 0x0.0x19 = 0x50,0xffe6
0052 62cd       |b   |		Indirect_Literal	Discrete,0x320,{0x00000000, 0x005a9595}		; Debug Table 0x0.0x1a = 0x52,0xffe5
0053 4944       |ID  |		Short_Literal	0x144
0054 e213       |    |		Load	0x1,0x13
0055 e214       |    |		Load	0x1,0x14
0056 e20d       |    |		Load	0x1,0xd
0057 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20
0058 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21
0059 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22
005a 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23
005b 480b       |H   |		Short_Literal	0xb
005c e002       |    |		Load	0x0,0x2
005d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
005e 0387       |    |		Declare_Variable	Package
005f 00d8       |    |		Load_Top	At_Offset_0
0060 020f       |    |		Execute	Module,Activate
0061 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x0.0x1b = 0x61,0xffe4
0062 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0063 e20e       |    |		Load	0x1,0xe
0064 03a2       |    |		Complete_Type	Heap_Access,By_Renaming
0065 00bf       |    |		Action	Accept_Activation
0066 e003       |    |		Load	0x0,0x3								; Debug Table 0x1 = .DEBUG	0x0066,0x048c,0x8000,0x0000,0x005a,0x95c5,0x0000,0x0013
													; Debug Table 0x1.0x0 = 0x66,0xffff
0067 1915       |    |		Execute	Package,Field_Reference,Field_Number 0x15
0068 0007       |    |		Action	Break_Optional
0069 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x1 = 0x69,0xfffe
006a 00c7       |    |		Action	Elaborate_Subprogram
006b 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x2 = 0x6b,0xfffd
006c 00c7       |    |		Action	Elaborate_Subprogram
006d 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18				; Debug Table 0x1.0x3 = 0x6d,0xfffc
006e 00c7       |    |		Action	Elaborate_Subprogram
006f 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19				; Debug Table 0x1.0x4 = 0x6f,0xfffb
0070 00c7       |    |		Action	Elaborate_Subprogram
0071 1d1a       |    |		Execute_Immediate	Reference_Lex_1,0x1a				; Debug Table 0x1.0x5 = 0x71,0xfffa
0072 00c7       |    |		Action	Elaborate_Subprogram
0073 1d1b       |    |		Execute_Immediate	Reference_Lex_1,0x1b				; Debug Table 0x1.0x6 = 0x73,0xfff9
0074 00c7       |    |		Action	Elaborate_Subprogram
0075 1d1c       |    |		Execute_Immediate	Reference_Lex_1,0x1c				; Debug Table 0x1.0x7 = 0x75,0xfff8
0076 00c7       |    |		Action	Elaborate_Subprogram
0077 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d				; Debug Table 0x1.0x8 = 0x77,0xfff7
0078 00c7       |    |		Action	Elaborate_Subprogram
0079 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e				; Debug Table 0x1.0x9 = 0x79,0xfff6
007a 00c7       |    |		Action	Elaborate_Subprogram
007b 1d20       |    |		Execute_Immediate	Reference_Lex_1,0x20				; Debug Table 0x1.0xa = 0x7b,0xfff5
007c 00c7       |    |		Action	Elaborate_Subprogram
007d 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0xb = 0x7d,0xfff4
007e 629d       |b   |		Indirect_Literal	Discrete,0x31c,{0x00000000, 0x005a95c5}		; Debug Table 0x1.0xc = 0x7e,0xfff3
007f 4a7d       |J}  |		Short_Literal	0x27d
0080 00e3       |    |		Load_Encached	Natural_Cache
0081 e004       |    |		Load	0x0,0x4
0082 1b2d       | -  |		Execute	Package,Field_Read,Field_Number 0x2d
0083 0387       |    |		Declare_Variable	Package
0084 00d8       |    |		Load_Top	At_Offset_0
0085 020f       |    |		Execute	Module,Activate
0086 6295       |b   |		Indirect_Literal	Discrete,0x31c,{0x00000000, 0x005a95c5}		; Debug Table 0x1.0xd = 0x86,0xfff2
0087 4a85       |J   |		Short_Literal	0x285
0088 00e9       |    |		Load_Encached	String_Cache
0089 e004       |    |		Load	0x0,0x4
008a 1b2d       | -  |		Execute	Package,Field_Read,Field_Number 0x2d
008b 0387       |    |		Declare_Variable	Package
008c 00d8       |    |		Load_Top	At_Offset_0
008d 020f       |    |		Execute	Module,Activate
008e 1d21       | !  |		Execute_Immediate	Reference_Lex_1,0x21				; Debug Table 0x1.0xe = 0x8e,0xfff1
008f 00c7       |    |		Action	Elaborate_Subprogram
0090 1d22       | "  |		Execute_Immediate	Reference_Lex_1,0x22				; Debug Table 0x1.0xf = 0x90,0xfff0
0091 00c7       |    |		Action	Elaborate_Subprogram
0092 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x10 = 0x92,0xffef
0093 00c7       |    |		Action	Elaborate_Subprogram
0094 029d 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Outer_Call			; Debug Table 0x1.0x11 = 0x94,0xffee
0096 e224       | $  |		Load	0x1,0x24							; Debug Table 0x1.0x12 = 0x96,0xffed
0097 191f       |    |		Execute	Package,Field_Reference,Field_Number 0x1f
0098 00c6       |    |		Action	Check_Subprogram_Elaborated
0099 e001       |    |		Load	0x0,0x1
009a 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
009b 1d28       | (  |		Execute_Immediate	Reference_Lex_1,0x28
009c 627f       |b   |		Indirect_Literal	Discrete,0x31c,{0x00000000, 0x005a95c5}
009d 627a       |bz  |		Indirect_Literal	Discrete,0x318,{0x00000000, 0x00000413}
009e 4800       |H   |		Short_Literal	0x0
009f 0007       |    |		Action	Break_Optional
00a0 029d 0373  |   s|		Declare_Subprogram	INIT_0370,For_Outer_Call			; Debug Table 0x1.0x13 = 0xa0,0xffec
00a2 029d 0393  |    |		Declare_Subprogram	INIT_0390,For_Outer_Call			; Debug Table 0x1.0x14 = 0xa2,0xffeb
00a4 1d1f       |    |		Execute_Immediate	Reference_Lex_1,0x1f				; Debug Table 0x1.0x15 = 0xa4,0xffea
00a5 00c7       |    |		Action	Elaborate_Subprogram
00a6 1d23       | #  |		Execute_Immediate	Reference_Lex_1,0x23				; Debug Table 0x1.0x16 = 0xa6,0xffe9
00a7 00c7       |    |		Action	Elaborate_Subprogram
00a8			BODY_0008:
00a8 00bc       |    |		Action	Signal_Activated						; Debug Table 0x1.0x17 = 0xa8,0x1
00a9 00bb       |    |		Action	Signal_Completion
00aa 0000 0000  |    |		.BLANK	0000[0x6]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3       |    |		.CONST	0x00b3								; Address of begin
00b1 0004       |    |		.CONST	0x0004								; Address of exception handler
00b2 0001       |    |		.CONST	0x0001								; Number of locals
00b3			BODY_00b0:
00b3			INIT_00b0:
00b3 4608       |F   |		Jump_Case	0x9							; Debug Table 0x2 = .DEBUG	0x00b3,0x04be,0x0005,0x0000,0x005a,0x9595,0x0000,0x0051
00b4 7808       |x   |		Jump	0xbd								; case 0x0
00b5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
00b6 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
00b7 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
00b8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
00b9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
00ba 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
00bb 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
00bc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
00bd 4800       |H   |		Short_Literal	0x0
00be 00db       |    |		Load_Top	At_Offset_3
00bf 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
00c0 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
00c1 0000 0000  |    |		.BLANK	0000[0x7]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb       |    |		.CONST	0x00cb								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0001       |    |		.CONST	0x0001								; Number of locals
00cb			BODY_00c8:
00cb			INIT_00c8:
00cb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x3 = .DEBUG	0x00cb,0x04c0,0x0001,0x0000,0x005a,0x9595,0x0000,0x006a
													; Debug Table 0x3.0x0 = 0xcb,0x1
00cc e224       | $  |		Load	0x1,0x24
00cd 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
00ce 0216       |    |		Execute	Heap_Access,Convert
00cf 00db       |    |		Load_Top	At_Offset_3
00d0 e224       | $  |		Load	0x1,0x24
00d1 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00d2 e20e       |    |		Load	0x1,0xe
00d3 0216       |    |		Execute	Heap_Access,Convert
00d4 c5fe       |    |		Store	0x2,-0x2
00d5 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00d6 0000 0000  |    |		.XXX[0x2]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db       |    |		.CONST	0x00db								; Address of begin
00d9 0004       |    |		.CONST	0x0004								; Address of exception handler
00da 0001       |    |		.CONST	0x0001								; Number of locals
00db			BODY_00d8:
00db			INIT_00d8:
00db 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x4 = .DEBUG	0x00db,0x04c4,0x0001,0x0000,0x005a,0x9595,0x0000,0x0078
													; Debug Table 0x4.0x0 = 0xdb,0x1
00dc 00db       |    |		Load_Top	At_Offset_3
00dd e224       | $  |		Load	0x1,0x24
00de 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
00df c5fe       |    |		Store	0x2,-0x2
00e0 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00e1 0000 0000  |    |		.BLANK	0000[0x7]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb       |    |		.CONST	0x00eb								; Address of begin
00e9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ea 0001       |    |		.CONST	0x0001								; Number of locals
00eb			BODY_00e8:
00eb			INIT_00e8:
00eb 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x5 = .DEBUG	0x00eb,0x04c8,0x0001,0x0000,0x005a,0x9595,0x0000,0x0086
													; Debug Table 0x5.0x0 = 0xeb,0x1
00ec 00db       |    |		Load_Top	At_Offset_3
00ed e224       | $  |		Load	0x1,0x24
00ee 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
00ef 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3       |    |		.CONST	0x00f3								; Address of begin
00f1 0004       |    |		.CONST	0x0004								; Address of exception handler
00f2 0001       |    |		.CONST	0x0001								; Number of locals
00f3			BODY_00f0:
00f3			INIT_00f0:
00f3 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x6 = .DEBUG	0x00f3,0x04cc,0x0001,0x0000,0x005a,0x9595,0x0000,0x0092
													; Debug Table 0x6.0x0 = 0xf3,0x1
00f4 e224       | $  |		Load	0x1,0x24
00f5 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00f6 c5ff       |    |		Store	0x2,-0x1
00f7 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb       |    |		.CONST	0x00fb								; Address of begin
00f9 0004       |    |		.CONST	0x0004								; Address of exception handler
00fa 0001       |    |		.CONST	0x0001								; Number of locals
00fb			BODY_00f8:
00fb			INIT_00f8:
00fb e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x7 = .DEBUG	0x00fb,0x04d0,0x0001,0x0000,0x005a,0x9595,0x0000,0x009c
													; Debug Table 0x7.0x0 = 0xfb,0x1
00fc e224       | $  |		Load	0x1,0x24
00fd 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
00fe 0216       |    |		Execute	Heap_Access,Convert
00ff e5fe       |    |		Load	0x2,-0x2
0100 e5ff       |    |		Load	0x2,-0x1
0101 e224       | $  |		Load	0x1,0x24
0102 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0103 e20e       |    |		Load	0x1,0xe
0104 0216       |    |		Execute	Heap_Access,Convert
0105 c5fd       |    |		Store	0x2,-0x3
0106 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0107 0000       |    |		.XXX[0x1]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010c       |    |		.CONST	0x010c								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0002       |    |		.CONST	0x0002								; Number of locals
010b			INIT_0108:
010b 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x8 = .DEBUG	0x010b,0x04d4,0x0001,0x0000,0x005a,0x9595,0x0000,0x00ae
													; Debug Table 0x8.0x0 = 0x10b,0xffff
010c			BODY_0108:
010c 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0x1 = 0x10c,0x1
010d e5ff       |    |		Load	0x2,-0x1
010e 4827       |H'  |		Short_Literal	0x27
010f e003       |    |		Load	0x0,0x3
0110 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0111 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
0112 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x2 = 0x112,0x2
0113 7004       |p   |		Jump_Nonzero	0x118
0114 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x3 = 0x114,0x3
0115 01dc       |    |		Execute	Vector,Last
0116 0059       | Y  |		Store_Top	Discrete,At_Offset_1
0117 7803       |x   |		Jump	0x11b
0118 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x8.0x4 = 0x118,0x4
0119 0aff       |    |		Execute_Immediate	Plus,-0x1
011a 0059       | Y  |		Store_Top	Discrete,At_Offset_1
011b e224       | $  |		Load	0x1,0x24							; Debug Table 0x8.0x5 = 0x11b,0x5
011c 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
011d e5fe       |    |		Load	0x2,-0x2
011e e224       | $  |		Load	0x1,0x24
011f 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0120 0216       |    |		Execute	Heap_Access,Convert
0121 e5ff       |    |		Load	0x2,-0x1
0122 01dd       |    |		Execute	Vector,First
0123 00db       |    |		Load_Top	At_Offset_3
0124 e5ff       |    |		Load	0x2,-0x1
0125 01cf       |    |		Execute	Vector,Slice_Read
0126 8225       | %  |		Call	0x1,0x25
0127 e224       | $  |		Load	0x1,0x24
0128 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0129 e20e       |    |		Load	0x1,0xe
012a 0216       |    |		Execute	Heap_Access,Convert
012b c5fe       |    |		Store	0x2,-0x2
012c c5fd       |    |		Store	0x2,-0x3
012d 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
012e 0000 0000  |    |		.XXX[0x2]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0138       | 8  |		.CONST	0x0138								; Address of begin
0131 0004       |    |		.CONST	0x0004								; Address of exception handler
0132 0002       |    |		.CONST	0x0002								; Number of locals
0133			INIT_0130:
0133 e213       |    |		Load	0x1,0x13							; Debug Table 0x9 = .DEBUG	0x0133,0x04e2,0x0001,0x0000,0x005a,0x9595,0x0000,0x00be
													; Debug Table 0x9.0x0 = 0x133,0xffff
0134 0322       | "  |		Declare_Variable	Record
0135 00db       |    |		Load_Top	At_Offset_3
0136 00d9       |    |		Load_Top	At_Offset_1
0137 017d       | }  |		Execute	Record,Structure_Write
0138			BODY_0130:
0138 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x1 = 0x138,0x1
0139 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
013a 0217       |    |		Execute	Heap_Access,All_Reference
013b e20d       |    |		Load	0x1,0xd
013c e001       |    |		Load	0x0,0x1
013d 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
013e 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
013f 00d9       |    |		Load_Top	At_Offset_1
0140 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0141 0007       |    |		Action	Break_Optional							; Debug Table 0x9.0x2 = 0x141,0x2
0142 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x9.0x3 = 0x142,0x3
0143 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0144 0219       |    |		Execute	Heap_Access,All_Read
0145 00d8       |    |		Load_Top	At_Offset_0
0146 e003       |    |		Load	0x0,0x3
0147 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0148 00d2       |    |		Pop_Control	Pop_Count_2
0149 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x9.0x4 = 0x149,0x4
014a e224       | $  |		Load	0x1,0x24
014b 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
014c 0216       |    |		Execute	Heap_Access,Convert
014d 00d9       |    |		Load_Top	At_Offset_1
014e e224       | $  |		Load	0x1,0x24
014f 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0150 e20e       |    |		Load	0x1,0xe
0151 0216       |    |		Execute	Heap_Access,Convert
0152 c5fe       |    |		Store	0x2,-0x2
0153 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0154 0000 0000  |    |		.BLANK	0000[0x4]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015f       | _  |		.CONST	0x015f								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0003       |    |		.CONST	0x0003								; Number of locals
015b			INIT_0158:
015b e214       |    |		Load	0x1,0x14							; Debug Table 0xa = .DEBUG	0x015b,0x04ee,0x0001,0x0000,0x005a,0x9595,0x0000,0x00ca
													; Debug Table 0xa.0x0 = 0x15b,0xffff
015c 0007       |    |		Action	Break_Optional
015d e212       |    |		Load	0x1,0x12							; Debug Table 0xa.0x1 = 0x15d,0xfffe
015e 0007       |    |		Action	Break_Optional
015f			BODY_0158:
015f e214       |    |		Load	0x1,0x14							; Debug Table 0xa.0x2 = 0x15f,0x1
0160 e5fd       |    |		Load	0x2,-0x3
0161 e5fe       |    |		Load	0x2,-0x2
0162 0217       |    |		Execute	Heap_Access,All_Reference
0163 821a       |    |		Call	0x1,0x1a
0164 c5fd       |    |		Store	0x2,-0x3
0165 003a       | :  |		Store_Top	Access,At_Offset_2
0166 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0x3 = 0x166,0x2
0167 7020       |p   |		Jump_Nonzero	0x188
0168 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xa.0x4 = 0x168,0x3
0169 e213       |    |		Load	0x1,0x13
016a 0322       | "  |		Declare_Variable	Record
016b e5fe       |    |		Load	0x2,-0x2
016c 00d9       |    |		Load_Top	At_Offset_1
016d 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
016e e20f       |    |		Load	0x1,0xf
016f 0322       | "  |		Declare_Variable	Record
0170 e5ff       |    |		Load	0x2,-0x1
0171 e001       |    |		Load	0x0,0x1
0172 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0173 e001       |    |		Load	0x0,0x1
0174 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0175 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
0176 00d9       |    |		Load_Top	At_Offset_1
0177 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0178 e210       |    |		Load	0x1,0x10
0179 00d9       |    |		Load_Top	At_Offset_1
017a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
017b e210       |    |		Load	0x1,0x10
017c 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
017d 00d9       |    |		Load_Top	At_Offset_1
017e 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
017f 4801       |H   |		Short_Literal	0x1
0180 00d9       |    |		Load_Top	At_Offset_1
0181 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0182 e212       |    |		Load	0x1,0x12
0183 00d9       |    |		Load_Top	At_Offset_1
0184 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0185 821b       |    |		Call	0x1,0x1b
0186 c5fd       |    |		Store	0x2,-0x3
0187 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xa.0x5 = 0x187,0x4
0188 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x6 = 0x188,0x5
0189 e210       |    |		Load	0x1,0x10							; Debug Table 0xa.0x7 = 0x189,0xfbff
018a 00da       |    |		Load_Top	At_Offset_2
018b 0227       | '  |		Execute	Access,All_Reference
018c 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
018d 0039       | 9  |		Store_Top	Access,At_Offset_1
018e 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0xa.0x8 = 0x18e,0xfbfe
018f 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0190 780e       |x   |		Jump	0x19f
0191 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0x9 = 0x191,0x402
0192 0227       | '  |		Execute	Access,All_Reference
0193 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0194 0217       |    |		Execute	Heap_Access,All_Reference
0195 e5ff       |    |		Load	0x2,-0x1
0196 01df       |    |		Execute	Vector,Equal
0197 6803       |h   |		Jump_Zero	0x19b
0198 4801       |H   |		Short_Literal	0x1							; Debug Table 0xa.0xa = 0x198,0x403
0199 0051       | Q  |		Store_Top_Unchecked	Discrete,At_Offset_1
019a 7806       |x   |		Jump	0x1a1								; Debug Table 0xa.0xb = 0x19a,0x404
019b 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0xc = 0x19b,0x405
019c 0227       | '  |		Execute	Access,All_Reference
019d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
019e 003a       | :  |		Store_Top	Access,At_Offset_2
019f 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xa.0xd = 0x19f,0x401
01a0 77f0       |w   |		Jump_Nonzero	0x191
01a1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xa.0xe = 0x1a1,0x406
01a2 702e       |p.  |		Jump_Nonzero	0x1d1
01a3 e20f       |    |		Load	0x1,0xf								; Debug Table 0xa.0xf = 0x1a3,0x407
01a4 0322       | "  |		Declare_Variable	Record
01a5 e5ff       |    |		Load	0x2,-0x1
01a6 e001       |    |		Load	0x0,0x1
01a7 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01a8 e001       |    |		Load	0x0,0x1
01a9 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01aa 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
01ab 00d9       |    |		Load_Top	At_Offset_1
01ac 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01ad e402       |    |		Load	0x2,0x2
01ae 0227       | '  |		Execute	Access,All_Reference
01af 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01b0 00d9       |    |		Load_Top	At_Offset_1
01b1 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01b2 e210       |    |		Load	0x1,0x10
01b3 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
01b4 e402       |    |		Load	0x2,0x2
01b5 0227       | '  |		Execute	Access,All_Reference
01b6 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01b7 0007       |    |		Action	Break_Optional							; Debug Table 0xa.0x10 = 0x1b7,0x408
01b8 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x11 = 0x1b8,0x409
01b9 0227       | '  |		Execute	Access,All_Reference
01ba 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
01bb 0a01       |    |		Execute_Immediate	Plus,0x1
01bc e402       |    |		Load	0x2,0x2
01bd 0227       | '  |		Execute	Access,All_Reference
01be 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
01bf 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0xa.0x12 = 0x1bf,0x40a
01c0 0227       | '  |		Execute	Access,All_Reference
01c1 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
01c2 003b       | ;  |		Store_Top	Access,At_Offset_3
01c3 780d       |x   |		Jump	0x1d1
01c4 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xa.0x13 = 0x1c4,0x40c
01c5 e402       |    |		Load	0x2,0x2
01c6 0227       | '  |		Execute	Access,All_Reference
01c7 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
01c8 0227       | '  |		Execute	Access,All_Reference
01c9 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01ca e5ff       |    |		Load	0x2,-0x1
01cb 821c       |    |		Call	0x1,0x1c
01cc c5fd       |    |		Store	0x2,-0x3
01cd 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x14 = 0x1cd,0x40d
01ce 0227       | '  |		Execute	Access,All_Reference
01cf 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
01d0 003b       | ;  |		Store_Top	Access,At_Offset_3
01d1 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xa.0x15 = 0x1d1,0x40b
01d2 77f1       |w   |		Jump_Nonzero	0x1c4
01d3 00d2       |    |		Pop_Control	Pop_Count_2
01d4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01d5 0000 0000  |    |		.XXX[0x3]
01d7 0000       |    |
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01dd       |    |		.CONST	0x01dd								; Address of begin
01d9 0004       |    |		.CONST	0x0004								; Address of exception handler
01da 0002       |    |		.CONST	0x0002								; Number of locals
01db			INIT_01d8:
01db e005       |    |		Load	0x0,0x5								; Debug Table 0xb = .DEBUG	0x01db,0x051c,0x0001,0x0000,0x005a,0x9595,0x0000,0x00da
													; Debug Table 0xb.0x0 = 0x1db,0xffff
01dc 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01dd			BODY_01d8:
01dd e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xb.0x1 = 0x1dd,0x1
01de e5fe       |    |		Load	0x2,-0x2
01df e005       |    |		Load	0x0,0x5
01e0 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
01e1 0039       | 9  |		Store_Top	Access,At_Offset_1
01e2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xb.0x2 = 0x1e2,0x2
01e3 0227       | '  |		Execute	Access,All_Reference
01e4 01d9       |    |		Execute	Vector,Reverse_Bounds
01e5 0263       | c  |		Execute	Discrete,Above_Bound
01e6 7009       |p   |		Jump_Nonzero	0x1f0
01e7 e5fc       |    |		Load	0x2,-0x4							; Debug Table 0xb.0x3 = 0x1e7,0x3
01e8 00d9       |    |		Load_Top	At_Offset_1
01e9 e402       |    |		Load	0x2,0x2
01ea 0227       | '  |		Execute	Access,All_Reference
01eb 01d7       |    |		Execute	Vector,Field_Read
01ec e5ff       |    |		Load	0x2,-0x1
01ed 821c       |    |		Call	0x1,0x1c
01ee c5fc       |    |		Store	0x2,-0x4
01ef 3ff7       |?   |		Loop_Increasing	0x1e7
01f0 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
01f1 0000 0000  |    |		.BLANK	0000[0x7]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01ff       |    |		.CONST	0x01ff								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0003       |    |		.CONST	0x0003								; Number of locals
01fb			INIT_01f8:
01fb e214       |    |		Load	0x1,0x14							; Debug Table 0xc = .DEBUG	0x01fb,0x0526,0x0001,0x0000,0x005a,0x9595,0x0000,0x00ed
													; Debug Table 0xc.0x0 = 0x1fb,0xffff
01fc 0007       |    |		Action	Break_Optional
01fd e20d       |    |		Load	0x1,0xd								; Debug Table 0xc.0x1 = 0x1fd,0xfffe
01fe 0007       |    |		Action	Break_Optional
01ff			BODY_01f8:
01ff e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc.0x2 = 0x1ff,0x1
0200 8225       | %  |		Call	0x1,0x25
0201 e20d       |    |		Load	0x1,0xd
0202 e001       |    |		Load	0x0,0x1
0203 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0204 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
0205 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0206 0007       |    |		Action	Break_Optional							; Debug Table 0xc.0x3 = 0x206,0x2
0207 e214       |    |		Load	0x1,0x14							; Debug Table 0xc.0x4 = 0x207,0x3
0208 e5fd       |    |		Load	0x2,-0x3
0209 e5fe       |    |		Load	0x2,-0x2
020a 821a       |    |		Call	0x1,0x1a
020b c5fd       |    |		Store	0x2,-0x3
020c 003a       | :  |		Store_Top	Access,At_Offset_2
020d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xc.0x5 = 0x20d,0x4
020e 6810       |h   |		Jump_Zero	0x21f
020f e211       |    |		Load	0x1,0x11							; Debug Table 0xc.0x6 = 0x20f,0x5
0210 0322       | "  |		Declare_Variable	Record
0211 00d9       |    |		Load_Top	At_Offset_1
0212 00d9       |    |		Load_Top	At_Offset_1
0213 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0214 00da       |    |		Load_Top	At_Offset_2
0215 0227       | '  |		Execute	Access,All_Reference
0216 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0217 00d9       |    |		Load_Top	At_Offset_1
0218 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0219 e212       |    |		Load	0x1,0x12
021a 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
021b 00da       |    |		Load_Top	At_Offset_2
021c 0227       | '  |		Execute	Access,All_Reference
021d 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
021e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
021f e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xc.0x7 = 0x21f,0x6
0220 e213       |    |		Load	0x1,0x13
0221 0322       | "  |		Declare_Variable	Record
0222 e5fe       |    |		Load	0x2,-0x2
0223 e20d       |    |		Load	0x1,0xd
0224 e001       |    |		Load	0x0,0x1
0225 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0226 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
0227 00d9       |    |		Load_Top	At_Offset_1
0228 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0229 e210       |    |		Load	0x1,0x10
022a 00d9       |    |		Load_Top	At_Offset_1
022b 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
022c 4800       |H   |		Short_Literal	0x0
022d 00d9       |    |		Load_Top	At_Offset_1
022e 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
022f e211       |    |		Load	0x1,0x11
0230 0322       | "  |		Declare_Variable	Record
0231 00db       |    |		Load_Top	At_Offset_3
0232 00d9       |    |		Load_Top	At_Offset_1
0233 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0234 e212       |    |		Load	0x1,0x12
0235 00d9       |    |		Load_Top	At_Offset_1
0236 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0237 e212       |    |		Load	0x1,0x12
0238 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0239 00d9       |    |		Load_Top	At_Offset_1
023a 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
023b 821b       |    |		Call	0x1,0x1b
023c c5fd       |    |		Store	0x2,-0x3
023d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xc.0x8 = 0x23d,0x7
023e 0000 0000  |    |		.XXX[0x2]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0248       | H  |		.CONST	0x0248								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0003       |    |		.CONST	0x0003								; Number of locals
0243			INIT_0240:
0243 e210       |    |		Load	0x1,0x10							; Debug Table 0xd = .DEBUG	0x0243,0x053a,0x0001,0x0000,0x005a,0x9595,0x0000,0x00fa
													; Debug Table 0xd.0x0 = 0x243,0xffff
0244 00db       |    |		Load_Top	At_Offset_3
0245 0039       | 9  |		Store_Top	Access,At_Offset_1
0246 e210       |    |		Load	0x1,0x10							; Debug Table 0xd.0x1 = 0x246,0xfffe
0247 0007       |    |		Action	Break_Optional
0248			BODY_0240:
0248 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xd.0x2 = 0x248,0x1
0249 7047       |pG  |		Jump_Nonzero	0x291
024a e213       |    |		Load	0x1,0x13							; Debug Table 0xd.0x3 = 0x24a,0x2
024b 0322       | "  |		Declare_Variable	Record
024c e20d       |    |		Load	0x1,0xd
024d 00d9       |    |		Load_Top	At_Offset_1
024e 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
024f e5ff       |    |		Load	0x2,-0x1
0250 00d9       |    |		Load_Top	At_Offset_1
0251 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0252 e5ff       |    |		Load	0x2,-0x1
0253 822f       | /  |		Call	0x1,0x2f
0254 00d9       |    |		Load_Top	At_Offset_1
0255 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0256 e212       |    |		Load	0x1,0x12
0257 00d9       |    |		Load_Top	At_Offset_1
0258 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
0259 e214       |    |		Load	0x1,0x14
025a 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
025b a5fe       |    |		Store_Unchecked	0x2,-0x2
025c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; Debug Table 0xd.0x4 = 0x25c,0x3
025d e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xd.0x5 = 0x25d,0x5
025e 0227       | '  |		Execute	Access,All_Reference
025f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0260 0039       | 9  |		Store_Top	Access,At_Offset_1
0261 7829       |x)  |		Jump	0x28b
0262 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x6 = 0x262,0x7
0263 0227       | '  |		Execute	Access,All_Reference
0264 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0265 0217       |    |		Execute	Heap_Access,All_Reference
0266 e5fe       |    |		Load	0x2,-0x2
0267 0227       | '  |		Execute	Access,All_Reference
0268 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0269 0227       | '  |		Execute	Access,All_Reference
026a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
026b 0217       |    |		Execute	Heap_Access,All_Reference
026c 01df       |    |		Execute	Vector,Equal
026d 6801       |h   |		Jump_Zero	0x26f
026e 781e       |x   |		Jump	0x28d								; Debug Table 0xd.0x7 = 0x26e,0x8
026f e20f       |    |		Load	0x1,0xf								; Debug Table 0xd.0x8 = 0x26f,0x9
0270 0322       | "  |		Declare_Variable	Record
0271 00da       |    |		Load_Top	At_Offset_2
0272 0227       | '  |		Execute	Access,All_Reference
0273 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0274 00d9       |    |		Load_Top	At_Offset_1
0275 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0276 e5fe       |    |		Load	0x2,-0x2
0277 0227       | '  |		Execute	Access,All_Reference
0278 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0279 00d9       |    |		Load_Top	At_Offset_1
027a 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
027b e210       |    |		Load	0x1,0x10
027c 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
027d e5fe       |    |		Load	0x2,-0x2
027e 0227       | '  |		Execute	Access,All_Reference
027f 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0280 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xd.0x9 = 0x280,0xa
0281 0227       | '  |		Execute	Access,All_Reference
0282 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0283 0a01       |    |		Execute_Immediate	Plus,0x1
0284 e5fe       |    |		Load	0x2,-0x2
0285 0227       | '  |		Execute	Access,All_Reference
0286 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
0287 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0xa = 0x287,0xb
0288 0227       | '  |		Execute	Access,All_Reference
0289 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
028a 0039       | 9  |		Store_Top	Access,At_Offset_1
028b 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0xb = 0x28b,0x6
028c 77d5       |w   |		Jump_Nonzero	0x262
028d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0xc = 0x28d,0xc
028e 0227       | '  |		Execute	Access,All_Reference
028f 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0290 003a       | :  |		Store_Top	Access,At_Offset_2
0291 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0xd = 0x291,0x4
0292 77ca       |w   |		Jump_Nonzero	0x25d
0293 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0294 0000 0000  |    |		.BLANK	0000[0x4]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b       |    |		.CONST	0x029b								; Address of begin
0299 0004       |    |		.CONST	0x0004								; Address of exception handler
029a 0001       |    |		.CONST	0x0001								; Number of locals
029b			BODY_0298:
029b			INIT_0298:
029b 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xe = .DEBUG	0x029b,0x0558,0x0002,0x0000,0x005a,0x9595,0x0000,0x0107
													; Debug Table 0xe.0x0 = 0x29b,0x1
029c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
029d 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
029e 0000 0000  |    |		.XXX[0x2]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a5       |    |		.CONST	0x02a5								; Address of begin
02a1 0004       |    |		.CONST	0x0004								; Address of exception handler
02a2 0002       |    |		.CONST	0x0002								; Number of locals
02a3			INIT_02a0:
02a3 e210       |    |		Load	0x1,0x10							; Debug Table 0xf = .DEBUG	0x02a3,0x055c,0x0001,0x0000,0x005a,0x9595,0x0000,0x0110
													; Debug Table 0xf.0x0 = 0x2a3,0xffff
02a4 0007       |    |		Action	Break_Optional
02a5			BODY_02a0:
02a5 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xf.0x1 = 0x2a5,0x1
02a6 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02a7 0217       |    |		Execute	Heap_Access,All_Reference
02a8 8225       | %  |		Call	0x1,0x25
02a9 e5ff       |    |		Load	0x2,-0x1
02aa e004       |    |		Load	0x0,0x4
02ab 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
02ac e5ff       |    |		Load	0x2,-0x1
02ad e227       | '  |		Load	0x1,0x27
02ae 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02af e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xf.0x2 = 0x2af,0x2
02b0 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
02b1 e5ff       |    |		Load	0x2,-0x1
02b2 e004       |    |		Load	0x0,0x4
02b3 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
02b4 e5ff       |    |		Load	0x2,-0x1
02b5 e226       | &  |		Load	0x1,0x26
02b6 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02b7 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xf.0x3 = 0x2b7,0x3
02b8 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02b9 0039       | 9  |		Store_Top	Access,At_Offset_1
02ba 780e       |x   |		Jump	0x2c9
02bb 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x4 = 0x2bb,0x5
02bc 0227       | '  |		Execute	Access,All_Reference
02bd 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
02be 0217       |    |		Execute	Heap_Access,All_Reference
02bf e5ff       |    |		Load	0x2,-0x1
02c0 e004       |    |		Load	0x0,0x4
02c1 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
02c2 e5ff       |    |		Load	0x2,-0x1
02c3 e227       | '  |		Load	0x1,0x27
02c4 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
02c5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x5 = 0x2c5,0x6
02c6 0227       | '  |		Execute	Access,All_Reference
02c7 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
02c8 0039       | 9  |		Store_Top	Access,At_Offset_1
02c9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x6 = 0x2c9,0x4
02ca 77f0       |w   |		Jump_Nonzero	0x2bb
02cb 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02cc 0000 0000  |    |		.BLANK	0000[0x4]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d7       |    |		.CONST	0x02d7								; Address of begin
02d1 0004       |    |		.CONST	0x0004								; Address of exception handler
02d2 0002       |    |		.CONST	0x0002								; Number of locals
02d3			INIT_02d0:
02d3 e213       |    |		Load	0x1,0x13							; Debug Table 0x10 = .DEBUG	0x02d3,0x056c,0x0001,0x0000,0x005a,0x9595,0x0000,0x011e
													; Debug Table 0x10.0x0 = 0x2d3,0xffff
02d4 0322       | "  |		Declare_Variable	Record
02d5 00d8       |    |		Load_Top	At_Offset_0
02d6 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02d7			BODY_02d0:
02d7 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x10.0x1 = 0x2d7,0x1
02d8 e5ff       |    |		Load	0x2,-0x1
02d9 e227       | '  |		Load	0x1,0x27
02da 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02db e20d       |    |		Load	0x1,0xd
02dc e5fe       |    |		Load	0x2,-0x2
02dd 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
02de 00d9       |    |		Load_Top	At_Offset_1
02df 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
02e0 0007       |    |		Action	Break_Optional							; Debug Table 0x10.0x2 = 0x2e0,0x2
02e1 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x10.0x3 = 0x2e1,0x3
02e2 e5ff       |    |		Load	0x2,-0x1
02e3 e227       | '  |		Load	0x1,0x27
02e4 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
02e5 c5fd       |    |		Store	0x2,-0x3
02e6 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x10.0x4 = 0x2e6,0x4
02e7 e5ff       |    |		Load	0x2,-0x1
02e8 e226       | &  |		Load	0x1,0x26
02e9 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02ea 00d9       |    |		Load_Top	At_Offset_1
02eb 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
02ec e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x10.0x5 = 0x2ec,0x5
02ed e5ff       |    |		Load	0x2,-0x1
02ee e226       | &  |		Load	0x1,0x26
02ef 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
02f0 c5fd       |    |		Store	0x2,-0x3
02f1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0x6 = 0x2f1,0x6
02f2 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
02f3 4801       |H   |		Short_Literal	0x1
02f4 0263       | c  |		Execute	Discrete,Above_Bound
02f5 701b       |p   |		Jump_Nonzero	0x311
02f6 e20f       |    |		Load	0x1,0xf								; Debug Table 0x10.0x7 = 0x2f6,0x7
02f7 0322       | "  |		Declare_Variable	Record
02f8 e5fd       |    |		Load	0x2,-0x3
02f9 e5ff       |    |		Load	0x2,-0x1
02fa e227       | '  |		Load	0x1,0x27
02fb 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02fc e001       |    |		Load	0x0,0x1
02fd 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02fe e5fe       |    |		Load	0x2,-0x2
02ff 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
0300 00d9       |    |		Load_Top	At_Offset_1
0301 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0302 00db       |    |		Load_Top	At_Offset_3
0303 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0304 00d9       |    |		Load_Top	At_Offset_1
0305 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0306 e210       |    |		Load	0x1,0x10
0307 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0308 00db       |    |		Load_Top	At_Offset_3
0309 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
030a 0007       |    |		Action	Break_Optional							; Debug Table 0x10.0x8 = 0x30a,0x8
030b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x10.0x9 = 0x30b,0x9
030c e5ff       |    |		Load	0x2,-0x1
030d e227       | '  |		Load	0x1,0x27
030e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
030f c5fd       |    |		Store	0x2,-0x3
0310 3fe5       |?   |		Loop_Increasing	0x2f6
0311 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x10.0xa = 0x311,0xa
0312 e5fc       |    |		Load	0x2,-0x4
0313 017d       | }  |		Execute	Record,Structure_Write
0314 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0315 0000 0000  |    |		.XXX[0x3]
0317 0000       |    |
0318 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000413}
031c 0000 0000  |    |		.LITERAL	{0x00000000, 0x005a95c5}
0320 0000 0000  |    |		.LITERAL	{0x00000000, 0x005a9595}
0324 0000 0000  |    |		.BLANK	0000[0x4]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b       | +  |		.CONST	0x032b								; Address of begin
0329 0004       |    |		.CONST	0x0004								; Address of exception handler
032a 0001       |    |		.CONST	0x0001								; Number of locals
032b			BODY_0328:
032b			INIT_0328:
032b 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x11 = .DEBUG	0x032b,0x0584,0x0001,0x0000,0x005a,0x9595,0x0000,0x0138
													; Debug Table 0x11.0x0 = 0x32b,0x1
032c 00db       |    |		Load_Top	At_Offset_3
032d 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
032e 821f       |    |		Call	0x1,0x1f
032f c5fe       |    |		Store	0x2,-0x2
0330 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0331 0000 0000  |    |		.BLANK	0000[0x7]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 033d       | =  |		.CONST	0x033d								; Address of begin
0339 0004       |    |		.CONST	0x0004								; Address of exception handler
033a 0002       |    |		.CONST	0x0002								; Number of locals
033b			INIT_0338:
033b e210       |    |		Load	0x1,0x10							; Debug Table 0x12 = .DEBUG	0x033b,0x0588,0x0001,0x0000,0x005a,0x95c5,0x0000,0x03c0
													; Debug Table 0x12.0x0 = 0x33b,0xffff
033c 0007       |    |		Action	Break_Optional
033d			BODY_0338:
033d e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x12.0x1 = 0x33d,0x1
033e 0217       |    |		Execute	Heap_Access,All_Reference
033f e5ff       |    |		Load	0x2,-0x1
0340 0227       | '  |		Execute	Access,All_Reference
0341 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0342 0217       |    |		Execute	Heap_Access,All_Reference
0343 01cc       |    |		Execute	Vector,Catenate
0344 0092 03a4  |    |		Action	Push_String_Extended,0x3a4					; " "
0346 01cc       |    |		Execute	Vector,Catenate
0347 e001       |    |		Load	0x0,0x1
0348 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0349 e001       |    |		Load	0x0,0x1
034a 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
034b 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
034c a5fe       |    |		Store_Unchecked	0x2,-0x2
034d 0007       |    |		Action	Break_Optional							; Debug Table 0x12.0x2 = 0x34d,0x2
034e 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x12.0x3 = 0x34e,0x3
034f 0227       | '  |		Execute	Access,All_Reference
0350 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0351 0039       | 9  |		Store_Top	Access,At_Offset_1
0352 7815       |x   |		Jump	0x368
0353 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x12.0x4 = 0x353,0x5
0354 0217       |    |		Execute	Heap_Access,All_Reference
0355 0092 03a4  |    |		Action	Push_String_Extended,0x3a4					; " "
0357 01cc       |    |		Execute	Vector,Catenate
0358 00d9       |    |		Load_Top	At_Offset_1
0359 0227       | '  |		Execute	Access,All_Reference
035a 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
035b 0217       |    |		Execute	Heap_Access,All_Reference
035c 01cc       |    |		Execute	Vector,Catenate
035d e001       |    |		Load	0x0,0x1
035e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
035f e001       |    |		Load	0x0,0x1
0360 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0361 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
0362 a5fe       |    |		Store_Unchecked	0x2,-0x2
0363 0007       |    |		Action	Break_Optional							; Debug Table 0x12.0x5 = 0x363,0x6
0364 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x6 = 0x364,0x7
0365 0227       | '  |		Execute	Access,All_Reference
0366 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0367 0039       | 9  |		Store_Top	Access,At_Offset_1
0368 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x7 = 0x368,0x4
0369 77e9       |w   |		Jump_Nonzero	0x353
036a 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
036b 0000 0000  |    |		.BLANK	0000[0x5]
0370 ; --------------------------------------------------------------------------------------
0370 ; SUBPROGRAM
0370 ; --------------------------------------------------------------------------------------
0370 037d       | }  |		.CONST	0x037d								; Address of begin
0371 0004       |    |		.CONST	0x0004								; Address of exception handler
0372 0002       |    |		.CONST	0x0002								; Number of locals
0373			INIT_0370:
0373 e001       |    |		Load	0x0,0x1								; Debug Table 0x13 = .DEBUG	0x0373,0x059a,0x0002,0x0000,0x005a,0x95c5,0x0000,0x041e
													; Debug Table 0x13.0x0 = 0x373,0xffff
0374 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0375 00ea       |    |		Load_Encached	Null_String_Cache
0376 e001       |    |		Load	0x0,0x1
0377 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0378 e001       |    |		Load	0x0,0x1
0379 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
037a 0396       |    |		Declare_Variable	Heap_Access,By_Allocation,With_Value
037b 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
037c 0007       |    |		Action	Break_Optional							; Debug Table 0x13.0x1 = 0x37c,0xfffe
037d			BODY_0370:
037d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x2 = 0x37d,0x1
037e e5ff       |    |		Load	0x2,-0x1
037f e229       | )  |		Load	0x1,0x29
0380 1d2a       | *  |		Execute_Immediate	Reference_Lex_1,0x2a
0381 1d2b       | +  |		Execute_Immediate	Reference_Lex_1,0x2b
0382 e224       | $  |		Load	0x1,0x24
0383 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0384 0031       | 1  |		Store_Top	Heap_Access,At_Offset_1
0385 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x3 = 0x385,0x2
0386 0217       |    |		Execute	Heap_Access,All_Reference
0387 0335       | 5  |		Declare_Variable	Array,Duplicate
0388 4404       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x4
0389 0000 0000  |    |		.BLANK	0000[0x7]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0398       |    |		.CONST	0x0398								; Address of begin
0391 0004       |    |		.CONST	0x0004								; Address of exception handler
0392 0003       |    |		.CONST	0x0003								; Number of locals
0393			INIT_0390:
0393 00e3       |    |		Load_Encached	Natural_Cache						; Debug Table 0x14 = .DEBUG	0x0393,0x05a4,0x0002,0x0000,0x005a,0x95c5,0x0000,0x0451
													; Debug Table 0x14.0x0 = 0x393,0xffff
0394 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0395 e210       |    |		Load	0x1,0x10							; Debug Table 0x14.0x1 = 0x395,0xfffe
0396 e5ff       |    |		Load	0x2,-0x1
0397 0039       | 9  |		Store_Top	Access,At_Offset_1
0398			BODY_0390:
0398 7807       |x   |		Jump	0x3a0
0399 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x14.0x2 = 0x399,0x2
039a 0a01       |    |		Execute_Immediate	Plus,0x1
039b 005a       | Z  |		Store_Top	Discrete,At_Offset_2
039c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x3 = 0x39c,0x3
039d 0227       | '  |		Execute	Access,All_Reference
039e 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
039f 0039       | 9  |		Store_Top	Access,At_Offset_1
03a0 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x4 = 0x3a0,0x1
03a1 77f7       |w   |		Jump_Nonzero	0x399
03a2 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x14.0x5 = 0x3a2,0x4
03a3 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
03a4 ; --------------------------------------------------------------------------------------
03a4 ; STRING TABLE
03a4 ; --------------------------------------------------------------------------------------
03a4 0004       |    |		.STRTAB	0x0004->0x03a6							; " "
03a5 0003       |    |		.STREND 0x0003->0x03a6
03a6 2000       |    |		.STRTAB_STRINGS
03a7 0000       |    |		.XXX[0x1]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; Debug Table
03a8 ; --------------------------------------------------------------------------------------
03a8 0003 0015  |    |		.CONST	0x0003,0x0015
03aa 000b 0452  |   R|		.DEBUG	0x000b,0x0452,0x8000,0x0000,0x005a,0x9595,0x0000,0x000f
03b2 0066 048c  | f  |		.DEBUG	0x0066,0x048c,0x8000,0x0000,0x005a,0x95c5,0x0000,0x0013
03ba 00b3 04be  |    |		.DEBUG	0x00b3,0x04be,0x0005,0x0000,0x005a,0x9595,0x0000,0x0051
03c2 00cb 04c0  |    |		.DEBUG	0x00cb,0x04c0,0x0001,0x0000,0x005a,0x9595,0x0000,0x006a
03ca 00db 04c4  |    |		.DEBUG	0x00db,0x04c4,0x0001,0x0000,0x005a,0x9595,0x0000,0x0078
03d2 00eb 04c8  |    |		.DEBUG	0x00eb,0x04c8,0x0001,0x0000,0x005a,0x9595,0x0000,0x0086
03da 00f3 04cc  |    |		.DEBUG	0x00f3,0x04cc,0x0001,0x0000,0x005a,0x9595,0x0000,0x0092
03e2 00fb 04d0  |    |		.DEBUG	0x00fb,0x04d0,0x0001,0x0000,0x005a,0x9595,0x0000,0x009c
03ea 010b 04d4  |    |		.DEBUG	0x010b,0x04d4,0x0001,0x0000,0x005a,0x9595,0x0000,0x00ae
03f2 0133 04e2  | 3  |		.DEBUG	0x0133,0x04e2,0x0001,0x0000,0x005a,0x9595,0x0000,0x00be
03fa 015b 04ee  | [  |		.DEBUG	0x015b,0x04ee,0x0001,0x0000,0x005a,0x9595,0x0000,0x00ca
0402 01db 051c  |    |		.DEBUG	0x01db,0x051c,0x0001,0x0000,0x005a,0x9595,0x0000,0x00da
040a 01fb 0526  |   &|		.DEBUG	0x01fb,0x0526,0x0001,0x0000,0x005a,0x9595,0x0000,0x00ed
0412 0243 053a  | C :|		.DEBUG	0x0243,0x053a,0x0001,0x0000,0x005a,0x9595,0x0000,0x00fa
041a 029b 0558  |   X|		.DEBUG	0x029b,0x0558,0x0002,0x0000,0x005a,0x9595,0x0000,0x0107
0422 02a3 055c  |   \|		.DEBUG	0x02a3,0x055c,0x0001,0x0000,0x005a,0x9595,0x0000,0x0110
042a 02d3 056c  |   l|		.DEBUG	0x02d3,0x056c,0x0001,0x0000,0x005a,0x9595,0x0000,0x011e
0432 032b 0584  | +  |		.DEBUG	0x032b,0x0584,0x0001,0x0000,0x005a,0x9595,0x0000,0x0138
043a 033b 0588  | ;  |		.DEBUG	0x033b,0x0588,0x0001,0x0000,0x005a,0x95c5,0x0000,0x03c0
0442 0373 059a  | s  |		.DEBUG	0x0373,0x059a,0x0002,0x0000,0x005a,0x95c5,0x0000,0x041e
044a 0393 05a4  |    |		.DEBUG	0x0393,0x05a4,0x0002,0x0000,0x005a,0x95c5,0x0000,0x0451
0452 ; --------------------------------------------------------------------------------------
0452 ; Debug3 Subtable 0x0
0452 ; --------------------------------------------------------------------------------------
0452 001c 0000  |    |		.DBG3TAB	0x001c,0x0000
0454 000b ffff  |    |		.CONST	0x000b,0xffff
0456 000e fffe  |    |		.CONST	0x000e,0xfffe
0458 000f fffd  |    |		.CONST	0x000f,0xfffd
045a 0011 fffc  |    |		.CONST	0x0011,0xfffc
045c 0015 fffb  |    |		.CONST	0x0015,0xfffb
045e 001b fffa  |    |		.CONST	0x001b,0xfffa
0460 001d fff9  |    |		.CONST	0x001d,0xfff9
0462 0021 fff8  | !  |		.CONST	0x0021,0xfff8
0464 0026 fff7  | &  |		.CONST	0x0026,0xfff7
0466 0028 fff6  | (  |		.CONST	0x0028,0xfff6
0468 002c fff5  | ,  |		.CONST	0x002c,0xfff5
046a 0034 fff4  | 4  |		.CONST	0x0034,0xfff4
046c 0036 fff3  | 6  |		.CONST	0x0036,0xfff3
046e 0038 fff2  | 8  |		.CONST	0x0038,0xfff2
0470 003a fff1  | :  |		.CONST	0x003a,0xfff1
0472 003c fff0  | <  |		.CONST	0x003c,0xfff0
0474 003e ffef  | >  |		.CONST	0x003e,0xffef
0476 0040 ffee  | @  |		.CONST	0x0040,0xffee
0478 0042 ffed  | B  |		.CONST	0x0042,0xffed
047a 0044 ffec  | D  |		.CONST	0x0044,0xffec
047c 0046 ffeb  | F  |		.CONST	0x0046,0xffeb
047e 0048 ffea  | H  |		.CONST	0x0048,0xffea
0480 004a ffe9  | J  |		.CONST	0x004a,0xffe9
0482 004c ffe8  | L  |		.CONST	0x004c,0xffe8
0484 004e ffe7  | N  |		.CONST	0x004e,0xffe7
0486 0050 ffe6  | P  |		.CONST	0x0050,0xffe6
0488 0052 ffe5  | R  |		.CONST	0x0052,0xffe5
048a 0061 ffe4  | a  |		.CONST	0x0061,0xffe4
048c ; --------------------------------------------------------------------------------------
048c ; Debug3 Subtable 0x1
048c ; --------------------------------------------------------------------------------------
048c 0017 0001  |    |		.DBG3TAB	0x0017,0x0001
048e 0066 ffff  | f  |		.CONST	0x0066,0xffff
0490 0069 fffe  | i  |		.CONST	0x0069,0xfffe
0492 006b fffd  | k  |		.CONST	0x006b,0xfffd
0494 006d fffc  | m  |		.CONST	0x006d,0xfffc
0496 006f fffb  | o  |		.CONST	0x006f,0xfffb
0498 0071 fffa  | q  |		.CONST	0x0071,0xfffa
049a 0073 fff9  | s  |		.CONST	0x0073,0xfff9
049c 0075 fff8  | u  |		.CONST	0x0075,0xfff8
049e 0077 fff7  | w  |		.CONST	0x0077,0xfff7
04a0 0079 fff6  | y  |		.CONST	0x0079,0xfff6
04a2 007b fff5  | {  |		.CONST	0x007b,0xfff5
04a4 007d fff4  | }  |		.CONST	0x007d,0xfff4
04a6 007e fff3  | ~  |		.CONST	0x007e,0xfff3
04a8 0086 fff2  |    |		.CONST	0x0086,0xfff2
04aa 008e fff1  |    |		.CONST	0x008e,0xfff1
04ac 0090 fff0  |    |		.CONST	0x0090,0xfff0
04ae 0092 ffef  |    |		.CONST	0x0092,0xffef
04b0 0094 ffee  |    |		.CONST	0x0094,0xffee
04b2 0096 ffed  |    |		.CONST	0x0096,0xffed
04b4 00a0 ffec  |    |		.CONST	0x00a0,0xffec
04b6 00a2 ffeb  |    |		.CONST	0x00a2,0xffeb
04b8 00a4 ffea  |    |		.CONST	0x00a4,0xffea
04ba 00a6 ffe9  |    |		.CONST	0x00a6,0xffe9
04bc 00a8 0001  |    |		.CONST	0x00a8,0x0001
04be ; --------------------------------------------------------------------------------------
04be ; Debug3 Subtable 0x2
04be ; --------------------------------------------------------------------------------------
04be 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
04c0 ; --------------------------------------------------------------------------------------
04c0 ; Debug3 Subtable 0x3
04c0 ; --------------------------------------------------------------------------------------
04c0 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
04c2 00cb 0001  |    |		.CONST	0x00cb,0x0001
04c4 ; --------------------------------------------------------------------------------------
04c4 ; Debug3 Subtable 0x4
04c4 ; --------------------------------------------------------------------------------------
04c4 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
04c6 00db 0001  |    |		.CONST	0x00db,0x0001
04c8 ; --------------------------------------------------------------------------------------
04c8 ; Debug3 Subtable 0x5
04c8 ; --------------------------------------------------------------------------------------
04c8 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
04ca 00eb 0001  |    |		.CONST	0x00eb,0x0001
04cc ; --------------------------------------------------------------------------------------
04cc ; Debug3 Subtable 0x6
04cc ; --------------------------------------------------------------------------------------
04cc 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
04ce 00f3 0001  |    |		.CONST	0x00f3,0x0001
04d0 ; --------------------------------------------------------------------------------------
04d0 ; Debug3 Subtable 0x7
04d0 ; --------------------------------------------------------------------------------------
04d0 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
04d2 00fb 0001  |    |		.CONST	0x00fb,0x0001
04d4 ; --------------------------------------------------------------------------------------
04d4 ; Debug3 Subtable 0x8
04d4 ; --------------------------------------------------------------------------------------
04d4 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
04d6 010b ffff  |    |		.CONST	0x010b,0xffff
04d8 010c 0001  |    |		.CONST	0x010c,0x0001
04da 0112 0002  |    |		.CONST	0x0112,0x0002
04dc 0114 0003  |    |		.CONST	0x0114,0x0003
04de 0118 0004  |    |		.CONST	0x0118,0x0004
04e0 011b 0005  |    |		.CONST	0x011b,0x0005
04e2 ; --------------------------------------------------------------------------------------
04e2 ; Debug3 Subtable 0x9
04e2 ; --------------------------------------------------------------------------------------
04e2 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
04e4 0133 ffff  | 3  |		.CONST	0x0133,0xffff
04e6 0138 0001  | 8  |		.CONST	0x0138,0x0001
04e8 0141 0002  | A  |		.CONST	0x0141,0x0002
04ea 0142 0003  | B  |		.CONST	0x0142,0x0003
04ec 0149 0004  | I  |		.CONST	0x0149,0x0004
04ee ; --------------------------------------------------------------------------------------
04ee ; Debug3 Subtable 0xa
04ee ; --------------------------------------------------------------------------------------
04ee 0004 0012  |    |		.DBG3TAB	0x0004,0x0012
04f0 015b ffff  | [  |		.CONST	0x015b,0xffff
04f2 015d fffe  | ]  |		.CONST	0x015d,0xfffe
04f4 015f 0001  | _  |		.CONST	0x015f,0x0001
04f6 0166 0002  | f  |		.CONST	0x0166,0x0002
04f8 0168 0003  | h  |		.CONST	0x0168,0x0003
04fa 0187 0004  |    |		.CONST	0x0187,0x0004
04fc 0188 0005  |    |		.CONST	0x0188,0x0005
04fe 0189 fbff  |    |		.CONST	0x0189,0xfbff
0500 018e fbfe  |    |		.CONST	0x018e,0xfbfe
0502 0191 0402  |    |		.CONST	0x0191,0x0402
0504 0198 0403  |    |		.CONST	0x0198,0x0403
0506 019a 0404  |    |		.CONST	0x019a,0x0404
0508 019b 0405  |    |		.CONST	0x019b,0x0405
050a 019f 0401  |    |		.CONST	0x019f,0x0401
050c 01a1 0406  |    |		.CONST	0x01a1,0x0406
050e 01a3 0407  |    |		.CONST	0x01a3,0x0407
0510 01b7 0408  |    |		.CONST	0x01b7,0x0408
0512 01b8 0409  |    |		.CONST	0x01b8,0x0409
0514 01bf 040a  |    |		.CONST	0x01bf,0x040a
0516 01c4 040c  |    |		.CONST	0x01c4,0x040c
0518 01cd 040d  |    |		.CONST	0x01cd,0x040d
051a 01d1 040b  |    |		.CONST	0x01d1,0x040b
051c ; --------------------------------------------------------------------------------------
051c ; Debug3 Subtable 0xb
051c ; --------------------------------------------------------------------------------------
051c 0001 0003  |    |		.DBG3TAB	0x0001,0x0003
051e 01db ffff  |    |		.CONST	0x01db,0xffff
0520 01dd 0001  |    |		.CONST	0x01dd,0x0001
0522 01e2 0002  |    |		.CONST	0x01e2,0x0002
0524 01e7 0003  |    |		.CONST	0x01e7,0x0003
0526 ; --------------------------------------------------------------------------------------
0526 ; Debug3 Subtable 0xc
0526 ; --------------------------------------------------------------------------------------
0526 0002 0007  |    |		.DBG3TAB	0x0002,0x0007
0528 01fb ffff  |    |		.CONST	0x01fb,0xffff
052a 01fd fffe  |    |		.CONST	0x01fd,0xfffe
052c 01ff 0001  |    |		.CONST	0x01ff,0x0001
052e 0206 0002  |    |		.CONST	0x0206,0x0002
0530 0207 0003  |    |		.CONST	0x0207,0x0003
0532 020d 0004  |    |		.CONST	0x020d,0x0004
0534 020f 0005  |    |		.CONST	0x020f,0x0005
0536 021f 0006  |    |		.CONST	0x021f,0x0006
0538 023d 0007  | =  |		.CONST	0x023d,0x0007
053a ; --------------------------------------------------------------------------------------
053a ; Debug3 Subtable 0xd
053a ; --------------------------------------------------------------------------------------
053a 0002 000c  |    |		.DBG3TAB	0x0002,0x000c
053c 0243 ffff  | C  |		.CONST	0x0243,0xffff
053e 0246 fffe  | F  |		.CONST	0x0246,0xfffe
0540 0248 0001  | H  |		.CONST	0x0248,0x0001
0542 024a 0002  | J  |		.CONST	0x024a,0x0002
0544 025c 0003  | \  |		.CONST	0x025c,0x0003
0546 025d 0005  | ]  |		.CONST	0x025d,0x0005
0548 0262 0007  | b  |		.CONST	0x0262,0x0007
054a 026e 0008  | n  |		.CONST	0x026e,0x0008
054c 026f 0009  | o  |		.CONST	0x026f,0x0009
054e 0280 000a  |    |		.CONST	0x0280,0x000a
0550 0287 000b  |    |		.CONST	0x0287,0x000b
0552 028b 0006  |    |		.CONST	0x028b,0x0006
0554 028d 000c  |    |		.CONST	0x028d,0x000c
0556 0291 0004  |    |		.CONST	0x0291,0x0004
0558 ; --------------------------------------------------------------------------------------
0558 ; Debug3 Subtable 0xe
0558 ; --------------------------------------------------------------------------------------
0558 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
055a 029b 0001  |    |		.CONST	0x029b,0x0001
055c ; --------------------------------------------------------------------------------------
055c ; Debug3 Subtable 0xf
055c ; --------------------------------------------------------------------------------------
055c 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
055e 02a3 ffff  |    |		.CONST	0x02a3,0xffff
0560 02a5 0001  |    |		.CONST	0x02a5,0x0001
0562 02af 0002  |    |		.CONST	0x02af,0x0002
0564 02b7 0003  |    |		.CONST	0x02b7,0x0003
0566 02bb 0005  |    |		.CONST	0x02bb,0x0005
0568 02c5 0006  |    |		.CONST	0x02c5,0x0006
056a 02c9 0004  |    |		.CONST	0x02c9,0x0004
056c ; --------------------------------------------------------------------------------------
056c ; Debug3 Subtable 0x10
056c ; --------------------------------------------------------------------------------------
056c 0001 000a  |    |		.DBG3TAB	0x0001,0x000a
056e 02d3 ffff  |    |		.CONST	0x02d3,0xffff
0570 02d7 0001  |    |		.CONST	0x02d7,0x0001
0572 02e0 0002  |    |		.CONST	0x02e0,0x0002
0574 02e1 0003  |    |		.CONST	0x02e1,0x0003
0576 02e6 0004  |    |		.CONST	0x02e6,0x0004
0578 02ec 0005  |    |		.CONST	0x02ec,0x0005
057a 02f1 0006  |    |		.CONST	0x02f1,0x0006
057c 02f6 0007  |    |		.CONST	0x02f6,0x0007
057e 030a 0008  |    |		.CONST	0x030a,0x0008
0580 030b 0009  |    |		.CONST	0x030b,0x0009
0582 0311 000a  |    |		.CONST	0x0311,0x000a
0584 ; --------------------------------------------------------------------------------------
0584 ; Debug3 Subtable 0x11
0584 ; --------------------------------------------------------------------------------------
0584 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0586 032b 0001  | +  |		.CONST	0x032b,0x0001
0588 ; --------------------------------------------------------------------------------------
0588 ; Debug3 Subtable 0x12
0588 ; --------------------------------------------------------------------------------------
0588 0001 0007  |    |		.DBG3TAB	0x0001,0x0007
058a 033b ffff  | ;  |		.CONST	0x033b,0xffff
058c 033d 0001  | =  |		.CONST	0x033d,0x0001
058e 034d 0002  | M  |		.CONST	0x034d,0x0002
0590 034e 0003  | N  |		.CONST	0x034e,0x0003
0592 0353 0005  | S  |		.CONST	0x0353,0x0005
0594 0363 0006  | c  |		.CONST	0x0363,0x0006
0596 0364 0007  | d  |		.CONST	0x0364,0x0007
0598 0368 0004  | h  |		.CONST	0x0368,0x0004
059a ; --------------------------------------------------------------------------------------
059a ; Debug3 Subtable 0x13
059a ; --------------------------------------------------------------------------------------
059a 0002 0002  |    |		.DBG3TAB	0x0002,0x0002
059c 0373 ffff  | s  |		.CONST	0x0373,0xffff
059e 037c fffe  | |  |		.CONST	0x037c,0xfffe
05a0 037d 0001  | }  |		.CONST	0x037d,0x0001
05a2 0385 0002  |    |		.CONST	0x0385,0x0002
05a4 ; --------------------------------------------------------------------------------------
05a4 ; Debug3 Subtable 0x14
05a4 ; --------------------------------------------------------------------------------------
05a4 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
05a6 0393 ffff  |    |		.CONST	0x0393,0xffff
05a8 0395 fffe  |    |		.CONST	0x0395,0xfffe
05aa 0399 0002  |    |		.CONST	0x0399,0x0002
05ac 039c 0003  |    |		.CONST	0x039c,0x0003
05ae 03a0 0001  |    |		.CONST	0x03a0,0x0001
05b0 03a2 0004  |    |		.CONST	0x03a2,0x0004
05b2 0000 0000  |    |		.BLANK	0000[0x4e]