DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦94704864b⟧

    Length: 3072 (0xc00)
    Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0

Derivation

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

Disassembly

0000 000f       |    |		.CONST	0x000f								; Version of machine code
0001 5813       |X   |		.CONST	0x5813								; Diana Version, RCG Major Version, RCG minor version
0002 0000       |    |		.CONST	0x0000								; Zero
0003 0400       |    |		.CONST	0x0400								; Offset of debug table
0004 0100       |    |		.CONST	0x0100								; Default exception handler - raise instruction
0005 00bb       |    |		.CONST	0x00bb								; Module termination instruction - signal completion
0006 0000       |    |		.CONST	0x0000								; Offset to segment table (only in elab segments)
0007 0002       |    |		.CONST	0x0002								; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0100       |    |		.CONST	0x0100								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 0026       | &  |		.CONST	0x0026								; Number of locals
000b			INIT_0008:
000b 00bf       |    |		Action	Accept_Activation						; Debug Table 0x0 = .DEBUG	0x000b,0x04b2,0x8000,0x0000,0x0058,0x0405,0x0000,0x0003
000c 0007       |    |		Action	Break_Optional							; Debug Table 0x1 = .DEBUG	0x000c,0x04b4,0x8000,0x0000,0x0058,0x0425,0x0000,0x001b
													; Debug Table 0x1.0x0 = 0xc,0xffff
000d 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x1 = 0xd,0xfffe
000e 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x2 = 0xe,0xfffd
000f 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x3 = 0xf,0xfffc
0010 0007       |    |		Action	Break_Optional							; Debug Table 0x1.0x4 = 0x10,0xfffb
0011 00e1       |    |		Load_Encached	Boolean_Cache						; Debug Table 0x1.0x5 = 0x11,0xfffa
0012 029b 010b  |    |		Declare_Subprogram	INIT_0108,For_Outer_Call,Unelaborated		; Debug Table 0x1.0x6 = 0x12,0xfff9
0014 029b 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call,Unelaborated		; Debug Table 0x1.0x7 = 0x14,0xfff8
0016 029b 011b  |    |		Declare_Subprogram	INIT_0118,For_Outer_Call,Unelaborated		; Debug Table 0x1.0x8 = 0x16,0xfff7
0018 029b 0123  |   #|		Declare_Subprogram	INIT_0120,For_Outer_Call,Unelaborated		; Debug Table 0x1.0x9 = 0x18,0xfff6
001a 029b 013b  |   ;|		Declare_Subprogram	INIT_0138,For_Outer_Call,Unelaborated		; Debug Table 0x1.0xa = 0x1a,0xfff5
001c 029b 0153  |   S|		Declare_Subprogram	INIT_0150,For_Outer_Call,Unelaborated		; Debug Table 0x1.0xb = 0x1c,0xfff4
001e 029b 019b  |    |		Declare_Subprogram	INIT_0198,For_Outer_Call,Unelaborated		; Debug Table 0x1.0xc = 0x1e,0xfff3
0020 029b 01b3  |    |		Declare_Subprogram	INIT_01b0,For_Outer_Call,Unelaborated		; Debug Table 0x1.0xd = 0x20,0xfff2
0022 029b 01cb  |    |		Declare_Subprogram	INIT_01c8,For_Outer_Call,Unelaborated		; Debug Table 0x1.0xe = 0x22,0xfff1
0024 029b 01e3  |    |		Declare_Subprogram	INIT_01e0,For_Outer_Call,Unelaborated		; Debug Table 0x1.0xf = 0x24,0xfff0
0026 4801       |H   |		Short_Literal	0x1							; Debug Table 0x1.0x10 = 0x26,0xffef
0027 4801       |H   |		Short_Literal	0x1
0028 e001       |    |		Load	0x0,0x1
0029 1b3a       | :  |		Execute	Package,Field_Read,Field_Number 0x3a
002a 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
002b 035b       | [  |		Declare_Type	Array,Constrained
002c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x1.0x11 = 0x2c,0xffee
002d 0337       | 7  |		Declare_Variable	Array
002e 4801       |H   |		Short_Literal	0x1
002f 4801       |H   |		Short_Literal	0x1
0030 e002       |    |		Load	0x0,0x2
0031 1b65       | e  |		Execute	Package,Field_Read,Field_Number 0x65
0032 0334       | 4  |		Declare_Variable	Array,With_Constraint
0033 e002       |    |		Load	0x0,0x2
0034 1840       | @  |		Execute	Package,Field_Execute,Field_Number 0x40
0035 4801       |H   |		Short_Literal	0x1
0036 00da       |    |		Load_Top	At_Offset_2
0037 01d6       |    |		Execute	Vector,Field_Write
0038 00d9       |    |		Load_Top	At_Offset_1
0039 01d4       |    |		Execute	Vector,Structure_Write
003a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x1.0x12 = 0x3a,0xffed
003b 0337       | 7  |		Declare_Variable	Array
003c 4801       |H   |		Short_Literal	0x1
003d 4801       |H   |		Short_Literal	0x1
003e e002       |    |		Load	0x0,0x2
003f 1b65       | e  |		Execute	Package,Field_Read,Field_Number 0x65
0040 0334       | 4  |		Declare_Variable	Array,With_Constraint
0041 e002       |    |		Load	0x0,0x2
0042 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0043 4801       |H   |		Short_Literal	0x1
0044 00da       |    |		Load_Top	At_Offset_2
0045 01d6       |    |		Execute	Vector,Field_Write
0046 00d9       |    |		Load_Top	At_Offset_1
0047 01d4       |    |		Execute	Vector,Structure_Write
0048 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x1.0x13 = 0x48,0xffec
0049 0337       | 7  |		Declare_Variable	Array
004a 4801       |H   |		Short_Literal	0x1
004b 4801       |H   |		Short_Literal	0x1
004c e002       |    |		Load	0x0,0x2
004d 1b65       | e  |		Execute	Package,Field_Read,Field_Number 0x65
004e 0334       | 4  |		Declare_Variable	Array,With_Constraint
004f e002       |    |		Load	0x0,0x2
0050 1851       | Q  |		Execute	Package,Field_Execute,Field_Number 0x51
0051 4801       |H   |		Short_Literal	0x1
0052 00da       |    |		Load_Top	At_Offset_2
0053 01d6       |    |		Execute	Vector,Field_Write
0054 00d9       |    |		Load_Top	At_Offset_1
0055 01d4       |    |		Execute	Vector,Structure_Write
0056 00db       |    |		Load_Top	At_Offset_3						; Debug Table 0x1.0x14 = 0x56,0xffeb
0057 0337       | 7  |		Declare_Variable	Array
0058 4801       |H   |		Short_Literal	0x1
0059 4801       |H   |		Short_Literal	0x1
005a e002       |    |		Load	0x0,0x2
005b 1b65       | e  |		Execute	Package,Field_Read,Field_Number 0x65
005c 0334       | 4  |		Declare_Variable	Array,With_Constraint
005d e002       |    |		Load	0x0,0x2
005e 1856       | V  |		Execute	Package,Field_Execute,Field_Number 0x56
005f 4801       |H   |		Short_Literal	0x1
0060 00da       |    |		Load_Top	At_Offset_2
0061 01d6       |    |		Execute	Vector,Field_Write
0062 00d9       |    |		Load_Top	At_Offset_1
0063 01d4       |    |		Execute	Vector,Structure_Write
0064 e218       |    |		Load	0x1,0x18							; Debug Table 0x1.0x15 = 0x64,0xffea
0065 0337       | 7  |		Declare_Variable	Array
0066 4801       |H   |		Short_Literal	0x1
0067 4801       |H   |		Short_Literal	0x1
0068 e002       |    |		Load	0x0,0x2
0069 1b65       | e  |		Execute	Package,Field_Read,Field_Number 0x65
006a 0334       | 4  |		Declare_Variable	Array,With_Constraint
006b e002       |    |		Load	0x0,0x2
006c 1857       | W  |		Execute	Package,Field_Execute,Field_Number 0x57
006d 4801       |H   |		Short_Literal	0x1
006e 00da       |    |		Load_Top	At_Offset_2
006f 01d6       |    |		Execute	Vector,Field_Write
0070 00d9       |    |		Load_Top	At_Offset_1
0071 01d4       |    |		Execute	Vector,Structure_Write
0072 e218       |    |		Load	0x1,0x18							; Debug Table 0x1.0x16 = 0x72,0xffe9
0073 0337       | 7  |		Declare_Variable	Array
0074 4801       |H   |		Short_Literal	0x1
0075 4801       |H   |		Short_Literal	0x1
0076 e002       |    |		Load	0x0,0x2
0077 1b65       | e  |		Execute	Package,Field_Read,Field_Number 0x65
0078 0334       | 4  |		Declare_Variable	Array,With_Constraint
0079 e002       |    |		Load	0x0,0x2
007a 1858       | X  |		Execute	Package,Field_Execute,Field_Number 0x58
007b 4801       |H   |		Short_Literal	0x1
007c 00da       |    |		Load_Top	At_Offset_2
007d 01d6       |    |		Execute	Vector,Field_Write
007e 00d9       |    |		Load_Top	At_Offset_1
007f 01d4       |    |		Execute	Vector,Structure_Write
0080 628b       |b   |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00580425}		; Debug Table 0x1.0x17 = 0x80,0xffe8
0081 49a6       |I   |		Short_Literal	0x1a6
0082 e20d       |    |		Load	0x1,0xd
0083 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0084 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
0085 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0086 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0087 e219       |    |		Load	0x1,0x19
0088 0335       | 5  |		Declare_Variable	Array,Duplicate
0089 00d0       |    |		Action	Swap_Control
008a 00d1       |    |		Pop_Control	Pop_Count_1
008b 4800       |H   |		Short_Literal	0x0
008c 4801       |H   |		Short_Literal	0x1
008d e003       |    |		Load	0x0,0x3
008e 0387       |    |		Declare_Variable	Package
008f 00d8       |    |		Load_Top	At_Offset_0
0090 020f       |    |		Execute	Module,Activate
0091 627a       |bz  |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00580425}		; Debug Table 0x1.0x18 = 0x91,0xffe7
0092 49c3       |I   |		Short_Literal	0x1c3
0093 e20d       |    |		Load	0x1,0xd
0094 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0095 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0096 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
0097 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0098 e21a       |    |		Load	0x1,0x1a
0099 0335       | 5  |		Declare_Variable	Array,Duplicate
009a 00d0       |    |		Action	Swap_Control
009b 00d1       |    |		Pop_Control	Pop_Count_1
009c 4800       |H   |		Short_Literal	0x0
009d 4801       |H   |		Short_Literal	0x1
009e e003       |    |		Load	0x0,0x3
009f 0387       |    |		Declare_Variable	Package
00a0 00d8       |    |		Load_Top	At_Offset_0
00a1 020f       |    |		Execute	Module,Activate
00a2 6269       |bi  |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00580425}		; Debug Table 0x1.0x19 = 0xa2,0xffe6
00a3 49e0       |I   |		Short_Literal	0x1e0
00a4 e20d       |    |		Load	0x1,0xd
00a5 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
00a6 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
00a7 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
00a8 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
00a9 e21b       |    |		Load	0x1,0x1b
00aa 0335       | 5  |		Declare_Variable	Array,Duplicate
00ab 00d0       |    |		Action	Swap_Control
00ac 00d1       |    |		Pop_Control	Pop_Count_1
00ad 4800       |H   |		Short_Literal	0x0
00ae 4801       |H   |		Short_Literal	0x1
00af e003       |    |		Load	0x0,0x3
00b0 0387       |    |		Declare_Variable	Package
00b1 00d8       |    |		Load_Top	At_Offset_0
00b2 020f       |    |		Execute	Module,Activate
00b3 6258       |bX  |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00580425}		; Debug Table 0x1.0x1a = 0xb3,0xffe5
00b4 49fd       |I   |		Short_Literal	0x1fd
00b5 e20d       |    |		Load	0x1,0xd
00b6 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
00b7 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
00b8 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
00b9 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
00ba e21c       |    |		Load	0x1,0x1c
00bb 0335       | 5  |		Declare_Variable	Array,Duplicate
00bc 00d0       |    |		Action	Swap_Control
00bd 00d1       |    |		Pop_Control	Pop_Count_1
00be 4800       |H   |		Short_Literal	0x0
00bf 4801       |H   |		Short_Literal	0x1
00c0 e003       |    |		Load	0x0,0x3
00c1 0387       |    |		Declare_Variable	Package
00c2 00d8       |    |		Load_Top	At_Offset_0
00c3 020f       |    |		Execute	Module,Activate
00c4 6247       |bG  |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00580425}		; Debug Table 0x1.0x1b = 0xc4,0xffe4
00c5 4a1a       |J   |		Short_Literal	0x21a
00c6 e20d       |    |		Load	0x1,0xd
00c7 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16
00c8 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
00c9 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
00ca 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
00cb e21d       |    |		Load	0x1,0x1d
00cc 0335       | 5  |		Declare_Variable	Array,Duplicate
00cd 00d0       |    |		Action	Swap_Control
00ce 00d1       |    |		Pop_Control	Pop_Count_1
00cf 4800       |H   |		Short_Literal	0x0
00d0 4801       |H   |		Short_Literal	0x1
00d1 e003       |    |		Load	0x0,0x3
00d2 0387       |    |		Declare_Variable	Package
00d3 00d8       |    |		Load_Top	At_Offset_0
00d4 020f       |    |		Execute	Module,Activate
00d5 6236       |b6  |		Indirect_Literal	Discrete,0x30c,{0x00000000, 0x00580425}		; Debug Table 0x1.0x1c = 0xd5,0xffe3
00d6 4a37       |J7  |		Short_Literal	0x237
00d7 e20d       |    |		Load	0x1,0xd
00d8 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17
00d9 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
00da 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
00db 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
00dc e21e       |    |		Load	0x1,0x1e
00dd 0335       | 5  |		Declare_Variable	Array,Duplicate
00de 00d0       |    |		Action	Swap_Control
00df 00d1       |    |		Pop_Control	Pop_Count_1
00e0 4800       |H   |		Short_Literal	0x0
00e1 4801       |H   |		Short_Literal	0x1
00e2 e003       |    |		Load	0x0,0x3
00e3 0387       |    |		Declare_Variable	Package
00e4 00d8       |    |		Load_Top	At_Offset_0
00e5 020f       |    |		Execute	Module,Activate
00e6 029d 01fb  |    |		Declare_Subprogram	INIT_01f8,For_Outer_Call			; Debug Table 0x1.0x1d = 0xe6,0xffe2
00e8 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11				; Debug Table 0x1.0x1e = 0xe8,0xffe1
00e9 00c7       |    |		Action	Elaborate_Subprogram
00ea 029b 021b  |    |		Declare_Subprogram	INIT_0218,For_Outer_Call,Unelaborated		; Debug Table 0x1.0x1f = 0xea,0xffe0
00ec 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12				; Debug Table 0x1.0x20 = 0xec,0xffdf
00ed 00c7       |    |		Action	Elaborate_Subprogram
00ee 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13				; Debug Table 0x1.0x21 = 0xee,0xffde
00ef 00c7       |    |		Action	Elaborate_Subprogram
00f0 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14				; Debug Table 0x1.0x22 = 0xf0,0xffdd
00f1 00c7       |    |		Action	Elaborate_Subprogram
00f2 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15				; Debug Table 0x1.0x23 = 0xf2,0xffdc
00f3 00c7       |    |		Action	Elaborate_Subprogram
00f4 1d16       |    |		Execute_Immediate	Reference_Lex_1,0x16				; Debug Table 0x1.0x24 = 0xf4,0xffdb
00f5 00c7       |    |		Action	Elaborate_Subprogram
00f6 1d17       |    |		Execute_Immediate	Reference_Lex_1,0x17				; Debug Table 0x1.0x25 = 0xf6,0xffda
00f7 00c7       |    |		Action	Elaborate_Subprogram
00f8 1d26       | &  |		Execute_Immediate	Reference_Lex_1,0x26				; Debug Table 0x1.0x26 = 0xf8,0xffd9
00f9 00c7       |    |		Action	Elaborate_Subprogram
00fa 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf				; Debug Table 0x1.0x27 = 0xfa,0xffd8
00fb 00c7       |    |		Action	Elaborate_Subprogram
00fc 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10				; Debug Table 0x1.0x28 = 0xfc,0xffd7
00fd 00c7       |    |		Action	Elaborate_Subprogram
00fe 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe				; Debug Table 0x1.0x29 = 0xfe,0xffd6
00ff 00c7       |    |		Action	Elaborate_Subprogram
0100			BODY_0008:
0100 00bc       |    |		Action	Signal_Activated
0101 00bb       |    |		Action	Signal_Completion
0102 0000 0000  |    |		.BLANK	0000[0x6]
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 4939       |I9  |		Short_Literal	0x139							; Debug Table 0x2 = .DEBUG	0x010b,0x050a,0x0001,0x0000,0x0058,0x0425,0x0000,0x0038
													; Debug Table 0x2.0x0 = 0x10b,0x1
