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

⟦65d97b3cf⟧ SEG

    Length: 2048 (0x800)
    Types: SEG
    Notes: 5811_R1K_CODE
    Names: »609299.SEG«

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5811       |X   |		.CONST	0x5811								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 02a0       |    |		.CONST	0x02a0								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0001       |    |		.CONST	0x0001								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 006c       | l  |		.CONST	0x006c								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001e       |    |		.CONST	0x001e								; Number of locals
000b			INIT_0008:
000b e001       |    |		Load	0x0,0x1								; Debug Table 0x0 = .DEBUG	0x000b,0x02f2,0x8000,0x0000,0x0035,0xc7e4,0x0000,0x0009
													; Debug Table 0x0.0x0 = 0xb,0xffff
													; Debug Table 0x0.0x1 = 0xb,0xfffe
													; Debug Table 0x0.0x2 = 0xb,0xfffd
													; Debug Table 0x0.0x3 = 0xb,0xfffc
000c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
000d e002       |    |		Load	0x0,0x2
000e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
000f e003       |    |		Load	0x0,0x3
0010 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0011 e002       |    |		Load	0x0,0x2
0012 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0013 02a0       |    |		Declare_Subprogram	Null_Subprogram
0014 4804       |H   |		Short_Literal	0x4
0015 032e       | .  |		Declare_Type	Record,Defined,Visible
0016 e001       |    |		Load	0x0,0x1								; Debug Table 0x0.0x4 = 0x16,0xfffb
0017 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0018 0266       | f  |		Execute	Discrete,Bounds
0019 00da       |    |		Load_Top	At_Offset_2
001a 02a0       |    |		Declare_Subprogram	Null_Subprogram
001b 4801       |H   |		Short_Literal	0x1
001c 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
001d e003       |    |		Load	0x0,0x3								; Debug Table 0x0.0x5 = 0x1d,0xfffa
001e 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
001f e002       |    |		Load	0x0,0x2
0020 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0021 e002       |    |		Load	0x0,0x2
0022 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0023 02a0       |    |		Declare_Subprogram	Null_Subprogram
0024 4803       |H   |		Short_Literal	0x3
0025 032e       | .  |		Declare_Type	Record,Defined,Visible
0026 e002       |    |		Load	0x0,0x2								; Debug Table 0x0.0x6 = 0x26,0xfff9
0027 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0028 0266       | f  |		Execute	Discrete,Bounds
0029 00da       |    |		Load_Top	At_Offset_2
002a 02a0       |    |		Declare_Subprogram	Null_Subprogram
002b 4801       |H   |		Short_Literal	0x1
002c 0351       | Q  |		Declare_Type	Array,Defined,Visible,Bounds_With_Object
002d 029a 0073  |   s|		Declare_Subprogram	INIT_0070,For_Outer_Call,Visible,Unelaborated	; Debug Table 0x0.0x7 = 0x2d,0xfff8
002f 00bf       |    |		Action	Accept_Activation
0030 e002       |    |		Load	0x0,0x2								; Debug Table 0x1 = .DEBUG	0x0030,0x0304,0x8000,0x0000,0x0036,0x9b64,0x0000,0x0015
													; Debug Table 0x1.0x0 = 0x30,0xffff
0031 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0032 00db       |    |		Load_Top	At_Offset_3
0033 029f 00f3  |    |		Declare_Subprogram	INIT_00f0,For_Call
0035 4802       |H   |		Short_Literal	0x2
0036 032d       | -  |		Declare_Type	Record,Defined
0037 e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x1 = 0x37,0xfffe
0038 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0039 0266       | f  |		Execute	Discrete,Bounds
003a 00da       |    |		Load_Top	At_Offset_2
003b 029f 010b  |    |		Declare_Subprogram	INIT_0108,For_Call
003d 4801       |H   |		Short_Literal	0x1
003e 0350       | P  |		Declare_Type	Array,Defined,Bounds_With_Object
003f e002       |    |		Load	0x0,0x2								; Debug Table 0x1.0x2 = 0x3f,0xfffd
0040 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0041 0266       | f  |		Execute	Discrete,Bounds
0042 e002       |    |		Load	0x0,0x2
0043 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0044 02a0       |    |		Declare_Subprogram	Null_Subprogram
0045 4801       |H   |		Short_Literal	0x1
0046 0350       | P  |		Declare_Type	Array,Defined,Bounds_With_Object
0047 029d 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call			; Debug Table 0x1.0x3 = 0x47,0xfffc
0049 624e       |bN  |		Indirect_Literal	Discrete,0x298,{0x00000000, 0x00369b64}		; Debug Table 0x1.0x4 = 0x49,0xfffb
004a 484a       |HJ  |		Short_Literal	0x4a
004b e002       |    |		Load	0x0,0x2
004c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
004d e002       |    |		Load	0x0,0x2
004e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
004f e212       |    |		Load	0x1,0x12
0050 e212       |    |		Load	0x1,0x12
0051 e002       |    |		Load	0x0,0x2
0052 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0053 e213       |    |		Load	0x1,0x13
0054 e213       |    |		Load	0x1,0x13
0055 e214       |    |		Load	0x1,0x14
0056 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
0057 e004       |    |		Load	0x0,0x4
0058 0387       |    |		Declare_Variable	Package
0059 00d8       |    |		Load_Top	At_Offset_0
005a 020f       |    |		Execute	Module,Activate
005b 029d 012b  |   +|		Declare_Subprogram	INIT_0128,For_Outer_Call			; Debug Table 0x1.0x5 = 0x5b,0xfffa
005d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1.0x6 = 0x5d,0xfff9
005e 191b       |    |		Execute	Package,Field_Reference,Field_Number 0x1b
005f 00c6       |    |		Action	Check_Subprogram_Elaborated
0060 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
0061 6236       |b6  |		Indirect_Literal	Discrete,0x298,{0x00000000, 0x00369b64}
0062 498e       |I   |		Short_Literal	0x18e
0063 4800       |H   |		Short_Literal	0x0
0064 029d 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Outer_Call			; Debug Table 0x1.0x7 = 0x64,0xfff8
0066 029d 0223  |   #|		Declare_Subprogram	INIT_0220,For_Outer_Call			; Debug Table 0x1.0x8 = 0x66,0xfff7
0068 029d 0253  |   S|		Declare_Subprogram	INIT_0250,For_Outer_Call			; Debug Table 0x1.0x9 = 0x68,0xfff6
006a 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0xa = 0x6a,0xfff5
006b 00c7       |    |		Action	Elaborate_Subprogram
006c			BODY_0008:
006c 00bc       |    |		Action	Signal_Activated
006d 00bb       |    |		Action	Signal_Completion
006e 0000 0000  |    |		.XXX[0x2]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0084       |    |		.CONST	0x0084								; Address of begin
0071 0004       |    |		.CONST	0x0004								; Address of exception handler
0072 0005       |    |		.CONST	0x0005								; Number of locals
0073			INIT_0070:
0073 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2 = .DEBUG	0x0073,0x031c,0x0001,0x0000,0x0035,0xc7e4,0x0000,0x0062
													; Debug Table 0x2.0x0 = 0x73,0xffff
