DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 DFS Tapes

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 DFS Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦730736c09⟧ SEG

    Length: 3072 (0xc00)
    Types: SEG
    Notes: 5805_R1K_CODE
    Names: »11170833.SEG«

Derivation

└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
    └─ ⟦this⟧ »11170833.SEG« 
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
    └─ ⟦this⟧ »11170833.SEG« 
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
    └─ ⟦this⟧ »11170833.SEG« 
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
    └─ ⟦this⟧ »11170833.SEG« 
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
    └─ ⟦this⟧ »11170833.SEG« 

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5805       |X   |		.CONST	0x5805								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 02f0       |    |		.CONST	0x02f0								; 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 0102       |    |		.CONST	0x0102								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0050       | P  |		.CONST	0x0050								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0021       | !  |		.CONST	0x0021								; Number of locals
000b			INIT_0008:
000b 029a 005b  |   [|		Declare_Subprogram	INIT_0058,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0 = .DEBUG	0x000b,0x036a,0x8000,0x0000,0x000e,0x1a14,0x0000,0x0008
													; Debug Table 0x0.0x0 = 0xb,0xffff
000d 0007       |    |		Action	Break_Optional							; Debug Table 0x0.0x1 = 0xd,0xfffe
000e 029a 007b  |   {|		Declare_Subprogram	INIT_0078,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x2 = 0xe,0xfffd
0010 029a 00ab  |    |		Declare_Subprogram	INIT_00a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x3 = 0x10,0xfffc
0012 029a 00cb  |    |		Declare_Subprogram	INIT_00c8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x4 = 0x12,0xfffb
0014 029a 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x5 = 0x14,0xfffa
0016 029a 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x6 = 0x16,0xfff9
0018 029a 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x18,0xfff8
001a 029a 014b  |   K|		Declare_Subprogram	INIT_0148,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x8 = 0x1a,0xfff7
001c 029a 015b  |   [|		Declare_Subprogram	INIT_0158,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x9 = 0x1c,0xfff6
001e 029a 027b  |   {|		Declare_Subprogram	INIT_0278,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xa = 0x1e,0xfff5
0020 029a 02ab  |    |		Declare_Subprogram	INIT_02a8,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0xb = 0x20,0xfff4
0022 00bf       |    |		Action	Accept_Activation
0023 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x0023,0x0384,0x8000,0x0000,0x000e,0x1b64,0x0000,0x0015
													; Debug Table 0x1.0x0 = 0x23,0xffff
0024 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0x24,0xfffe
0025 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0x25,0xfffd
0026 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x3 = 0x26,0xfffc
0027 00c7       |    |		Action	Elaborate_Subprogram
0028 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd				; Debug Table 0x1.0x4 = 0x28,0xfffb
0029 00c7       |    |		Action	Elaborate_Subprogram
002a 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x5 = 0x2a,0xfffa
002b 00c7       |    |		Action	Elaborate_Subprogram
002c 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x6 = 0x2c,0xfff9
002d 00c7       |    |		Action	Elaborate_Subprogram
002e 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x7 = 0x2e,0xfff8
002f 00c7       |    |		Action	Elaborate_Subprogram
0030 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x8 = 0x30,0xfff7
0031 00c7       |    |		Action	Elaborate_Subprogram
0032 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x9 = 0x32,0xfff6
0033 00c7       |    |		Action	Elaborate_Subprogram
0034 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0xa = 0x34,0xfff5
0035 193b       | ;  |		Execute	Package,Field_Reference,Field_Number 0x3b
0036 00c6       |    |		Action	Check_Subprogram_Elaborated
0037 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
0038 62a3       |b   |		Indirect_Literal	Discrete,0x2dc,{0x00000000, 0x000e1b64}
0039 4b4f       |KO  |		Short_Literal	0x34f
003a 4800       |H   |		Short_Literal	0x0
003b 0007       |    |		Action	Break_Optional
003c 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0xb = 0x3c,0xfff4
003d 00c7       |    |		Action	Elaborate_Subprogram
003e 029d 02bb  |    |		Declare_Subprogram	INIT_02b8,For_Outer_Call			; Debug Table 0x1.0xc = 0x3e,0xfff3
0040 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0xd = 0x40,0xfff2
0041 00c7       |    |		Action	Elaborate_Subprogram
0042 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0xe = 0x42,0xfff1
0043 00c7       |    |		Action	Elaborate_Subprogram
0044 e001       |    |		Load	0x0,0x1								; Debug Table 0x1.0xf = 0x44,0xfff0
0045 193c       | <  |		Execute	Package,Field_Reference,Field_Number 0x3c
0046 00c6       |    |		Action	Check_Subprogram_Elaborated
0047 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0048 6293       |b   |		Indirect_Literal	Discrete,0x2dc,{0x00000000, 0x000e1b64}
0049 628e       |b   |		Indirect_Literal	Discrete,0x2d8,{0x00000000, 0x00000438}
004a 4800       |H   |		Short_Literal	0x0
004b 0007       |    |		Action	Break_Optional
004c 029d 02e3  |    |		Declare_Subprogram	INIT_02e0,For_Outer_Call			; Debug Table 0x1.0x10 = 0x4c,0xffef
004e 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x11 = 0x4e,0xffee
004f 00c7       |    |		Action	Elaborate_Subprogram
0050			BODY_0008:
0050 00bc       |    |		Action	Signal_Activated
0051 00bb       |    |		Action	Signal_Completion
0052 0000 0000  |    |		.BLANK	0000[0x6]
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005d       | ]  |		.CONST	0x005d								; Address of begin
0059 0004       |    |		.CONST	0x0004								; Address of exception handler
005a 0002       |    |		.CONST	0x0002								; Number of locals
005b			INIT_0058:
005b e002       |    |		Load	0x0,0x2								; Debug Table 0x2 = .DEBUG	0x005b,0x03aa,0x0001,0x0000,0x000e,0x1a14,0x0000,0x0009
													; Debug Table 0x2.0x0 = 0x5b,0xffff
005c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
005d			BODY_0058:
005d e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0x1 = 0x5d,0x1
005e 8213       |    |		Call	0x1,0x13
005f a402       |    |		Store_Unchecked	0x2,0x2
0060 e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x2 = 0x60,0x2
0061 7005       |p   |		Jump_Nonzero	0x67
0062 e5ff       |    |		Load	0x2,-0x1
0063 8211       |    |		Call	0x1,0x11
0064 6802       |h   |		Jump_Zero	0x67
0065 626e       |bn  |		Indirect_Literal	Discrete,0x2d4,{0x00000000, 0x0e1a1401}		; Debug Table 0x2.0x3 = 0x65,0x3
0066 0257       | W  |		Execute	Discrete,Raise
0067 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x2.0x4 = 0x67,0x4
0068 e5fe       |    |		Load	0x2,-0x2
0069 e5ff       |    |		Load	0x2,-0x1
006a e003       |    |		Load	0x0,0x3
006b 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
006c 00d1       |    |		Pop_Control	Pop_Count_1
006d e402       |    |		Load	0x2,0x2								; Debug Table 0x2.0x5 = 0x6d,0x5
006e 6807       |h   |		Jump_Zero	0x76
006f e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x2.0x6 = 0x6f,0x6
0070 e5fc       |    |		Load	0x2,-0x4
0071 e402       |    |		Load	0x2,0x2
0072 e001       |    |		Load	0x0,0x1
0073 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0074 00d1       |    |		Pop_Control	Pop_Count_1
0075 c5fb       |    |		Store	0x2,-0x5
0076 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0077 0000       |    |		.XXX[0x1]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 0084       |    |		.CONST	0x0084								; Address of begin
0079 0004       |    |		.CONST	0x0004								; Address of exception handler
007a 0005       |    |		.CONST	0x0005								; Number of locals
007b			INIT_0078:
007b e002       |    |		Load	0x0,0x2								; Debug Table 0x3 = .DEBUG	0x007b,0x03ba,0x0001,0x0000,0x000e,0x1a14,0x0000,0x002e
													; Debug Table 0x3.0x0 = 0x7b,0xffff
007c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
007d e004       |    |		Load	0x0,0x4								; Debug Table 0x3.0x1 = 0x7d,0xfffe
007e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
007f 0322       | "  |		Declare_Variable	Record
0080 e403       |    |		Load	0x2,0x3
0081 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0082 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x3.0x2 = 0x82,0xfffd
0083 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x3.0x3 = 0x83,0xfffc
0084			BODY_0078:
0084 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x3.0x4 = 0x84,0x1
0085 e403       |    |		Load	0x2,0x3
0086 e5ff       |    |		Load	0x2,-0x1
0087 e5fe       |    |		Load	0x2,-0x2
0088 e003       |    |		Load	0x0,0x3
0089 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
008a 00d1       |    |		Pop_Control	Pop_Count_1
008b c404       |    |		Store	0x2,0x4
008c e404       |    |		Load	0x2,0x4								; Debug Table 0x3.0x5 = 0x8c,0x2
008d 6813       |h   |		Jump_Zero	0xa1
008e e403       |    |		Load	0x2,0x3								; Debug Table 0x3.0x6 = 0x8e,0x3
008f 8213       |    |		Call	0x1,0x13
0090 a402       |    |		Store_Unchecked	0x2,0x2
0091 e402       |    |		Load	0x2,0x2								; Debug Table 0x3.0x7 = 0x91,0x4
0092 6809       |h   |		Jump_Zero	0x9c
0093 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x3.0x8 = 0x93,0x5
0094 e5fc       |    |		Load	0x2,-0x4
0095 e5fd       |    |		Load	0x2,-0x3
0096 e402       |    |		Load	0x2,0x2
0097 e001       |    |		Load	0x0,0x1
0098 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0099 00d1       |    |		Pop_Control	Pop_Count_1
009a c5fc       |    |		Store	0x2,-0x4
009b c405       |    |		Store	0x2,0x5
009c e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x3.0x9 = 0x9c,0x6
009d e5ff       |    |		Load	0x2,-0x1
009e e003       |    |		Load	0x0,0x3
009f 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00a0 00d1       |    |		Pop_Control	Pop_Count_1
00a1 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
00a2 0000 0000  |    |		.BLANK	0000[0x6]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab       |    |		.CONST	0x00ab								; Address of begin
00a9 0004       |    |		.CONST	0x0004								; Address of exception handler
00aa 0001       |    |		.CONST	0x0001								; Number of locals
00ab			BODY_00a8:
00ab			INIT_00a8:
00ab e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x4 = .DEBUG	0x00ab,0x03d0,0x0001,0x0000,0x000e,0x1a14,0x0000,0x0048
													; Debug Table 0x4.0x0 = 0xab,0x1
00ac e003       |    |		Load	0x0,0x3
00ad 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
00ae 00d1       |    |		Pop_Control	Pop_Count_1
00af 4800       |H   |		Short_Literal	0x0							; Debug Table 0x4.0x1 = 0xaf,0x2
00b0 a5fb       |    |		Store_Unchecked	0x2,-0x5
00b1 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x4.0x2 = 0xb1,0x3
00b2 4801       |H   |		Short_Literal	0x1
00b3 0263       | c  |		Execute	Discrete,Above_Bound
00b4 700c       |p   |		Jump_Nonzero	0xc1
00b5 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x4.0x3 = 0xb5,0x4
00b6 e5fc       |    |		Load	0x2,-0x4
00b7 e5fd       |    |		Load	0x2,-0x3
00b8 4800       |H   |		Short_Literal	0x0
00b9 e403       |    |		Load	0x2,0x3
00ba e5ff       |    |		Load	0x2,-0x1
00bb e003       |    |		Load	0x0,0x3
00bc 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
00bd 820d       |    |		Call	0x1,0xd
00be 00d2       |    |		Pop_Control	Pop_Count_2
00bf c5fb       |    |		Store	0x2,-0x5
00c0 3ff4       |?   |		Loop_Increasing	0xb5
00c1 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
00c2 0000 0000  |    |		.BLANK	0000[0x6]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cf       |    |		.CONST	0x00cf								; Address of begin
00c9 0004       |    |		.CONST	0x0004								; Address of exception handler
00ca 0003       |    |		.CONST	0x0003								; Number of locals
00cb			INIT_00c8:
00cb e002       |    |		Load	0x0,0x2								; Debug Table 0x5 = .DEBUG	0x00cb,0x03da,0x0001,0x0000,0x000e,0x1a14,0x0000,0x0066
													; Debug Table 0x5.0x0 = 0xcb,0xffff
00cc 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
00cd 0337       | 7  |		Declare_Variable	Array
00ce 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x5.0x1 = 0xce,0xfffe
00cf			BODY_00c8:
00cf e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x5.0x2 = 0xcf,0x1
00d0 e402       |    |		Load	0x2,0x2
00d1 01d4       |    |		Execute	Vector,Structure_Write
00d2 e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x3 = 0xd2,0x2
00d3 e5ff       |    |		Load	0x2,-0x1
00d4 8217       |    |		Call	0x1,0x17
00d5 01d2       |    |		Execute	Vector,Or
00d6 e402       |    |		Load	0x2,0x2
00d7 01d4       |    |		Execute	Vector,Structure_Write
00d8 e402       |    |		Load	0x2,0x2								; Debug Table 0x5.0x4 = 0xd8,0x3
00d9 e5ff       |    |		Load	0x2,-0x1
00da 821c       |    |		Call	0x1,0x1c
00db e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x5.0x5 = 0xdb,0x4
00dc e5ff       |    |		Load	0x2,-0x1
00dd 1d1d       |    |		Execute_Immediate	Reference_Lex_1,0x1d
00de 1d1e       |    |		Execute_Immediate	Reference_Lex_1,0x1e
00df e001       |    |		Load	0x0,0x1
00e0 183c       | <  |		Execute	Package,Field_Execute,Field_Number 0x3c
00e1 0279       | y  |		Execute	Discrete,And
00e2 a403       |    |		Store_Unchecked	0x2,0x3
00e3 e403       |    |		Load	0x2,0x3								; Debug Table 0x5.0x6 = 0xe3,0x5
00e4 e5ff       |    |		Load	0x2,-0x1
00e5 8221       | !  |		Call	0x1,0x21
00e6 e005       |    |		Load	0x0,0x5								; Debug Table 0x5.0x7 = 0xe6,0x6
00e7 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
00e8 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00e9 0000 0000  |    |		.BLANK	0000[0x7]
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 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x6 = .DEBUG	0x00f3,0x03ec,0x0002,0x0000,0x000e,0x1a14,0x0000,0x007c
													; Debug Table 0x6.0x0 = 0xf3,0x1
00f4 e004       |    |		Load	0x0,0x4
00f5 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
00f6 700e       |p   |		Jump_Nonzero	0x105
00f7 e5ff       |    |		Load	0x2,-0x1
00f8 e004       |    |		Load	0x0,0x4
00f9 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
00fa 680a       |h   |		Jump_Zero	0x105
00fb e5ff       |    |		Load	0x2,-0x1
00fc e004       |    |		Load	0x0,0x4
00fd 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
00fe 6806       |h   |		Jump_Zero	0x105
00ff e5ff       |    |		Load	0x2,-0x1
0100 e004       |    |		Load	0x0,0x4
0101 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0102 6802       |h   |		Jump_Zero	0x105
0103 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x1 = 0x103,0x2
0104 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0105 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x2 = 0x105,0x3
0106 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
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 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x7 = .DEBUG	0x010b,0x03f4,0x0002,0x0000,0x000e,0x1a14,0x0000,0x0087
													; Debug Table 0x7.0x0 = 0x10b,0xffff
010c			BODY_0108:
010c 4801       |H   |		Short_Literal	0x1							; Debug Table 0x7.0x1 = 0x10c,0x1
010d a402       |    |		Store_Unchecked	0x2,0x2
010e e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x7.0x2 = 0x10e,0x2
010f e003       |    |		Load	0x0,0x3
0110 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0111 4801       |H   |		Short_Literal	0x1
0112 0263       | c  |		Execute	Discrete,Above_Bound
0113 7009       |p   |		Jump_Nonzero	0x11d
0114 e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x3 = 0x114,0x3
0115 e404       |    |		Load	0x2,0x4
0116 e5ff       |    |		Load	0x2,-0x1
0117 e003       |    |		Load	0x0,0x3
0118 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0119 8211       |    |		Call	0x1,0x11
011a 0279       | y  |		Execute	Discrete,And
011b a402       |    |		Store_Unchecked	0x2,0x2
011c 3ff7       |?   |		Loop_Increasing	0x114
011d e402       |    |		Load	0x2,0x2								; Debug Table 0x7.0x4 = 0x11d,0x4
011e 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
011f 0000       |    |		.XXX[0x1]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0125       | %  |		.CONST	0x0125								; Address of begin
0121 0141       | A  |		.CONST	0x0141								; Address of exception handler
0122 0002       |    |		.CONST	0x0002								; Number of locals
0123			INIT_0120:
0123 e002       |    |		Load	0x0,0x2								; Debug Table 0x8 = .DEBUG	0x0123,0x0400,0x0002,0x0000,0x000e,0x1a14,0x0000,0x0092
													; Debug Table 0x8.0x0 = 0x123,0xffff
0124 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0125			BODY_0120:
0125 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x1 = 0x125,0x1
0126 e004       |    |		Load	0x0,0x4
0127 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0128 7002       |p   |		Jump_Nonzero	0x12b
0129 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0x2 = 0x129,0x2
012a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
012b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x8.0x3 = 0x12b,0x3
012c e004       |    |		Load	0x0,0x4
012d 1825       | %  |		Execute	Package,Field_Execute,Field_Number 0x25
012e e5ff       |    |		Load	0x2,-0x1
012f e004       |    |		Load	0x0,0x4
0130 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0131 e5ff       |    |		Load	0x2,-0x1
0132 e004       |    |		Load	0x0,0x4
0133 1823       | #  |		Execute	Package,Field_Execute,Field_Number 0x23
0134 e006       |    |		Load	0x0,0x6
0135 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0136 e5ff       |    |		Load	0x2,-0x1
0137 e004       |    |		Load	0x0,0x4
0138 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
0139 e007       |    |		Load	0x0,0x7
013a 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
013b 025b       | [  |		Execute	Discrete,Check_In_Type
013c e008       |    |		Load	0x0,0x8
013d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
013e a402       |    |		Store_Unchecked	0x2,0x2
013f e402       |    |		Load	0x2,0x2								; Debug Table 0x8.0x4 = 0x13f,0x4
0140 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0141			TRAP_0120:
0141 0007       |    |		Action	Break_Optional
0142 4800       |H   |		Short_Literal	0x0							; Debug Table 0x8.0x5 = 0x142,0x5
0143 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0144 0000 0000  |    |		.BLANK	0000[0x4]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b       | K  |		.CONST	0x014b								; Address of begin
0149 0004       |    |		.CONST	0x0004								; Address of exception handler
014a 0001       |    |		.CONST	0x0001								; Number of locals
014b			BODY_0148:
014b			INIT_0148:
014b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x9 = .DEBUG	0x014b,0x040e,0x0002,0x0000,0x000e,0x1a14,0x0000,0x00a1
													; Debug Table 0x9.0x0 = 0x14b,0x1
014c e5fe       |    |		Load	0x2,-0x2
014d 01d2       |    |		Execute	Vector,Or
014e e002       |    |		Load	0x0,0x2
014f 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0150 01c3       |    |		Execute	Vector,Check_In_Type
0151 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0152 0000 0000  |    |		.BLANK	0000[0x6]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b       | [  |		.CONST	0x015b								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0001       |    |		.CONST	0x0001								; Number of locals
015b			BODY_0158:
015b			INIT_0158:
015b e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa = .DEBUG	0x015b,0x0412,0x0002,0x0000,0x000e,0x1a14,0x0000,0x00b3
													; Debug Table 0xa.0x0 = 0x15b,0x1
015c e004       |    |		Load	0x0,0x4
015d 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
015e 4602       |F   |		Jump_Case	0x3
015f 7802       |x   |		Jump	0x162								; case 0x0
0160 78d9       |x   |		Jump	0x23a								; case 0x1
0161 7910       |y   |		Jump	0x272								; case 0x2
0162 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0x1 = 0x162,0x2
0163 e004       |    |		Load	0x0,0x4
0164 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
0165 4605       |F   |		Jump_Case	0x6
0166 7805       |x   |		Jump	0x16c								; case 0x0
0167 783a       |x:  |		Jump	0x1a2								; case 0x1
0168 7865       |xe  |		Jump	0x1ce								; case 0x2
0169 7838       |x8  |		Jump	0x1a2								; case 0x3
016a 7863       |xc  |		Jump	0x1ce								; case 0x4
016b 7898       |x   |		Jump	0x204								; case 0x5
016c e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0x2 = 0x16c,0x3
016d 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
016e 0337       | 7  |		Declare_Variable	Array
016f 4801       |H   |		Short_Literal	0x1
0170 4801       |H   |		Short_Literal	0x1
0171 e402       |    |		Load	0x2,0x2
0172 01d6       |    |		Execute	Vector,Field_Write
0173 4801       |H   |		Short_Literal	0x1
0174 4802       |H   |		Short_Literal	0x2
0175 e402       |    |		Load	0x2,0x2
0176 01d6       |    |		Execute	Vector,Field_Write
0177 4801       |H   |		Short_Literal	0x1
0178 4803       |H   |		Short_Literal	0x3
0179 e402       |    |		Load	0x2,0x2
017a 01d6       |    |		Execute	Vector,Field_Write
017b 4801       |H   |		Short_Literal	0x1
017c 4809       |H   |		Short_Literal	0x9
017d e402       |    |		Load	0x2,0x2
017e 01d6       |    |		Execute	Vector,Field_Write
017f 4801       |H   |		Short_Literal	0x1
0180 4804       |H   |		Short_Literal	0x4
0181 e402       |    |		Load	0x2,0x2
0182 01d6       |    |		Execute	Vector,Field_Write
0183 4801       |H   |		Short_Literal	0x1
0184 4805       |H   |		Short_Literal	0x5
0185 e402       |    |		Load	0x2,0x2
0186 01d6       |    |		Execute	Vector,Field_Write
0187 4801       |H   |		Short_Literal	0x1
0188 4806       |H   |		Short_Literal	0x6
0189 e402       |    |		Load	0x2,0x2
018a 01d6       |    |		Execute	Vector,Field_Write
018b 4801       |H   |		Short_Literal	0x1
018c 4807       |H   |		Short_Literal	0x7
018d e402       |    |		Load	0x2,0x2
018e 01d6       |    |		Execute	Vector,Field_Write
018f 4800       |H   |		Short_Literal	0x0
0190 4800       |H   |		Short_Literal	0x0
0191 e402       |    |		Load	0x2,0x2
0192 01d6       |    |		Execute	Vector,Field_Write
0193 4800       |H   |		Short_Literal	0x0
0194 4808       |H   |		Short_Literal	0x8
0195 e402       |    |		Load	0x2,0x2
0196 01d6       |    |		Execute	Vector,Field_Write
0197 480f       |H   |		Short_Literal	0xf
0198 480a       |H   |		Short_Literal	0xa
0199 4800       |H   |		Short_Literal	0x0
019a e404       |    |		Load	0x2,0x4
019b e402       |    |		Load	0x2,0x2
019c 01d6       |    |		Execute	Vector,Field_Write
019d 3ffb       |?   |		Loop_Increasing	0x199
019e e002       |    |		Load	0x0,0x2
019f 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
01a0 01c3       |    |		Execute	Vector,Check_In_Type
01a1 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01a2 e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0x3 = 0x1a2,0x4
01a3 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
01a4 0337       | 7  |		Declare_Variable	Array
01a5 4801       |H   |		Short_Literal	0x1
01a6 4803       |H   |		Short_Literal	0x3
01a7 e402       |    |		Load	0x2,0x2
01a8 01d6       |    |		Execute	Vector,Field_Write
01a9 4801       |H   |		Short_Literal	0x1
01aa 4809       |H   |		Short_Literal	0x9
01ab e402       |    |		Load	0x2,0x2
01ac 01d6       |    |		Execute	Vector,Field_Write
01ad 4801       |H   |		Short_Literal	0x1
01ae 4805       |H   |		Short_Literal	0x5
01af e402       |    |		Load	0x2,0x2
01b0 01d6       |    |		Execute	Vector,Field_Write
01b1 4802       |H   |		Short_Literal	0x2
01b2 4800       |H   |		Short_Literal	0x0
01b3 4800       |H   |		Short_Literal	0x0
01b4 e404       |    |		Load	0x2,0x4
01b5 e402       |    |		Load	0x2,0x2
01b6 01d6       |    |		Execute	Vector,Field_Write
01b7 3ffb       |?   |		Loop_Increasing	0x1b3
01b8 4800       |H   |		Short_Literal	0x0
01b9 4804       |H   |		Short_Literal	0x4
01ba e402       |    |		Load	0x2,0x2
01bb 01d6       |    |		Execute	Vector,Field_Write
01bc 4808       |H   |		Short_Literal	0x8
01bd 4806       |H   |		Short_Literal	0x6
01be 4800       |H   |		Short_Literal	0x0
01bf e404       |    |		Load	0x2,0x4
01c0 e402       |    |		Load	0x2,0x2
01c1 01d6       |    |		Execute	Vector,Field_Write
01c2 3ffb       |?   |		Loop_Increasing	0x1be
01c3 480f       |H   |		Short_Literal	0xf
01c4 480a       |H   |		Short_Literal	0xa
01c5 4800       |H   |		Short_Literal	0x0
01c6 e404       |    |		Load	0x2,0x4
01c7 e402       |    |		Load	0x2,0x2
01c8 01d6       |    |		Execute	Vector,Field_Write
01c9 3ffb       |?   |		Loop_Increasing	0x1c5
01ca e002       |    |		Load	0x0,0x2
01cb 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
01cc 01c3       |    |		Execute	Vector,Check_In_Type
01cd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ce e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0x4 = 0x1ce,0x5
01cf 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
01d0 0337       | 7  |		Declare_Variable	Array
01d1 4801       |H   |		Short_Literal	0x1
01d2 4801       |H   |		Short_Literal	0x1
01d3 e402       |    |		Load	0x2,0x2
01d4 01d6       |    |		Execute	Vector,Field_Write
01d5 4801       |H   |		Short_Literal	0x1
01d6 4802       |H   |		Short_Literal	0x2
01d7 e402       |    |		Load	0x2,0x2
01d8 01d6       |    |		Execute	Vector,Field_Write
01d9 4801       |H   |		Short_Literal	0x1
01da 4803       |H   |		Short_Literal	0x3
01db e402       |    |		Load	0x2,0x2
01dc 01d6       |    |		Execute	Vector,Field_Write
01dd 4801       |H   |		Short_Literal	0x1
01de 4809       |H   |		Short_Literal	0x9
01df e402       |    |		Load	0x2,0x2
01e0 01d6       |    |		Execute	Vector,Field_Write
01e1 4801       |H   |		Short_Literal	0x1
01e2 4804       |H   |		Short_Literal	0x4
01e3 e402       |    |		Load	0x2,0x2
01e4 01d6       |    |		Execute	Vector,Field_Write
01e5 4801       |H   |		Short_Literal	0x1
01e6 4805       |H   |		Short_Literal	0x5
01e7 e402       |    |		Load	0x2,0x2
01e8 01d6       |    |		Execute	Vector,Field_Write
01e9 4801       |H   |		Short_Literal	0x1
01ea 4806       |H   |		Short_Literal	0x6
01eb e402       |    |		Load	0x2,0x2
01ec 01d6       |    |		Execute	Vector,Field_Write
01ed 4800       |H   |		Short_Literal	0x0
01ee 4800       |H   |		Short_Literal	0x0
01ef e402       |    |		Load	0x2,0x2
01f0 01d6       |    |		Execute	Vector,Field_Write
01f1 4800       |H   |		Short_Literal	0x0
01f2 4807       |H   |		Short_Literal	0x7
01f3 e402       |    |		Load	0x2,0x2
01f4 01d6       |    |		Execute	Vector,Field_Write
01f5 4800       |H   |		Short_Literal	0x0
01f6 4808       |H   |		Short_Literal	0x8
01f7 e402       |    |		Load	0x2,0x2
01f8 01d6       |    |		Execute	Vector,Field_Write
01f9 480f       |H   |		Short_Literal	0xf
01fa 480a       |H   |		Short_Literal	0xa
01fb 4800       |H   |		Short_Literal	0x0
01fc e404       |    |		Load	0x2,0x4
01fd e402       |    |		Load	0x2,0x2
01fe 01d6       |    |		Execute	Vector,Field_Write
01ff 3ffb       |?   |		Loop_Increasing	0x1fb
0200 e002       |    |		Load	0x0,0x2
0201 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0202 01c3       |    |		Execute	Vector,Check_In_Type
0203 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0204 e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0x5 = 0x204,0x6
0205 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0206 0337       | 7  |		Declare_Variable	Array
0207 4801       |H   |		Short_Literal	0x1
0208 4801       |H   |		Short_Literal	0x1
0209 e402       |    |		Load	0x2,0x2
020a 01d6       |    |		Execute	Vector,Field_Write
020b 4801       |H   |		Short_Literal	0x1
020c 4802       |H   |		Short_Literal	0x2
020d e402       |    |		Load	0x2,0x2
020e 01d6       |    |		Execute	Vector,Field_Write
020f 4801       |H   |		Short_Literal	0x1
0210 4803       |H   |		Short_Literal	0x3
0211 e402       |    |		Load	0x2,0x2
0212 01d6       |    |		Execute	Vector,Field_Write
0213 4801       |H   |		Short_Literal	0x1
0214 4809       |H   |		Short_Literal	0x9
0215 e402       |    |		Load	0x2,0x2
0216 01d6       |    |		Execute	Vector,Field_Write
0217 4801       |H   |		Short_Literal	0x1
0218 4804       |H   |		Short_Literal	0x4
0219 e402       |    |		Load	0x2,0x2
021a 01d6       |    |		Execute	Vector,Field_Write
021b 4801       |H   |		Short_Literal	0x1
021c 4805       |H   |		Short_Literal	0x5
021d e402       |    |		Load	0x2,0x2
021e 01d6       |    |		Execute	Vector,Field_Write
021f 4801       |H   |		Short_Literal	0x1
0220 4806       |H   |		Short_Literal	0x6
0221 e402       |    |		Load	0x2,0x2
0222 01d6       |    |		Execute	Vector,Field_Write
0223 4800       |H   |		Short_Literal	0x0
0224 4800       |H   |		Short_Literal	0x0
0225 e402       |    |		Load	0x2,0x2
0226 01d6       |    |		Execute	Vector,Field_Write
0227 4800       |H   |		Short_Literal	0x0
0228 4807       |H   |		Short_Literal	0x7
0229 e402       |    |		Load	0x2,0x2
022a 01d6       |    |		Execute	Vector,Field_Write
022b 4800       |H   |		Short_Literal	0x0
022c 4808       |H   |		Short_Literal	0x8
022d e402       |    |		Load	0x2,0x2
022e 01d6       |    |		Execute	Vector,Field_Write
022f 480f       |H   |		Short_Literal	0xf
0230 480a       |H   |		Short_Literal	0xa
0231 4800       |H   |		Short_Literal	0x0
0232 e404       |    |		Load	0x2,0x4
0233 e402       |    |		Load	0x2,0x2
0234 01d6       |    |		Execute	Vector,Field_Write
0235 3ffb       |?   |		Loop_Increasing	0x231
0236 e002       |    |		Load	0x0,0x2
0237 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0238 01c3       |    |		Execute	Vector,Check_In_Type
0239 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
023a e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xa.0x6 = 0x23a,0x7
023b e004       |    |		Load	0x0,0x4
023c 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
023d 681a       |h   |		Jump_Zero	0x258
023e e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0x7 = 0x23e,0x8
023f 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0240 0337       | 7  |		Declare_Variable	Array
0241 4801       |H   |		Short_Literal	0x1
0242 480d       |H   |		Short_Literal	0xd
0243 e402       |    |		Load	0x2,0x2
0244 01d6       |    |		Execute	Vector,Field_Write
0245 480c       |H   |		Short_Literal	0xc
0246 4800       |H   |		Short_Literal	0x0
0247 4800       |H   |		Short_Literal	0x0
0248 e404       |    |		Load	0x2,0x4
0249 e402       |    |		Load	0x2,0x2
024a 01d6       |    |		Execute	Vector,Field_Write
024b 3ffb       |?   |		Loop_Increasing	0x247
024c 4800       |H   |		Short_Literal	0x0
024d 480e       |H   |		Short_Literal	0xe
024e e402       |    |		Load	0x2,0x2
024f 01d6       |    |		Execute	Vector,Field_Write
0250 4800       |H   |		Short_Literal	0x0
0251 480f       |H   |		Short_Literal	0xf
0252 e402       |    |		Load	0x2,0x2
0253 01d6       |    |		Execute	Vector,Field_Write
0254 e002       |    |		Load	0x0,0x2
0255 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0256 01c3       |    |		Execute	Vector,Check_In_Type
0257 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0258 e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0x8 = 0x258,0x9
0259 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
025a 0337       | 7  |		Declare_Variable	Array
025b 4801       |H   |		Short_Literal	0x1
025c 480d       |H   |		Short_Literal	0xd
025d e402       |    |		Load	0x2,0x2
025e 01d6       |    |		Execute	Vector,Field_Write
025f 4801       |H   |		Short_Literal	0x1
0260 480e       |H   |		Short_Literal	0xe
0261 e402       |    |		Load	0x2,0x2
0262 01d6       |    |		Execute	Vector,Field_Write
0263 480c       |H   |		Short_Literal	0xc
0264 4800       |H   |		Short_Literal	0x0
0265 4800       |H   |		Short_Literal	0x0
0266 e404       |    |		Load	0x2,0x4
0267 e402       |    |		Load	0x2,0x2
0268 01d6       |    |		Execute	Vector,Field_Write
0269 3ffb       |?   |		Loop_Increasing	0x265
026a 4800       |H   |		Short_Literal	0x0
026b 480f       |H   |		Short_Literal	0xf
026c e402       |    |		Load	0x2,0x2
026d 01d6       |    |		Execute	Vector,Field_Write
026e e002       |    |		Load	0x0,0x2
026f 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
0270 01c3       |    |		Execute	Vector,Check_In_Type
0271 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0272 e002       |    |		Load	0x0,0x2								; Debug Table 0xa.0x9 = 0x272,0xa
0273 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
0274 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0275 0000 0000  |    |		.XXX[0x3]
0277 0000       |    |
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027e       | ~  |		.CONST	0x027e								; Address of begin
0279 0004       |    |		.CONST	0x0004								; Address of exception handler
027a 0002       |    |		.CONST	0x0002								; Number of locals
027b			INIT_0278:
027b e002       |    |		Load	0x0,0x2								; Debug Table 0xb = .DEBUG	0x027b,0x0428,0x0002,0x0000,0x000e,0x1a14,0x0000,0x00c2
													; Debug Table 0xb.0x0 = 0x27b,0xffff
027c 1b1c       |    |		Execute	Package,Field_Read,Field_Number 0x1c
027d 0337       | 7  |		Declare_Variable	Array
027e			BODY_0278:
027e e002       |    |		Load	0x0,0x2								; Debug Table 0xb.0x1 = 0x27e,0x1
027f 1b23       | #  |		Execute	Package,Field_Read,Field_Number 0x23
0280 e402       |    |		Load	0x2,0x2
0281 01d4       |    |		Execute	Vector,Structure_Write
0282 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xb.0x2 = 0x282,0x2
0283 e003       |    |		Load	0x0,0x3
0284 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0285 4801       |H   |		Short_Literal	0x1
0286 0263       | c  |		Execute	Discrete,Above_Bound
0287 700a       |p   |		Jump_Nonzero	0x292
0288 e404       |    |		Load	0x2,0x4								; Debug Table 0xb.0x3 = 0x288,0x3
0289 e5ff       |    |		Load	0x2,-0x1
028a e003       |    |		Load	0x0,0x3
028b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
028c 8215       |    |		Call	0x1,0x15
028d e402       |    |		Load	0x2,0x2
028e 8214       |    |		Call	0x1,0x14
028f e402       |    |		Load	0x2,0x2
0290 01d4       |    |		Execute	Vector,Structure_Write
0291 3ff6       |?   |		Loop_Increasing	0x288
0292 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xb.0x4 = 0x292,0x4
0293 e003       |    |		Load	0x0,0x3
0294 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0295 4801       |H   |		Short_Literal	0x1
0296 0263       | c  |		Execute	Discrete,Above_Bound
0297 700a       |p   |		Jump_Nonzero	0x2a2
0298 e404       |    |		Load	0x2,0x4								; Debug Table 0xb.0x5 = 0x298,0x5
0299 e5fe       |    |		Load	0x2,-0x2
029a e003       |    |		Load	0x0,0x3
029b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
029c 8215       |    |		Call	0x1,0x15
029d e402       |    |		Load	0x2,0x2
029e 8214       |    |		Call	0x1,0x14
029f e402       |    |		Load	0x2,0x2
02a0 01d4       |    |		Execute	Vector,Structure_Write
02a1 3ff6       |?   |		Loop_Increasing	0x298
02a2 e402       |    |		Load	0x2,0x2								; Debug Table 0xb.0x6 = 0x2a2,0x6
02a3 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
02a4 0000 0000  |    |		.BLANK	0000[0x4]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab       |    |		.CONST	0x02ab								; Address of begin
02a9 0004       |    |		.CONST	0x0004								; Address of exception handler
02aa 0001       |    |		.CONST	0x0001								; Number of locals
02ab			BODY_02a8:
02ab			INIT_02a8:
02ab e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xc = .DEBUG	0x02ab,0x0438,0x0002,0x0000,0x000e,0x1a14,0x0000,0x00d7
													; Debug Table 0xc.0x0 = 0x2ab,0x1
02ac 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
02ad 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
02ae e001       |    |		Load	0x0,0x1
02af 183b       | ;  |		Execute	Package,Field_Execute,Field_Number 0x3b
02b0 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
02b1 0000 0000  |    |		.BLANK	0000[0x7]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb       |    |		.CONST	0x02bb								; Address of begin
02b9 02cf       |    |		.CONST	0x02cf								; Address of exception handler
02ba 0001       |    |		.CONST	0x0001								; Number of locals
02bb			BODY_02b8:
02bb			INIT_02b8:
02bb e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xd = .DEBUG	0x02bb,0x043c,0x0001,0x0000,0x000e,0x1b64,0x0000,0x0371
													; Debug Table 0xd.0x0 = 0x2bb,0x1
02bc e5ff       |    |		Load	0x2,-0x1
02bd e001       |    |		Load	0x0,0x1
02be 1829       | )  |		Execute	Package,Field_Execute,Field_Number 0x29
02bf e5ff       |    |		Load	0x2,-0x1							; Debug Table 0xd.0x1 = 0x2bf,0x2
02c0 e001       |    |		Load	0x0,0x1
02c1 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
02c2 4604       |F   |		Jump_Case	0x5
02c3 7804       |x   |		Jump	0x2c8								; case 0x0
02c4 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; case 0x1
02c5 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; case 0x2
02c6 7801       |x   |		Jump	0x2c8								; case 0x3
02c7 7800       |x   |		Jump	0x2c8								; case 0x4
02c8 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xd.0x2 = 0x2c8,0x4
02c9 e5ff       |    |		Load	0x2,-0x1
02ca e009       |    |		Load	0x0,0x9
02cb 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
02cc e002       |    |		Load	0x0,0x2
02cd 1847       | G  |		Execute	Package,Field_Execute,Field_Number 0x47
02ce 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02cf			TRAP_02b8:
02cf 0007       |    |		Action	Break_Optional
02d0 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0xd.0x3 = 0x2d0,0x5
02d1 0000 0000  |    |		.XXX[0x3]
02d3 0000       |    |
02d4 0000 0000  |    |		.LITERAL	{0x00000000, 0x0e1a1401}
02d8 0000 0000  |    |		.LITERAL	{0x00000000, 0x00000438}
02dc 0000 0000  |    |		.LITERAL	{0x00000000, 0x000e1b64}
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e3       |    |		.CONST	0x02e3								; Address of begin
02e1 0004       |    |		.CONST	0x0004								; Address of exception handler
02e2 0001       |    |		.CONST	0x0001								; Number of locals
02e3			BODY_02e0:
02e3			INIT_02e0:
02e3 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0xe = .DEBUG	0x02e3,0x0446,0x0001,0x0000,0x000e,0x1b64,0x0000,0x0442
													; Debug Table 0xe.0x0 = 0x2e3,0x1
02e4 e5ff       |    |		Load	0x2,-0x1
02e5 e001       |    |		Load	0x0,0x1
02e6 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
02e7 e005       |    |		Load	0x0,0x5
02e8 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
02e9 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
02ea 0000 0000  |    |		.BLANK	0000[0x6]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; Debug Table
02f0 ; --------------------------------------------------------------------------------------
02f0 0003 000f  |    |		.CONST	0x0003,0x000f
02f2 000b 036a  |   j|		.DEBUG	0x000b,0x036a,0x8000,0x0000,0x000e,0x1a14,0x0000,0x0008
02fa 0023 0384  | #  |		.DEBUG	0x0023,0x0384,0x8000,0x0000,0x000e,0x1b64,0x0000,0x0015
0302 005b 03aa  | [  |		.DEBUG	0x005b,0x03aa,0x0001,0x0000,0x000e,0x1a14,0x0000,0x0009
030a 007b 03ba  | {  |		.DEBUG	0x007b,0x03ba,0x0001,0x0000,0x000e,0x1a14,0x0000,0x002e
0312 00ab 03d0  |    |		.DEBUG	0x00ab,0x03d0,0x0001,0x0000,0x000e,0x1a14,0x0000,0x0048
031a 00cb 03da  |    |		.DEBUG	0x00cb,0x03da,0x0001,0x0000,0x000e,0x1a14,0x0000,0x0066
0322 00f3 03ec  |    |		.DEBUG	0x00f3,0x03ec,0x0002,0x0000,0x000e,0x1a14,0x0000,0x007c
032a 010b 03f4  |    |		.DEBUG	0x010b,0x03f4,0x0002,0x0000,0x000e,0x1a14,0x0000,0x0087
0332 0123 0400  | #  |		.DEBUG	0x0123,0x0400,0x0002,0x0000,0x000e,0x1a14,0x0000,0x0092
033a 014b 040e  | K  |		.DEBUG	0x014b,0x040e,0x0002,0x0000,0x000e,0x1a14,0x0000,0x00a1
0342 015b 0412  | [  |		.DEBUG	0x015b,0x0412,0x0002,0x0000,0x000e,0x1a14,0x0000,0x00b3
034a 027b 0428  | { (|		.DEBUG	0x027b,0x0428,0x0002,0x0000,0x000e,0x1a14,0x0000,0x00c2
0352 02ab 0438  |   8|		.DEBUG	0x02ab,0x0438,0x0002,0x0000,0x000e,0x1a14,0x0000,0x00d7
035a 02bb 043c  |   <|		.DEBUG	0x02bb,0x043c,0x0001,0x0000,0x000e,0x1b64,0x0000,0x0371
0362 02e3 0446  |   F|		.DEBUG	0x02e3,0x0446,0x0001,0x0000,0x000e,0x1b64,0x0000,0x0442
036a ; --------------------------------------------------------------------------------------
036a ; Debug3 Subtable 0x0
036a ; --------------------------------------------------------------------------------------
036a 000c 0000  |    |		.DBG3TAB	0x000c,0x0000
036c 000b ffff  |    |		.CONST	0x000b,0xffff
036e 000d fffe  |    |		.CONST	0x000d,0xfffe
0370 000e fffd  |    |		.CONST	0x000e,0xfffd
0372 0010 fffc  |    |		.CONST	0x0010,0xfffc
0374 0012 fffb  |    |		.CONST	0x0012,0xfffb
0376 0014 fffa  |    |		.CONST	0x0014,0xfffa
0378 0016 fff9  |    |		.CONST	0x0016,0xfff9
037a 0018 fff8  |    |		.CONST	0x0018,0xfff8
037c 001a fff7  |    |		.CONST	0x001a,0xfff7
037e 001c fff6  |    |		.CONST	0x001c,0xfff6
0380 001e fff5  |    |		.CONST	0x001e,0xfff5
0382 0020 fff4  |    |		.CONST	0x0020,0xfff4
0384 ; --------------------------------------------------------------------------------------
0384 ; Debug3 Subtable 0x1
0384 ; --------------------------------------------------------------------------------------
0384 0012 0000  |    |		.DBG3TAB	0x0012,0x0000
0386 0023 ffff  | #  |		.CONST	0x0023,0xffff
0388 0024 fffe  | $  |		.CONST	0x0024,0xfffe
038a 0025 fffd  | %  |		.CONST	0x0025,0xfffd
038c 0026 fffc  | &  |		.CONST	0x0026,0xfffc
038e 0028 fffb  | (  |		.CONST	0x0028,0xfffb
0390 002a fffa  | *  |		.CONST	0x002a,0xfffa
0392 002c fff9  | ,  |		.CONST	0x002c,0xfff9
0394 002e fff8  | .  |		.CONST	0x002e,0xfff8
0396 0030 fff7  | 0  |		.CONST	0x0030,0xfff7
0398 0032 fff6  | 2  |		.CONST	0x0032,0xfff6
039a 0034 fff5  | 4  |		.CONST	0x0034,0xfff5
039c 003c fff4  | <  |		.CONST	0x003c,0xfff4
039e 003e fff3  | >  |		.CONST	0x003e,0xfff3
03a0 0040 fff2  | @  |		.CONST	0x0040,0xfff2
03a2 0042 fff1  | B  |		.CONST	0x0042,0xfff1
03a4 0044 fff0  | D  |		.CONST	0x0044,0xfff0
03a6 004c ffef  | L  |		.CONST	0x004c,0xffef
03a8 004e ffee  | N  |		.CONST	0x004e,0xffee
03aa ; --------------------------------------------------------------------------------------
03aa ; Debug3 Subtable 0x2
03aa ; --------------------------------------------------------------------------------------
03aa 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
03ac 005b ffff  | [  |		.CONST	0x005b,0xffff
03ae 005d 0001  | ]  |		.CONST	0x005d,0x0001
03b0 0060 0002  | `  |		.CONST	0x0060,0x0002
03b2 0065 0003  | e  |		.CONST	0x0065,0x0003
03b4 0067 0004  | g  |		.CONST	0x0067,0x0004
03b6 006d 0005  | m  |		.CONST	0x006d,0x0005
03b8 006f 0006  | o  |		.CONST	0x006f,0x0006
03ba ; --------------------------------------------------------------------------------------
03ba ; Debug3 Subtable 0x3
03ba ; --------------------------------------------------------------------------------------
03ba 0004 0006  |    |		.DBG3TAB	0x0004,0x0006
03bc 007b ffff  | {  |		.CONST	0x007b,0xffff
03be 007d fffe  | }  |		.CONST	0x007d,0xfffe
03c0 0082 fffd  |    |		.CONST	0x0082,0xfffd
03c2 0083 fffc  |    |		.CONST	0x0083,0xfffc
03c4 0084 0001  |    |		.CONST	0x0084,0x0001
03c6 008c 0002  |    |		.CONST	0x008c,0x0002
03c8 008e 0003  |    |		.CONST	0x008e,0x0003
03ca 0091 0004  |    |		.CONST	0x0091,0x0004
03cc 0093 0005  |    |		.CONST	0x0093,0x0005
03ce 009c 0006  |    |		.CONST	0x009c,0x0006
03d0 ; --------------------------------------------------------------------------------------
03d0 ; Debug3 Subtable 0x4
03d0 ; --------------------------------------------------------------------------------------
03d0 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
03d2 00ab 0001  |    |		.CONST	0x00ab,0x0001
03d4 00af 0002  |    |		.CONST	0x00af,0x0002
03d6 00b1 0003  |    |		.CONST	0x00b1,0x0003
03d8 00b5 0004  |    |		.CONST	0x00b5,0x0004
03da ; --------------------------------------------------------------------------------------
03da ; Debug3 Subtable 0x5
03da ; --------------------------------------------------------------------------------------
03da 0002 0006  |    |		.DBG3TAB	0x0002,0x0006
03dc 00cb ffff  |    |		.CONST	0x00cb,0xffff
03de 00ce fffe  |    |		.CONST	0x00ce,0xfffe
03e0 00cf 0001  |    |		.CONST	0x00cf,0x0001
03e2 00d2 0002  |    |		.CONST	0x00d2,0x0002
03e4 00d8 0003  |    |		.CONST	0x00d8,0x0003
03e6 00db 0004  |    |		.CONST	0x00db,0x0004
03e8 00e3 0005  |    |		.CONST	0x00e3,0x0005
03ea 00e6 0006  |    |		.CONST	0x00e6,0x0006
03ec ; --------------------------------------------------------------------------------------
03ec ; Debug3 Subtable 0x6
03ec ; --------------------------------------------------------------------------------------
03ec 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
03ee 00f3 0001  |    |		.CONST	0x00f3,0x0001
03f0 0103 0002  |    |		.CONST	0x0103,0x0002
03f2 0105 0003  |    |		.CONST	0x0105,0x0003
03f4 ; --------------------------------------------------------------------------------------
03f4 ; Debug3 Subtable 0x7
03f4 ; --------------------------------------------------------------------------------------
03f4 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
03f6 010b ffff  |    |		.CONST	0x010b,0xffff
03f8 010c 0001  |    |		.CONST	0x010c,0x0001
03fa 010e 0002  |    |		.CONST	0x010e,0x0002
03fc 0114 0003  |    |		.CONST	0x0114,0x0003
03fe 011d 0004  |    |		.CONST	0x011d,0x0004
0400 ; --------------------------------------------------------------------------------------
0400 ; Debug3 Subtable 0x8
0400 ; --------------------------------------------------------------------------------------
0400 0001 0005  |    |		.DBG3TAB	0x0001,0x0005
0402 0123 ffff  | #  |		.CONST	0x0123,0xffff
0404 0125 0001  | %  |		.CONST	0x0125,0x0001
0406 0129 0002  | )  |		.CONST	0x0129,0x0002
0408 012b 0003  | +  |		.CONST	0x012b,0x0003
040a 013f 0004  | ?  |		.CONST	0x013f,0x0004
040c 0142 0005  | B  |		.CONST	0x0142,0x0005
040e ; --------------------------------------------------------------------------------------
040e ; Debug3 Subtable 0x9
040e ; --------------------------------------------------------------------------------------
040e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0410 014b 0001  | K  |		.CONST	0x014b,0x0001
0412 ; --------------------------------------------------------------------------------------
0412 ; Debug3 Subtable 0xa
0412 ; --------------------------------------------------------------------------------------
0412 0000 000a  |    |		.DBG3TAB	0x0000,0x000a
0414 015b 0001  | [  |		.CONST	0x015b,0x0001
0416 0162 0002  | b  |		.CONST	0x0162,0x0002
0418 016c 0003  | l  |		.CONST	0x016c,0x0003
041a 01a2 0004  |    |		.CONST	0x01a2,0x0004
041c 01ce 0005  |    |		.CONST	0x01ce,0x0005
041e 0204 0006  |    |		.CONST	0x0204,0x0006
0420 023a 0007  | :  |		.CONST	0x023a,0x0007
0422 023e 0008  | >  |		.CONST	0x023e,0x0008
0424 0258 0009  | X  |		.CONST	0x0258,0x0009
0426 0272 000a  | r  |		.CONST	0x0272,0x000a
0428 ; --------------------------------------------------------------------------------------
0428 ; Debug3 Subtable 0xb
0428 ; --------------------------------------------------------------------------------------
0428 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
042a 027b ffff  | {  |		.CONST	0x027b,0xffff
042c 027e 0001  | ~  |		.CONST	0x027e,0x0001
042e 0282 0002  |    |		.CONST	0x0282,0x0002
0430 0288 0003  |    |		.CONST	0x0288,0x0003
0432 0292 0004  |    |		.CONST	0x0292,0x0004
0434 0298 0005  |    |		.CONST	0x0298,0x0005
0436 02a2 0006  |    |		.CONST	0x02a2,0x0006
0438 ; --------------------------------------------------------------------------------------
0438 ; Debug3 Subtable 0xc
0438 ; --------------------------------------------------------------------------------------
0438 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
043a 02ab 0001  |    |		.CONST	0x02ab,0x0001
043c ; --------------------------------------------------------------------------------------
043c ; Debug3 Subtable 0xd
043c ; --------------------------------------------------------------------------------------
043c 0000 0004  |    |		.DBG3TAB	0x0000,0x0004
043e 02bb 0001  |    |		.CONST	0x02bb,0x0001
0440 02bf 0002  |    |		.CONST	0x02bf,0x0002
0442 02c8 0004  |    |		.CONST	0x02c8,0x0004
0444 02d0 0005  |    |		.CONST	0x02d0,0x0005
0446 ; --------------------------------------------------------------------------------------
0446 ; Debug3 Subtable 0xe
0446 ; --------------------------------------------------------------------------------------
0446 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0448 02e3 0001  |    |		.CONST	0x02e3,0x0001
044a 0000 0000  |    |		.BLANK	0000[0x1b6]