010c 0257       | W  |		Execute	Discrete,Raise
010d 0000 0000  |    |		.XXX[0x3]
010f 0000       |    |
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113       |    |		.CONST	0x0113								; Address of begin
0111 0004       |    |		.CONST	0x0004								; Address of exception handler
0112 0001       |    |		.CONST	0x0001								; Number of locals
0113			BODY_0110:
0113			INIT_0110:
0113 4800       |H   |		Short_Literal	0x0							; Debug Table 0x3 = .DEBUG	0x0113,0x050e,0x0002,0x0000,0x0058,0x0425,0x0000,0x0059
													; Debug Table 0x3.0x0 = 0x113,0x1
0114 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0115 0000 0000  |    |		.XXX[0x3]
0117 0000       |    |
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 011b       |    |		.CONST	0x011b								; Address of begin
0119 0004       |    |		.CONST	0x0004								; Address of exception handler
011a 0001       |    |		.CONST	0x0001								; Number of locals
011b			BODY_0118:
011b			INIT_0118:
011b 00ea       |    |		Load_Encached	Null_String_Cache					; Debug Table 0x4 = .DEBUG	0x011b,0x0512,0x0002,0x0000,0x0058,0x0425,0x0000,0x0062
													; Debug Table 0x4.0x0 = 0x11b,0x1