0074 01da       |    |		Execute	Vector,Bounds
0075 e213       |    |		Load	0x1,0x13
0076 0334       | 4  |		Declare_Variable	Array,With_Constraint
0077 00d8       |    |		Load_Top	At_Offset_0
0078 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0079 00dd       |    |		Load_Top	At_Offset_5						; Debug Table 0x2.0x1 = 0x79,0xfffe
007a 01da       |    |		Execute	Vector,Bounds
007b e213       |    |		Load	0x1,0x13
007c 0334       | 4  |		Declare_Variable	Array,With_Constraint
007d 00d8       |    |		Load_Top	At_Offset_0
007e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
007f 00dd       |    |		Load_Top	At_Offset_5						; Debug Table 0x2.0x2 = 0x7f,0xfffd
0080 01da       |    |		Execute	Vector,Bounds
0081 e214       |    |		Load	0x1,0x14
0082 0334       | 4  |		Declare_Variable	Array,With_Constraint
0083 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x2.0x3 = 0x83,0xfffc
0084			BODY_0070:
0084 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0x2.0x4 = 0x84,0x1
0085 01dd       |    |		Execute	Vector,First
0086 e5fc       |    |		Load	0x2,-0x4
0087 01dd       |    |		Execute	Vector,First
0088 027f       |    |		Execute	Discrete,Equal
0089 e5ff       |    |		Load	0x2,-0x1
008a 01dc       |    |		Execute	Vector,Last
008b e5fc       |    |		Load	0x2,-0x4
008c 01dc       |    |		Execute	Vector,Last
008d 027f       |    |		Execute	Discrete,Equal
008e 0279       | y  |		Execute	Discrete,And
008f 7002       |p   |		Jump_Nonzero	0x92
0090 4887       |H   |		Short_Literal	0x87
0091 0257       | W  |		Execute	Discrete,Raise
0092 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x2.0x5 = 0x92,0x2
0093 e5ff       |    |		Load	0x2,-0x1
0094 821e       |    |		Call	0x1,0x1e
0095 7002       |p   |		Jump_Nonzero	0x98
0096 4887       |H   |		Short_Literal	0x87
0097 0257       | W  |		Execute	Discrete,Raise
0098 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0x6 = 0x98,0x3
0099 e5fe       |    |		Load	0x2,-0x2
009a e5ff       |    |		Load	0x2,-0x1
009b 821c       |    |		Call	0x1,0x1c
009c 00d1       |    |		Pop_Control	Pop_Count_1
009d 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x2.0x7 = 0x9d,0x4
009e e5fd       |    |		Load	0x2,-0x3
009f 821d       |    |		Call	0x1,0x1d
00a0 00d1       |    |		Pop_Control	Pop_Count_1
00a1 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x2.0x8 = 0xa1,0x5
00a2 00e1       |    |		Load_Encached	Boolean_Cache
00a3 00dc       |    |		Load_Top	At_Offset_4
00a4 00de       |    |		Load_Top	At_Offset_6
00a5 1d18       |    |		Execute_Immediate	Reference_Lex_1,0x18
00a6 1d19       |    |		Execute_Immediate	Reference_Lex_1,0x19
00a7 e216       |    |		Load	0x1,0x16
00a8 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
00a9 005a       | Z  |		Store_Top	Discrete,At_Offset_2
00aa 00d1       |    |		Pop_Control	Pop_Count_1
00ab 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x2.0x9 = 0xab,0x6
00ac 7002       |p   |		Jump_Nonzero	0xaf
00ad 61e6       |a   |		Indirect_Literal	Discrete,0x294,{0x00000000, 0x35c7e403}		; Debug Table 0x2.0xa = 0xad,0x7
00ae 0257       | W  |		Execute	Discrete,Raise
00af 00cf       |    |		Action	Mark_Auxiliary
00b0 e5ff       |    |		Load	0x2,-0x1							; Debug Table 0x2.0xb = 0xb0,0x8
00b1 01d9       |    |		Execute	Vector,Reverse_Bounds
00b2 0263       | c  |		Execute	Discrete,Above_Bound
00b3 703a       |p:  |		Jump_Nonzero	0xee
00b4 00cf       |    |		Action	Mark_Auxiliary
00b5 e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x2.0xc = 0xb5,0x9
00b6 01d9       |    |		Execute	Vector,Reverse_Bounds
00b7 0263       | c  |		Execute	Discrete,Above_Bound
00b8 7032       |p2  |		Jump_Nonzero	0xeb
00b9 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x2.0xd = 0xb9,0xa
00ba e5ff       |    |		Load	0x2,-0x1
00bb 01d5       |    |		Execute	Vector,Field_Reference
00bc 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
00bd 00d9       |    |		Load_Top	At_Offset_1
00be e5fe       |    |		Load	0x2,-0x2
00bf 01d5       |    |		Execute	Vector,Field_Reference
00c0 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00c1 027f       |    |		Execute	Discrete,Equal
00c2 6826       |h&  |		Jump_Zero	0xe9
00c3 e20d       |    |		Load	0x1,0xd								; Debug Table 0x2.0xe = 0xc3,0xb
00c4 0322       | "  |		Declare_Variable	Record
00c5 00dc       |    |		Load_Top	At_Offset_4
00c6 e5ff       |    |		Load	0x2,-0x1
00c7 01d5       |    |		Execute	Vector,Field_Reference
00c8 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
00c9 00d9       |    |		Load_Top	At_Offset_1
00ca 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00cb 00dc       |    |		Load_Top	At_Offset_4
00cc e5ff       |    |		Load	0x2,-0x1
00cd 01d5       |    |		Execute	Vector,Field_Reference
00ce 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00cf 00d9       |    |		Load_Top	At_Offset_1
00d0 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00d1 00d9       |    |		Load_Top	At_Offset_1
00d2 e404       |    |		Load	0x2,0x4
00d3 01d7       |    |		Execute	Vector,Field_Read
00d4 e5fd       |    |		Load	0x2,-0x3
00d5 01d5       |    |		Execute	Vector,Field_Reference
00d6 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
00d7 e003       |    |		Load	0x0,0x3
00d8 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00d9 0119       |    |		Execute	Any,Check_In_Formal_Type
00da 00d9       |    |		Load_Top	At_Offset_1
00db 3802       |8   |		Execute	Record,Field_Write,Field_Number 0x2
00dc 00d9       |    |		Load_Top	At_Offset_1
00dd e404       |    |		Load	0x2,0x4
00de 01d7       |    |		Execute	Vector,Field_Read
00df e5fd       |    |		Load	0x2,-0x3
00e0 01d5       |    |		Execute	Vector,Field_Reference
00e1 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
00e2 00d9       |    |		Load_Top	At_Offset_1
00e3 3803       |8   |		Execute	Record,Field_Write,Field_Number 0x3
00e4 00dc       |    |		Load_Top	At_Offset_4
00e5 e5fc       |    |		Load	0x2,-0x4
00e6 01d6       |    |		Execute	Vector,Field_Write
00e7 00d2       |    |		Pop_Control	Pop_Count_2						; Debug Table 0x2.0xf = 0xe7,0xc
00e8 7802       |x   |		Jump	0xeb
00e9 00c8       |    |		Action	Pop_Auxiliary_Range
00ea 3fce       |?   |		Loop_Increasing	0xb9
00eb 00ce       |    |		Action	Pop_Auxiliary
00ec 00c8       |    |		Action	Pop_Auxiliary_Range
00ed 3fc6       |?   |		Loop_Increasing	0xb4
00ee 4504       |E   |		Exit_Suprogram	New_Top_Offset 0x4
00ef 0000       |    |		.XXX[0x1]
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 4608       |F   |		Jump_Case	0x9							; Debug Table 0x3 = .DEBUG	0x00f3,0x033e,0x0005,0x0000,0x0036,0x9b64,0x0000,0x0016
00f4 7808       |x   |		Jump	0xfd								; case 0x0
00f5 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x1
00f6 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x2
00f7 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x3
00f8 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x4
00f9 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x5
00fa 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x6
00fb 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x7
00fc 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2				; case 0x8
00fd 4800       |H   |		Short_Literal	0x0
00fe 00db       |    |		Load_Top	At_Offset_3
00ff 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0100 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
0101 0000 0000  |    |		.BLANK	0000[0x7]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b       |    |		.CONST	0x010b								; Address of begin
0109 0004       |    |		.CONST	0x0004								; Address of exception handler
010a 0001       |    |		.CONST	0x0001								; Number of locals
010b			BODY_0108:
010b			INIT_0108:
010b 00d1       |    |		Pop_Control	Pop_Count_1						; Debug Table 0x4 = .DEBUG	0x010b,0x0340,0x0005,0x0000,0x0036,0x9b64,0x0000,0x0025
010c 00da       |    |		Load_Top	At_Offset_2
010d 01d8       |    |		Execute	Vector,Element_Type
010e 0322       | "  |		Declare_Variable	Record
010f 00d8       |    |		Load_Top	At_Offset_0
0110 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0111 00db       |    |		Load_Top	At_Offset_3
0112 01dc       |    |		Execute	Vector,Last
0113 00dc       |    |		Load_Top	At_Offset_4
0114 01dd       |    |		Execute	Vector,First
0115 0263       | c  |		Execute	Discrete,Above_Bound
0116 7006       |p   |		Jump_Nonzero	0x11d
0117 00da       |    |		Load_Top	At_Offset_2
0118 00d9       |    |		Load_Top	At_Offset_1
0119 e5ff       |    |		Load	0x2,-0x1
011a 01d6       |    |		Execute	Vector,Field_Write
011b 0a01       |    |		Execute_Immediate	Plus,0x1
011c 7ff8       |    |		Jump	0x115
011d 4302       |C   |		Exit_Subprogram	From_Utility,New_Top_Offset 0x2
011e 0000 0000  |    |		.XXX[0x2]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123       | #  |		.CONST	0x0123								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0001       |    |		.CONST	0x0001								; Number of locals
0123			BODY_0120:
0123			INIT_0120:
0123 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x5 = .DEBUG	0x0123,0x0342,0x0001,0x0000,0x0036,0x9b64,0x0000,0x0037
													; Debug Table 0x5.0x0 = 0x123,0x1