011c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
011d 0000 0000  |    |		.XXX[0x3]
011f 0000       |    |
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0125       | %  |		.CONST	0x0125								; Address of begin
0121 0004       |    |		.CONST	0x0004								; Address of exception handler
0122 0002       |    |		.CONST	0x0002								; Number of locals
0123			INIT_0120:
0123 029f 0283  |    |		Declare_Subprogram	INIT_0280,For_Call				; Debug Table 0x5 = .DEBUG	0x0123,0x0516,0x0001,0x0000,0x0058,0x0425,0x0000,0x006d
0125			BODY_0120:
0125 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x5.0x0 = 0x125,0x1
0126 e5fd       |    |		Load	0x2,-0x3
0127 e004       |    |		Load	0x0,0x4
0128 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0129 e004       |    |		Load	0x0,0x4
012a 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
012b e5fc       |    |		Load	0x2,-0x4
012c 00ea       |    |		Load_Encached	Null_String_Cache
012d 4801       |H   |		Short_Literal	0x1
012e e001       |    |		Load	0x0,0x1
012f 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0130 c5fb       |    |		Store	0x2,-0x5
0131 8402       |    |		Call	0x2,0x2								; Debug Table 0x5.0x1 = 0x131,0x2
0132 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0133 0000 0000  |    |		.BLANK	0000[0x5]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013d       | =  |		.CONST	0x013d								; Address of begin
0139 0004       |    |		.CONST	0x0004								; Address of exception handler
013a 0002       |    |		.CONST	0x0002								; Number of locals
013b			INIT_0138:
013b 029f 02b3  |    |		Declare_Subprogram	INIT_02b0,For_Call				; Debug Table 0x6 = .DEBUG	0x013b,0x051c,0x0001,0x0000,0x0058,0x0425,0x0000,0x008e
013d			BODY_0138:
013d e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x6.0x0 = 0x13d,0x1
013e e5fd       |    |		Load	0x2,-0x3
013f e004       |    |		Load	0x0,0x4
0140 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
0141 e004       |    |		Load	0x0,0x4
0142 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
0143 e5fc       |    |		Load	0x2,-0x4
0144 00ea       |    |		Load_Encached	Null_String_Cache
0145 4801       |H   |		Short_Literal	0x1
0146 e001       |    |		Load	0x0,0x1
0147 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0148 c5fb       |    |		Store	0x2,-0x5
0149 8402       |    |		Call	0x2,0x2								; Debug Table 0x6.0x1 = 0x149,0x2
014a 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
014b 0000 0000  |    |		.BLANK	0000[0x5]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0163       | c  |		.CONST	0x0163								; Address of begin
0151 0004       |    |		.CONST	0x0004								; Address of exception handler
0152 0006       |    |		.CONST	0x0006								; Number of locals
0153			INIT_0150:
0153 e005       |    |		Load	0x0,0x5								; Debug Table 0x7 = .DEBUG	0x0153,0x0522,0x0001,0x0000,0x0058,0x0425,0x0000,0x00af
													; Debug Table 0x7.0x0 = 0x153,0xffff
0154 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0155 02c7       |    |		Declare_Variable	Any
0156 00d8       |    |		Load_Top	At_Offset_0
0157 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0158 e004       |    |		Load	0x0,0x4								; Debug Table 0x7.0x1 = 0x158,0xfffe
0159 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
015a 02c7       |    |		Declare_Variable	Any
015b 00d8       |    |		Load_Top	At_Offset_0
015c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
015d e004       |    |		Load	0x0,0x4								; Debug Table 0x7.0x2 = 0x15d,0xfffd
015e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
015f 029f 02db  |    |		Declare_Subprogram	INIT_02d8,For_Call				; Debug Table 0x7.0x3 = 0x15f,0xfffc
0161 029f 0313  |    |		Declare_Subprogram	INIT_0310,For_Call
0163			BODY_0150:
0163 e004       |    |		Load	0x0,0x4								; Debug Table 0x7.0x4 = 0x163,0x1
0164 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0165 e403       |    |		Load	0x2,0x3
0166 0120       |    |		Execute	Any,Is_Value
0167 6803       |h   |		Jump_Zero	0x16b
0168 e004       |    |		Load	0x0,0x4
0169 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
016a 7801       |x   |		Jump	0x16c
016b e403       |    |		Load	0x2,0x3
016c e5fd       |    |		Load	0x2,-0x3
016d e5ff       |    |		Load	0x2,-0x1
016e e004       |    |		Load	0x0,0x4
016f 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0170 183f       | ?  |		Execute	Package,Field_Execute,Field_Number 0x3f
0171 e005       |    |		Load	0x0,0x5
0172 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0173 c403       |    |		Store	0x2,0x3
0174 005b       | [  |		Store_Top	Discrete,At_Offset_3
0175 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x5 = 0x175,0x2
0176 8225       | %  |		Call	0x1,0x25
0177 e004       |    |		Load	0x0,0x4								; Debug Table 0x7.0x6 = 0x177,0x3
0178 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0179 e402       |    |		Load	0x2,0x2
017a 0120       |    |		Execute	Any,Is_Value
017b 6803       |h   |		Jump_Zero	0x17f
017c e005       |    |		Load	0x0,0x5
017d 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
017e 7801       |x   |		Jump	0x180
017f e402       |    |		Load	0x2,0x2
0180 4800       |H   |		Short_Literal	0x0
0181 4801       |H   |		Short_Literal	0x1
0182 e5fd       |    |		Load	0x2,-0x3
0183 e403       |    |		Load	0x2,0x3
0184 e005       |    |		Load	0x0,0x5
0185 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0186 c402       |    |		Store	0x2,0x2
0187 005b       | [  |		Store_Top	Discrete,At_Offset_3
0188 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0x7 = 0x188,0x4
0189 8225       | %  |		Call	0x1,0x25
018a 8406       |    |		Call	0x2,0x6								; Debug Table 0x7.0x8 = 0x18a,0x5
018b e004       |    |		Load	0x0,0x4								; Debug Table 0x7.0x9 = 0x18b,0x6
018c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
018d e402       |    |		Load	0x2,0x2
018e e005       |    |		Load	0x0,0x5
018f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0190 005b       | [  |		Store_Top	Discrete,At_Offset_3
0191 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0x7.0xa = 0x191,0x7
0192 8225       | %  |		Call	0x1,0x25
0193 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0194 0000 0000  |    |		.BLANK	0000[0x4]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019d       |    |		.CONST	0x019d								; Address of begin
0199 0004       |    |		.CONST	0x0004								; Address of exception handler
019a 0002       |    |		.CONST	0x0002								; Number of locals
019b			INIT_0198:
019b 029f 033b  |   ;|		Declare_Subprogram	INIT_0338,For_Call				; Debug Table 0x8 = .DEBUG	0x019b,0x053a,0x0001,0x0000,0x0058,0x0425,0x0000,0x00d0
019d			BODY_0198:
019d e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x8.0x0 = 0x19d,0x1
019e e5fd       |    |		Load	0x2,-0x3
019f e004       |    |		Load	0x0,0x4
01a0 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
01a1 e004       |    |		Load	0x0,0x4
01a2 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01a3 e5fc       |    |		Load	0x2,-0x4
01a4 00ea       |    |		Load_Encached	Null_String_Cache
01a5 4801       |H   |		Short_Literal	0x1
01a6 e001       |    |		Load	0x0,0x1
01a7 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01a8 c5fb       |    |		Store	0x2,-0x5
01a9 8402       |    |		Call	0x2,0x2								; Debug Table 0x8.0x1 = 0x1a9,0x2
01aa 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
01ab 0000 0000  |    |		.BLANK	0000[0x5]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b5       |    |		.CONST	0x01b5								; Address of begin
01b1 0004       |    |		.CONST	0x0004								; Address of exception handler
01b2 0002       |    |		.CONST	0x0002								; Number of locals
01b3			INIT_01b0:
01b3 029f 036b  |   k|		Declare_Subprogram	INIT_0368,For_Call				; Debug Table 0x9 = .DEBUG	0x01b3,0x0540,0x0001,0x0000,0x0058,0x0425,0x0000,0x00f1
01b5			BODY_01b0:
01b5 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0x9.0x0 = 0x1b5,0x1
01b6 e5fd       |    |		Load	0x2,-0x3
01b7 e004       |    |		Load	0x0,0x4
01b8 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
01b9 e004       |    |		Load	0x0,0x4
01ba 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01bb e5fc       |    |		Load	0x2,-0x4
01bc 00ea       |    |		Load_Encached	Null_String_Cache
01bd 4801       |H   |		Short_Literal	0x1
01be e001       |    |		Load	0x0,0x1
01bf 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01c0 c5fb       |    |		Store	0x2,-0x5
01c1 8402       |    |		Call	0x2,0x2								; Debug Table 0x9.0x1 = 0x1c1,0x2
01c2 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
01c3 0000 0000  |    |		.BLANK	0000[0x5]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cd       |    |		.CONST	0x01cd								; Address of begin
01c9 0004       |    |		.CONST	0x0004								; Address of exception handler
01ca 0002       |    |		.CONST	0x0002								; Number of locals
01cb			INIT_01c8:
01cb 029f 039b  |    |		Declare_Subprogram	INIT_0398,For_Call				; Debug Table 0xa = .DEBUG	0x01cb,0x0546,0x0001,0x0000,0x0058,0x0425,0x0000,0x0112
01cd			BODY_01c8:
01cd e5fb       |    |		Load	0x2,-0x5							; Debug Table 0xa.0x0 = 0x1cd,0x1
01ce e5fd       |    |		Load	0x2,-0x3
01cf e004       |    |		Load	0x0,0x4
01d0 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
01d1 e004       |    |		Load	0x0,0x4
01d2 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01d3 e5fc       |    |		Load	0x2,-0x4
01d4 00ea       |    |		Load_Encached	Null_String_Cache
01d5 4801       |H   |		Short_Literal	0x1
01d6 e001       |    |		Load	0x0,0x1
01d7 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01d8 c5fb       |    |		Store	0x2,-0x5
01d9 8402       |    |		Call	0x2,0x2								; Debug Table 0xa.0x1 = 0x1d9,0x2
01da 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
01db 0000 0000  |    |		.BLANK	0000[0x5]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e5       |    |		.CONST	0x01e5								; Address of begin
01e1 0004       |    |		.CONST	0x0004								; Address of exception handler
01e2 0002       |    |		.CONST	0x0002								; Number of locals
01e3			INIT_01e0:
01e3 029f 03cb  |    |		Declare_Subprogram	INIT_03c8,For_Call				; Debug Table 0xb = .DEBUG	0x01e3,0x054c,0x0001,0x0000,0x0058,0x0425,0x0000,0x0133
01e5			BODY_01e0:
01e5 e5fb       |    |		Load	0x2,-0x5							; Debug Table 0xb.0x0 = 0x1e5,0x1
01e6 e5fd       |    |		Load	0x2,-0x3
01e7 e004       |    |		Load	0x0,0x4
01e8 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
01e9 e004       |    |		Load	0x0,0x4
01ea 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
01eb e5fc       |    |		Load	0x2,-0x4
01ec 00ea       |    |		Load_Encached	Null_String_Cache
01ed 4801       |H   |		Short_Literal	0x1
01ee e001       |    |		Load	0x0,0x1
01ef 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01f0 c5fb       |    |		Store	0x2,-0x5
01f1 8402       |    |		Call	0x2,0x2								; Debug Table 0xb.0x1 = 0x1f1,0x2
01f2 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
01f3 0000 0000  |    |		.BLANK	0000[0x5]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb       |    |		.CONST	0x01fb								; Address of begin
01f9 0004       |    |		.CONST	0x0004								; Address of exception handler
01fa 0001       |    |		.CONST	0x0001								; Number of locals
01fb			BODY_01f8:
01fb			INIT_01f8:
01fb 00da       |    |		Load_Top	At_Offset_2						; Debug Table 0xc = .DEBUG	0x01fb,0x0552,0x0001,0x0000,0x0058,0x0425,0x0000,0x0254
													; Debug Table 0xc.0x0 = 0x1fb,0x1
01fc 460e       |F   |		Jump_Case	0xf
01fd 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2					; case 0x0
01fe 780d       |x   |		Jump	0x20c								; case 0x1
01ff 7814       |x   |		Jump	0x214								; case 0x2
0200 7813       |x   |		Jump	0x214								; case 0x3
0201 7812       |x   |		Jump	0x214								; case 0x4
0202 7811       |x   |		Jump	0x214								; case 0x5
0203 7810       |x   |		Jump	0x214								; case 0x6
0204 780f       |x   |		Jump	0x214								; case 0x7
0205 7808       |x   |		Jump	0x20e								; case 0x8
0206 7807       |x   |		Jump	0x20e								; case 0x9
0207 7808       |x   |		Jump	0x210								; case 0xa
0208 7809       |x   |		Jump	0x212								; case 0xb
0209 780a       |x   |		Jump	0x214								; case 0xc
020a 7809       |x   |		Jump	0x214								; case 0xd
020b 7808       |x   |		Jump	0x214								; case 0xe
020c 4935       |I5  |		Short_Literal	0x135							; Debug Table 0xc.0x1 = 0x20c,0x3
020d 0257       | W  |		Execute	Discrete,Raise
020e 4920       |I   |		Short_Literal	0x120							; Debug Table 0xc.0x2 = 0x20e,0x4
020f 0257       | W  |		Execute	Discrete,Raise
0210 4931       |I1  |		Short_Literal	0x131							; Debug Table 0xc.0x3 = 0x210,0x5
0211 0257       | W  |		Execute	Discrete,Raise
0212 4932       |I2  |		Short_Literal	0x132							; Debug Table 0xc.0x4 = 0x212,0x6
0213 0257       | W  |		Execute	Discrete,Raise
0214 4940       |I@  |		Short_Literal	0x140							; Debug Table 0xc.0x5 = 0x214,0x7
0215 0257       | W  |		Execute	Discrete,Raise
0216 0000 0000  |    |		.XXX[0x2]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 022c       | ,  |		.CONST	0x022c								; Address of begin
0219 0004       |    |		.CONST	0x0004								; Address of exception handler
021a 0005       |    |		.CONST	0x0005								; Number of locals
021b			INIT_0218:
021b e005       |    |		Load	0x0,0x5								; Debug Table 0xd = .DEBUG	0x021b,0x0560,0x0001,0x0000,0x0058,0x0425,0x0000,0x031b
													; Debug Table 0xd.0x0 = 0x21b,0xffff
021c 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
021d 02c7       |    |		Declare_Variable	Any
021e 00d8       |    |		Load_Top	At_Offset_0
021f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0220 e004       |    |		Load	0x0,0x4								; Debug Table 0xd.0x1 = 0x220,0xfffe
0221 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0222 02c7       |    |		Declare_Variable	Any
0223 00d8       |    |		Load_Top	At_Offset_0
0224 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0225 e004       |    |		Load	0x0,0x4								; Debug Table 0xd.0x2 = 0x225,0xfffd
0226 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0227 e005       |    |		Load	0x0,0x5								; Debug Table 0xd.0x3 = 0x227,0xfffc
0228 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0229 02c7       |    |		Declare_Variable	Any
022a 00d8       |    |		Load_Top	At_Offset_0
022b 1c00       |    |		Execute_Immediate	Run_Utility,0x0
022c			BODY_0218:
022c 00be       |    |		Action	Activate_Tasks
022d e004       |    |		Load	0x0,0x4								; Debug Table 0xd.0x4 = 0x22d,0x1
022e 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
022f 00db       |    |		Load_Top	At_Offset_3
0230 0120       |    |		Execute	Any,Is_Value
0231 6803       |h   |		Jump_Zero	0x235
0232 e004       |    |		Load	0x0,0x4
0233 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0234 7801       |x   |		Jump	0x236
0235 00db       |    |		Load_Top	At_Offset_3
0236 4800       |H   |		Short_Literal	0x0
0237 e5fe       |    |		Load	0x2,-0x2
0238 e5ff       |    |		Load	0x2,-0x1
0239 e004       |    |		Load	0x0,0x4
023a 1b39       | 9  |		Execute	Package,Field_Read,Field_Number 0x39
023b 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
023c c403       |    |		Store	0x2,0x3
023d 005a       | Z  |		Store_Top	Discrete,At_Offset_2
023e 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x5 = 0x23e,0x2
023f 8225       | %  |		Call	0x1,0x25
0240 e004       |    |		Load	0x0,0x4								; Debug Table 0xd.0x6 = 0x240,0x3
0241 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0242 e402       |    |		Load	0x2,0x2
0243 0120       |    |		Execute	Any,Is_Value
0244 6803       |h   |		Jump_Zero	0x248
0245 e005       |    |		Load	0x0,0x5
0246 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0247 7801       |x   |		Jump	0x249
0248 e402       |    |		Load	0x2,0x2
0249 4801       |H   |		Short_Literal	0x1
024a 4800       |H   |		Short_Literal	0x0
024b e5fe       |    |		Load	0x2,-0x2
024c e403       |    |		Load	0x2,0x3
024d e005       |    |		Load	0x0,0x5
024e 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
024f c402       |    |		Store	0x2,0x2
0250 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0251 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x7 = 0x251,0x4
0252 8225       | %  |		Call	0x1,0x25
0253 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xd.0x8 = 0x253,0x5
0254 0120       |    |		Execute	Any,Is_Value
0255 6803       |h   |		Jump_Zero	0x259
0256 e005       |    |		Load	0x0,0x5
0257 1b17       |    |		Execute	Package,Field_Read,Field_Number 0x17
0258 7801       |x   |		Jump	0x25a
0259 00d8       |    |		Load_Top	At_Offset_0
025a e402       |    |		Load	0x2,0x2
025b e005       |    |		Load	0x0,0x5
025c 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
025d c405       |    |		Store	0x2,0x5
025e 00cf       |    |		Action	Mark_Auxiliary
025f 780d       |x   |		Jump	0x26d
0260 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0x9 = 0x260,0x7
0261 e005       |    |		Load	0x0,0x5
0262 181a       |    |		Execute	Package,Field_Execute,Field_Number 0x1a
0263 e004       |    |		Load	0x0,0x4
0264 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0265 183e       | >  |		Execute	Package,Field_Execute,Field_Number 0x3e
0266 e006       |    |		Load	0x0,0x6
0267 1864       | d  |		Execute	Package,Field_Execute,Field_Number 0x64
0268 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0xa = 0x268,0x8
0269 e005       |    |		Load	0x0,0x5
026a 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
026b c405       |    |		Store	0x2,0x5
026c 00c9       |    |		Action	Pop_Auxiliary_Loop
026d 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0xb = 0x26d,0x6
026e e005       |    |		Load	0x0,0x5
026f 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0270 6fef       |o   |		Jump_Zero	0x260
0271 00ce       |    |		Action	Pop_Auxiliary
0272 e004       |    |		Load	0x0,0x4								; Debug Table 0xd.0xc = 0x272,0x9
0273 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0274 e402       |    |		Load	0x2,0x2
0275 e005       |    |		Load	0x0,0x5
0276 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0277 005a       | Z  |		Store_Top	Discrete,At_Offset_2
0278 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0xd.0xd = 0x278,0xa
0279 8225       | %  |		Call	0x1,0x25
027a 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
027b 0000 0000  |    |		.BLANK	0000[0x5]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 028a       |    |		.CONST	0x028a								; Address of begin
0281 0004       |    |		.CONST	0x0004								; Address of exception handler
0282 0002       |    |		.CONST	0x0002								; Number of locals
0283			INIT_0280:
0283 e006       |    |		Load	0x0,0x6								; Debug Table 0xe = .DEBUG	0x0283,0x057e,0x0004,0x0000,0x0058,0x0425,0x0000,0x0316
													; Debug Table 0xe.0x0 = 0x283,0xffff
0284 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0285 02c7       |    |		Declare_Variable	Any
0286 e5fb       |    |		Load	0x2,-0x5
0287 e006       |    |		Load	0x0,0x6
0288 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
0289 c602       |    |		Store	0x3,0x2
028a			BODY_0280:
028a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x1 = 0x28a,0x1
028b 00ea       |    |		Load_Encached	Null_String_Cache
028c 00ea       |    |		Load_Encached	Null_String_Cache
028d 4801       |H   |		Short_Literal	0x1
028e e006       |    |		Load	0x0,0x6
028f 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0290 c602       |    |		Store	0x3,0x2
0291 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x2 = 0x291,0x2
0292 e006       |    |		Load	0x0,0x6
0293 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
0294 0092 03f1  |    |		Action	Push_String_Extended,0x3f1					; "<RAISE_EXCEPTION>"
													; Debug Table 0xe.0x3 = 0x294,0x3
0296 e5ff       |    |		Load	0x2,-0x1
0297 e004       |    |		Load	0x0,0x4
0298 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0299 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
029a 4802       |H   |		Short_Literal	0x2
029b 0092 03f2  |    |		Action	Push_String_Extended,0x3f2					; "?"
029d 0092 03f2  |    |		Action	Push_String_Extended,0x3f2					; "?"
029f 0092 03f2  |    |		Action	Push_String_Extended,0x3f2					; "?"
02a1 e007       |    |		Load	0x0,0x7
02a2 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
02a3 e006       |    |		Load	0x0,0x6								; Debug Table 0xe.0x4 = 0x2a3,0x4
02a4 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
02a5 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x5 = 0x2a5,0x5
02a6 4800       |H   |		Short_Literal	0x0
02a7 e006       |    |		Load	0x0,0x6
02a8 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
02a9 c602       |    |		Store	0x3,0x2
02aa 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xe.0x6 = 0x2aa,0x6
02ab e006       |    |		Load	0x0,0x6
02ac 187e       | ~  |		Execute	Package,Field_Execute,Field_Number 0x7e
02ad c5fb       |    |		Store	0x2,-0x5
02ae 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02af 0000       |    |		.XXX[0x1]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02ba       |    |		.CONST	0x02ba								; Address of begin
02b1 0004       |    |		.CONST	0x0004								; Address of exception handler
02b2 0002       |    |		.CONST	0x0002								; Number of locals
02b3			INIT_02b0:
02b3 e006       |    |		Load	0x0,0x6								; Debug Table 0xf = .DEBUG	0x02b3,0x058e,0x0004,0x0000,0x0058,0x0425,0x0000,0x0397
													; Debug Table 0xf.0x0 = 0x2b3,0xffff
02b4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
02b5 02c7       |    |		Declare_Variable	Any
02b6 e5fb       |    |		Load	0x2,-0x5
02b7 e006       |    |		Load	0x0,0x6
02b8 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
02b9 c602       |    |		Store	0x3,0x2
02ba			BODY_02b0:
02ba 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x1 = 0x2ba,0x1
02bb 00ea       |    |		Load_Encached	Null_String_Cache
02bc 00ea       |    |		Load_Encached	Null_String_Cache
02bd 4801       |H   |		Short_Literal	0x1
02be e006       |    |		Load	0x0,0x6
02bf 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
02c0 c602       |    |		Store	0x3,0x2
02c1 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x2 = 0x2c1,0x2
02c2 e006       |    |		Load	0x0,0x6
02c3 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
02c4 e5fd       |    |		Load	0x2,-0x3							; Debug Table 0xf.0x3 = 0x2c4,0x3
02c5 e5ff       |    |		Load	0x2,-0x1
02c6 8226       | &  |		Call	0x1,0x26
02c7 e006       |    |		Load	0x0,0x6								; Debug Table 0xf.0x4 = 0x2c7,0x4
02c8 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
02c9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x5 = 0x2c9,0x5
02ca 4800       |H   |		Short_Literal	0x0
02cb e006       |    |		Load	0x0,0x6
02cc 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
02cd c602       |    |		Store	0x3,0x2
02ce 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0xf.0x6 = 0x2ce,0x6
02cf e006       |    |		Load	0x0,0x6
02d0 187e       | ~  |		Execute	Package,Field_Execute,Field_Number 0x7e
02d1 c5fb       |    |		Store	0x2,-0x5
02d2 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
02d3 0000 0000  |    |		.BLANK	0000[0x5]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02e3       |    |		.CONST	0x02e3								; Address of begin
02d9 0004       |    |		.CONST	0x0004								; Address of exception handler
02da 0003       |    |		.CONST	0x0003								; Number of locals
02db			INIT_02d8:
02db e004       |    |		Load	0x0,0x4								; Debug Table 0x10 = .DEBUG	0x02db,0x059e,0x0001,0x0000,0x0058,0x0425,0x0000,0x03d1
													; Debug Table 0x10.0x0 = 0x2db,0xffff
02dc 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02dd 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02de e004       |    |		Load	0x0,0x4								; Debug Table 0x10.0x1 = 0x2de,0xfffe
02df 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02e0 02c7       |    |		Declare_Variable	Any
02e1 00d8       |    |		Load_Top	At_Offset_0
02e2 1c00       |    |		Execute_Immediate	Run_Utility,0x0
02e3			BODY_02d8:
02e3 e004       |    |		Load	0x0,0x4								; Debug Table 0x10.0x2 = 0x2e3,0x1
02e4 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02e5 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02e6 00d9       |    |		Load_Top	At_Offset_1
02e7 0120       |    |		Execute	Any,Is_Value
02e8 6803       |h   |		Jump_Zero	0x2ec
02e9 e004       |    |		Load	0x0,0x4
02ea 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
02eb 7801       |x   |		Jump	0x2ed
02ec 00d9       |    |		Load_Top	At_Offset_1
02ed 601a       |`   |		Indirect_Literal	Discrete,0x308,{0x00000000, 0x00004000}
02ee e008       |    |		Load	0x0,0x8
02ef 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
02f0 e009       |    |		Load	0x0,0x9
02f1 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
02f2 e004       |    |		Load	0x0,0x4
02f3 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02f4 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
02f5 e7ff       |    |		Load	0x3,-0x1
02f6 e004       |    |		Load	0x0,0x4
02f7 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
02f8 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
02f9 c603       |    |		Store	0x3,0x3
02fa 005a       | Z  |		Store_Top	Discrete,At_Offset_2
02fb 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x10.0x3 = 0x2fb,0x2
02fc 0b00       |    |		Execute_Immediate	Case_Compare,0x0
02fd 7002       |p   |		Jump_Nonzero	0x300
02fe 4963       |Ic  |		Short_Literal	0x163							; Debug Table 0x10.0x4 = 0x2fe,0x4
02ff 0257       | W  |		Execute	Discrete,Raise
0300 e402       |    |		Load	0x2,0x2								; Debug Table 0x10.0x5 = 0x300,0x3
0301 00da       |    |		Load_Top	At_Offset_2
0302 e005       |    |		Load	0x0,0x5
0303 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0304 c402       |    |		Store	0x2,0x2
0305 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0306 0000 0000  |    |		.XXX[0x2]
0308 0000 0000  |    |		.LITERAL	{0x00000000, 0x00004000}
030c 0000 0000  |    |		.LITERAL	{0x00000000, 0x00580425}
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 031a       |    |		.CONST	0x031a								; Address of begin
0311 0004       |    |		.CONST	0x0004								; Address of exception handler
0312 0002       |    |		.CONST	0x0002								; Number of locals
0313			INIT_0310:
0313 e006       |    |		Load	0x0,0x6								; Debug Table 0x11 = .DEBUG	0x0313,0x05ac,0x0004,0x0000,0x0058,0x0425,0x0000,0x0473
													; Debug Table 0x11.0x0 = 0x313,0xffff
0314 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0315 02c7       |    |		Declare_Variable	Any
0316 e5fb       |    |		Load	0x2,-0x5
0317 e006       |    |		Load	0x0,0x6
0318 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
0319 c602       |    |		Store	0x3,0x2
031a			BODY_0310:
031a 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x1 = 0x31a,0x1
031b 00ea       |    |		Load_Encached	Null_String_Cache
031c e5fb       |    |		Load	0x2,-0x5
031d e001       |    |		Load	0x0,0x1
031e 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
031f 4800       |H   |		Short_Literal	0x0
0320 e006       |    |		Load	0x0,0x6
0321 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0322 c602       |    |		Store	0x3,0x2
0323 00cf       |    |		Action	Mark_Auxiliary
0324 7805       |x   |		Jump	0x32a
0325 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x2 = 0x325,0x3
0326 e006       |    |		Load	0x0,0x6
0327 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
0328 8405       |    |		Call	0x2,0x5
0329 00c9       |    |		Action	Pop_Auxiliary_Loop
032a 00d9       |    |		Load_Top	At_Offset_1						; Debug Table 0x11.0x3 = 0x32a,0x2
032b e006       |    |		Load	0x0,0x6
032c 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
032d 6ff7       |o   |		Jump_Zero	0x325
032e 00ce       |    |		Action	Pop_Auxiliary
032f 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x11.0x4 = 0x32f,0x4
0330 e006       |    |		Load	0x0,0x6
0331 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0332 c602       |    |		Store	0x3,0x2
0333 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0334 0000 0000  |    |		.BLANK	0000[0x4]
0338 ; --------------------------------------------------------------------------------------
0338 ; SUBPROGRAM
0338 ; --------------------------------------------------------------------------------------
0338 0342       | B  |		.CONST	0x0342								; Address of begin
0339 0004       |    |		.CONST	0x0004								; Address of exception handler
033a 0002       |    |		.CONST	0x0002								; Number of locals
033b			INIT_0338:
033b e006       |    |		Load	0x0,0x6								; Debug Table 0x12 = .DEBUG	0x033b,0x05b8,0x0004,0x0000,0x0058,0x0425,0x0000,0x04fd
													; Debug Table 0x12.0x0 = 0x33b,0xffff
033c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
033d 02c7       |    |		Declare_Variable	Any
033e e5fb       |    |		Load	0x2,-0x5
033f e006       |    |		Load	0x0,0x6
0340 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
0341 c602       |    |		Store	0x3,0x2
0342			BODY_0338:
0342 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x1 = 0x342,0x1
0343 00ea       |    |		Load_Encached	Null_String_Cache
0344 00ea       |    |		Load_Encached	Null_String_Cache
0345 4801       |H   |		Short_Literal	0x1
0346 e006       |    |		Load	0x0,0x6
0347 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0348 c602       |    |		Store	0x3,0x2
0349 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x2 = 0x349,0x2
034a e006       |    |		Load	0x0,0x6
034b 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
034c 0092 03f1  |    |		Action	Push_String_Extended,0x3f1					; "<RAISE_EXCEPTION>"
													; Debug Table 0x12.0x3 = 0x34c,0x3
034e e5ff       |    |		Load	0x2,-0x1
034f e004       |    |		Load	0x0,0x4
0350 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0351 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0352 0092 03f3  |    |		Action	Push_String_Extended,0x3f3					; "@.@"
0354 e00a       |    |		Load	0x0,0xa
0355 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0356 e006       |    |		Load	0x0,0x6								; Debug Table 0x12.0x4 = 0x356,0x4
0357 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
0358 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x5 = 0x358,0x5
0359 4800       |H   |		Short_Literal	0x0
035a e006       |    |		Load	0x0,0x6
035b 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
035c c602       |    |		Store	0x3,0x2
035d 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x12.0x6 = 0x35d,0x6
035e e006       |    |		Load	0x0,0x6
035f 187e       | ~  |		Execute	Package,Field_Execute,Field_Number 0x7e
0360 c5fb       |    |		Store	0x2,-0x5
0361 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0362 0000 0000  |    |		.BLANK	0000[0x6]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 0372       | r  |		.CONST	0x0372								; Address of begin
0369 0004       |    |		.CONST	0x0004								; Address of exception handler
036a 0002       |    |		.CONST	0x0002								; Number of locals
036b			INIT_0368:
036b e006       |    |		Load	0x0,0x6								; Debug Table 0x13 = .DEBUG	0x036b,0x05c8,0x0004,0x0000,0x0058,0x0425,0x0000,0x0577
													; Debug Table 0x13.0x0 = 0x36b,0xffff
036c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
036d 02c7       |    |		Declare_Variable	Any
036e e5fb       |    |		Load	0x2,-0x5
036f e006       |    |		Load	0x0,0x6
0370 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
0371 c602       |    |		Store	0x3,0x2
0372			BODY_0368:
0372 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x1 = 0x372,0x1
0373 00ea       |    |		Load_Encached	Null_String_Cache
0374 00ea       |    |		Load_Encached	Null_String_Cache
0375 4801       |H   |		Short_Literal	0x1
0376 e006       |    |		Load	0x0,0x6
0377 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
0378 c602       |    |		Store	0x3,0x2
0379 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x2 = 0x379,0x2
037a e006       |    |		Load	0x0,0x6
037b 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
037c 0092 03f1  |    |		Action	Push_String_Extended,0x3f1					; "<RAISE_EXCEPTION>"
													; Debug Table 0x13.0x3 = 0x37c,0x3
037e 00ea       |    |		Load_Encached	Null_String_Cache
037f e5ff       |    |		Load	0x2,-0x1
0380 e004       |    |		Load	0x0,0x4
0381 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
0382 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
0383 e00b       |    |		Load	0x0,0xb
0384 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0385 e006       |    |		Load	0x0,0x6								; Debug Table 0x13.0x4 = 0x385,0x4
0386 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
0387 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x5 = 0x387,0x5
0388 4800       |H   |		Short_Literal	0x0
0389 e006       |    |		Load	0x0,0x6
038a 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
038b c602       |    |		Store	0x3,0x2
038c 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x13.0x6 = 0x38c,0x6
038d e006       |    |		Load	0x0,0x6
038e 187e       | ~  |		Execute	Package,Field_Execute,Field_Number 0x7e
038f c5fb       |    |		Store	0x2,-0x5
0390 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0391 0000 0000  |    |		.BLANK	0000[0x7]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 03a2       |    |		.CONST	0x03a2								; Address of begin
0399 0004       |    |		.CONST	0x0004								; Address of exception handler
039a 0002       |    |		.CONST	0x0002								; Number of locals
039b			INIT_0398:
039b e006       |    |		Load	0x0,0x6								; Debug Table 0x14 = .DEBUG	0x039b,0x05d8,0x0004,0x0000,0x0058,0x0425,0x0000,0x05f3
													; Debug Table 0x14.0x0 = 0x39b,0xffff
039c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
039d 02c7       |    |		Declare_Variable	Any
039e e5fb       |    |		Load	0x2,-0x5
039f e006       |    |		Load	0x0,0x6
03a0 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
03a1 c602       |    |		Store	0x3,0x2
03a2			BODY_0398:
03a2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x1 = 0x3a2,0x1
03a3 00ea       |    |		Load_Encached	Null_String_Cache
03a4 00ea       |    |		Load_Encached	Null_String_Cache
03a5 4801       |H   |		Short_Literal	0x1
03a6 e006       |    |		Load	0x0,0x6
03a7 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03a8 c602       |    |		Store	0x3,0x2
03a9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x2 = 0x3a9,0x2
03aa e006       |    |		Load	0x0,0x6
03ab 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
03ac 0092 03f1  |    |		Action	Push_String_Extended,0x3f1					; "<RAISE_EXCEPTION>"
													; Debug Table 0x14.0x3 = 0x3ac,0x3
03ae 00ea       |    |		Load_Encached	Null_String_Cache
03af e5ff       |    |		Load	0x2,-0x1
03b0 e004       |    |		Load	0x0,0x4
03b1 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03b2 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
03b3 e00b       |    |		Load	0x0,0xb
03b4 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
03b5 e006       |    |		Load	0x0,0x6								; Debug Table 0x14.0x4 = 0x3b5,0x4
03b6 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
03b7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x5 = 0x3b7,0x5
03b8 4800       |H   |		Short_Literal	0x0
03b9 e006       |    |		Load	0x0,0x6
03ba 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
03bb c602       |    |		Store	0x3,0x2
03bc 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x14.0x6 = 0x3bc,0x6
03bd e006       |    |		Load	0x0,0x6
03be 187e       | ~  |		Execute	Package,Field_Execute,Field_Number 0x7e
03bf c5fb       |    |		Store	0x2,-0x5
03c0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03c1 0000 0000  |    |		.BLANK	0000[0x7]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03d2       |    |		.CONST	0x03d2								; Address of begin
03c9 0004       |    |		.CONST	0x0004								; Address of exception handler
03ca 0002       |    |		.CONST	0x0002								; Number of locals
03cb			INIT_03c8:
03cb e006       |    |		Load	0x0,0x6								; Debug Table 0x15 = .DEBUG	0x03cb,0x05e8,0x0004,0x0000,0x0058,0x0425,0x0000,0x066f
													; Debug Table 0x15.0x0 = 0x3cb,0xffff
03cc 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
03cd 02c7       |    |		Declare_Variable	Any
03ce e5fb       |    |		Load	0x2,-0x5
03cf e006       |    |		Load	0x0,0x6
03d0 187f       |    |		Execute	Package,Field_Execute,Field_Number 0x7f
03d1 c602       |    |		Store	0x3,0x2
03d2			BODY_03c8:
03d2 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x1 = 0x3d2,0x1
03d3 00ea       |    |		Load_Encached	Null_String_Cache
03d4 00ea       |    |		Load_Encached	Null_String_Cache
03d5 4801       |H   |		Short_Literal	0x1
03d6 e006       |    |		Load	0x0,0x6
03d7 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
03d8 c602       |    |		Store	0x3,0x2
03d9 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x2 = 0x3d9,0x2
03da e006       |    |		Load	0x0,0x6
03db 1824       | $  |		Execute	Package,Field_Execute,Field_Number 0x24
03dc 0092 03f1  |    |		Action	Push_String_Extended,0x3f1					; "<RAISE_EXCEPTION>"
													; Debug Table 0x15.0x3 = 0x3dc,0x3
03de 00ea       |    |		Load_Encached	Null_String_Cache
03df e5ff       |    |		Load	0x2,-0x1
03e0 e004       |    |		Load	0x0,0x4
03e1 1b35       | 5  |		Execute	Package,Field_Read,Field_Number 0x35
03e2 1839       | 9  |		Execute	Package,Field_Execute,Field_Number 0x39
03e3 e00b       |    |		Load	0x0,0xb
03e4 1826       | &  |		Execute	Package,Field_Execute,Field_Number 0x26
03e5 e006       |    |		Load	0x0,0x6								; Debug Table 0x15.0x4 = 0x3e5,0x4
03e6 1836       | 6  |		Execute	Package,Field_Execute,Field_Number 0x36
03e7 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x5 = 0x3e7,0x5
03e8 4800       |H   |		Short_Literal	0x0
03e9 e006       |    |		Load	0x0,0x6
03ea 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
03eb c602       |    |		Store	0x3,0x2
03ec 00d8       |    |		Load_Top	At_Offset_0						; Debug Table 0x15.0x6 = 0x3ec,0x6
03ed e006       |    |		Load	0x0,0x6
03ee 187e       | ~  |		Execute	Package,Field_Execute,Field_Number 0x7e
03ef c5fb       |    |		Store	0x2,-0x5
03f0 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
03f1 ; --------------------------------------------------------------------------------------
03f1 ; STRING TABLE
03f1 ; --------------------------------------------------------------------------------------
03f1 0008       |    |		.STRTAB	0x0008->0x03f5							; "<RAISE_EXCEPTION>"
03f2 0017       |    |		.STRTAB	0x0017->0x03fd							; "?"
03f3 0016       |    |		.STRTAB	0x0016->0x03fe							; "@.@"
03f4 0017       |    |		.STREND 0x0017->0x03ff
03f5 3c52 4149  |<RAI|		.STRTAB_STRINGS
0400 ; --------------------------------------------------------------------------------------
0400 ; Debug Table
0400 ; --------------------------------------------------------------------------------------
0400 0003 0016  |    |		.CONST	0x0003,0x0016
0402 000b 04b2  |    |		.DEBUG	0x000b,0x04b2,0x8000,0x0000,0x0058,0x0405,0x0000,0x0003
040a 000c 04b4  |    |		.DEBUG	0x000c,0x04b4,0x8000,0x0000,0x0058,0x0425,0x0000,0x001b
0412 010b 050a  |    |		.DEBUG	0x010b,0x050a,0x0001,0x0000,0x0058,0x0425,0x0000,0x0038
041a 0113 050e  |    |		.DEBUG	0x0113,0x050e,0x0002,0x0000,0x0058,0x0425,0x0000,0x0059
0422 011b 0512  |    |		.DEBUG	0x011b,0x0512,0x0002,0x0000,0x0058,0x0425,0x0000,0x0062
042a 0123 0516  | #  |		.DEBUG	0x0123,0x0516,0x0001,0x0000,0x0058,0x0425,0x0000,0x006d
0432 013b 051c  | ;  |		.DEBUG	0x013b,0x051c,0x0001,0x0000,0x0058,0x0425,0x0000,0x008e
043a 0153 0522  | S "|		.DEBUG	0x0153,0x0522,0x0001,0x0000,0x0058,0x0425,0x0000,0x00af
0442 019b 053a  |   :|		.DEBUG	0x019b,0x053a,0x0001,0x0000,0x0058,0x0425,0x0000,0x00d0
044a 01b3 0540  |   @|		.DEBUG	0x01b3,0x0540,0x0001,0x0000,0x0058,0x0425,0x0000,0x00f1
0452 01cb 0546  |   F|		.DEBUG	0x01cb,0x0546,0x0001,0x0000,0x0058,0x0425,0x0000,0x0112
045a 01e3 054c  |   L|		.DEBUG	0x01e3,0x054c,0x0001,0x0000,0x0058,0x0425,0x0000,0x0133
0462 01fb 0552  |   R|		.DEBUG	0x01fb,0x0552,0x0001,0x0000,0x0058,0x0425,0x0000,0x0254
046a 021b 0560  |   `|		.DEBUG	0x021b,0x0560,0x0001,0x0000,0x0058,0x0425,0x0000,0x031b
0472 0283 057e  |   ~|		.DEBUG	0x0283,0x057e,0x0004,0x0000,0x0058,0x0425,0x0000,0x0316
047a 02b3 058e  |    |		.DEBUG	0x02b3,0x058e,0x0004,0x0000,0x0058,0x0425,0x0000,0x0397
0482 02db 059e  |    |		.DEBUG	0x02db,0x059e,0x0001,0x0000,0x0058,0x0425,0x0000,0x03d1
048a 0313 05ac  |    |		.DEBUG	0x0313,0x05ac,0x0004,0x0000,0x0058,0x0425,0x0000,0x0473
0492 033b 05b8  | ;  |		.DEBUG	0x033b,0x05b8,0x0004,0x0000,0x0058,0x0425,0x0000,0x04fd
049a 036b 05c8  | k  |		.DEBUG	0x036b,0x05c8,0x0004,0x0000,0x0058,0x0425,0x0000,0x0577
04a2 039b 05d8  |    |		.DEBUG	0x039b,0x05d8,0x0004,0x0000,0x0058,0x0425,0x0000,0x05f3
04aa 03cb 05e8  |    |		.DEBUG	0x03cb,0x05e8,0x0004,0x0000,0x0058,0x0425,0x0000,0x066f
04b2 ; --------------------------------------------------------------------------------------
04b2 ; Debug3 Subtable 0x0
04b2 ; --------------------------------------------------------------------------------------
04b2 0000 0000  |    |		.DBG3TAB	0x0000,0x0000
04b4 ; --------------------------------------------------------------------------------------
04b4 ; Debug3 Subtable 0x1
04b4 ; --------------------------------------------------------------------------------------
04b4 002a 0000  | *  |		.DBG3TAB	0x002a,0x0000
04b6 000c ffff  |    |		.CONST	0x000c,0xffff
04b8 000d fffe  |    |		.CONST	0x000d,0xfffe
04ba 000e fffd  |    |		.CONST	0x000e,0xfffd
04bc 000f fffc  |    |		.CONST	0x000f,0xfffc
04be 0010 fffb  |    |		.CONST	0x0010,0xfffb
04c0 0011 fffa  |    |		.CONST	0x0011,0xfffa
04c2 0012 fff9  |    |		.CONST	0x0012,0xfff9
04c4 0014 fff8  |    |		.CONST	0x0014,0xfff8
04c6 0016 fff7  |    |		.CONST	0x0016,0xfff7
04c8 0018 fff6  |    |		.CONST	0x0018,0xfff6
04ca 001a fff5  |    |		.CONST	0x001a,0xfff5
04cc 001c fff4  |    |		.CONST	0x001c,0xfff4
04ce 001e fff3  |    |		.CONST	0x001e,0xfff3
04d0 0020 fff2  |    |		.CONST	0x0020,0xfff2
04d2 0022 fff1  | "  |		.CONST	0x0022,0xfff1
04d4 0024 fff0  | $  |		.CONST	0x0024,0xfff0
04d6 0026 ffef  | &  |		.CONST	0x0026,0xffef
04d8 002c ffee  | ,  |		.CONST	0x002c,0xffee
04da 003a ffed  | :  |		.CONST	0x003a,0xffed
04dc 0048 ffec  | H  |		.CONST	0x0048,0xffec
04de 0056 ffeb  | V  |		.CONST	0x0056,0xffeb
04e0 0064 ffea  | d  |		.CONST	0x0064,0xffea
04e2 0072 ffe9  | r  |		.CONST	0x0072,0xffe9
04e4 0080 ffe8  |    |		.CONST	0x0080,0xffe8
04e6 0091 ffe7  |    |		.CONST	0x0091,0xffe7
04e8 00a2 ffe6  |    |		.CONST	0x00a2,0xffe6
04ea 00b3 ffe5  |    |		.CONST	0x00b3,0xffe5
04ec 00c4 ffe4  |    |		.CONST	0x00c4,0xffe4
04ee 00d5 ffe3  |    |		.CONST	0x00d5,0xffe3
04f0 00e6 ffe2  |    |		.CONST	0x00e6,0xffe2
04f2 00e8 ffe1  |    |		.CONST	0x00e8,0xffe1
04f4 00ea ffe0  |    |		.CONST	0x00ea,0xffe0
04f6 00ec ffdf  |    |		.CONST	0x00ec,0xffdf
04f8 00ee ffde  |    |		.CONST	0x00ee,0xffde
04fa 00f0 ffdd  |    |		.CONST	0x00f0,0xffdd
04fc 00f2 ffdc  |    |		.CONST	0x00f2,0xffdc
04fe 00f4 ffdb  |    |		.CONST	0x00f4,0xffdb
0500 00f6 ffda  |    |		.CONST	0x00f6,0xffda
0502 00f8 ffd9  |    |		.CONST	0x00f8,0xffd9
0504 00fa ffd8  |    |		.CONST	0x00fa,0xffd8
0506 00fc ffd7  |    |		.CONST	0x00fc,0xffd7
0508 00fe ffd6  |    |		.CONST	0x00fe,0xffd6
050a ; --------------------------------------------------------------------------------------
050a ; Debug3 Subtable 0x2
050a ; --------------------------------------------------------------------------------------
050a 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
050c 010b 0001  |    |		.CONST	0x010b,0x0001
050e ; --------------------------------------------------------------------------------------
050e ; Debug3 Subtable 0x3
050e ; --------------------------------------------------------------------------------------
050e 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0510 0113 0001  |    |		.CONST	0x0113,0x0001
0512 ; --------------------------------------------------------------------------------------
0512 ; Debug3 Subtable 0x4
0512 ; --------------------------------------------------------------------------------------
0512 0000 0001  |    |		.DBG3TAB	0x0000,0x0001
0514 011b 0001  |    |		.CONST	0x011b,0x0001
0516 ; --------------------------------------------------------------------------------------
0516 ; Debug3 Subtable 0x5
0516 ; --------------------------------------------------------------------------------------
0516 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0518 0125 0001  | %  |		.CONST	0x0125,0x0001
051a 0131 0002  | 1  |		.CONST	0x0131,0x0002
051c ; --------------------------------------------------------------------------------------
051c ; Debug3 Subtable 0x6
051c ; --------------------------------------------------------------------------------------
051c 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
051e 013d 0001  | =  |		.CONST	0x013d,0x0001
0520 0149 0002  | I  |		.CONST	0x0149,0x0002
0522 ; --------------------------------------------------------------------------------------
0522 ; Debug3 Subtable 0x7
0522 ; --------------------------------------------------------------------------------------
0522 0004 0007  |    |		.DBG3TAB	0x0004,0x0007
0524 0153 ffff  | S  |		.CONST	0x0153,0xffff
0526 0158 fffe  | X  |		.CONST	0x0158,0xfffe
0528 015d fffd  | ]  |		.CONST	0x015d,0xfffd
052a 015f fffc  | _  |		.CONST	0x015f,0xfffc
052c 0163 0001  | c  |		.CONST	0x0163,0x0001
052e 0175 0002  | u  |		.CONST	0x0175,0x0002
0530 0177 0003  | w  |		.CONST	0x0177,0x0003
0532 0188 0004  |    |		.CONST	0x0188,0x0004
0534 018a 0005  |    |		.CONST	0x018a,0x0005
0536 018b 0006  |    |		.CONST	0x018b,0x0006
0538 0191 0007  |    |		.CONST	0x0191,0x0007
053a ; --------------------------------------------------------------------------------------
053a ; Debug3 Subtable 0x8
053a ; --------------------------------------------------------------------------------------
053a 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
053c 019d 0001  |    |		.CONST	0x019d,0x0001
053e 01a9 0002  |    |		.CONST	0x01a9,0x0002
0540 ; --------------------------------------------------------------------------------------
0540 ; Debug3 Subtable 0x9
0540 ; --------------------------------------------------------------------------------------
0540 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0542 01b5 0001  |    |		.CONST	0x01b5,0x0001
0544 01c1 0002  |    |		.CONST	0x01c1,0x0002
0546 ; --------------------------------------------------------------------------------------
0546 ; Debug3 Subtable 0xa
0546 ; --------------------------------------------------------------------------------------
0546 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
0548 01cd 0001  |    |		.CONST	0x01cd,0x0001
054a 01d9 0002  |    |		.CONST	0x01d9,0x0002
054c ; --------------------------------------------------------------------------------------
054c ; Debug3 Subtable 0xb
054c ; --------------------------------------------------------------------------------------
054c 0000 0002  |    |		.DBG3TAB	0x0000,0x0002
054e 01e5 0001  |    |		.CONST	0x01e5,0x0001
0550 01f1 0002  |    |		.CONST	0x01f1,0x0002
0552 ; --------------------------------------------------------------------------------------
0552 ; Debug3 Subtable 0xc
0552 ; --------------------------------------------------------------------------------------
0552 0000 0006  |    |		.DBG3TAB	0x0000,0x0006
0554 01fb 0001  |    |		.CONST	0x01fb,0x0001
0556 020c 0003  |    |		.CONST	0x020c,0x0003
0558 020e 0004  |    |		.CONST	0x020e,0x0004
055a 0210 0005  |    |		.CONST	0x0210,0x0005
055c 0212 0006  |    |		.CONST	0x0212,0x0006
055e 0214 0007  |    |		.CONST	0x0214,0x0007
0560 ; --------------------------------------------------------------------------------------
0560 ; Debug3 Subtable 0xd
0560 ; --------------------------------------------------------------------------------------
0560 0004 000a  |    |		.DBG3TAB	0x0004,0x000a
0562 021b ffff  |    |		.CONST	0x021b,0xffff
0564 0220 fffe  |    |		.CONST	0x0220,0xfffe
0566 0225 fffd  | %  |		.CONST	0x0225,0xfffd
0568 0227 fffc  | '  |		.CONST	0x0227,0xfffc
056a 022d 0001  | -  |		.CONST	0x022d,0x0001
056c 023e 0002  | >  |		.CONST	0x023e,0x0002
056e 0240 0003  | @  |		.CONST	0x0240,0x0003
0570 0251 0004  | Q  |		.CONST	0x0251,0x0004
0572 0253 0005  | S  |		.CONST	0x0253,0x0005
0574 0260 0007  | `  |		.CONST	0x0260,0x0007
0576 0268 0008  | h  |		.CONST	0x0268,0x0008
0578 026d 0006  | m  |		.CONST	0x026d,0x0006
057a 0272 0009  | r  |		.CONST	0x0272,0x0009
057c 0278 000a  | x  |		.CONST	0x0278,0x000a
057e ; --------------------------------------------------------------------------------------
057e ; Debug3 Subtable 0xe
057e ; --------------------------------------------------------------------------------------
057e 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
0580 0283 ffff  |    |		.CONST	0x0283,0xffff
0582 028a 0001  |    |		.CONST	0x028a,0x0001
0584 0291 0002  |    |		.CONST	0x0291,0x0002
0586 0294 0003  |    |		.CONST	0x0294,0x0003
0588 02a3 0004  |    |		.CONST	0x02a3,0x0004
058a 02a5 0005  |    |		.CONST	0x02a5,0x0005
058c 02aa 0006  |    |		.CONST	0x02aa,0x0006
058e ; --------------------------------------------------------------------------------------
058e ; Debug3 Subtable 0xf
058e ; --------------------------------------------------------------------------------------
058e 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
0590 02b3 ffff  |    |		.CONST	0x02b3,0xffff
0592 02ba 0001  |    |		.CONST	0x02ba,0x0001
0594 02c1 0002  |    |		.CONST	0x02c1,0x0002
0596 02c4 0003  |    |		.CONST	0x02c4,0x0003
0598 02c7 0004  |    |		.CONST	0x02c7,0x0004
059a 02c9 0005  |    |		.CONST	0x02c9,0x0005
059c 02ce 0006  |    |		.CONST	0x02ce,0x0006
059e ; --------------------------------------------------------------------------------------
059e ; Debug3 Subtable 0x10
059e ; --------------------------------------------------------------------------------------
059e 0002 0004  |    |		.DBG3TAB	0x0002,0x0004
05a0 02db ffff  |    |		.CONST	0x02db,0xffff
05a2 02de fffe  |    |		.CONST	0x02de,0xfffe
05a4 02e3 0001  |    |		.CONST	0x02e3,0x0001
05a6 02fb 0002  |    |		.CONST	0x02fb,0x0002
05a8 02fe 0004  |    |		.CONST	0x02fe,0x0004
05aa 0300 0003  |    |		.CONST	0x0300,0x0003
05ac ; --------------------------------------------------------------------------------------
05ac ; Debug3 Subtable 0x11
05ac ; --------------------------------------------------------------------------------------
05ac 0001 0004  |    |		.DBG3TAB	0x0001,0x0004
05ae 0313 ffff  |    |		.CONST	0x0313,0xffff
05b0 031a 0001  |    |		.CONST	0x031a,0x0001
05b2 0325 0003  | %  |		.CONST	0x0325,0x0003
05b4 032a 0002  | *  |		.CONST	0x032a,0x0002
05b6 032f 0004  | /  |		.CONST	0x032f,0x0004
05b8 ; --------------------------------------------------------------------------------------
05b8 ; Debug3 Subtable 0x12
05b8 ; --------------------------------------------------------------------------------------
05b8 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
05ba 033b ffff  | ;  |		.CONST	0x033b,0xffff
05bc 0342 0001  | B  |		.CONST	0x0342,0x0001
05be 0349 0002  | I  |		.CONST	0x0349,0x0002
05c0 034c 0003  | L  |		.CONST	0x034c,0x0003
05c2 0356 0004  | V  |		.CONST	0x0356,0x0004
05c4 0358 0005  | X  |		.CONST	0x0358,0x0005
05c6 035d 0006  | ]  |		.CONST	0x035d,0x0006
05c8 ; --------------------------------------------------------------------------------------
05c8 ; Debug3 Subtable 0x13
05c8 ; --------------------------------------------------------------------------------------
05c8 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
05ca 036b ffff  | k  |		.CONST	0x036b,0xffff
05cc 0372 0001  | r  |		.CONST	0x0372,0x0001
05ce 0379 0002  | y  |		.CONST	0x0379,0x0002
05d0 037c 0003  | |  |		.CONST	0x037c,0x0003
05d2 0385 0004  |    |		.CONST	0x0385,0x0004
05d4 0387 0005  |    |		.CONST	0x0387,0x0005
05d6 038c 0006  |    |		.CONST	0x038c,0x0006
05d8 ; --------------------------------------------------------------------------------------
05d8 ; Debug3 Subtable 0x14
05d8 ; --------------------------------------------------------------------------------------
05d8 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
05da 039b ffff  |    |		.CONST	0x039b,0xffff
05dc 03a2 0001  |    |		.CONST	0x03a2,0x0001
05de 03a9 0002  |    |		.CONST	0x03a9,0x0002
05e0 03ac 0003  |    |		.CONST	0x03ac,0x0003
05e2 03b5 0004  |    |		.CONST	0x03b5,0x0004
05e4 03b7 0005  |    |		.CONST	0x03b7,0x0005
05e6 03bc 0006  |    |		.CONST	0x03bc,0x0006
05e8 ; --------------------------------------------------------------------------------------
05e8 ; Debug3 Subtable 0x15
05e8 ; --------------------------------------------------------------------------------------
05e8 0001 0006  |    |		.DBG3TAB	0x0001,0x0006
05ea 03cb ffff  |    |		.CONST	0x03cb,0xffff
05ec 03d2 0001  |    |		.CONST	0x03d2,0x0001
05ee 03d9 0002  |    |		.CONST	0x03d9,0x0002
05f0 03dc 0003  |    |		.CONST	0x03dc,0x0003
05f2 03e5 0004  |    |		.CONST	0x03e5,0x0004
05f4 03e7 0005  |    |		.CONST	0x03e7,0x0005
05f6 03ec 0006  |    |		.CONST	0x03ec,0x0006
05f8 0000 0000  |    |		.BLANK	0000[0x8]