0124 0054       | T  |		Store_Top_Unchecked	Discrete,At_Offset_4
0125 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0126 0000 0000  |    |		.XXX[0x2]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012f       | /  |		.CONST	0x012f								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0002       |    |		.CONST	0x0002								; Number of locals
012b			INIT_0128:
012b 6164       |ad  |		Indirect_Literal	Discrete,0x290,{0x00000000, 0x00ffffff}		; Debug Table 0x6 = .DEBUG	0x012b,0x0346,0x0001,0x0000,0x0036,0x9b64,0x0000,0x006a
													; Debug Table 0x6.0x0 = 0x12b,0xffff
012c e002       |    |		Load	0x0,0x2
012d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
012e 03f1       |    |		Declare_Variable	Discrete,With_Value
012f			BODY_0128:
012f 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x1 = 0x12f,0x1
0130 a5fc       |    |		Store_Unchecked	0x2,-0x4
0131 481f       |H   |		Short_Literal	0x1f							; Debug Table 0x6.0x2 = 0x131,0x2
0132 a5fb       |    |		Store_Unchecked	0x2,-0x5
0133 481f       |H   |		Short_Literal	0x1f							; Debug Table 0x6.0x3 = 0x133,0x3
0134 a5fa       |    |		Store_Unchecked	0x2,-0x6
0135 00cf       |    |		Action	Mark_Auxiliary
0136 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x6.0x4 = 0x136,0x4
0137 01d9       |    |		Execute	Vector,Reverse_Bounds
0138 0263       | c  |		Execute	Discrete,Above_Bound
0139 7055       |pU  |		Jump_Nonzero	0x18f
013a 00cf       |    |		Action	Mark_Auxiliary
013b e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x6.0x5 = 0x13b,0x5
013c 01d9       |    |		Execute	Vector,Reverse_Bounds
013d 0263       | c  |		Execute	Discrete,Above_Bound
013e 704d       |pM  |		Jump_Nonzero	0x18c
013f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x6 = 0x13f,0x6
0140 00dc       |    |		Load_Top	At_Offset_4
0141 e5fe       |    |		Load	0x2,-0x2
0142 01a7       |    |		Execute	Matrix,Field_Read
0143 6846       |hF  |		Jump_Zero	0x18a
0144 00db       |    |		Load_Top	At_Offset_3
0145 e5ff       |    |		Load	0x2,-0x1
0146 01d5       |    |		Execute	Vector,Field_Reference
0147 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0148 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0149 00d9       |    |		Load_Top	At_Offset_1
014a e5fd       |    |		Load	0x2,-0x3
014b 01d5       |    |		Execute	Vector,Field_Reference
014c 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
014d 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
014e 01df       |    |		Execute	Vector,Equal
014f 683a       |h:  |		Jump_Zero	0x18a
0150 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x7 = 0x150,0x7
0151 e5fd       |    |		Load	0x2,-0x3
0152 01d5       |    |		Execute	Vector,Field_Reference
0153 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0154 00dc       |    |		Load_Top	At_Offset_4
0155 e5ff       |    |		Load	0x2,-0x1
0156 01d5       |    |		Execute	Vector,Field_Reference
0157 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0158 027b       | {  |		Execute	Discrete,Greater_Equal
0159 700c       |p   |		Jump_Nonzero	0x166
015a 00db       |    |		Load_Top	At_Offset_3
015b e5ff       |    |		Load	0x2,-0x1
015c 01d5       |    |		Execute	Vector,Field_Reference
015d 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
015e 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
015f 00d9       |    |		Load_Top	At_Offset_1
0160 e5fd       |    |		Load	0x2,-0x3
0161 01d5       |    |		Execute	Vector,Field_Reference
0162 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0163 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0164 027a       | z  |		Execute	Discrete,Less_Equal
0165 6824       |h$  |		Jump_Zero	0x18a
0166 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x8 = 0x166,0x8
0167 e5fd       |    |		Load	0x2,-0x3
0168 01d5       |    |		Execute	Vector,Field_Reference
0169 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
016a 00dc       |    |		Load_Top	At_Offset_4
016b e5ff       |    |		Load	0x2,-0x1
016c 01d5       |    |		Execute	Vector,Field_Reference
016d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
016e 027c       | |  |		Execute	Discrete,Less
016f 6806       |h   |		Jump_Zero	0x176
0170 4800       |H   |		Short_Literal	0x0							; Debug Table 0x6.0x9 = 0x170,0x9
0171 00d9       |    |		Load_Top	At_Offset_1
0172 e5fd       |    |		Load	0x2,-0x3
0173 01d5       |    |		Execute	Vector,Field_Reference
0174 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0175 780d       |x   |		Jump	0x183
0176 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0xa = 0x176,0xa
0177 e5fd       |    |		Load	0x2,-0x3
0178 01d5       |    |		Execute	Vector,Field_Reference
0179 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
017a 00dc       |    |		Load_Top	At_Offset_4
017b e5ff       |    |		Load	0x2,-0x1
017c 01d5       |    |		Execute	Vector,Field_Reference
017d 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
017e 0272       | r  |		Execute	Discrete,Minus
017f 00d9       |    |		Load_Top	At_Offset_1
0180 e5fd       |    |		Load	0x2,-0x3
0181 01d5       |    |		Execute	Vector,Field_Reference
0182 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0183 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0xb = 0x183,0xb
0184 a5fc       |    |		Store_Unchecked	0x2,-0x4
0185 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0xc = 0x185,0xc
0186 a5fb       |    |		Store_Unchecked	0x2,-0x5
0187 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0xd = 0x187,0xd
0188 a5fa       |    |		Store_Unchecked	0x2,-0x6
0189 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3					; Debug Table 0x6.0xe = 0x189,0xe
018a 00c8       |    |		Action	Pop_Auxiliary_Range
018b 3fb3       |?   |		Loop_Increasing	0x13f
018c 00ce       |    |		Action	Pop_Auxiliary
018d 00c8       |    |		Action	Pop_Auxiliary_Range
018e 3fab       |?   |		Loop_Increasing	0x13a
018f 00c9       |    |		Action	Pop_Auxiliary_Loop
0190 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x6.0xf = 0x190,0xf
0191 01d9       |    |		Execute	Vector,Reverse_Bounds
0192 0263       | c  |		Execute	Discrete,Above_Bound
0193 7035       |p5  |		Jump_Nonzero	0x1c9
0194 00cf       |    |		Action	Mark_Auxiliary
0195 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0x6.0x10 = 0x195,0x10
0196 01d9       |    |		Execute	Vector,Reverse_Bounds
0197 0263       | c  |		Execute	Discrete,Above_Bound
0198 702d       |p-  |		Jump_Nonzero	0x1c6
0199 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x11 = 0x199,0x11
019a 00dc       |    |		Load_Top	At_Offset_4
019b e5fe       |    |		Load	0x2,-0x2
019c 01a7       |    |		Execute	Matrix,Field_Read
019d 6826       |h&  |		Jump_Zero	0x1c4
019e 00db       |    |		Load_Top	At_Offset_3
019f e5ff       |    |		Load	0x2,-0x1
01a0 01d5       |    |		Execute	Vector,Field_Reference
01a1 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01a2 00d9       |    |		Load_Top	At_Offset_1
01a3 e5fd       |    |		Load	0x2,-0x3
01a4 01d5       |    |		Execute	Vector,Field_Reference
01a5 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01a6 027a       | z  |		Execute	Discrete,Less_Equal
01a7 681c       |h   |		Jump_Zero	0x1c4
01a8 00de       |    |		Load_Top	At_Offset_6
01a9 00d9       |    |		Load_Top	At_Offset_1
01aa e5fd       |    |		Load	0x2,-0x3
01ab 01d5       |    |		Execute	Vector,Field_Reference
01ac 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01ad 00dd       |    |		Load_Top	At_Offset_5
01ae e5ff       |    |		Load	0x2,-0x1
01af 01d5       |    |		Execute	Vector,Field_Reference
01b0 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01b1 0272       | r  |		Execute	Discrete,Minus
01b2 027d       | }  |		Execute	Discrete,Greater
01b3 6810       |h   |		Jump_Zero	0x1c4
01b4 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x12 = 0x1b4,0x12
01b5 e5fd       |    |		Load	0x2,-0x3
01b6 01d5       |    |		Execute	Vector,Field_Reference
01b7 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01b8 00dc       |    |		Load_Top	At_Offset_4
01b9 e5ff       |    |		Load	0x2,-0x1
01ba 01d5       |    |		Execute	Vector,Field_Reference
01bb 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
01bc 0272       | r  |		Execute	Discrete,Minus
01bd c402       |    |		Store	0x2,0x2
01be 4801       |H   |		Short_Literal	0x1							; Debug Table 0x6.0x13 = 0x1be,0x13
01bf a5fc       |    |		Store_Unchecked	0x2,-0x4
01c0 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x6.0x14 = 0x1c0,0x14
01c1 a5fb       |    |		Store_Unchecked	0x2,-0x5
01c2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x6.0x15 = 0x1c2,0x15
01c3 a5fa       |    |		Store_Unchecked	0x2,-0x6
01c4 00c8       |    |		Action	Pop_Auxiliary_Range
01c5 3fd3       |?   |		Loop_Increasing	0x199
01c6 00ce       |    |		Action	Pop_Auxiliary
01c7 00c8       |    |		Action	Pop_Auxiliary_Range
01c8 3fcb       |?   |		Loop_Increasing	0x194
01c9 00ce       |    |		Action	Pop_Auxiliary
01ca 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0x6.0x16 = 0x1ca,0x16
01cb 7002       |p   |		Jump_Nonzero	0x1ce
01cc 60c7       |`   |		Indirect_Literal	Discrete,0x294,{0x00000000, 0x35c7e403}		; Debug Table 0x6.0x17 = 0x1cc,0x17
01cd 0257       | W  |		Execute	Discrete,Raise
01ce 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
01cf 0000       |    |		.XXX[0x1]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3       |    |		.CONST	0x01d3								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0001       |    |		.CONST	0x0001								; Number of locals
01d3			BODY_01d0:
01d3			INIT_01d0:
01d3 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7 = .DEBUG	0x01d3,0x0378,0x0001,0x0000,0x0036,0x9b64,0x0000,0x019a
													; Debug Table 0x7.0x0 = 0x1d3,0x1
01d4 01dd       |    |		Execute	Vector,First
01d5 00dd       |    |		Load_Top	At_Offset_5
01d6 01dd       |    |		Execute	Vector,First
01d7 027f       |    |		Execute	Discrete,Equal
01d8 00dc       |    |		Load_Top	At_Offset_4
01d9 01dc       |    |		Execute	Vector,Last
01da 00de       |    |		Load_Top	At_Offset_6
01db 01dc       |    |		Execute	Vector,Last
01dc 027f       |    |		Execute	Discrete,Equal
01dd 0279       | y  |		Execute	Discrete,And
01de 7002       |p   |		Jump_Nonzero	0x1e1
01df 4887       |H   |		Short_Literal	0x87
01e0 0257       | W  |		Execute	Discrete,Raise
01e1 00cf       |    |		Action	Mark_Auxiliary
01e2 00dd       |    |		Load_Top	At_Offset_5						; Debug Table 0x7.0x1 = 0x1e2,0x2
01e3 01d9       |    |		Execute	Vector,Reverse_Bounds
01e4 0263       | c  |		Execute	Discrete,Above_Bound
01e5 700f       |p   |		Jump_Nonzero	0x1f5
01e6 e212       |    |		Load	0x1,0x12							; Debug Table 0x7.0x2 = 0x1e6,0x3
01e7 0322       | "  |		Declare_Variable	Record
01e8 4800       |H   |		Short_Literal	0x0
01e9 00d9       |    |		Load_Top	At_Offset_1
01ea 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
01eb 00d9       |    |		Load_Top	At_Offset_1
01ec e5fe       |    |		Load	0x2,-0x2
01ed 01d5       |    |		Execute	Vector,Field_Reference
01ee 00d9       |    |		Load_Top	At_Offset_1
01ef 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
01f0 00d9       |    |		Load_Top	At_Offset_1
01f1 e5fd       |    |		Load	0x2,-0x3
01f2 01d6       |    |		Execute	Vector,Field_Write
01f3 00c8       |    |		Action	Pop_Auxiliary_Range
01f4 3ff1       |?   |		Loop_Increasing	0x1e6
01f5 00c9       |    |		Action	Pop_Auxiliary_Loop
01f6 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x3 = 0x1f6,0x4
01f7 01d9       |    |		Execute	Vector,Reverse_Bounds
01f8 0263       | c  |		Execute	Discrete,Above_Bound
01f9 7023       |p#  |		Jump_Nonzero	0x21d
01fa 00cf       |    |		Action	Mark_Auxiliary
01fb e5fe       |    |		Load	0x2,-0x2							; Debug Table 0x7.0x4 = 0x1fb,0x5
01fc 01d9       |    |		Execute	Vector,Reverse_Bounds
01fd 0263       | c  |		Execute	Discrete,Above_Bound
01fe 701b       |p   |		Jump_Nonzero	0x21a
01ff 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x7.0x5 = 0x1ff,0x6
0200 e5ff       |    |		Load	0x2,-0x1
0201 01d5       |    |		Execute	Vector,Field_Reference
0202 3c03       |<   |		Execute	Record,Field_Read,Field_Number 0x3
0203 00d9       |    |		Load_Top	At_Offset_1
0204 e5fe       |    |		Load	0x2,-0x2
0205 01d5       |    |		Execute	Vector,Field_Reference
0206 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0207 027f       |    |		Execute	Discrete,Equal
0208 680f       |h   |		Jump_Zero	0x218
0209 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x7.0x6 = 0x209,0x7
020a e5fd       |    |		Load	0x2,-0x3
020b 01d5       |    |		Execute	Vector,Field_Reference
020c 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
020d 00dc       |    |		Load_Top	At_Offset_4
020e e5ff       |    |		Load	0x2,-0x1
020f 01d5       |    |		Execute	Vector,Field_Reference
0210 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0211 0273       | s  |		Execute	Discrete,Plus
0212 00d9       |    |		Load_Top	At_Offset_1
0213 e5fd       |    |		Load	0x2,-0x3
0214 01d5       |    |		Execute	Vector,Field_Reference
0215 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0216 00d2       |    |		Pop_Control	Pop_Count_2						; Debug Table 0x7.0x7 = 0x216,0x8
0217 7802       |x   |		Jump	0x21a
0218 00c8       |    |		Action	Pop_Auxiliary_Range
0219 3fe5       |?   |		Loop_Increasing	0x1ff
021a 00ce       |    |		Action	Pop_Auxiliary
021b 00c8       |    |		Action	Pop_Auxiliary_Range
021c 3fdd       |?   |		Loop_Increasing	0x1fa
021d 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
021e 0000 0000  |    |		.XXX[0x2]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223       | #  |		.CONST	0x0223								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0001       |    |		.CONST	0x0001								; Number of locals
0223			BODY_0220:
0223			INIT_0220:
0223 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x8 = .DEBUG	0x0223,0x038a,0x0001,0x0000,0x0036,0x9b64,0x0000,0x0215
													; Debug Table 0x8.0x0 = 0x223,0x1
0224 01dd       |    |		Execute	Vector,First
0225 00dc       |    |		Load_Top	At_Offset_4
0226 01dd       |    |		Execute	Vector,First
0227 027f       |    |		Execute	Discrete,Equal
0228 00db       |    |		Load_Top	At_Offset_3
0229 01dc       |    |		Execute	Vector,Last
022a 00dd       |    |		Load_Top	At_Offset_5
022b 01dc       |    |		Execute	Vector,Last
022c 027f       |    |		Execute	Discrete,Equal
022d 0279       | y  |		Execute	Discrete,And
022e 7002       |p   |		Jump_Nonzero	0x231
022f 4887       |H   |		Short_Literal	0x87
0230 0257       | W  |		Execute	Discrete,Raise
0231 00cf       |    |		Action	Mark_Auxiliary
0232 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x8.0x1 = 0x232,0x2
0233 01d9       |    |		Execute	Vector,Reverse_Bounds
0234 0263       | c  |		Execute	Discrete,Above_Bound
0235 7016       |p   |		Jump_Nonzero	0x24c
0236 e212       |    |		Load	0x1,0x12							; Debug Table 0x8.0x2 = 0x236,0x3
0237 0322       | "  |		Declare_Variable	Record
0238 00d9       |    |		Load_Top	At_Offset_1
0239 e5ff       |    |		Load	0x2,-0x1
023a 01d5       |    |		Execute	Vector,Field_Reference
023b 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
023c 0902       |    |		Execute_Immediate	Binary_Scale,0x2
023d 0248       | H  |		Execute	Discrete,Check_In_Integer
023e 4805       |H   |		Short_Literal	0x5
023f 0270       | p  |		Execute	Discrete,Divide
0240 00d9       |    |		Load_Top	At_Offset_1
0241 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
0242 00d9       |    |		Load_Top	At_Offset_1
0243 e5ff       |    |		Load	0x2,-0x1
0244 01d5       |    |		Execute	Vector,Field_Reference
0245 00d9       |    |		Load_Top	At_Offset_1
0246 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
0247 00d9       |    |		Load_Top	At_Offset_1
0248 e5fe       |    |		Load	0x2,-0x2
0249 01d6       |    |		Execute	Vector,Field_Write
024a 00c8       |    |		Action	Pop_Auxiliary_Range
024b 3fea       |?   |		Loop_Increasing	0x236
024c 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
024d 0000 0000  |    |		.XXX[0x3]
024f 0000       |    |
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0259       | Y  |		.CONST	0x0259								; Address of begin
0251 0004       |    |		.CONST	0x0004								; Address of exception handler
0252 0003       |    |		.CONST	0x0003								; Number of locals
0253			INIT_0250:
0253 e002       |    |		Load	0x0,0x2								; Debug Table 0x9 = .DEBUG	0x0253,0x0392,0x0002,0x0000,0x0036,0x9b64,0x0000,0x0263
													; Debug Table 0x9.0x0 = 0x253,0xffff
0254 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0255 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0256 e002       |    |		Load	0x0,0x2								; Debug Table 0x9.0x1 = 0x256,0xfffe
0257 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0258 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0259			BODY_0250:
0259 00cf       |    |		Action	Mark_Auxiliary
025a 00dd       |    |		Load_Top	At_Offset_5						; Debug Table 0x9.0x2 = 0x25a,0x1
025b 01d9       |    |		Execute	Vector,Reverse_Bounds
025c 0263       | c  |		Execute	Discrete,Above_Bound
025d 7009       |p   |		Jump_Nonzero	0x267
025e 00dc       |    |		Load_Top	At_Offset_4						; Debug Table 0x9.0x3 = 0x25e,0x2
025f 00d9       |    |		Load_Top	At_Offset_1
0260 e5ff       |    |		Load	0x2,-0x1
0261 01d5       |    |		Execute	Vector,Field_Reference
0262 3c01       |<   |		Execute	Record,Field_Read,Field_Number 0x1
0263 0273       | s  |		Execute	Discrete,Plus
0264 005d       | ]  |		Store_Top	Discrete,At_Offset_5
0265 00c8       |    |		Action	Pop_Auxiliary_Range
0266 3ff7       |?   |		Loop_Increasing	0x25e
0267 00c9       |    |		Action	Pop_Auxiliary_Loop
0268 00de       |    |		Load_Top	At_Offset_6						; Debug Table 0x9.0x4 = 0x268,0x3
0269 01d9       |    |		Execute	Vector,Reverse_Bounds
026a 0263       | c  |		Execute	Discrete,Above_Bound
026b 7009       |p   |		Jump_Nonzero	0x275
026c 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x9.0x5 = 0x26c,0x4
026d 00d9       |    |		Load_Top	At_Offset_1
026e e5fe       |    |		Load	0x2,-0x2
026f 01d5       |    |		Execute	Vector,Field_Reference
0270 3c02       |<   |		Execute	Record,Field_Read,Field_Number 0x2
0271 0273       | s  |		Execute	Discrete,Plus
0272 005c       | \  |		Store_Top	Discrete,At_Offset_4
0273 00c8       |    |		Action	Pop_Auxiliary_Range
0274 3ff7       |?   |		Loop_Increasing	0x26c
0275 00ce       |    |		Action	Pop_Auxiliary
0276 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x6 = 0x276,0x5
0277 00d9       |    |		Load_Top	At_Offset_1
0278 027d       | }  |		Execute	Discrete,Greater
0279 6802       |h   |		Jump_Zero	0x27c
027a 6011       |`   |		Indirect_Literal	Discrete,0x28c,{0x00000000, 0x35c7e401}		; Debug Table 0x9.0x7 = 0x27a,0x6
027b 0257       | W  |		Execute	Discrete,Raise
027c 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x9.0x8 = 0x27c,0x7
027d 4809       |H   |		Short_Literal	0x9
027e 0270       | p  |		Execute	Discrete,Divide
027f 00d9       |    |		Load_Top	At_Offset_1
0280 480a       |H   |		Short_Literal	0xa
0281 0270       | p  |		Execute	Discrete,Divide
0282 027d       | }  |		Execute	Discrete,Greater
0283 6802       |h   |		Jump_Zero	0x286
0284 6003       |`   |		Indirect_Literal	Discrete,0x288,{0x00000000, 0x35c7e402}		; Debug Table 0x9.0x9 = 0x284,0x8
0285 0257       | W  |		Execute	Discrete,Raise
0286 4801       |H   |		Short_Literal	0x1							; Debug Table 0x9.0xa = 0x286,0x9
0287 4402       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x2
0288 0000 0000  |    |		.LITERAL	{0x00000000, 0x35c7e402}
028c 0000 0000  |    |		.LITERAL	{0x00000000, 0x35c7e401}
0290 0000 0000  |    |		.LITERAL	{0x00000000, 0x00ffffff}
0294 0000 0000  |    |		.LITERAL	{0x00000000, 0x35c7e403}
0298 0000 0000  |    |		.LITERAL	{0x00000000, 0x00369b64}
029c 0000 0000  |    |		.BLANK	0000[0x4]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; Debug Table
02a0 ; --------------------------------------------------------------------------------------
02a0 0003 000a  |    |		.CONST	0x0003,0x000a
02a2 000b 02f2  |    |		.DEBUG	0x000b,0x02f2,0x8000,0x0000,0x0035,0xc7e4,0x0000,0x0009
02aa 0030 0304  | 0  |		.DEBUG	0x0030,0x0304,0x8000,0x0000,0x0036,0x9b64,0x0000,0x0015
02b2 0073 031c  | s  |		.DEBUG	0x0073,0x031c,0x0001,0x0000,0x0035,0xc7e4,0x0000,0x0062
02ba 00f3 033e  |   >|		.DEBUG	0x00f3,0x033e,0x0005,0x0000,0x0036,0x9b64,0x0000,0x0016
02c2 010b 0340  |   @|		.DEBUG	0x010b,0x0340,0x0005,0x0000,0x0036,0x9b64,0x0000,0x0025
02ca 0123 0342  | # B|		.DEBUG	0x0123,0x0342,0x0001,0x0000,0x0036,0x9b64,0x0000,0x0037
02d2 012b 0346  | + F|		.DEBUG	0x012b,0x0346,0x0001,0x0000,0x0036,0x9b64,0x0000,0x006a
02da 01d3 0378  |   x|		.DEBUG	0x01d3,0x0378,0x0001,0x0000,0x0036,0x9b64,0x0000,0x019a
02e2 0223 038a  | #  |		.DEBUG	0x0223,0x038a,0x0001,0x0000,0x0036,0x9b64,0x0000,0x0215
02ea 0253 0392  | S  |		.DEBUG	0x0253,0x0392,0x0002,0x0000,0x0036,0x9b64,0x0000,0x0263
02f2 ; --------------------------------------------------------------------------------------
02f2 ; Debug3 Subtable 0x0
02f2 ; --------------------------------------------------------------------------------------
02f2 0008 0000  |    |		.DBG3TAB	0x0008,0x0000
02f4 000b ffff  |    |		.CONST	0x000b,0xffff
02f6 000b fffe  |    |		.CONST	0x000b,0xfffe
02f8 000b fffd  |    |		.CONST	0x000b,0xfffd
02fa 000b fffc  |    |		.CONST	0x000b,0xfffc
02fc 0016 fffb  |    |		.CONST	0x0016,0xfffb
02fe 001d fffa  |    |		.CONST	0x001d,0xfffa
0300 0026 fff9  | &  |		.CONST	0x0026,0xfff9
0302 002d fff8  | -  |		.CONST	0x002d,0xfff8
0304 ; --------------------------------------------------------------------------------------
0304 ; Debug3 Subtable 0x1
0304 ; --------------------------------------------------------------------------------------
0304 000b 0000  |    |		.DBG3TAB	0x000b,0x0000
0306 0030 ffff  | 0  |		.CONST	0x0030,0xffff
0308 0037 fffe  | 7  |		.CONST	0x0037,0xfffe
030a 003f fffd  | ?  |		.CONST	0x003f,0xfffd
030c 0047 fffc  | G  |		.CONST	0x0047,0xfffc
030e 0049 fffb  | I  |		.CONST	0x0049,0xfffb
0310 005b fffa  | [  |		.CONST	0x005b,0xfffa
0312 005d fff9  | ]  |		.CONST	0x005d,0xfff9
0314 0064 fff8  | d  |		.CONST	0x0064,0xfff8
0316 0066 fff7  | f  |		.CONST	0x0066,0xfff7
0318 0068 fff6  | h  |		.CONST	0x0068,0xfff6
031a 006a fff5  | j  |		.CONST	0x006a,0xfff5
031c ; --------------------------------------------------------------------------------------
031c ; Debug3 Subtable 0x2
031c ; --------------------------------------------------------------------------------------
031c 0004 000c  |    |		.DBG3TAB	0x0004,0x000c
031e 0073 ffff  | s  |		.CONST	0x0073,0xffff
0320 0079 fffe  | y  |		.CONST	0x0079,0xfffe
0322 007f fffd  |    |		.CONST	0x007f,0xfffd
0324 0083 fffc  |    |		.CONST	0x0083,0xfffc
0326 0084 0001  |    |		.CONST	0x0084,0x0001
0328 0092 0002  |    |		.CONST	0x0092,0x0002
032a 0098 0003  |    |		.CONST	0x0098,0x0003
032c 009d 0004  |    |		.CONST	0x009d,0x0004
032e 00a1 0005  |    |		.CONST	0x00a1,0x0005
0330 00ab 0006  |    |		.CONST	0x00ab,0x0006
0332 00ad 0007  |    |		.CONST	0x00ad,0x0007
0334 00b0 0008  |    |		.CONST	0x00b0,0x0008
0336 00b5 0009  |    |		.CONST	0x00b5,0x0009
0338 00b9 000a  |    |		.CONST	0x00b9,0x000a
033a 00c3 000b  |    |		.CONST	0x00c3,0x000b
033c 00e7 000c  |    |		.CONST	0x00e7,0x000c
033e ; --------------------------------------------------------------------------------------
033e ; Debug3 Subtable 0x3
033e ; --------------------------------------------------------------------------------------
033e 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0340 ; --------------------------------------------------------------------------------------
0340 ; Debug3 Subtable 0x4
0340 ; --------------------------------------------------------------------------------------
0340 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
0342 ; --------------------------------------------------------------------------------------
0342 ; Debug3 Subtable 0x5
0342 ; --------------------------------------------------------------------------------------
0342 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0344 0123 0001  | #  |		.CONST	0x0123,0x0001
0346 ; --------------------------------------------------------------------------------------
0346 ; Debug3 Subtable 0x6
0346 ; --------------------------------------------------------------------------------------
0346 0001 0017  |    |		.DBG3TAB	0x0001,0x0017
0348 012b ffff  | +  |		.CONST	0x012b,0xffff
034a 012f 0001  | /  |		.CONST	0x012f,0x0001
034c 0131 0002  | 1  |		.CONST	0x0131,0x0002
034e 0133 0003  | 3  |		.CONST	0x0133,0x0003
0350 0136 0004  | 6  |		.CONST	0x0136,0x0004
0352 013b 0005  | ;  |		.CONST	0x013b,0x0005
0354 013f 0006  | ?  |		.CONST	0x013f,0x0006
0356 0150 0007  | P  |		.CONST	0x0150,0x0007
0358 0166 0008  | f  |		.CONST	0x0166,0x0008
035a 0170 0009  | p  |		.CONST	0x0170,0x0009
035c 0176 000a  | v  |		.CONST	0x0176,0x000a
035e 0183 000b  |    |		.CONST	0x0183,0x000b
0360 0185 000c  |    |		.CONST	0x0185,0x000c
0362 0187 000d  |    |		.CONST	0x0187,0x000d
0364 0189 000e  |    |		.CONST	0x0189,0x000e
0366 0190 000f  |    |		.CONST	0x0190,0x000f
0368 0195 0010  |    |		.CONST	0x0195,0x0010
036a 0199 0011  |    |		.CONST	0x0199,0x0011
036c 01b4 0012  |    |		.CONST	0x01b4,0x0012
036e 01be 0013  |    |		.CONST	0x01be,0x0013
0370 01c0 0014  |    |		.CONST	0x01c0,0x0014
0372 01c2 0015  |    |		.CONST	0x01c2,0x0015
0374 01ca 0016  |    |		.CONST	0x01ca,0x0016
0376 01cc 0017  |    |		.CONST	0x01cc,0x0017
0378 ; --------------------------------------------------------------------------------------
0378 ; Debug3 Subtable 0x7
0378 ; --------------------------------------------------------------------------------------
0378 0000 0008  |    |		.DBG3TAB	0x0000,0x0008
037a 01d3 0001  |    |		.CONST	0x01d3,0x0001
037c 01e2 0002  |    |		.CONST	0x01e2,0x0002
037e 01e6 0003  |    |		.CONST	0x01e6,0x0003
0380 01f6 0004  |    |		.CONST	0x01f6,0x0004
0382 01fb 0005  |    |		.CONST	0x01fb,0x0005
0384 01ff 0006  |    |		.CONST	0x01ff,0x0006
0386 0209 0007  |    |		.CONST	0x0209,0x0007
0388 0216 0008  |    |		.CONST	0x0216,0x0008
038a ; --------------------------------------------------------------------------------------
038a ; Debug3 Subtable 0x8
038a ; --------------------------------------------------------------------------------------
038a 0000 0003  |    |		.DBG3TAB	0x0000,0x0003
038c 0223 0001  | #  |		.CONST	0x0223,0x0001
038e 0232 0002  | 2  |		.CONST	0x0232,0x0002
0390 0236 0003  | 6  |		.CONST	0x0236,0x0003
0392 ; --------------------------------------------------------------------------------------
0392 ; Debug3 Subtable 0x9
0392 ; --------------------------------------------------------------------------------------
0392 0002 0009  |    |		.DBG3TAB	0x0002,0x0009
0394 0253 ffff  | S  |		.CONST	0x0253,0xffff
0396 0256 fffe  | V  |		.CONST	0x0256,0xfffe
0398 025a 0001  | Z  |		.CONST	0x025a,0x0001
039a 025e 0002  | ^  |		.CONST	0x025e,0x0002
039c 0268 0003  | h  |		.CONST	0x0268,0x0003
039e 026c 0004  | l  |		.CONST	0x026c,0x0004
03a0 0276 0005  | v  |		.CONST	0x0276,0x0005
03a2 027a 0006  | z  |		.CONST	0x027a,0x0006
03a4 027c 0007  | |  |		.CONST	0x027c,0x0007
03a6 0284 0008  |    |		.CONST	0x0284,0x0008
03a8 0286 0009  |    |		.CONST	0x0286,0x0009
03aa 0000 0000  |    |		.BLANK	0000[0x56]